Change names
This commit is contained in:
parent
05797676ce
commit
95684a31df
1 changed files with 2 additions and 2 deletions
4
eval.ml
4
eval.ml
|
@ -101,10 +101,10 @@ let rec binop op l r =
|
||||||
end
|
end
|
||||||
| Some f -> f l r
|
| Some f -> f l r
|
||||||
|
|
||||||
let deg r =
|
let rad r =
|
||||||
r *. 180. /. Float.pi
|
r *. 180. /. Float.pi
|
||||||
|
|
||||||
let rad d =
|
let deg d =
|
||||||
d /. 180. *. Float.pi
|
d /. 180. *. Float.pi
|
||||||
|
|
||||||
let floatfun f = function
|
let floatfun f = function
|
||||||
|
|
Loading…
Add table
Reference in a new issue