SN508 Subroutine

subroutine SN508(NWVI)

* 00140508 BB* **** BBCCOMNT *****00150508 00160508 1978 FORTRAN COMPILER VALIDATION SYSTEM 00170508 VERSION 2.1 00180508 00190508 00200508 SUGGESTIONS AND COMMENTS SHOULD BE FORWARDED TO 00210508 NATIONAL INSTITUTE OF STANDARDS AND TECHNOLOGY 00220508 SOFTWARE STANDARDS VALIDATION GROUP 00230508 BUILDING 225 RM A266 00240508 GAITHERSBURG, MD 20899 00250508 00260508 00270508 00280508 BE *** BBCCOMNT ******00290508 THE FOLLOWING 9 COMMENT LINES (CZ01, CZ02, ...) CAN BE REPLACED 00490508 FOR IDENTIFYING THE TEST ENVIRONMENT 00500508 00510508 Z01 ZVERS = 'VERSION OF THE COMPILER VALIDATION SYSTEM' 00520508 Z02 ZVERSD = 'CREATION DATE/TIME OF THE COMPILER VALIDATION SYSTEM' 00530508 Z03 ZPROG = 'PROGRAM NAME' 00540508 Z04 ZDATE = 'DATE OF TEST' 00550508 Z05 ZCOMPL = 'COMPILER IDENTIFICATION' 00560508 Z06 ZPROJ = 'PROJECT NUMBER/IDENTIFICATION' 00570508 Z07 ZNAME = 'NAME OF USER' 00580508 Z08 ZTAPE = 'TAPE OWNER/ID' 00590508 Z09 ZTAPED = 'DATE TAPE COPIED' 00600508 00610508 00900508 WRITE REPORT TITLE 00910508 00920508 * 01000508 WRITE DETAIL REPORT HEADERS 01060508 01070508 * 01140508 T001 TEST 1 3 CHARACTER VARIABLE 01150508 01630508 BB *** BBCSUM0 ******01640508 WRITE OUT TEST SUMMARY 01650508 01660508 WRITE OUT REPORT FOOTINGS 01780508 01790508 FORMATS FOR TEST DETAIL LINES 01850508 01860508 FORMATS FOR TEST DETAIL LINES - FULL LANGUAGE 02060508 02070508 FORMAT STATEMENTS FOR PAGE HEADERS 02210508 02220508 02350508 FORMAT STATEMENTS FOR REPORT FOOTINGS 02360508 02370508 02420508 FORMAT STATEMENTS FOR RUN SUMMARY 02430508 02440508 * 02510508

Arguments

Type IntentOptional AttributesName
integer :: NWVI

Called by

proc~~sn508~~CalledByGraph proc~sn508 SN508 program~fm506 FM506 program~fm506->proc~sn508

Contents


Common Blocks

SPECIFICATION STATEMENTS 00350508 00360508

Type AttributesNameInitial
real :: C3XVK
real :: D2XVK
real :: E5XVK
real :: F3XVK