anchor.diff:  
   ;; FIXME : run unit tests on each operation, for each %NUMERIC-END-CLASSES%
   
  -
   ;; single instance test, ensure error
   ;; (@+@)
  +
  +
  +;;; %% Nary Comparison Functions
   
   (defop '=)
   (defop '/=)
  
positive.code: ;; (@min@ 3 1 2)
  ;; => 1
  
  
  ;;; % Overloading for Diadic Non-Comutative Functions
  
  (defgeneric @expt (a b)
    (:method ((a number) (b number))
      (expt a b)))
  
  ;; ...
  
  ;;; % Overloading for Transcendental Functions
  
  
  ;;; % Overloading for Alternately Monadic/Diadic Functions
  
  ;; FIXME: Possibly loosing more optimizations, here.
  ;; When possible, try to call directly to the underlying machine
  
negative.code: ;; implementation would present all possible optimizations to the
  ;; compiler
  
  ;;; %% Miscellaneous Monadic Functions
  
  ;;; %%% EXP
  
  ;;; %%% SIGNUM
  
  ;;; %%% SQRT, ISQRT
  
  ;;; %%% CIS
  
  ;;; %%% CONJUGATE
  
  ;;; %%% PHASE
  
  ;;; %%% Structural Accessor Functions
  
  ;;; %%%% REALPART, IMAGPART
  
  ;;; %%%% NUMERATOR, DENOMINATOR
  
  
  ;;; %% Overloading for Monadic Predicate Functions
  
  ;;; %%% "Number-Line" Predicates
  
  (defgeneric %minusp (a)
    (:method ((a number))
      (minusp a)))
  