home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / modu1096.zip / ISOsym / realstr.def < prev    next >
Text File  |  1996-08-29  |  2KB  |  58 lines
  1. DEFINITION MODULE RealStr;
  2.  
  3.   (* REAL/string conversions *)
  4.  
  5. IMPORT
  6.   ConvTypes;
  7.  
  8. TYPE
  9.   ConvResults = ConvTypes.ConvResults;
  10.         (* strAllRight, strOutOfRange, strWrongFormat, strEmpty *)
  11.  
  12. (*
  13.  * the string form of a signed fixed-point real number is
  14.  *  ["+" | "-"], decimal digit, {decimal digit}, [".", {decimal digit}]
  15.  *)
  16.  
  17. (*
  18.  * the string form of a signed floating-point real number is
  19.  *  signed fixed-point real number, "E", ["+" | "-"], decimal digit, {decimal digit}
  20.  *)
  21.  
  22. PROCEDURE StrToReal (str: ARRAY OF CHAR; VAR real: REAL; VAR res: ConvResults);
  23. (*
  24.  * Ignores any leading spaces in str. If the subsequent characters in str are in the
  25.  * format of a signed real number, assigns a corresponding value to real.
  26.  * Assigns a value indicating the format of str to res.
  27.  *)
  28.  
  29. PROCEDURE RealToFloat (real: REAL; sigFigs: CARDINAL; VAR str: ARRAY OF CHAR);
  30. (*
  31.  * Converts the value of real to floating-point string form, with sigFigs significant
  32.  * figures, and copies the possibly truncated result to str.
  33.  *)
  34.  
  35. PROCEDURE RealToEng (real: REAL; sigFigs: CARDINAL; VAR str: ARRAY OF CHAR);
  36. (*
  37.  * Converts the value of real to floating-point string form, with sigFigs significant
  38.  * figures, and copies the possibly truncated result to str.
  39.  * The number is scaled with one to three digits in the whole number part and with
  40.  * an exponent that is a multiple of three.
  41.  *)
  42.  
  43. PROCEDURE RealToFixed (real: REAL; place: INTEGER; VAR str: ARRAY OF CHAR);
  44. (*
  45.  * Converts the value of real to fixed-point string form, rounded to the given place
  46.  * relative to the decimal point, and copies the possibly truncated result to str.
  47.  *)
  48.  
  49. PROCEDURE RealToStr (real: REAL; VAR str: ARRAY OF CHAR);
  50. (*
  51.  * Converts the value of real as RealToFixed if the sign and magnitude can be shown
  52.  * within the capacity of str, or otherwise as RealToFloat, and copies the possibly
  53.  * truncated result to str. The number of places or significant digits are
  54.  * implementation-defined.
  55.  *)
  56.  
  57. END RealStr.
  58.