/[MITgcm]/MITgcm/pkg/exf/exf_ad_check_lev2_dir.h
ViewVC logotype

Diff of /MITgcm/pkg/exf/exf_ad_check_lev2_dir.h

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

revision 1.4 by heimbach, Wed May 5 14:19:06 2004 UTC revision 1.17 by heimbach, Thu Mar 22 04:13:18 2012 UTC
# Line 1  Line 1 
1  #ifdef ALLOW_EXF  C $Header$
2    C $Name$
 # ifdef ALLOW_ATM_TEMP  
   
 CADJ STORE aqh0      = tapelev2, key = ilev_2  
 CADJ STORE aqh1      = tapelev2, key = ilev_2  
 CADJ STORE atemp0    = tapelev2, key = ilev_2  
 CADJ STORE atemp1    = tapelev2, key = ilev_2  
 CADJ STORE precip0   = tapelev2, key = ilev_2  
 CADJ STORE precip1   = tapelev2, key = ilev_2  
 CADJ STORE lwflux0   = tapelev2, key = ilev_2  
 CADJ STORE lwflux1   = tapelev2, key = ilev_2  
 CADJ STORE swflux0   = tapelev2, key = ilev_2  
 CADJ STORE swflux1   = tapelev2, key = ilev_2  
 #  ifdef EXF_READ_EVAP  
 CADJ STORE evap0     = tapelev2, key = ilev_2  
 CADJ STORE evap1     = tapelev2, key = ilev_2  
 #  else  
 CADJ STORE evap      = tapelev2, key = ilev_2  
 #  endif /* EXF_READ_EVAP */  
 #  ifdef ALLOW_DOWNWARD_RADIATION  
 CADJ STORE swdown0   = tapelev2, key = ilev_2  
 CADJ STORE swdown1   = tapelev2, key = ilev_2  
 CADJ STORE lwdown0   = tapelev2, key = ilev_2  
 CADJ STORE lwdown1   = tapelev2, key = ilev_2  
 #  endif  
 #  ifdef ALLOW_SEAICE  
 CADJ STORE hflux0    = tapelev2, key = ilev_2  
 CADJ STORE hflux1    = tapelev2, key = ilev_2  
 #  endif  
   
 # else /* ALLOW_ATM_TEMP undef */  
   
 CADJ STORE hflux0    = tapelev2, key = ilev_2  
 CADJ STORE hflux1    = tapelev2, key = ilev_2  
 CADJ STORE sflux0    = tapelev2, key = ilev_2  
 CADJ STORE sflux1    = tapelev2, key = ilev_2  
 #  ifdef SHORTWAVE_HEATING  
 CADJ STORE swflux0   = tapelev2, key = ilev_2  
 CADJ STORE swflux1   = tapelev2, key = ilev_2  
 #  endif  
   
 # endif /* ALLOW_ATM_TEMP */  
3    
4  # ifdef ALLOW_ATM_WIND  #ifdef ALLOW_EXF
   
 CADJ STORE uwind0    = tapelev2, key = ilev_2  
 CADJ STORE uwind1    = tapelev2, key = ilev_2  
 CADJ STORE vwind0    = tapelev2, key = ilev_2  
 CADJ STORE vwind1    = tapelev2, key = ilev_2  
   
 # else /* ALLOW_ATM_WIND undef */  
   
 CADJ STORE ustress0  = tapelev2, key = ilev_2  
 CADJ STORE ustress1  = tapelev2, key = ilev_2  
 CADJ STORE vstress0  = tapelev2, key = ilev_2  
 CADJ STORE vstress1  = tapelev2, key = ilev_2  
   
 # endif  /* ALLOW_ATM_WIND */  
5    
6  # ifdef ALLOW_CLIMSSS_RELAXATION  CADJ STORE StoreEXF1    = tapelev2, key = ilev_2
7  CADJ STORE climsss0   = tapelev2, key = ilev_2  CADJ STORE StoreEXF2    = tapelev2, key = ilev_2
8  CADJ STORE climsss1   = tapelev2, key = ilev_2  CADJ STORE StoreCTRLS1  = tapelev2, key = ilev_2
 # endif  
 # ifdef ALLOW_CLIMSST_RELAXATION  
 CADJ STORE climsst0   = tapelev2, key = ilev_2  
 CADJ STORE climsst1   = tapelev2, key = ilev_2  
 # endif  
 # ifdef ALLOW_CLIMSALT_RELAXATION  
 cph not used so far  
 cphCADJ STORE climsalt0  = tapelev2, key = ilev_2  
 cphCADJ STORE climsalt1  = tapelev2, key = ilev_2  
 # endif  
 # ifdef ALLOW_CLIMTEMP_RELAXATION  
 cph not used so far  
 cphCADJ STORE climtemp0  = tapelev2, key = ilev_2  
 cphCADJ STORE climtemp1  = tapelev2, key = ilev_2  
 # endif  
 # ifdef ATMOSPHERIC_LOADING  
 CADJ STORE apressure0    = tapelev2, key = ilev_2  
 CADJ STORE apressure1    = tapelev2, key = ilev_2  
 # endif  
9    
10  # ifdef ALLOW_HFLUX_CONTROL  # ifdef ALLOW_HFLUX_CONTROL
11  CADJ STORE xx_hflux0     = tapelev2, key = ilev_2  CADJ STORE xx_hflux0     = tapelev2, key = ilev_2
# Line 97  CADJ STORE xx_tauu1      = tapelev2, key Line 23  CADJ STORE xx_tauu1      = tapelev2, key
23  CADJ STORE xx_tauv0      = tapelev2, key = ilev_2  CADJ STORE xx_tauv0      = tapelev2, key = ilev_2
24  CADJ STORE xx_tauv1      = tapelev2, key = ilev_2  CADJ STORE xx_tauv1      = tapelev2, key = ilev_2
25  # endif  # endif
26  # ifdef ALLOW_UWIND_CONTROL  # ifdef ALLOW_SST_CONTROL
27  CADJ STORE xx_uwind0     = tapelev2, key = ilev_2  CADJ STORE xx_sst0      = tapelev2, key = ilev_2
28  CADJ STORE xx_uwind1     = tapelev2, key = ilev_2  CADJ STORE xx_sst1      = tapelev2, key = ilev_2
29  # endif  # endif
30  # ifdef ALLOW_VWIND_CONTROL  # ifdef ALLOW_SSS_CONTROL
31  CADJ STORE xx_vwind0     = tapelev2, key = ilev_2  CADJ STORE xx_sss0      = tapelev2, key = ilev_2
32  CADJ STORE xx_vwind1     = tapelev2, key = ilev_2  CADJ STORE xx_sss1      = tapelev2, key = ilev_2
 # endif  
 # ifdef ALLOW_ATEMP_CONTROL  
 CADJ STORE xx_atemp0     = tapelev2, key = ilev_2  
 CADJ STORE xx_atemp1     = tapelev2, key = ilev_2  
 # endif  
 # ifdef ALLOW_AQH_CONTROL  
 CADJ STORE xx_aqh0       = tapelev2, key = ilev_2  
 CADJ STORE xx_aqh1       = tapelev2, key = ilev_2  
33  # endif  # endif
34    
35  #endif /* ALLOW_EXF */  #endif /* ALLOW_EXF */
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.17
  ViewVC Help
Powered by ViewVC 1.1.22