Ignore:
Timestamp:
2017-09-07T12:28:42+02:00 (3 years ago)
Author:
clem
Message:

changes in style - part5 - continue changing init routines

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/iceist.F90

    r8498 r8506  
    4646   INTEGER , PARAMETER ::   jp_smi = 6           ! index of ice sali at T-point 
    4747   TYPE(FLD), ALLOCATABLE, DIMENSION(:) ::   si  ! structure of input fields (file informations, fields read) 
     48   ! 
     49   ! ** namelist (namiceini) ** 
     50   LOGICAL  ::   ln_limini        ! initialization or not 
     51   LOGICAL  ::   ln_limini_file   ! Ice initialization state from 2D netcdf file 
     52   REAL(wp) ::   rn_thres_sst     ! threshold water temperature for initial sea ice 
     53   REAL(wp) ::   rn_hts_ini_n     ! initial snow thickness in the north 
     54   REAL(wp) ::   rn_hts_ini_s     ! initial snow thickness in the south 
     55   REAL(wp) ::   rn_hti_ini_n     ! initial ice thickness in the north 
     56   REAL(wp) ::   rn_hti_ini_s     ! initial ice thickness in the south 
     57   REAL(wp) ::   rn_ati_ini_n     ! initial leads area in the north 
     58   REAL(wp) ::   rn_ati_ini_s     ! initial leads area in the south 
     59   REAL(wp) ::   rn_smi_ini_n     ! initial salinity  
     60   REAL(wp) ::   rn_smi_ini_s     ! initial salinity 
     61   REAL(wp) ::   rn_tmi_ini_n     ! initial temperature 
     62   REAL(wp) ::   rn_tmi_ini_s     ! initial temperature 
     63    
    4864   !!---------------------------------------------------------------------- 
    4965   !! NEMO/ICE 4.0 , NEMO Consortium (2017) 
Note: See TracChangeset for help on using the changeset viewer.