let hybrid f () = (sin, cos) where
  rec der sin = cos init 0.0
  and der cos = -. sin init 1.0