Displaying 1 result from an estimated 1 matches for "ingegr".
Did you mean:
integr
2005 Apr 23
0
reading fortran binary file
...IF ( IFLAG .EQ. 0 ) THEN
READ(11)
goto 10
elseif (iflag.eq.1) then
read(11)
& IDIM ! dimension of the field
& ,IB,JB,KB,LB ! starting indices
& ,IE,JE,KE,LE ! ending indices
& ,XTIME ! the ingegration or forcast time
& ,CRDT,CORDER,CHRDATE
& ,CNAME,CUNIT ! field name and unit description
if(cname.eq.'LATITCRS ')then
read(11)out2d
else
read(11)
endif
goto 10
elseif(iflag.eq.2)then
g...