**********00010370 * FORTRAN 77 00020370 FM370 00030370 * XALOG - (181) 00040370 00050370 **********00060370 * GENERAL PURPOSE SUBSET REF 00070370 TEST INTRINSIC FUNCTION ALOG 15.3 00080370 * TABLE 5 00090370 00100370 * 00110370 BB* **** BBCCOMNT *****00120370 00130370 1978 FORTRAN COMPILER VALIDATION SYSTEM 00140370 VERSION 2.1 00150370 00160370 00170370 SUGGESTIONS AND COMMENTS SHOULD BE FORWARDED TO 00180370 NATIONAL INSTITUTE OF STANDARDS AND TECHNOLOGY 00190370 SOFTWARE STANDARDS VALIDATION GROUP 00200370 BUILDING 225 RM A266 00210370 GAITHERSBURG, MD 20899 00220370 00230370 00240370 00250370 BE *** BBCCOMNT ******00260370 BB *** BBCINITA ******00270370 SPECIFICATION STATEMENTS 00280370 00290370 THE FOLLOWING 9 COMMENT LINES (CZ01, CZ02, ...) CAN BE REPLACED 00420370 FOR IDENTIFYING THE TEST ENVIRONMENT 00430370 00440370 Z01 ZVERS = 'VERSION OF THE COMPILER VALIDATION SYSTEM' 00450370 Z02 ZVERSD = 'CREATION DATE/TIME OF THE COMPILER VALIDATION SYSTEM' 00460370 Z03 ZPROG = 'PROGRAM NAME' 00470370 Z04 ZDATE = 'DATE OF TEST' 00480370 Z05 ZCOMPL = 'COMPILER IDENTIFICATION' 00490370 Z06 ZPROJ = 'PROJECT NUMBER/IDENTIFICATION' 00500370 Z07 ZNAME = 'NAME OF USER' 00510370 Z08 ZTAPE = 'TAPE OWNER/ID' 00520370 Z09 ZTAPED = 'DATE TAPE COPIED' 00530370 00540370 00830370 WRITE REPORT TITLE 00840370 00850370 HEADER FOR SEGMENT 181 00930370 WRITE DETAIL REPORT HEADERS 00990370 01000370 * 01070370 T001 TEST 1 ONE, SINCE LN(1.0) = 0.0 01080370 03100370 BB *** BBCSUM0 ******03110370 WRITE OUT TEST SUMMARY 03120370 03130370 WRITE OUT REPORT FOOTINGS 03250370 03260370 FORMATS FOR TEST DETAIL LINES 03320370 03330370 FORMAT STATEMENTS FOR PAGE HEADERS 03530370 03540370 03670370 FORMAT STATEMENTS FOR REPORT FOOTINGS 03680370 03690370 03740370 FORMAT STATEMENTS FOR RUN SUMMARY 03750370 03760370 * 03830370 ** END OF TEST SEGMENT 181 03840370
| Type | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|
| character | :: | REMRKS*31 | *** INITIALIZE SECTION 00340370 |
|||
| character | :: | ZCOMPL*20 | *** INITIALIZE SECTION 00340370 |
|||
| character | :: | ZDATE*17 | *** INITIALIZE SECTION 00340370 |
|||
| character | :: | ZNAME*20 | *** INITIALIZE SECTION 00340370 |
|||
| character | :: | ZPROG*5 | *** INITIALIZE SECTION 00340370 |
|||
| character | :: | ZPROJ*13 | *** INITIALIZE SECTION 00340370 |
|||
| character | :: | ZTAPE*10 | *** INITIALIZE SECTION 00340370 |
|||
| character | :: | ZTAPED*13 | *** INITIALIZE SECTION 00340370 |
|||
| character | :: | ZVERS*13 | *** INITIALIZE SECTION 00340370 |
|||
| character | :: | ZVERSD*17 | *** INITIALIZE SECTION 00340370 |