/[MITgcm]/MITgcm/verification/fizhi-gridalt-hs/code/do_fizhi.F
ViewVC logotype

Diff of /MITgcm/verification/fizhi-gridalt-hs/code/do_fizhi.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.5 by molod, Fri Oct 15 21:15:06 2004 UTC revision 1.6 by molod, Thu Oct 21 15:19:18 2004 UTC
# Line 4  C $Name$ Line 4  C $Name$
4         subroutine do_fizhi(myid,         subroutine do_fizhi(myid,
5       . idim1,idim2,jdim1,jdim2,Nrphin,Nsxin,Nsyin,im1,im2,jm1,jm2,bi,bj,       . idim1,idim2,jdim1,jdim2,Nrphin,Nsxin,Nsyin,im1,im2,jm1,jm2,bi,bj,
6       . nchp,nchptot,nchpland,       . nchp,nchptot,nchpland,
7       . uphy,vphy,thphy,sphy,pephy,lons,lats,       . uphy,vphy,thphy,sphy,pephy,lons,lats,phi0surf,
8       . ctmt,xxmt,yymt,zetamt,xlmt,khmt,tke,       . ctmt,xxmt,yymt,zetamt,xlmt,khmt,tke,
9       . tgz,sst,sice,phis_var,landtype,fracland,emiss,albnirdr,albnirdf,       . tgz,sst,sice,phis_var,landtype,fracland,emiss,albnirdr,albnirdf,
10       . albvisdr,albvisdf,ityp,chfr,alai,agrn,igrd,chlat,chlon,       . albvisdr,albvisdf,ityp,chfr,alai,agrn,igrd,chlat,chlon,
# Line 41  C Argument list declarations Line 41  C Argument list declarations
41        _RL pephy(idim1:idim2,jdim1:jdim2,Nrphin+1,Nsxin,Nsyin)        _RL pephy(idim1:idim2,jdim1:jdim2,Nrphin+1,Nsxin,Nsyin)
42        _RS lons(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)        _RS lons(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
43        _RS lats(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)        _RS lats(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
44          _RS phi0surf(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
45        _RL ctmt(nchp,Nsxin,Nsyin),xxmt(nchp,Nsxin,Nsyin)        _RL ctmt(nchp,Nsxin,Nsyin),xxmt(nchp,Nsxin,Nsyin)
46        _RL yymt(nchp,Nsxin,Nsyin)        _RL yymt(nchp,Nsxin,Nsyin)
47        _RL zetamt(nchp,Nsxin,Nsyin)        _RL zetamt(nchp,Nsxin,Nsyin)
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.22