home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Tools / Languages / Caml Light 0.61 / Source / src / lib / float.ml < prev    next >
Encoding:
Text File  |  1993-09-24  |  152 b   |  8 lines  |  [TEXT/MPS ]
  1. (* Operations on floating-point numbers *) 
  2.  
  3. let string_of_float = format_float "%.12g";;
  4.  
  5. let abs_float f =
  6.   if f <. 0.0 then minus_float f else f
  7. ;;
  8.