**********00010371 * FORTRAN 77 00020371 FM371 00030371 * XALG10 - (184) 00040371 00050371 **********00060371 * GENERAL PURPOSE SUBSET REF 00070371 TEST INTRINSIC FUNCTION ALOG10 15.3 00080371 * TABLE 5 00090371 00100371 BB *** BBCCOMNT ******00110371 00120371 1978 FORTRAN COMPILER VALIDATION SYSTEM 00130371 VERSION 2.1 00140371 00150371 00160371 SUGGESTIONS AND COMMENTS SHOULD BE FORWARDED TO 00170371 NATIONAL INSTITUTE OF STANDARDS AND TECHNOLOGY 00180371 SOFTWARE STANDARDS VALIDATION GROUP 00190371 BUILDING 225 RM A266 00200371 GAITHERSBURG, MD 20899 00210371 00220371 00230371 00240371 BE *** BBCCOMNT ******00250371 BB *** BBCINITA ******00260371 SPECIFICATION STATEMENTS 00270371 00280371 THE FOLLOWING 9 COMMENT LINES (CZ01, CZ02, ...) CAN BE REPLACED 00410371 FOR IDENTIFYING THE TEST ENVIRONMENT 00420371 00430371 Z01 ZVERS = 'VERSION OF THE COMPILER VALIDATION SYSTEM' 00440371 Z02 ZVERSD = 'CREATION DATE/TIME OF THE COMPILER VALIDATION SYSTEM' 00450371 Z03 ZPROG = 'PROGRAM NAME' 00460371 Z04 ZDATE = 'DATE OF TEST' 00470371 Z05 ZCOMPL = 'COMPILER IDENTIFICATION' 00480371 Z06 ZPROJ = 'PROJECT NUMBER/IDENTIFICATION' 00490371 Z07 ZNAME = 'NAME OF USER' 00500371 Z08 ZTAPE = 'TAPE OWNER/ID' 00510371 Z09 ZTAPED = 'DATE TAPE COPIED' 00520371 00530371 00820371 WRITE REPORT TITLE 00830371 00840371 00920371 * HEADER FOR SEGMENT 184 00930371 WRITE DETAIL REPORT HEADERS 00990371 01000371 01070371 T001 TEST 1 ONE, SINCE LN(1.0) = 0.0 01080371 * 03120371 BB* **** BBCSUM0 *****03130371 WRITE OUT TEST SUMMARY 03140371 03150371 WRITE OUT REPORT FOOTINGS 03270371 03280371 FORMATS FOR TEST DETAIL LINES 03340371 03350371 FORMAT STATEMENTS FOR PAGE HEADERS 03550371 03560371 03690371 FORMAT STATEMENTS FOR REPORT FOOTINGS 03700371 03710371 03760371 FORMAT STATEMENTS FOR RUN SUMMARY 03770371 03780371 03850371 *** END OF TEST SEGMENT 184 03860371
| Type | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|
| character | :: | REMRKS*31 | *** INITIALIZE SECTION 00330371 |
|||
| character | :: | ZCOMPL*20 | *** INITIALIZE SECTION 00330371 |
|||
| character | :: | ZDATE*17 | *** INITIALIZE SECTION 00330371 |
|||
| character | :: | ZNAME*20 | *** INITIALIZE SECTION 00330371 |
|||
| character | :: | ZPROG*5 | *** INITIALIZE SECTION 00330371 |
|||
| character | :: | ZPROJ*13 | *** INITIALIZE SECTION 00330371 |
|||
| character | :: | ZTAPE*10 | *** INITIALIZE SECTION 00330371 |
|||
| character | :: | ZTAPED*13 | *** INITIALIZE SECTION 00330371 |
|||
| character | :: | ZVERS*13 | *** INITIALIZE SECTION 00330371 |
|||
| character | :: | ZVERSD*17 | *** INITIALIZE SECTION 00330371 |