let fg () = exp (Random.float 15. *. (if Random.float 1. < 0.5 then 1. else -1.)) *. (if Random.float 1. < 0.5 then 1. else -1.)