Manuals / Intel / Computer Equipment / Laptop

Intel fortran-80 manual Edit Descriptor, Absolute value of exp, Form of exp, OY1 Y2, Y1 Y2 Y3

Models: fortran-80

1 130

Download 130 pages 742 b

Page 78

Edit Descriptor

Input/Output

FORTRAN-SO

'E' Descriptor Editing

An I/O list item matched with an 'Ew.d' or 'Ew.dEe' descriptor must be a real variable. The exponent 'e' has no effect on input data.

On output, the format of the output field for a scale factor (section 6.4.3.1.2) of zero is:

[±][0].x1 x2··· x d exP

where
±		signifies a plus or minus
		are the 'd' most significant digits of the data's value
		after rounding
	exp	is a decimal exponent having one of the following forms
		('y' is a digit):

	Edit Descriptor	Absolute value of 'exp'	Form of 'exp'

	Ew.d	lexpl:$ 99	±	OY1 Y2
	Ew.d	99< lexpl:$ 999
		99< lexpl:$ 999	±	Y1 Y2 Y3
	Ew.dEe	lexpl:$(10**e)-1	E ± Y1 Y2···Ye

The sign in the exponent is always present. If the exponent is zero, it is prefixed by a plus. The 'Ew.d' descriptor should not be used if exp exceeds 999.

Decimal normalization is controlled by the scale factor 'k' (section 6.4.3.1.2). If -d<k:$O,the number output will have exactly Iklleading zeros and 'd - Ikl' significant digits following the decimal point. If 0< k< d + 2, the number will have exactly k significant digits to the left of the decimal point and 'd - k + 1, signifi- cant digits to the right of the decimal point. Other values of k are not legal.

Examples:

READ (2,30) RLNUMB

30 FORMAT (E4.2)

WRITE (6,110) RLOUT

110 FORMAT (E6.5E6)

Logical Editing

An I/O item matched with an 'Lw' descriptor must be of type logical.

The input field includes an optional period followed by a 'T' (for TRUE) or 'F' (for FALSE). These characters may be followed by additional characters. For example, the logical constants' .TRUE.' and' .FALSE.' are acceptable inputs.

The output field consists of the letters 'T' or 'F,' based on the TRUE or FALSE value of the internal data.

Examples:

DIMENSION TRUTH(4)

READ (3,50) TRUTH(1), TRUTH(4)

50 FORMAT (2L6)

WRITE (6,80) TRUTH(1)

80 FORMAT (L1)

6-18

Image 78

Intel fortran-80 manual Edit Descriptor, Absolute value of exp, Form of exp, OY1 Y2, Y1 Y2 Y3, E ± Y1 Y2···Ye

Contents

FORTRAN-SOPROGRAMMING MANUAL Manual Order Number: 9800481 ACopyright 1978 Intel Corporation PRINTED IN U.S.A./A151/1279/5K CP PREFACE Page CHAPTER CONTENTSPREFACE GLOSSARY CHAPTER INTRODUCTION TO FORTRAN FORTRAN CONCEPTSAPPENDIX A ILLUSTRATIONSCHAPTER PROGRAMMING GUIDELINES FORTRAN-80STATEMENT SUMMARYGLOSSARY Record - A sequence of values or characters CHAPTER INTRODUCTION TO FORTRAN 1.1 An Introductory Example1.1.1 Comment Lines 1.1.4 Value Assignment Statement 1.1.2 Type Statement1.1.3 Input Statements 1.1.5 Output Statements1.2.1 Executable Statements 1.2 Summary Of FORTRAN·SO Statements1.1.6 Program Termination 1.2.2 Nonexecutable Statements1.2.3 Order of Statements FEN:• • • • 2.1.2 The PROG RAM Statement 2.1.3 Statements and LinesPROGRAM name 2.2 FORTRAN Statement Elements 2.2.1 Character Set2.2.2 Constants and Variables ARITHMETICOVERFLOW ERROR MURPHYSLAW FORTRAN-80+64101 #14010 PNAME AB HITS AVGwhere #4567Q+#AF2CH2.2.4 Expressions and Operators 2.2.4.3 Relational Expressions is evaluated as if it were written 10FLAG = FLAG + IF FLAG1 .EQV. FLAG2 RETURN 2.2.5 Scope of Symbols 15/3 + 18/9 = 5 + 2 =15/3 + 18/9 = 15/3 + 2 = 15/5 = 2.3 Notational Conventions CALL sub arg,argPage 3.1.1 REAL Type Statement CHAPTER DEFINING VARIABLES ARRAYS, AND MEMORY3.1Type Statements 3.1.2 INTEGER Type Statement3.1.3 LOGICAL Type Statement •va,luernustueiA, Qp4CHARACTER * len, name ,name 3.1.4 CHARACTER Type Statement3.1.5 IMPLICIT Statement v* len aryd* len3.2 Array Definition 3.2.1 DIMENSION Statement 3.2.2 Kinds of Array Declarators3.2.3 Properties of Arrays 3.2.4 Referencing Array Elementsary s ,s Element 3.3 Assignment StatementsDimension DeclaratorTYPE OF exp 3.3.1 Arithmetic Assignment StatementTYPE OF RESULT3.3.4 ASSIG N Statement 3.3.2 Logical Assignment Statement3.3.3Character Assignment Statement v = exp3.3.5DATA Statement ASSIGN stlTO namer*c,r*c DATA I,J,K/10,20,301 3.4.1 EQUIVALENCE Statement3.4 Memory Definition DATA ZEROS 110*0/1,J,K 110,20,301 &NAMES2 IOTTI3.4.2COMMON Statement COMMON /eb! nlist ,/ eb! nlist3.4.3BLOCK DATA Subprograms 3.4.2.1 Common Block Memory Sequence3.4.2.2 Named and Blank Common Blocks 3.4.4 BLOCK DATA Statement 4.1.1 Unconditional GO TO Statement CHAPTER 4 PROGRAM EXECUTION CONTROLS4.1 Transferring Program Oontrol 4.1.2 Computed GO TO Statement4.1.3Assigned GO TO Statement GO TO name n, stl ,stlIFexps1,s2,s3 4.1.4Arithmetic IF Statement4.1.5 Logical IF Statement 4.1.6 IF, ELSE IF, and ELSE Blocks4.1.7 Block IF Statement 4.1.8ELSE IF Statement4.1.9 ELSE Statement 4.1.10 END IF Statement4.2 Loop Control Statements 4.2.1 Operation of a DO Loop4.2.2 DO Statement 4.3 Program Termination Statements 4.2.3CONTINUE Statement4.3.1 PAUSE Statement 4.3.2 STOP Statement4.3.3EN 0 Statement 5.1.1Intrinsic Functions CHAPTER FUNCTIONS AND SUBROUTINES5.1Intrinsic and Statement Functions A = 33 + SQRT8INTRINSIC tunc ,tunc 5.1.2 INTRI NSIC Statement5.1.3 Statement Functions tunc dum ,dum ... = exp5.1.3.1 Referencing Statement Functions 5.1.3.2 Statement Function Limitations156.8 5.2.1.1 Referencing External Functions 5.2 External Procedures5.2.1 FUNCTION Statement typ FUNCTION tunc dum ,dum5.2.2Subroutines 5.2.1.2 FUNCTION Subprogram Limitations5.2.3 SUBROUTINE Statement ~RETURNCA.~END 5.2.4 RETU RN StatementSAVE lebl ,Iebl 5.2.5SAVE Statement5.2.6EXTERNAL Statement EXTERNAL proe ,proe5.3 Arguments And Common Blocks Revisited 5.2.7 CALL Statement5.3.3 Association Of Arguments 5.3.1 Common Blocks5.3.2 Dummy And Actual Arguments Functions And Subroutines5.3.3.2 Variables As Dummy Arguments 5.3.3.4 Procedures As Dummy Arguments5.3.3.1 Agreement Of Argument Lengths 5.3.3.3 Arrays As Dummy Arguments5.3.3.5Argument Association Limitations FX, Y,Page 6.1.1Record Properties CHAPTER INPUT/OUTPUT6.1Records, Files, And Units 6.1.2 File Properties6.1.2.3 File Position 6.1.2.1 File Existence6.1.2.2 File Name 6.1.2.4 External And Internal Files6.1.2.5 File Access 6.1.3 Unit Properties6.2.1.1 Unit Specifier 6.2 File-HandlingStatements6.2.1 OPEN Statement 6.2.1.21/0 Status Specifier6.2.1.3 Error Specifier 6.2.1.4 File Name Specifier6.2.1.5 File Status Specifier 6.2.1.6 Access Method Specifier 6.2.1.7 Formatting Specifier6.2.1.8 Record Length Specifier 6.2.1.9 Blank Specifier 6.2.2.1 Unit Specifier 6.2.2CLOSE Statement6.2.1.11 Opening A Connected Unit CLOSE close-list6.2.2.2 File Disposition Specifier 6.2.3 BACKSPACE Statement6.2.4 REWI N D Statement REWI N Darg-list6.3.1 READ Statement 6.3 Data-Transfer 1/0 Statements6.2.5 ENDFILE Statement REWIND REWIND 3, IOSTAT= ERRFLG, ERR=6.3.1.1 Control Information List Examples 6.3.1.3 Implied-DOList 6.3.2WRITE Statement6.3.1.2 Input List WRITE ctl-list out-list6.4Formatted And Unformatted Data Transfer 6.3.3 PRINT Statement6.4.1 Unformatted Data Transfer 6.4.2 Formatted Data Transfer 6.4.2.1 Printing Formatted Records6.4.2.2 Format Control 6.4.3FORMAT Statement 6.4.3.t Edit Descriptorsstl FORMAT flist 1 is Ff Form of exp Edit DescriptorAbsolute value of exp OY1 Y2either a sjgu ora letter indicatingthebas¢ a Z5editdesctiptorExample FS.2 DollytSigfjl$ijitrrrg·6.4.4List·Directed Formatting 6.4.4.1 List-Directed Input6.4.4.2 List-DirectedOutput Page 7.1 Program Development 7.1.1 Problem DefinitionCHAPTER PROGRAMMING GUIDELINES 7.1.2 Program Documentation7.1.3 Refining The Problem Definition 7.1.4 Final Coding 7.2.2 GO TO Statement 7.2 FORTRAN Coding7.2.1 Functions And Subroutines 7.2.3 Crossing Unit LinesX = 2217*r* *2 7.3 References7.2.5 Reminders PI =1972 APPENDIX A FORTRAN-80STATEMENT SUMMARY A.1 Statement SequenceA.2 Statement Summary ERR = stl ERR = stl FORTRAN-80Statement SummaryDATA Statement Category: Nonexecutable ELSE IF Statement Category: Executable, Block IF EQUIVALENCE Statement FUNCTION Statement Category: Nonexecutable IMPLICIT Statement OPEN Statement fORTRAN-80Statement Summary REWIND Statement SUBROUTINE Statement Category: Executable APPENDIX B INTRINSIC FUNCTIONS B.1 Intrinsic Function Summary<ORM Intrinsic FunctionsFORTRAN-80 CATEGORYB.2 Notes On Intrinsic Functions Page C.2 The Hollerith Constant APPENDIX C HOLLERITH DATA TYPEC.1 Hollerith As A Data Type C.2.1 Hollerith Constants In DATA StatementsC.3 Hollerith Format Specification C.4 AEditing Of Hollerith DataHollerith Data Type APPENDIX D EXTENSIONS TO ANSI FORTRAN 0.1 Standard Extensions To 1977 Subset0.2Nonstandard Extensions To 1977 FORTRAN 0.3 More Specific Semantics Than 1977 FORTRAN 0.4 Differences From 1966 FORTRANMiscellaneous extensions Seven-dimensionalarrays Page ASCII CODES APPENDIX EPage F.2 Compiler Extensions APPENDIX F 8080/8085 PROCESSOR DEPENDENCIESF.1 Processor Limitations On Language LengthF.2.2 Port Input/Output F.2.3 Reentrant ProceduresF.2.1 Lowercase Letters F.2.4 Free-formLine FormatF.2.7 Including Source Files F.2.6 Default Data LengthsF.2.5 Interpretation of DO Statements $0077F.2.8 REel Specification For Sequential Files F.2.9 Flexibility In Standard RestrictionsF.3 Unit Preconnection INDEX Index FREEFORM Compiler Control, F-2 FORTRAN-SO IndexPage NOTES NOTES SOFTWARE PROBLEM REPORT interPostage will be paid by Addressee 111111BUSINESS REPLY CARD Intel Corporation Attn: Literature DepartmentREQUEST FOR READERSCOMMENTS FORTRAN·80PROGRAMMING MANUAL 9800481 A0LIKE YOUR COMMENTS 111111BUSINESS REPLY CARD Intel Corporation Attn: Literature DepartmentPage inter Printed in U.S.A