New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 8679 – NEMO

Changeset 8679


Ignore:
Timestamp:
2017-11-09T10:00:42+01:00 (6 years ago)
Author:
gm
Message:

#1911 (ENHANCE-09): PART I.3 - bug correction in mpp_lnk_generic.h90 + file_def/field_def corrections

Location:
branches/2017/dev_r7881_ENHANCE09_RK3/NEMOGCM
Files:
6 edited

Legend:

Unmodified
Added
Removed
  • branches/2017/dev_r7881_ENHANCE09_RK3/NEMOGCM/CONFIG/ORCA2_LIM3_PISCES/EXP00/file_def_nemo.xml

    r8637 r8679  
    9898          <field field_ref="av_wave"      name="av_wave"    /> 
    9999          <field field_ref="bn2"          name="bn2"        /> 
    100           <field field_ref="bflx_iwm"     name="bflx_tmx"   /> 
    101           <field field_ref="pcmap_iwm"    name="pcmap_tmx"  /> 
    102           <field field_ref="emix_iwm"     name="emix_tmx"   /> 
     100          <field field_ref="bflx_iwm"     name="bflx_iwm"   /> 
     101          <field field_ref="pcmap_iwm"    name="pcmap_iwm"  /> 
     102          <field field_ref="emix_iwm"     name="emix_iwm"   /> 
    103103          <field field_ref="av_ratio"     name="av_ratio"   /> 
    104104   </file> 
    105105 
    106106   <file id="file6" name_suffix="_icemod" description="ice variables" enabled=".true." > 
    107           <field field_ref="snowthic_cea"    name="snthic" /> 
    108           <field field_ref="icethic_cea"     name="sithic" /> 
     107          <field field_ref="snothic"         name="snthic" /> 
     108          <field field_ref="icethic"         name="sithic" /> 
    109109          <field field_ref="icevolu"         name="sivolu" /> 
    110110          <field field_ref="snowvol"         name="snvolu" /> 
  • branches/2017/dev_r7881_ENHANCE09_RK3/NEMOGCM/CONFIG/ORCA2_LIM3_PISCES/EXP00/namelist_cfg

    r8586 r8679  
    99   cn_exp      =  "ORCA2"  !  experience name 
    1010   nn_it000    =       1   !  first time step 
    11    nn_itend    =    5475   !  last  time step (std 5475) 
     11   nn_itend    =  15 !!gm  5475   !  last  time step (std 5475) 
    1212/ 
    1313!----------------------------------------------------------------------- 
     
    3737&namsbc        !   Surface Boundary Condition (surface module) 
    3838!----------------------------------------------------------------------- 
     39   nn_fsbc     = 5         !  frequency of surface boundary condition computation 
     40                           !     (also = the frequency of sea-ice & iceberg model call) 
     41                     ! Type of air-sea fluxes  
     42   ln_usr      = .false.   !  user defined formulation                  (T => check usrdef_sbc) 
     43   ln_flx      = .false.   !  flux formulation                          (T => fill namsbc_flx ) 
    3944   ln_blk      = .true.    !  Bulk formulation                          (T => fill namsbc_blk ) 
     45                     ! Type of coupling (Ocean/Ice/Atmosphere) : 
     46   ln_cpl      = .false.   !  atmosphere coupled   formulation          ( requires key_oasis3 ) 
     47   ln_mixcpl   = .false.   !  forced-coupled mixed formulation          ( requires key_oasis3 ) 
     48   nn_components = 0       !  configuration of the opa-sas OASIS coupling 
     49                           !  =0 no opa-sas OASIS coupling: default single executable config. 
     50                           !  =1 opa-sas OASIS coupling: multi executable config., OPA component 
     51                           !  =2 opa-sas OASIS coupling: multi executable config., SAS component  
     52                     ! Sea-ice : 
     53   nn_ice      = 0         !  =0 no ice boundary condition   , 
     54                           !  =1 use observed ice-cover      , 
     55                           !  =2 or 3 automatically for LIM3 or CICE    ("key_lim3" or "key_cice") 
     56                           !          except in AGRIF zoom where it has to be specified 
     57   ln_ice_embd = .false.   !  =T embedded sea-ice (pressure + mass and salt exchanges) 
     58                           !  =F levitating ice (no pressure, mass and salt exchanges) 
     59                     ! Misc. options of sbc :  
     60   ln_traqsr   = .true.    !  Light penetration in the ocean            (T => fill namtra_qsr) 
     61   ln_dm2dc    = .false.   !  daily mean to diurnal cycle on short wave 
     62   ln_rnf      = .true.    !  runoffs                                   (T => fill namsbc_rnf) 
     63   ln_ssr      = .true.    !  Sea Surface Restoring on T and/or S       (T => fill namsbc_ssr) 
     64   nn_fwb      = 0 !!gm  2         !  FreshWater Budget: =0 unchecked 
     65                           !     =1 global mean of e-p-r set to zero at each time step 
     66                           !     =2 annual global mean of e-p-r set to zero 
     67   ln_apr_dyn  = .false.   !  Patm gradient added in ocean & ice Eqs.   (T => fill namsbc_apr ) 
     68   ln_isf      = .false.   !  ice shelf                                 (T   => fill namsbc_isf) 
     69   ln_wave     = .false.   !  Activate coupling with wave  (T => fill namsbc_wave) 
     70   ln_cdgw     = .false.   !  Neutral drag coefficient read from wave model (T => ln_wave=.true. & fill namsbc_wave) 
     71   ln_sdw      = .false.   !  Read 2D Surf Stokes Drift & Computation of 3D stokes drift (T => ln_wave=.true. & fill namsbc_wave)  
     72   ln_tauoc    = .false.   !  Activate ocean stress modified by external wave induced stress (T => ln_wave=.true. & fill namsbc_wave) 
     73   ln_stcor    = .false.   !  Activate Stokes Coriolis term (T => ln_wave=.true. & ln_sdw=.true. & fill namsbc_wave) 
     74   nn_lsm      = 0         !  =0 land/sea mask for input fields is not applied (keep empty land/sea mask filename field) , 
     75                           !  =1:n number of iterations of land/sea mask application for input fields (fill land/sea mask filename field) 
    4076/ 
    4177!----------------------------------------------------------------------- 
    4278&namsbc_blk   !   namsbc_blk  Bulk formulae 
    4379!----------------------------------------------------------------------- 
     80!              !  file name                   ! frequency (hours) ! variable  ! time interp. !  clim  ! 'yearly'/ ! weights                              ! rotation ! land/sea mask ! 
     81!              !                              !  (if <0  months)  !   name    !   (logical)  !  (T/F) ! 'monthly' ! filename                             ! pairing  ! filename      ! 
     82   sn_wndi     = 'u_10.15JUNE2009_fill'       ,         6         , 'U_10_MOD',   .false.    , .true. , 'yearly'  , 'weights_core_orca2_bicubic_noc.nc'   , 'Uwnd'   , '' 
     83   sn_wndj     = 'v_10.15JUNE2009_fill'       ,         6         , 'V_10_MOD',   .false.    , .true. , 'yearly'  , 'weights_core_orca2_bicubic_noc.nc'   , 'Vwnd'   , '' 
     84   sn_qsr      = 'ncar_rad.15JUNE2009_fill'   ,        24         , 'SWDN_MOD',   .false.    , .true. , 'yearly'  , 'weights_core_orca2_bilinear_noc.nc'  , ''       , '' 
     85   sn_qlw      = 'ncar_rad.15JUNE2009_fill'   ,        24         , 'LWDN_MOD',   .false.    , .true. , 'yearly'  , 'weights_core_orca2_bilinear_noc.nc'  , ''       , '' 
     86   sn_tair     = 't_10.15JUNE2009_fill'       ,         6         , 'T_10_MOD',   .false.    , .true. , 'yearly'  , 'weights_core_orca2_bilinear_noc.nc'  , ''       , '' 
     87   sn_humi     = 'q_10.15JUNE2009_fill'       ,         6         , 'Q_10_MOD',   .false.    , .true. , 'yearly'  , 'weights_core_orca2_bilinear_noc.nc'  , ''       , '' 
     88   sn_prec     = 'ncar_precip.15JUNE2009_fill',        -1         , 'PRC_MOD1',   .false.    , .true. , 'yearly'  , 'weights_core_orca2_bilinear_noc.nc'  , ''       , '' 
     89   sn_snow     = 'ncar_precip.15JUNE2009_fill',        -1         , 'SNOW'    ,   .false.    , .true. , 'yearly'  , 'weights_core_orca2_bilinear_noc.nc'  , ''       , '' 
     90   sn_slp      = 'slp.15JUNE2009_fill'        ,         6         , 'SLP'     ,   .false.    , .true. , 'yearly'  , 'weights_core_orca2_bilinear_noc.nc'  , ''       , '' 
     91   sn_tdif     = 'taudif_core'                ,        24         , 'taudif'  ,   .false.    , .true. , 'yearly'  , 'weights_core_orca2_bilinear_noc.nc'  , ''       , '' 
     92   !                    !  bulk algorithm : 
    4493   ln_NCAR     = .true.   ! "NCAR"      algorithm   (Large and Yeager 2008) 
     94   ln_COARE_3p0= .false.   ! "COARE 3.0" algorithm   (Fairall et al. 2003) 
     95   ln_COARE_3p5= .false.   ! "COARE 3.5" algorithm   (Edson et al. 2013) 
     96   ln_ECMWF    = .false.   ! "ECMWF"     algorithm   (IFS cycle 31) 
     97   ! 
     98   cn_dir      = './'      !  root directory for the location of the bulk files 
     99   ln_taudif   = .false.   !  HF tau contribution: use "mean of stress module - module of the mean stress" data 
     100   rn_zqt      = 10.       !  Air temperature and humidity reference height (m) 
     101   rn_zu       = 10.       !  Wind vector reference height (m) 
     102   rn_pfac     = 1.        !  multiplicative factor for precipitation (total & snow) 
     103   rn_efac     = 1.        !  multiplicative factor for evaporation (0. or 1.) 
     104   rn_vfac     = 0.        !  multiplicative factor for ocean & ice velocity used to 
     105   !                       !  calculate the wind stress (0.=absolute or 1.=relative winds) 
     106   ln_Cd_L12   = .false.   !  air-ice drags = F(ice concentration) (Lupkes et al. 2012) 
     107   ln_Cd_L15   = .false.   !  air-ice drags = F(ice concentration) (Lupkes et al. 2015) 
     108/ 
    45109/ 
    46110!----------------------------------------------------------------------- 
     
    125189&nameos        !   ocean physical parameters 
    126190!----------------------------------------------------------------------- 
    127    ln_teos10    = .true.         !  = Use TEOS-10 equation of state 
     191!!gm   ln_teos10    = .true.         !  = Use TEOS-10 equation of state 
     192   ln_eos80    = .true.         !  = Use TEOS-10 equation of state 
    128193/ 
    129194!----------------------------------------------------------------------- 
  • branches/2017/dev_r7881_ENHANCE09_RK3/NEMOGCM/CONFIG/ORCA2_LIM3_PISCES/cpp_ORCA2_LIM3_PISCES.fcm

    r8637 r8679  
    1 bld::tool::fppkeys   key_lim3 key_iomput key_mpp_mpi key_nosignedzero key_agrif 
     1bld::tool::fppkeys   key_lim3 key_iomput key_mpp_mpi key_nosignedzero  
  • branches/2017/dev_r7881_ENHANCE09_RK3/NEMOGCM/CONFIG/SHARED/field_def_nemo-opa.xml

    r8637 r8679  
    408408         <field id="av_ratio"     long_name="S over T diffusivity ratio"                     standard_name="salinity_over_temperature_diffusivity_ratio"                     unit="1"    /> 
    409409         <field id="av_wave"      long_name="internal wave-induced vertical diffusivity"     standard_name="ocean_vertical_tracer_diffusivity_due_to_internal_waves"         unit="m2/s" /> 
    410          <field id="bflx_tmx"     long_name="internal wave-induced buoyancy flux"            standard_name="buoyancy_flux_due_to_internal_waves"                             unit="W/kg" /> 
    411          <field id="pcmap_tmx"    long_name="power consumed by wave-driven mixing"           standard_name="vertically_integrated_power_consumption_by_wave_driven_mixing"   unit="W/m2"      grid_ref="grid_W_2D" /> 
    412          <field id="emix_tmx"     long_name="power density available for mixing"             standard_name="power_available_for_mixing_from_breaking_internal_waves"         unit="W/kg" /> 
     410         <field id="bflx_iwm"     long_name="internal wave-induced buoyancy flux"            standard_name="buoyancy_flux_due_to_internal_waves"                             unit="W/kg" /> 
     411         <field id="pcmap_iwm"    long_name="power consumed by wave-driven mixing"           standard_name="vertically_integrated_power_consumption_by_wave_driven_mixing"   unit="W/m2"      grid_ref="grid_W_2D" /> 
     412         <field id="emix_iwm"     long_name="power density available for mixing"             standard_name="power_available_for_mixing_from_breaking_internal_waves"         unit="W/kg" /> 
    413413 
    414414         <!-- variables available with diaar5 -->    
  • branches/2017/dev_r7881_ENHANCE09_RK3/NEMOGCM/CONFIG/cfg.txt

    r8637 r8679  
    88GYRE_PISCES_XIOS OPA_SRC TOP_SRC 
    99ORCA2_LIM3 OPA_SRC LIM_SRC_3 NST_SRC 
     10GYRE_PISCES_RK3 RK3_SRC TOP_SRC 
    1011ORCA2_LIM3_PISCES OPA_SRC LIM_SRC_3 TOP_SRC NST_SRC 
    11 GYRE_PISCES_RK3 RK3_SRC TOP_SRC 
  • branches/2017/dev_r7881_ENHANCE09_RK3/NEMOGCM/NEMO/OPA_SRC/LBC/mpp_lnk_generic.h90

    r8586 r8679  
    291291         ! 
    292292         SELECT CASE ( jpni ) 
    293          CASE ( 1 )     ;   CALL lbc_nfd( ptab, NAT_IN(:), SGN_IN(:) )   ! only 1 northern proc, no mpp 
     293         CASE ( 1 )     ;   CALL lbc_nfd( ptab, NAT_IN(:), SGN_IN(:) OPT_K(:) )   ! only 1 northern proc, no mpp 
    294294         CASE DEFAULT   ;   CALL mpp_nfd( ptab, NAT_IN(:), SGN_IN(:) OPT_K(:) )   ! for all northern procs. 
    295295         END SELECT 
Note: See TracChangeset for help on using the changeset viewer.