(bind-func add-velocity-2 (lambda (x y amount-x amount-y) (fluid-cube-add-velocity (get-fluid-cube-2) x y amount-x amount-y)))