/[MITgcm]/MITgcm/pkg/fizhi/do_fizhi.F
ViewVC logotype

Diff of /MITgcm/pkg/fizhi/do_fizhi.F

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

revision 1.7 by molod, Tue Jun 15 20:22:26 2004 UTC revision 1.8 by molod, Tue Jun 15 21:18:18 2004 UTC
# Line 2  C $Header$ Line 2  C $Header$
2  C $Name$  C $Name$
3  #include "CPP_OPTIONS.h"  #include "CPP_OPTIONS.h"
4         subroutine do_fizhi(uphy,vphy,thphy,sphy,pephy,lons,lats,         subroutine do_fizhi(uphy,vphy,thphy,sphy,pephy,lons,lats,
5       .     ctmt,xxmt,yymt,zetamt,xlmt,khmt,tke,       .   ctmt,xxmt,yymt,zetamt,xlmt,khmt,tke,
6       .     idim1,idim2,jdim1,jdim2,Nrphys,Nsx,Nsy,im1,im2,jm1,jm2,bi,bj,       .   sst,sice,phis_var,landtype,emiss,albnidr,albnirdf,
7       .     nchp,       .   albvisdr,albvisdf,ityp,chfr,alai,agrn,igrd,chlat,chlon,
8       .     duphy,dvphy,dthphy,dsphy)       .   tcanopy,tdeep,ecanopy,swetshal,swetroot,swetdeep,snodep,capac,
9         .   o3,qstr,co2,cfc11,cfc12,cfc22,n2o,methane,
10         .   idim1,idim2,jdim1,jdim2,Nrphys,Nsx,Nsy,im1,im2,jm1,jm2,bi,bj,
11         .   nchp,
12         .   duphy,dvphy,dthphy,dsphy)
13  c-----------------------------------------------------------------------  c-----------------------------------------------------------------------
14  c Interface routine to calculate physics increments - call geos-3 driver  c Interface routine to calculate physics increments - call geos-3 driver
15  c Purpose of this routine is to pull things from model common blocks  c Purpose of this routine is to pull things from model common blocks
Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22