Changeset 9739


Ignore:
Timestamp:
2018-06-05T16:25:10+02:00 (2 years ago)
Author:
clem
Message:

eliminate the few lim3 comments left in the code

Location:
NEMO/trunk/cfgs
Files:
2 deleted
6 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/cfgs/AGRIF_ICE/EXPREF/namelist_cfg

    r9686 r9739  
    8080   ln_blk      = .true.    !  Bulk formulation                          (T => fill namsbc_blk ) 
    8181                     ! Sea-ice : 
    82    nn_ice      = 2         !  =2 or 3 automatically for LIM3 or CICE    ("key_lim3" or "key_cice") 
     82   nn_ice      = 2         !  =2 or 3 automatically for SI3 or CICE    ("key_si3" or "key_cice") 
    8383                           !          except in AGRIF zoom where it has to be specified 
    8484                     ! Misc. options of sbc :  
  • NEMO/trunk/cfgs/AMM12/EXPREF/namelist_cfg

    r9560 r9739  
    11!!>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 
    2 !! NEMO/OPA  : AMM12 namelist - overwrite some defaults values defined in SHARED/namelist_ref 
     2!! NEMO/OPA Configuration namelist : overwrite default values defined in SHARED/namelist_ref 
    33!!>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 
    44!                          AMM12 configuration                         ! 
    5  
    65!!====================================================================== 
    76!!              ***  Domain & Run management namelists  ***           !! 
     
    1312!!   namtsd       data: temperature & salinity                          (default: OFF) 
    1413!!   namcrs       coarsened grid (for outputs and/or TOP)               (ln_crs =T) 
     14!!   namc1d       1D configuration options                              ("key_c1d") 
     15!!   namc1d_dyndmp 1D newtonian damping applied on currents             ("key_c1d") 
     16!!   namc1d_uvd   1D data (currents)                                    ("key_c1d") 
    1517!!====================================================================== 
    1618! 
     
    378380!!====================================================================== 
    379381! 
     382!!====================================================================== 
     383!!                  ***  Miscellaneous namelists  ***                 !! 
     384!!                                                                    !! 
     385!!   nammpp            Massively Parallel Processing                    ("key_mpp_mpi") 
     386!!   namctl            Control prints                                   (default: OFF) 
     387!!   namsto            Stochastic parametrization of EOS                (default: OFF) 
     388!!====================================================================== 
    380389! 
    381390!----------------------------------------------------------------------- 
  • NEMO/trunk/cfgs/ORCA2_ICE_PISCES/EXPREF/namelist_cfg

    r9557 r9739  
    8080   ln_blk      = .true.    !  Bulk formulation                          (T => fill namsbc_blk ) 
    8181                     ! Sea-ice : 
    82    nn_ice      = 2         !  =2 or 3 automatically for LIM3 or CICE    ("key_lim3" or "key_cice") 
     82   nn_ice      = 2         !  =2 or 3 automatically for SI3 or CICE    ("key_si3" or "key_cice") 
    8383                           !          except in AGRIF zoom where it has to be specified 
    8484                     ! Misc. options of sbc :  
  • NEMO/trunk/cfgs/SHARED/namelist_ref

    r9657 r9739  
    203203   nn_ice      = 0         !  =0 no ice boundary condition     
    204204      !                    !  =1 use observed ice-cover                 (  => fill namsbc_iif ) 
    205       !                    !  =2 or 3 automatically for LIM3 or CICE    ("key_lim3" or "key_cice") 
     205      !                    !  =2 or 3 automatically for SI3 or CICE    ("key_si3" or "key_cice") 
    206206      !                    !          except in AGRIF zoom where it has to be specified 
    207207   ln_ice_embd = .false.   !  =T embedded sea-ice (pressure + mass and salt exchanges) 
     
    595595   nn_ice_dta    =  0         !  = 0, bdy data are equal to the initial state 
    596596   !                          !  = 1, bdy data are read in 'bdydata   .nc' files 
    597    rn_ice_tem    = 270.       !  lim3 only: arbitrary temperature of incoming sea ice 
    598    rn_ice_sal    = 10.        !  lim3 only:      --   salinity           -- 
    599    rn_ice_age    = 30.        !  lim3 only:      --   age                -- 
     597   rn_ice_tem    = 270.       !  si3 only: arbitrary temperature of incoming sea ice 
     598   rn_ice_sal    = 10.        !  si3 only:      --   salinity           -- 
     599   rn_ice_age    = 30.        !  si3 only:      --   age                -- 
    600600   ! 
    601601   ln_tra_dmp    =.false.     !  open boudaries conditions for tracers 
  • NEMO/trunk/cfgs/SPITZ12/EXPREF/namelist_cfg

    r9657 r9739  
    11!!>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 
    2 !! NEMO SPITZ namelist : overwrite some defaults values defined in SHARED/namelist_ref 
     2!! NEMO/OPA Configuration namelist : overwrite default values defined in SHARED/namelist_ref 
    33!!>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 
    44!!                       SPITZ 1/12 configuration                     !! 
     
    2323   nn_it000    = 1         !  first time step 
    2424   nn_itend    = 100       !  last  time step (std 5475) 
    25    nn_date0    = 20020101  !  date at nit_0000 (format yyyymmdd) used if ln_rstart=F or (ln_rstart=T and nn_rstctl=0 or 1) 
    2625/ 
    2726!----------------------------------------------------------------------- 
     
    8079   ln_blk      = .true.    !  Bulk formulation                          (T => fill namsbc_blk ) 
    8180                     ! Sea-ice : 
    82    nn_ice      = 2         !  LIM3 
     81   nn_ice      = 2         !  SI3 
    8382                     ! Misc. options of sbc : 
    8483   ln_traqsr   = .true.    !  Light penetration in the ocean            (T => fill namtra_qsr ) 
     
    190189   nn_ice_dta    =  1         !  = 0, bdy data are equal to the initial state 
    191190   !                          !  = 1, bdy data are read in 'bdydata   .nc' files 
    192    rn_ice_tem    = 267.       !  lim3 only: arbitrary temperature of incoming sea ice 
    193    rn_ice_sal    =   6.       !  lim3 only:      --   salinity           -- 
    194    rn_ice_age    = 365.       !  lim3 only:      --   age                -- 
     191   rn_ice_tem    = 267.       !  si3 only: arbitrary temperature of incoming sea ice 
     192   rn_ice_sal    =   6.       !  si3 only:      --   salinity           -- 
     193   rn_ice_age    = 365.       !  si3 only:      --   age                -- 
    195194   ! 
    196195   nn_rimwidth   = 1          !  width of the relaxation zone 
     
    332331!----------------------------------------------------------------------- 
    333332   ln_dynspg_ts  = .true.  !  split-explicit free surface 
    334       ln_bt_fw      = .false.     ! Forward integration of barotropic Eqs. 
     333!!clem      ln_bt_fw      = .false.     ! Forward integration of barotropic Eqs. 
    335334/ 
    336335!----------------------------------------------------------------------- 
  • NEMO/trunk/cfgs/SPITZ12/MY_SRC/sbcblk.F90

    r9665 r9739  
    135135#  include "vectopt_loop_substitute.h90" 
    136136   !!---------------------------------------------------------------------- 
    137    !! NEMO/OPA 3.7 , NEMO-consortium (2014) 
     137   !! NEMO/OCE 4.0 , NEMO Consortium (2018) 
    138138   !! $Id: sbcblk.F90 6416 2016-04-01 12:22:17Z clem $ 
    139139   !! Software governed by the CeCILL licence     (./LICENSE) 
     
    496496 
    497497      ! zqla used as temporary array, for rho*U (common term of bulk formulae): 
    498       zqla(:,:) = zrhoa(:,:) * zU_zu(:,:) 
     498      zqla(:,:) = zrhoa(:,:) * zU_zu(:,:) * tmask(:,:,1) 
    499499 
    500500      IF( ABS( rn_zu - rn_zqt) < 0.01_wp ) THEN 
     
    536536         &     * ( sf(jp_tair)%fnow(:,:,1) - rt0 ) * rcp                          & 
    537537         &     + sf(jp_snow)%fnow(:,:,1) * rn_pfac                                &   ! add solid  precip heat content at min(Tair,Tsnow) 
    538          &     * ( MIN( sf(jp_tair)%fnow(:,:,1), rt0_snow ) - rt0 ) * cpic * tmask(:,:,1) 
     538         &     * ( MIN( sf(jp_tair)%fnow(:,:,1), rt0_snow ) - rt0 ) * cpic 
     539      qns(:,:) = qns(:,:) * tmask(:,:,1) 
    539540      ! 
    540541#if defined key_si3 
    541       qns_oce(:,:) = zqlw(:,:) - zqsb(:,:) - zqla(:,:)                                ! non solar without emp (only needed by LIM3) 
     542      qns_oce(:,:) = zqlw(:,:) - zqsb(:,:) - zqla(:,:)                                ! non solar without emp (only needed by SI3) 
    542543      qsr_oce(:,:) = qsr(:,:) 
    543544#endif 
     
    551552         CALL iom_put( "qsr_oce" ,   qsr  )                 ! output downward solar heat over the ocean 
    552553         CALL iom_put( "qt_oce"  ,   qns+qsr )              ! output total downward heat over the ocean 
    553          tprecip(:,:) = sf(jp_prec)%fnow(:,:,1) * rn_pfac   ! output total precipitation [kg/m2/s] 
    554          sprecip(:,:) = sf(jp_snow)%fnow(:,:,1) * rn_pfac   ! output solid precipitation [kg/m2/s] 
     554         tprecip(:,:) = sf(jp_prec)%fnow(:,:,1) * rn_pfac * tmask(:,:,1) ! output total precipitation [kg/m2/s] 
     555         sprecip(:,:) = sf(jp_snow)%fnow(:,:,1) * rn_pfac * tmask(:,:,1) ! output solid precipitation [kg/m2/s] 
    555556         CALL iom_put( 'snowpre', sprecip )                 ! Snow 
    556557         CALL iom_put( 'precip' , tprecip )                 ! Total precipitation 
     
    842843      REAL(wp), DIMENSION(jpi,jpj,jpl) ::   z_dqlw        ! long wave heat sensitivity over ice 
    843844      REAL(wp), DIMENSION(jpi,jpj,jpl) ::   z_dqsb        ! sensible  heat sensitivity over ice 
    844       REAL(wp), DIMENSION(jpi,jpj)     ::   zevap, zsnw   ! evaporation and snw distribution after wind blowing (LIM3) 
     845      REAL(wp), DIMENSION(jpi,jpj)     ::   zevap, zsnw   ! evaporation and snw distribution after wind blowing (SI3) 
    845846      REAL(wp), DIMENSION(jpi,jpj)     ::   zrhoa 
    846847      !!--------------------------------------------------------------------- 
     
    906907      END DO 
    907908      ! 
    908       tprecip(:,:) = sf(jp_prec)%fnow(:,:,1) * rn_pfac      ! total precipitation [kg/m2/s] 
    909       sprecip(:,:) = sf(jp_snow)%fnow(:,:,1) * rn_pfac      ! solid precipitation [kg/m2/s] 
     909      tprecip(:,:) = sf(jp_prec)%fnow(:,:,1) * rn_pfac * tmask(:,:,1)  ! total precipitation [kg/m2/s] 
     910      sprecip(:,:) = sf(jp_snow)%fnow(:,:,1) * rn_pfac * tmask(:,:,1)  ! solid precipitation [kg/m2/s] 
    910911      CALL iom_put( 'snowpre', sprecip )                    ! Snow precipitation 
    911912      CALL iom_put( 'precip' , tprecip )                    ! Total precipitation 
Note: See TracChangeset for help on using the changeset viewer.