/[MITgcm]/MITgcm/pkg/aim_v23/phy_driver.F
ViewVC logotype

Diff of /MITgcm/pkg/aim_v23/phy_driver.F

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

revision 1.1 by jmc, Fri Nov 22 17:17:03 2002 UTC revision 1.2 by jmc, Thu May 22 03:00:49 2003 UTC
# Line 195  c_FM  CALL SUFLUX (PSG,UG1,VG1,TG1,QG1,R Line 195  c_FM  CALL SUFLUX (PSG,UG1,VG1,TG1,QG1,R
195  c_FM &             PHIS0,FMASK1,STL1,SST1,SOILW1,SSR,SLR,  c_FM &             PHIS0,FMASK1,STL1,SST1,SOILW1,SSR,SLR,
196  c_FM &             USTR,VSTR,SHF,EVAP,ST4S,  c_FM &             USTR,VSTR,SHF,EVAP,ST4S,
197  c_FM &             TS,TSKIN,U0,V0,T0,Q0)  c_FM &             TS,TSKIN,U0,V0,T0,Q0)
198        CALL SUFLUX (PSG, TG1, QG1, RH(1,1,myThid), VsurfSq,        CALL SUFLUX (PSG, TG1, QG1, RH(1,1,myThid), SE, VsurfSq,
199       I             WVSurf(1,myThid),csLat(1,myThid),fOrogr(1,myThid),       I             WVSurf(1,myThid),csLat(1,myThid),fOrogr(1,myThid),
200       I             FMASK1(1,myThid),STL1(1,myThid),SST1(1,myThid),       I             FMASK1(1,myThid),STL1(1,myThid),SST1(1,myThid),
201       I             SOILW1(1,myThid), SSR(1,myThid),SLR(1,myThid),       I             SOILW1(1,myThid), SSR(1,myThid),SLR(1,myThid),
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22