(bind-func add_density (lambda (x:i64 y:i64 amount:double) (let ((cube (get_fluid_cube))) (fluid_cube_add_density cube x y amount))))