Changeset 8420
- Timestamp:
- 2017-08-08T14:18:46+02:00 (7 years ago)
- Location:
- branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3
- Files:
-
- 2 added
- 2 deleted
- 14 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/icectl.F90
r8411 r8420 18 18 USE dom_oce ! ocean space and time domain 19 19 USE ice ! LIM-3: ice variables 20 USE thd_ice! LIM-3: thermodynamical variables20 USE ice1D ! LIM-3: thermodynamical variables 21 21 USE sbc_oce ! Surface boundary condition: ocean fields 22 22 USE sbc_ice ! Surface boundary condition: ice fields -
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/iceerr1.F90
r8411 r8420 16 16 USE phycst ! physical constants 17 17 USE ice 18 USE thd_ice! LIM thermodynamic sea-ice variables18 USE ice1D ! LIM thermodynamic sea-ice variables 19 19 USE limitd_th 20 20 USE limvar -
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/iceerr2.F90
r8411 r8420 16 16 USE phycst ! physical constants 17 17 USE ice 18 USE thd_ice! LIM thermodynamic sea-ice variables18 USE ice1D ! LIM thermodynamic sea-ice variables 19 19 USE limitd_th 20 20 USE limvar -
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/icerdgrft.F90
r8411 r8420 16 16 USE phycst ! physical constants (ocean directory) 17 17 USE sbc_oce, ONLY: sss_m, sst_m ! surface boundary condition: ocean fields 18 USE thd_ice! LIM thermodynamics18 USE ice1D ! LIM thermodynamics 19 19 USE ice ! LIM variables 20 20 USE limvar ! LIM -
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/icestp.F90
r8414 r8420 24 24 USE dom_oce ! ocean space and time domain 25 25 USE ice ! LIM-3: ice variables 26 USE thd_ice! LIM-3: thermodynamical variables26 USE ice1D ! LIM-3: thermodynamical variables 27 27 ! 28 28 USE sbc_oce ! Surface boundary condition: ocean fields … … 261 261 ierr = ice_alloc () ! ice variables 262 262 ierr = ierr + sbc_ice_alloc () ! surface forcing 263 ierr = ierr + thd_ice_alloc() ! thermodynamics263 ierr = ierr + ice1D_alloc () ! thermodynamics 264 264 IF( ln_limdyn ) ierr = ierr + ice_rdgrft_alloc () ! ridging/rafting 265 265 ! -
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/limitd_th.F90
r8411 r8420 21 21 USE dom_oce ! ocean domain 22 22 USE phycst ! physical constants (ocean directory) 23 USE thd_ice! LIM-3 thermodynamic variables23 USE ice1D ! LIM-3 thermodynamic variables 24 24 USE ice ! LIM-3 variables 25 25 USE limvar ! LIM-3 variables 26 26 USE icecons ! conservation tests 27 USE limtab27 USE icetab 28 28 ! 29 29 USE prtctl ! Print control -
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/limthd.F90
r8414 r8420 26 26 USE sbc_ice , ONLY : qsr_oce, qns_oce, qemp_oce, qsr_ice, qns_ice, dqns_ice, evap_ice, qprec_ice, qevap_ice, & 27 27 & fr1_i0, fr2_i0, nn_limflx 28 USE thd_ice! thermodynamic sea-ice variables28 USE ice1D ! thermodynamic sea-ice variables 29 29 USE limthd_dif ! vertical diffusion 30 30 USE limthd_dh ! ice-snow growth and melt … … 34 34 USE limthd_lac ! lateral accretion 35 35 USE limitd_th ! remapping thickness distribution 36 USE limtab ! 1D <==> 2D transformation36 USE icetab ! 1D <==> 2D transformation 37 37 USE limvar ! 38 38 USE icecons ! conservation tests -
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/limthd_da.F90
r8378 r8420 15 15 USE phycst ! physical constants (ocean directory) 16 16 USE ice ! LIM variables 17 USE thd_ice! thermodynamic sea-ice variables17 USE ice1D ! thermodynamic sea-ice variables 18 18 ! 19 19 USE lib_mpp ! MPP library -
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/limthd_dh.F90
r8414 r8420 19 19 USE phycst ! physical constants (OCE directory) 20 20 USE ice ! LIM variables 21 USE thd_ice! LIM thermodynamics21 USE ice1D ! LIM thermodynamics 22 22 ! 23 23 USE in_out_manager ! I/O manager -
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/limthd_dif.F90
r8378 r8420 19 19 USE phycst ! physical constants (ocean directory) 20 20 USE ice ! LIM-3 variables 21 USE thd_ice! LIM-3: thermodynamics21 USE ice1D ! LIM-3: thermodynamics 22 22 ! 23 23 USE in_out_manager ! I/O manager -
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/limthd_ent.F90
r8378 r8420 24 24 USE phycst ! physical constants 25 25 USE ice ! LIM variables 26 USE thd_ice! LIM thermodynamics26 USE ice1D ! LIM thermodynamics 27 27 USE limvar ! LIM variables 28 28 ! -
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/limthd_lac.F90
r8411 r8420 20 20 USE sbc_oce , ONLY : sss_m 21 21 USE sbc_ice , ONLY : utau_ice, vtau_ice 22 USE thd_ice! LIM thermodynamics22 USE ice1D ! LIM thermodynamics 23 23 USE ice ! LIM variables 24 USE limtab ! LIM 2D <==> 1D24 USE icetab ! LIM 2D <==> 1D 25 25 USE icecons ! LIM conservation 26 26 USE limthd_ent -
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/limthd_sal.F90
r8378 r8420 17 17 USE phycst ! physical constants (ocean directory) 18 18 USE ice ! LIM variables 19 USE thd_ice! LIM thermodynamics19 USE ice1D ! LIM thermodynamics 20 20 USE limvar ! LIM variables 21 21 ! -
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/limvar.F90
r8413 r8420 40 40 USE sbc_oce , ONLY : sss_m 41 41 USE ice ! ice variables 42 USE thd_ice! ice variables (thermodynamics)42 USE ice1D ! ice variables (thermodynamics) 43 43 ! 44 44 USE in_out_manager ! I/O manager
Note: See TracChangeset
for help on using the changeset viewer.