Intel fortran-80 manual LOGICAL Type Statement, •va,luernustueiA, Qp4

Defining Variables, Arrays, And Memory FORTRAN-80

where 'name' is one of the forms

v[*/en}

ary[(d)][* len]

and

vis an integer variable, function, or dummy procedure name

ary is an array name

ary(d) is an array declarator

lenj.i~~~~l~9:!~~i*~~f¢~;0;(<trl·.ii)t~g~rV(l~i&l?1~·9t .·~rp~y¢l~w~#t,••••.~t$

•va,luernustuei{A, Qp4.

.

•.•.•......•....•

:.•••••....••..••.•.•...•....••......•.•..•..•.••.•......•••....•...•...•..•••••.....••..•.•..•...•..• ..•.• ••.•.....•..•.. ...•••••....•...•..••.....•..•••.••......••..••.•.•.....••....•.•..••.•....••...•...•.:...•..•........•..•'.. ..••••.•...:•..•...........•..•..•......•..•.•~.•.~..:...•..•.~.;.:::•...•........:.•..•...•....•.•...•....•~...!..•..•.•.•.::....•.••:...••.••..:..•....~.••...:::....:•...•.:~•......•.••.••.;:.~•...:"..".:•

..••

...•.•.•..•......•.....•..........•........•. .....••.•.•.•

•.••.......::••..•.•......•..........•:...•........•...•

•.•.•:."•.......•.::

...''..••

:

.•.•. .•...•.....•.•••.••.••..••....•..•

....•..•

•............•.•.....•.........•..•.•

..••.•.•

:.:.•

.....•.•.. .......•..•

•.'.:..•:

•..:". •.......":"'•....

X~~~~P~f.~·•••~p~~~••f~E~.~~.~~•.··.·.~.~ffi~.~~~~rl~.fP~~~~~.n~··.·~e~~e~~?rf;l.·.·~·fir~~B:.~•••··~BRl~~~i~?

~.~~.~•.•·••.ite~.·i~···..·~J.1estttJe~.el1ttlp~n~yil1~ ..i~s •.8'Y11\1~~~~~~pe9ifi~~tio~.~•... ·.~..·••·ltl1gt~

sp~cifi9~tiqp;.·i~~;:~i~t.7~¥X~11Q~.i119·.•~2·itGB'li§!er 1711gt~f:()~it~~t·i~~rn.?111~\••~A~/.~~

:~l'r~~i/t~~.•J~l1~tl)·~~p~j~~•.·.tQ•.·•~~p~~~rfty.·.~1~mel1t?J:f119.1e~~te:i~~R~fi~i~~~~9T$.~~rent

def:~1l111efl.gthqf··(l~··.int~$~rvad~l?1~Ofar.r;:\y..e1~rqentis.a;~SUlTIeg(s~ySeC!~Pfl.f,4~~).

Examples:

INTEGER TOTALS

INTEGER*1 DIGITS(10}

INTEGER*4 TOTALS, SUBS*2, DIGITS(10}*1

3.1.3 LOGICAL Type Statement

The LOGICAL type statement has the format:

LOGICAL [*len[,]) name [,name] ...

where 'name' is one of the forms

v[*/en]

ary[(d)][ * len]

and

vis a logical variable, function, or dummy procedure name

ary is an array name

ary(d) is an array declarator

leit ~~~~~l~~~~~~ij~~~¢sgf#lg$!~#~y~~~~~~$qp~!t~y.~~~m*p.~.lt$¥~h!~

mu&tgf;lJ~,-·911::h .. . . .

".: ," .:...•.:::", ," .." ;......~.::. '.:~...<.,...-.:.:':".".: ::::::,-.::".:,.\:.::.:.:..:.::.•..~..:.:.:.::.:::..::.....••:..•.•......:..•.......• •...•...•.....•'•..........•...•.::.•.•........•..•......•..•.•.......:•.•.:.• • :•..•.•.....• ••.•• •. ::...• •..•.•..•...• •..• •....•....•• •....•.• :: • •.:....;:......::•...•.•..• :...........• •....:..••....•..::..:::.....::..•....:......••....•.•.••..... :.:::...:•...:.:...:... >:.: .. : . "." .....•... - ' ..

~~~~<itel'tli~l.••.•tb!~'~f~~~nt[lQ~.··•. ~~~i!!$i~s.~~P.. I~pj~~~~~~~~lR~~~~~;~.~~~w~~ s~:vifi~~t19rr.iPlnae~j~t~ly()n9W:il1g~n.i~enJ.i~t~el~ng~~fQ~~'a~r~t~tni~I1~>'.~9r~rt ao'a~;.the,l~ngthi~ppHe$ ..t().·.eacl1··a,rray.el~~ent...•• If~.~. ·~~ll~t~issp~~~f~e~yttl~current

default.· length.ofalOgicalv~riable Of arrayelenlent ..is !l$$91l1eO,f$ee$ectiPfl.ll,2.(j).

3-2