anchor.diff:  (defun-g bs-fast32-hash-3-per-corner ((grid-cell :vec2))
     (let* ((offset (v2! 26.0 161.0))
            (domain 71.0)
  -         (some-large-floats
  -          (glsl-expr "vec3(951.135664, 642.949883, 803.202459)" :vec3))
  +         (some-large-floats (v! "951.135664" "642.949883" "803.202459"))
            (p (v! (s~ grid-cell :xy) (+ (s~ grid-cell :xy) (v2! 1.0)))))
       (setf p (- p (* (floor (* p (/ 1.0 domain))) domain)))
       (incf p (s~ offset :xyxy))
  
positive.code: (defun-g bs-fast32-hash-3-per-corner ((grid-cell :vec3))
    (let* ((offset (v2! 50.0 161.0))
           (domain 69.0)
           (some-large-floats
            (glsl-expr "vec3(635.298681, 682.357502, 668.926525)" :vec3))
           (zinc (glsl-expr "vec3(48.500388, 65.294118, 63.934599)" :vec3)))
      (setf (s~ grid-cell :xyz)
            (- (s~ grid-cell :xyz)
               (* (floor (* (s~ grid-cell :xyz) (/ 1.0 domain))) domain)))
  
negative.code:                                       (v2-mask :vec3))
    (let* ((offset (v2! 50.0 161.0))
           (domain 69.0)
           (some-large-floats (v! "635.298681" "682.357502" "668.926525"))
           (zinc (v! "48.500388" "65.294118" "63.934599")))
      (setf (s~ grid-cell :xyz)
            (- (s~ grid-cell :xyz)
               (* (floor (* (s~ grid-cell :xyz) (/ 1.0 domain))) domain)))
  