4 lines
97 B
Text
4 lines
97 B
Text
|
|
let hybrid f () = (sin, cos) where
|
|
rec der sin = cos init 0.0
|
|
and der cos = -. sin init 1.0
|