(bind-func cerberus_octave_from_val (lambda (val:float) (dtof (pow 2.0 (- (* (ftod val) 4.0) 1.0)))))