(bind-func invert_matrix (lambda (mat:float*) (let ((mat2:float* (salloc 16))) (minverse mat 4 mat2) (memcpy (cast mat i8*) (cast mat2 i8*) (* 16 4)) void)))