Changeset 13110


Ignore:
Timestamp:
2020-06-16T14:16:56+02:00 (7 weeks ago)
Author:
smasson
Message:

trunk: missing fields in field_def_nemo-oce.xml following [13108]

Location:
NEMO/trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/cfgs/SHARED/field_def_nemo-oce.xml

    r13108 r13110  
    373373          <field id="Ch_oce"      long_name="Sensible heat coefficient over open ocean"     standard_name="sensible_heat_coefficient_water"        unit=""  />           
    374374 
     375          <field id="Cd_ice"      long_name="Drag coefficient over ice"                     standard_name="drag_coefficient_ice"                 unit=""  /> 
     376          <field id="Ce_ice"      long_name="Evaporaion coefficient over ice"               standard_name="evap_coefficient_ice"                 unit=""  /> 
     377          <field id="Ch_ice"      long_name="Sensible heat coefficient over ice"            standard_name="sensible_heat_coefficient_ice"        unit=""  />           
     378 
    375379          <!-- available key_oasis3 --> 
    376380          <field id="snow_ao_cea"  long_name="Snow over ice-free ocean (cell average)"   standard_name="snowfall_flux"                             unit="kg/m2/s"  /> 
  • NEMO/trunk/src/OCE/SBC/sbcblk.F90

    r13108 r13110  
    628628      END SELECT 
    629629 
    630       IF( iom_use("Cd_oce") ) CALL iom_put("Cd_oce", zcd_oce) 
    631       IF( iom_use("Ce_oce") ) CALL iom_put("Ce_oce", zce_oce) 
    632       IF( iom_use("Ch_oce") ) CALL iom_put("Ch_oce", zch_oce) 
     630      CALL iom_put("Cd_oce", zcd_oce) 
     631      CALL iom_put("Ce_oce", zce_oce) 
     632      CALL iom_put("Ch_oce", zch_oce) 
    633633       
    634634      IF( ln_skin_cs .OR. ln_skin_wl ) THEN 
     
    883883      ENDIF 
    884884       
    885       IF( iom_use("Cd_ice") ) CALL iom_put("Cd_ice", Cd_ice) 
    886       IF( iom_use("Ce_ice") ) CALL iom_put("Ce_ice", Ce_ice) 
    887       IF( iom_use("Ch_ice") ) CALL iom_put("Ch_ice", Ch_ice) 
     885      CALL iom_put("Cd_ice", Cd_ice) 
     886      CALL iom_put("Ce_ice", Ce_ice) 
     887      CALL iom_put("Ch_ice", Ch_ice) 
    888888       
    889889      ! local scalars ( place there for vector optimisation purposes) 
Note: See TracChangeset for help on using the changeset viewer.