anchor.diff:  ;; ffloor
   ;; fround
   ;; ftruncate
  +;; rem
   ;; round
   ;; truncate
   ;; ceiling (check api)
  
positive.code: ;; do
  ;; do*
  ;; setf expanders
  
  
  ;; ## Crazy Town
  
negative.code:   (error "Varjo: Cannot yet make the complement in cases where there are many possible overloads.
  Try qualifying the types in order to pass complement a specific overload."))
  
  (v-defun scale-float ((f v-float)
                        (i v-int))
    (* f (expt 2f0 i)))
  
  ;;------------------------------------------------------------
  
  ;; ## Spec clash issues
  ;; floor (check api)
  