Parent Directory | Revision Log | Revision Graph | Patch
revision 1.8 by jmc, Sun May 15 03:04:57 2005 UTC | revision 1.9 by jmc, Tue Feb 21 01:15:15 2006 UTC | |
---|---|---|
# | Line 134 C---+----1----+----2----+----3----+----4 | Line 134 C---+----1----+----2----+----3----+----4 |
134 | #ifdef ALLOW_DIAGNOSTICS | #ifdef ALLOW_DIAGNOSTICS |
135 | IF ( useDiagnostics ) THEN | IF ( useDiagnostics ) THEN |
136 | ||
CALL DIAGNOSTICS_FILL(siceAlb,'SIalbedo',0,1,1,bi,bj,myThid) | ||
137 | C-- Atmospheric fluxes : | C-- Atmospheric fluxes : |
138 | IF ( fluidIsWater ) THEN | IF ( fluidIsWater ) THEN |
139 | CALL DIAGNOSTICS_FILL(flxAtm, 'SIflxAtm',0,1,2,bi,bj,myThid) | CALL DIAGNOSTICS_FILL(flxAtm, 'SIflxAtm',0,1,2,bi,bj,myThid) |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |