Scor­pio News


January–March 1987, Volume 1, Issue 1

Page 17 of 63

100 FORMAT(SHDATA. FROM, | ,10HBXPERIMENT,13) which would print out

DATA. FROM EXPERIMENT 1 (assuming that L had a value of 1)

P80 and Profortran recognite ten different types of I/O field descriptor: Alphanumeric [A – 2, 0 – 9 ete.)

Double precision numerse

Exponent form {e g 1 1606 = 11,000]

Floating poine [eg 12 34)

(cnn be used for floating point or exponent) Hollerieh (string)

alternative to Hoderith

Integer data [e g. 12, $60)

Logital [T(rue) c F(alee)] – not often used. optional scaling descriptor used with D.E,P and G conversions either ns a maltiple or # fraction blank space


These are fairly standard for most FORTRANS but NFortran does not have Double Precision or the scaling descriptor P. It does have T (tabulation), K (hexadecimal) and 2 (inhibit <erj1£> on output) which might be useful

Most users will only be concerned with A.£,P.H.1 and X descriptors: apart from the Wand Y descriptors, which have the general forms nll or nX where n is the umber of coluans each descriptor covers, the rest have the operational form c2y where © ig the suaber of repetitions of the field descriptor if this it grater than 1, Zap the descriptor type and y giver inforaation sbout the total width of field required For each repetition.

Some examples vould not come amiss here –

LOA indicates 10 alphanumeric fields each 4 columns vide

Fe’2 indicates 1 exponent field 8 columns wide, where there are two Higures after the decimal point This 12343.6) is represented Ss 012605 (where the” represents @ blank colunn ia which nothing ie printed)

B12 5 ie. a single exponent field of 12 columns in which 5 Figure Follow the decimal point and = figuee such ay -12.349678 would be cepresented ae 012303602 This implies thar the number As tfuncared (shortened) and loses some accuracy.

F320 shows that a floacing point number oceupying 3 coluans ig Involved which has no significant numbers to the cight of the Gecinal point, /.0 er 20 would be shows ia thie way

F8 4 Shows that the floating point (real) number occupies 6 coluant and has 4 digits to the right of the decimal point 123 4367 {2s suitable example: s real number such as’-34 89085 would bbe ‘shown se 34 8909, ‘since the field only permits © teximum of 4 digite after the decimal point Overflow can occur if the umber of digits to the left of the decimal point cannot be Fitted Into the space avaliable – thus 12456 would be printed ar *56’- the esterisk shows that the field width was foo saall

413 indicates that there are four 3 digit integer fields involved; thus 121, 245, 778 and 200 ave repeesented as: 123249778200 while -30, 2, 45 and 559 are represented by -30” 2.43559.” In the latter case, the *-” sign occupies 1 of the columns in its Eleld and the numbers with less than 3 digits are right jaseitsea

4X thie shows that 4 columns are to be skipped (not read or printed)

This is an OCR’d version of the scanned page and likely contains recognition errors.

Page 17 of 63