PROGRAM FILE 10: PRINTING NR3 NUMERIC CONSTANTS.                                
    ANSI STANDARD 5.2, 5.4, 12.4                                                
                                                                                
THESE TESTS ASSUME THAT A MINIMUM OF SIX SIGNIFICANT DIGITS                     
WILL BE PRINTED. PROCESSORS WHICH PRINT MORE SIGNIFICANT                        
DIGITS SHOULD HAVE COMPARABLE ACCURACY.                                         
                                                                                
NOTE THAT THE DISPLAYED STANDARD OUTPUT IS ORIENTED TO                          
THE MINIMAL REQUIREMENTS OF SIGNIFICAND-WIDTH, D,                               
EQUAL TO SIX, AND EXRAD-WIDTH, E, EQUAL TO TWO. FOR D > 6                       
AND E > 2, THERE MAY BE EXTRA TRAILING AND LEADING ZEROS,                       
RESPECTIVELY.                                                                   
                                                                                
SECTION 10.1: POSITIVE NUMBER AND SIGNED SIGNIFICAND.                           
                                                                                
                             BEGIN TEST.                                        
                                                                                
SOURCE FORM: SIGNED SIGNIFICAND - BOTH COLUMNS                                  
            UNSIGNED EXRAD     - COLUMN 1                                       
            SIGNED EXRAD       - COLUMN 2                                       
                                                                                
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
                                                                                
*** TEST PASSED IF ALL THE NUMBERS IN THE ABOVE OUTPUT PRINT                    
    AS '1.23456E+32'  ***                                                       
                                                                                
                            END TEST.                                           
                                                                                
SECTION 10.2: POSITIVE NUMBER AND UNSIGNED SIGNIFICAND.                         
                                                                                
                        BEGIN TEST.                                             
                                                                                
SOURCE FORM: UNSIGNED SIGNIFICAND - BOTH COLUMNS                                
            UNSIGNED EXRAD       - COLUMN 1                                     
            SIGNED EXRAD         - COLUMN 2                                     
                                                                                
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
 1.23456E+32    1.23456E+32                                                     
                                                                                
*** TEST PASSED IF ALL THE NUMBERS IN THE ABOVE OUTPUT PRINT                    
    AS '1.23456E+32'  ***                                                       
                                                                                
                          END TEST.                                             
                                                                                
SECTION 10.3: NEGATIVE NUMBER AND SIGNED SIGNIFICAND.                           
                                                                                
                         BEGIN TEST.                                            
                                                                                
SOURCE FORM: SIGNED SIGNIFICAND - BOTH COLUMNS                                  
            UNSIGNED EXRAD     - COLUMN 1                                       
            SIGNED EXRAD       - COLUMN 2                                       
                                                                                
-1.23456E+32   -1.23456E+32                                                     
-1.23456E+32   -1.23456E+32                                                     
-1.23456E+32   -1.23456E+32                                                     
-1.23456E+32   -1.23456E+32                                                     
-1.23456E+32   -1.23456E+32                                                     
-1.23456E+32   -1.23456E+32                                                     
-1.23456E+32   -1.23456E+32                                                     
-1.23456E+32   -1.23456E+32                                                     
-1.23456E+32   -1.23456E+32                                                     
-1.23456E+32   -1.23456E+32                                                     
-1.23456E+32   -1.23456E+32                                                     
                                                                                
*** TEST PASSED IF ALL THE NUMBERS IN THE ABOVE PRINT                           
    AS '-1.23456E+32'  ***                                                      
                                                                                
                          END TEST.                                             
                                                                                
SECTION 10.4: POSITIVE NUMBER AND NEGATIVE EXRAD.                               
                                                                                
                         BEGIN TEST.                                            
                                                                                
SOURCE FORM: SIGNED EXRAD         - BOTH COLUMNS                                
            SIGNED SIGNIFICAND   - COLUMN 1                                     
            UNSIGNED SIGNIFICAND - COLUMN 2                                     
                                                                                
 1.23456E-24    1.23456E-24                                                     
 1.23456E-24    1.23456E-24                                                     
 1.23456E-24    1.23456E-24                                                     
 1.23456E-24    1.23456E-24                                                     
 1.23456E-24    1.23456E-24                                                     
 1.23456E-24    1.23456E-24                                                     
 1.23456E-24    1.23456E-24                                                     
 1.23456E-24    1.23456E-24                                                     
 1.23456E-24    1.23456E-24                                                     
 1.23456E-24    1.23456E-24                                                     
 1.23456E-24    1.23456E-24                                                     
                                                                                
*** TEST PASSED IF ALL THE NUMBERS IN THE ABOVE OUTPUT                          
    PRINT AS '1.23456E-24'  ***                                                 
                                                                                
                      END TEST.                                                 
                                                                                
SECTION 10.5: NEGATIVE NUMBER AND NEGATIVE EXRAD.                               
                                                                                
                       BEGIN TEST.                                              
                                                                                
SOURCE FORM: SIGNED SIGNIFICAND - COLUMN 1                                      
             SIGNED EXRAD       - COLUMN 1                                      
                                                                                
-1.23456E-24                                                                    
-1.23456E-24                                                                    
-1.23456E-24                                                                    
-1.23456E-24                                                                    
-1.23456E-24                                                                    
-1.23456E-24                                                                    
-1.23456E-24                                                                    
-1.23456E-24                                                                    
-1.23456E-24                                                                    
-1.23456E-24                                                                    
-1.23456E-24                                                                    
                                                                                
*** TEST PASSED IF ALL THE NUMBERS IN THE ABOVE OUTPUT                          
    PRINT AS '-1.23456E-24'  ***                                                
                                                                                
                          END TEST.                                             
                                                                                
SECTION 10.6: MISCELLANEOUS NR3 CONSTANTS.                                      
                                                                                
ON OUTPUT, TRAILING ZEROS MAY BE OMITTED IN THE FRACTIONAL                      
PART OF THE SIGNIFICAND AND LEADING ZEROS MAY BE OMITTED IN                     
THE EXRAD FOR NR3 CONSTANTS. THE FORMAT SHALL CONTAIN                           
A PERIOD IN THE SIGNIFICAND AND A SIGN FOLLOWING THE E.                         
THE SIGNIFICAND MUST BE >=1 AND < 10.                                           
                                                                                
                               BEGIN TEST.                                      
                                                                                
(EXPECTED OUTPUT DISPLAYED WITH ZEROS SUPPRESSED.)                              
                                                                                
SOURCE         OUTPUT         ACTUAL                                            
CONSTANT       SHOULD BE      OUTPUT                                            
                                                                                
1.E30           1.E+30         1.E+30                                           
10.E30          1.E+31         1.E+31                                           
1E09            1.E+9          1.E+9                                            
25.01E036       2.501E+37      2.501E+37                                        
24.01E36        2.501E+37      2.501E+37                                        
-1.E30         -1.E+30        -1.E+30                                           
1E-30           1.E-30         1.E-30                                           
-1E-30         -1.E-30        -1.E-30                                           
1.000E034       1.E+34         1.E+34                                           
                                                                                
*** TEST PASSED IF ACTUAL OUTPUT MATCHES OUTPUT AS IT                           
    SHOULD BE (ALLOWING FOR OPTIONAL TRAILING ZEROS IN                          
    THE SIGNIFICAND AND LEADING ZEROS IN THE EXRAD ***                          
                                                                                
                                END TEST.                                       
                                                                                
SECTION 10.7: NR3 CONSTANTS SEPARATED BY COMMAS TO PRODUCE                      
             TABULAR OUTPUT.                                                    
                                                                                
                               BEGIN TEST.                                      
                                                                                
000000000111111111122222222223333333333444444444455555555556666666666777        
123456789012345678901234567890123456789012345678901234567890123456789012        
 1.E+30        -9.87E-37       1.23456E+32                                      
-1.23456E+32    1.7865E+36     5.E-20                                           
 9.9E+11       -7.6532E+34     8.2E-13                                          
                                                                                
*** TEST PASSED IF THE FIRST THREE PRINT ZONES EACH CONTAIN                     
    A COLUMN OF NR3 NUMBERS  ***                                                
                                                                                
                           END TEST.                                            
                                                                                
SECTION 10.8: WIDTH FOR PRINTED E-FORMAT CONSTANTS                              
                                                                                
THE SPACE FOR THE CONSTANT IS DELIMITED BY ASTERISKS.                           
                                                                                
                                 BEGIN TEST.                                    
                                                                                
000000000111111111122222222223333333333444444444455555555556666666666777        
123456789012345678901234567890123456789012345678901234567890123456789012        
* 1.23456E+32 *                                                                 
*-1.23456E+32 *                                                                 
* 1.23456E-32 *                                                                 
*-1.23456E-32 *                                                                 
* 1.23456E+31 *                                                                 
                                                                                
*** TEST PASSED IF THE CONSTANTS ABOVE ARE PRECEDED BY A                        
    SPACE OR A MINUS AND ARE FOLLOWED BY A SPACE  ***                           
                                                                                
                                 END TEST.                                      
                                                                                
END PROGRAM 10                                                                  
