270 PRINT "*** TEST PASSED IF THE CONSTANTS IN ROWS 1, 2 AND 3 PRINTED" 280 PRINT " IN NR1 FORMAT; IN ROWS 4, 5 AND 6 IN NR2 FORMAT; AND IN" ROWS 7, 8 AND 9 IN NR3 FORMAT ***"1

290 PRINT " 300 PRINT

310 PRINT "EXCEPT: IF SIGNIFICANCE-WIDTH FOR THIS IMPLEMENTATION IS" 320 PRINT "GREATER THAN 9, ROWS 7, 8, AND 9 MUST BE IN NR1, NR2," 330 PRINT "AND NR1 FORMAT, RESPECTIVELY."

340 PRINT

350 PRINT "

360 PRINT

370 PRINT "SECTION 13.2: ROUNDING RESULTS."

380 PRINT

END TEST."

390 PRINT "THE NUMBER OF SIGNIFICANT DIGITS PRINTED IS IMPLEMENTATION" 400 PRINT "DEFINED; HOWEVER, NR2 AND NR3 CONSTANTS WHICH CONTAIN EXCESS" 410 PRINT "DIGITS SHOULD BE PRINTED IN A STANDARD REPRESENTATION."

420 PRINT

430 PRINT "

440 PRINT

450 LET T1=30

BEGIN TEST."

460 PRINT "SOURCE CONSTANT"; TAB(T1); "PROCESSOR OUTPUT"

.000001234567886";TAB(T1);.000001234567886

470 PRINT

480 PRINT "1

1234567886"; TAB(T1); 1234567886

490 PRINT "2

500 PRINT "3

510 PRINT "4

9.999999999"; TAB(T1);9.999999999

923456.7886";TAB(T1);923456.7886

520 PRINT "5 -0.09234567886"; TAB(T1);-0.09234567886

530 PRINT "6

540 PRINT "7

550 PRINT

.04444444444";TAB(T1);.04444444444

.001200000004"; TAB(T1); .001200000004

560 PRINT "CORRECT REPRESENTATION FOR PROCESSORS PRINTING FROM 6 TO 9" 570 PRINT "SIGNIFICANT DIGITS"

580 PRINT

590 PRINT "D = 6","D = 7","D = 8","D = 9"

600 PRINT

610 PRINT "1

620 PRINT "2

1.23457E+9","1.234568E+9","1.2345679E+9","1.23456789E+9" 1.23457E-6","1.234568E-6","1.2345679E-6","1.23456789E-6"

4.44444E-2","4.444444E-2","4.4444444E-2","4.44444444E-2"

.001200",".0012000",".00120000",".001200000"

720 PRINT "*** TEST PASSED IF THE PROCESSOR OUTPUT IN THE FIRST SET" OF NUMBERED ROWS MATCHES THE COLUMN CORRESPONDING" TO THE IMPLEMENTATION-DEFINED SIGNIFICANCE-WIDTH" (ALLOWING FOR OPTIONAL TRAILING ZEROS IN THE" SIGNIFICAND AND LEADING ZEROS IN THE EXRAD) ***"

750 PRINT "

755 PRINT " 760 PRINT

762 PRINT "

END TEST."

765 PRINT

770 PRINT "END PROGRAM 13"

780 END

PROGRAM FILE 13: FORMAT AND ROUNDING OF PRINTED
NUMERIC CONSTANTS.

ANSI STANDARD 12.4, 5.2, 5.4

SECTION 13.1: PRINTED REPRESENTATION OF CONSTANTS.

THE FORMAT OF A PRINTED CONSTANT IS DETERMINED BY THE VALUE
OF THE CONSTANT RATHER THAN BY ITS ORIGINAL REPRESENTATION.
THE SUPPRESSION OF LEADING INSIGNIFICANT ZEROS IN THE EXRAD
OR TRAILING INSIGNIFICANT ZEROS IN THE SIGNIFICAND

*** TEST PASSED IF THE CONSTANTS IN ROWS 1, 2 AND 3 PRINTED IN NR1 FORMAT; IN ROWS 4, 5 AND 6 IN NR2 FORMAT; AND IN ROWS 7, 8 AND 9 IN NR3 FORMAT ***

EXCEPT: IF SIGNIFICANCE-WIDTH FOR THIS IMPLEMENTATION IS
GREATER THAN 9, ROWS 7, 8, AND 9 MUST BE IN NR1, NR2,
AND NR1 FORMAT, RESPECTIVELY.

END TEST.

SECTION 13.2: ROUNDING RESULTS.

THE NUMBER OF SIGNIFICANT DIGITS PRINTED IS IMPLEMENTATION
DEFINED; HOWEVER, NR2 AND NR3 CONSTANTS WHICH CONTAIN EXCESS
DIGITS SHOULD BE PRINTED IN A STANDARD REPRESENTATION.

SOURCE CONSTANT

BEGIN TEST.

PROCESSOR OUTPUT

CORRECT REPRESENTATION FOR PROCESSORS PRINTING FROM 6 TO 9
SIGNIFICANT DIGITS

*** TEST PASSED IF THE PROCESSOR OUTPUT IN THE FIRST SET
OF NUMBERED ROWS MATCHES THE COLUMN CORRESPONDING
TO THE IMPLEMENTATION-DEFINED SIGNIFICANCE-WIDTH
(ALLOWING FOR OPTIONAL TRAILING ZEROS IN THE
SIGNIFICAND AND LEADING ZEROS IN THE EXRAD) ***

END PROGRAM 13

**

END TEST.

10 PRINT "PROGRAM FILE 14: PRINTING AND ASSIGNING NUMERIC VALUES"
15 PRINT "
NEAR TO THE MAXIMUM AND MINIMUM MAGNITUDE."
12.4"

20 PRINT " ANSI STANDARD 5.4, 9.4,

30 PRINT

40 PRINT "SECTION 14.1: PRINTING NR3 CONSTANTS OF SIX SIGNIFICANT"

**

190 PRINT "-9.99999E34 ","-9.99999E+34 ",-9.99999E34
200 PRINT "+9.99999E+35 ", " 9.99999E+35 ", +9.99999E+35
210 PRINT "-9.99999E+36 ","-9.99999E+36 ",-9.99999E+36
220 PRINT " 9.99999E37 ", " 9.99999E+37 ",9.99999E37
230 PRINT "-1.00001E-36","-1.00001E-36", -1.00001E-36
240 PRINT " 1.00001E-37"," 1.00001E-37", 1.00001E-37
250 PRINT "+1.00001E-38"," 1.00001E-38",+1.00001E-38

260 PRINT 270 PRINT 280 PRINT " 290 PRINT " 300 PRINT

480 PRINT " 490 PRINT

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) ***11

END TEST."

500 PRINT "SECTION 14.2: ASSIGNING NR3 CONSTANTS OF SIX SIGNIFICANT" DIGITS WHICH ARE NEAR THE MAGNITUDE OF:"

1E+38 OR 1E-38."

BEGIN TEST."

510 PRINT "

520 PRINT "

530 PRINT

560 PRINT "

570 PRINT

580 PRINT "ASSIGNED","OUTPUT","ACTUAL"

590 PRINT "CONSTANT","SHOULD BE","OUTPUT"

600 PRINT

610 LET A=-1.00001E-36

620 LET B=1.00001E-37 630 LET C=+1.00001E-38 650 LET E=-9.99999E34 660 LET F=+9.99999E+35 670 LET G=-9.99999E+36 680 LET H=9.99999E37

690 PRINT "-1.00001E-36","-1.00001E-36", A 700 PRINT " 1.00001E-37"," 1.00001E-37",B 710 PRINT "+1.00001E-38"," 1.00001E-38",C 730 PRINT "-9.99999E34 ","-9.99999E+34",E 740 PRINT "+9.99999E+35"," 9.99999E+35",F 750 PRINT "-9.99999E+36","-9.99999E+36",G 760 PRINT" 9.99999E37"," 9.99999E+37",H 770 PRINT

775 PRINT "*** TEST PASSED IF ACTUAL OUTPUT MATCHES OUTPUT AS IT" 780 PRINT " SHOULD BE (ALLOWING FOR OPTIONAL TRAILING ZEROS IN" THE SIGNIFICAND AND LEADING ZEROS IN THE EXRAD) ***"

790 PRINT "

800 PRINT

810 PRINT " 1130 PRINT

END TEST."

1140 PRINT "SECTION 14.3: NR3 NUMERIC CONSTANTS AT EXTREME"

1210 PRINT "+1E38"," 1.E+38",+1E38 1220 PRINT " 1E-38"," 1.E-38", 1E-38 1230 PRINT "-1E+38","-1.E+38",-1E+38 1240 PRINT "-1E-38","-1.E-38",-1E-38

1250 PRINT 1260 PRINT 1270 PRINT " 1280 PRINT " 1290 PRINT 1300 PRINT " 1310 PRINT

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."

1320 PRINT "SECTION 14.4: NR3 NUMERIC VARIABLES AT EXTREME" MAGNITUDES AS PRINT ITEMS."

1325 PRINT "

1480 PRINT "* 1490 PRINT " 1500 PRINT " 1510 PRINT 1520 PRINT " 1530 PRINT

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) ***"

1540 PRINT "END PROGRAM 14" 1550 END

END TEST."

PROGRAM FILE 14: PRINTING AND ASSIGNING NUMERIC VALUES
NEAR TO THE MAXIMUM AND MINIMUM MAGNITUDE.

ANSI STANDARD 5.4, 9.4, 12.4

SECTION 14.1: PRINTING NR3 CONSTANTS OF SIX SIGNIFICANT
DIGITS WHICH ARE NEAR THE MAGNITUDE OF: