1 /* ====== BEGIN INCLUDE SEGMENT         apl_number_data.incl.pl1 ================================== */
 2 
 3 /*
 4    This include file contains information about the machine representation of numbers.
 5    In all programs numbers should simply be declared 'float'.
 6    All default statements should be in this include file.
 7 
 8    This is the binary version.  The manifest constant Binary should be used by programs
 9    that need to know whether we are using binary or decimal.
10  */
11 
12 /* format: style3,initlm0,idind30 */
13 
14 default (float & ^decimal & ^binary & ^precision & ^constant) float binary (63);
15 
16 declare   (
17           TheBiggestNumberWeveGot       float initial (0.1701411834604692317e+39),
18           TheSmallestNumberWeveGot      float initial (.1469367938527859385e-38),
19           Binary                        bit (1) aligned initial ("1"b)
20           )                             internal static options (constant);
21 
22 /* Number of characters in a number datum entry; used for copying float number arrays as strings.
23    (Obsolete! use array copies!) */
24 
25 declare   NumberSize                    fixed binary precision (4) internal static initial (8);
26 
27 /* ------ END INCLUDE SEGMENT           apl_number_data.incl.pl1 ---------------------------------- */