format file

[bobo12]

suppose FMAT is ,Character*127 FMAT

OPEN (10,FILE='NEWT',STATUS='NEW')
WRITE (10,'(A)') FMAT
CLOSE (10)

so what's the point of writing the first element of FMAT to a file? is this a control character?
or is it writing the whole 127 characters of FMAT?

fortran 77

 

[xwb]

An A by itself will print the whole string like a %s in C. A followed by a number will print that number of characters from the string. For example A5 is the same as %5s. The equivalent of %c is A1

Also note that format statements in Fortran are not the same as those in C. In Fortran, the output is driven by the data: in C it is driven by the format.

printf ("%d %d\n", a, b, c, d, e);

write (*, '(I5 I5)') a, b, c, d, e

The C coding will only print the values of a and b. The Fortran coding will print the value of a and b on one line, c and d on the next line, and e on the next line.