parameter (lons=144,lats=72,kvar=5) real*4 data(lons,lats,kvar) open(8,file='data.dat', & form='unformatted',access='sequential') c ***************************** do 666 imon=1,309 do 140 ivar=1,kvar read(8) ((data(i,j,ivar),i=1,lons),j=1,lats) 140 continue c ivar= 1: Precipitation analysis based on raingauge data only (CAMS) c 2: number of CAMS gauges c 3: Precipitation analysis based on OPI estimates only c 4: The blended analysis CAMS_OPI monthly total precip. analysis c 5: CAMS_OPI monthly anomaly (1979-1995 base period) c *************************************************** 666 continue stop end arry orientation: 0 2.5E 5.0E 2.5W 0 | | | | | ----------------------------------- South Pole | | | | | |(1,1) | (2,1)| .... |(144,1)|.............88.75S | | | | | ----------------------------------- 87.5S | | | | | |(1,2) | (2,2)| .... |(144,2)|.............86.25S | | | | | ----------------------------------- 85.0S . . . ----------------------------------- 87.5N | | | | | |(1,72)|(2,72)| .... |(144,72)|............88.75N | | | | | ----------------------------------- Nort Pole . . . . . . . . . 1.25E 3.75E 1.25W