FM374 Program

**********00010374 * FORTRAN 77 00020374 FM374 00030374 * XTAN - (191) 00040374 00050374 **********00060374 * GENERAL PURPOSE SUBSET REF 00070374 TEST INTRINSIC FUNCTION TAN 15.3 00080374 * TABLE 5 00090374 00100374 BB *** BBCCOMNT ******00110374 00120374 1978 FORTRAN COMPILER VALIDATION SYSTEM 00130374 VERSION 2.1 00140374 00150374 00160374 SUGGESTIONS AND COMMENTS SHOULD BE FORWARDED TO 00170374 NATIONAL INSTITUTE OF STANDARDS AND TECHNOLOGY 00180374 SOFTWARE STANDARDS VALIDATION GROUP 00190374 BUILDING 225 RM A266 00200374 GAITHERSBURG, MD 20899 00210374 00220374 00230374 00240374 BE *** BBCCOMNT ******00250374 BB *** BBCINITA ******00260374 SPECIFICATION STATEMENTS 00270374 00280374 THE FOLLOWING 9 COMMENT LINES (CZ01, CZ02, ...) CAN BE REPLACED 00410374 FOR IDENTIFYING THE TEST ENVIRONMENT 00420374 00430374 Z01 ZVERS = 'VERSION OF THE COMPILER VALIDATION SYSTEM' 00440374 Z02 ZVERSD = 'CREATION DATE/TIME OF THE COMPILER VALIDATION SYSTEM' 00450374 Z03 ZPROG = 'PROGRAM NAME' 00460374 Z04 ZDATE = 'DATE OF TEST' 00470374 Z05 ZCOMPL = 'COMPILER IDENTIFICATION' 00480374 Z06 ZPROJ = 'PROJECT NUMBER/IDENTIFICATION' 00490374 Z07 ZNAME = 'NAME OF USER' 00500374 Z08 ZTAPE = 'TAPE OWNER/ID' 00510374 Z09 ZTAPED = 'DATE TAPE COPIED' 00520374 00530374 00820374 WRITE REPORT TITLE 00830374 00840374 00920374 * HEADER FOR SEGMENT 191 00930374 WRITE DETAIL REPORT HEADERS 00990374 01000374 01070374 * 01090374 T001 TEST 1 ZERO (0.0), SINCE TAN(0) = 0 01100374 02880374 BB *** BBCSUM0 ******02890374 WRITE OUT TEST SUMMARY 02900374 02910374 WRITE OUT REPORT FOOTINGS 03030374 03040374 FORMATS FOR TEST DETAIL LINES 03100374 03110374 FORMAT STATEMENTS FOR PAGE HEADERS 03310374 03320374 03450374 FORMAT STATEMENTS FOR REPORT FOOTINGS 03460374 03470374 03520374 FORMAT STATEMENTS FOR RUN SUMMARY 03530374 03540374 03610374 **** END OF TEST SEGMENT 191 03620374