FM907 Program

**********00010907 * FORTRAN 77 00020907 FM907 00030907 * LSTDO2 - (373) 00040907 00050907 **********00060907 * GENERAL PURPOSE ANS REF 00070907 TEST LIST DIRECTED OUTPUT 13.6 00080907 * DOUBLE PRECISION AND COMPLEX DATA TYPES INCLUDED 12.4 00090907 00100907 BB *** BBCCOMNT ******00110907 00120907 1978 FORTRAN COMPILER VALIDATION SYSTEM 00130907 VERSION 2.1 00140907 00150907 00160907 SUGGESTIONS AND COMMENTS SHOULD BE FORWARDED TO 00170907 NATIONAL INSTITUTE OF STANDARDS AND TECHNOLOGY 00180907 SOFTWARE STANDARDS VALIDATION GROUP 00190907 BUILDING 225 RM A266 00200907 GAITHERSBURG, MD 20899 00210907 00220907 00230907 00240907 BE *** BBCCOMNT ******00250907 00260907 * S P E C I F I C A T I O N S SEGMENT 373 00270907 THE FOLLOWING 9 COMMENT LINES (CZ01, CZ02, ...) CAN BE REPLACED 00470907 FOR IDENTIFYING THE TEST ENVIRONMENT 00480907 00490907 Z01 ZVERS = 'VERSION OF THE COMPILER VALIDATION SYSTEM' 00500907 Z02 ZVERSD = 'CREATION DATE/TIME OF THE COMPILER VALIDATION SYSTEM' 00510907 Z03 ZPROG = 'PROGRAM NAME' 00520907 Z04 ZDATE = 'DATE OF TEST' 00530907 Z05 ZCOMPL = 'COMPILER IDENTIFICATION' 00540907 Z06 ZPROJ = 'PROJECT NUMBER/IDENTIFICATION' 00550907 Z07 ZNAME = 'NAME OF USER' 00560907 Z08 ZTAPE = 'TAPE OWNER/ID' 00570907 Z09 ZTAPED = 'DATE TAPE COPIED' 00580907 00590907 00880907 WRITE REPORT TITLE 00890907 00900907 00980907 * HEADING FOR SEGMENT 373 00990907 WRITE DETAIL REPORT HEADERS 01060907 01070907 WRITE OUT TEST SUMMARY 02200907 02210907 WRITE OUT REPORT FOOTINGS 02330907 02340907 FORMATS FOR TEST DETAIL LINES 02400907 02410907 FORMATS FOR TEST DETAIL LINES - FULL LANGUAGE 02610907 02620907 FORMAT STATEMENTS FOR PAGE HEADERS 02760907 02770907 02900907 FORMAT STATEMENTS FOR REPORT FOOTINGS 02910907 02920907 02970907 FORMAT STATEMENTS FOR RUN SUMMARY 02980907 02990907 03060907 * END OF TEST SEGMENT 373 03070907


Contents


Variables

Type AttributesNameInitial
character :: A4VK*4

* 00310907 BB* **** BBCINITA *****00320907 SPECIFICATION STATEMENTS 00330907 *** 00340907

complex :: AVC
double precision :: AVD
complex :: BVC
double precision :: BVD
complex :: CVC
double precision :: CVD
complex :: DVC
character :: REMRKS*31

*** INITIALIZE SECTION 00390907

character :: ZCOMPL*20

*** INITIALIZE SECTION 00390907

character :: ZDATE*17

*** INITIALIZE SECTION 00390907

character :: ZNAME*20

*** INITIALIZE SECTION 00390907

character :: ZPROG*5

*** INITIALIZE SECTION 00390907

character :: ZPROJ*13

*** INITIALIZE SECTION 00390907

character :: ZTAPE*10

*** INITIALIZE SECTION 00390907

character :: ZTAPED*13

*** INITIALIZE SECTION 00390907

character :: ZVERS*13

*** INITIALIZE SECTION 00390907

character :: ZVERSD*17

*** INITIALIZE SECTION 00390907