PGI Fortran Reference manual - The Portland Group

Fortran Statementscis an integer expression specifying the number of bytes involved in translation.fis the format-specifier.bis a scalar or array reference for the buffer area containing formatted data (characters).iosis an integer scalar memory reference which is the input/output status specifier: if this isspecified ios becomes defined with zero if no error condition exists or a positive integer whenthere is an error condition.errsan error specifier which takes the form of a statement label of an executable statement inthe same program unit. If an error condition occurs execution continues with the statementspecified by errs.listis a list of input items.Non-character Format-specifierIf a format-specifier is a variable which is neither CHARACTER nor a simple INTEGERvariable, the compiler accepts it and treats it as if the contents were character. In the followingexample, sum is treated as a format descriptor:real sumsum = 4h()accept sumThe preceding code segment is roughly equivalent to this:character*4 chch = '()'accept chSee AlsoREAD, PRINT,3.7. DOUBLE COMPLEXThe DOUBLE COMPLEX statement establishes the data type of a variable by explicitlyattaching the name of a variable to a double complex data type. This overrides the data typingimplied by the initial letter of a symbolic name.F77 extensionPGI Fortran Reference Guide 46