Changeset 9656 for NEMO/trunk/src/NST
- Timestamp:
- 2018-05-28T11:53:14+02:00 (3 years ago)
- Location:
- NEMO/trunk/src/NST
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/NST/agrif_ice.F90
r9598 r9656 4 4 !! AGRIF : define in memory AGRIF variables for sea-ice 5 5 !!---------------------------------------------------------------------- 6 !! History : 3.4 ! 2012-08 (R. Benshila)Original code7 !! 3.6 ! 2016-05 (C. Rousset) Add LIM3 compatibility6 !! History : 3.4 ! 2012-08 (R. Benshila) Original code 7 !! 4.0 ! 2018 (C. Rousset) SI3 compatibility 8 8 !!---------------------------------------------------------------------- 9 9 #if defined key_agrif && defined key_si3 10 10 !!---------------------------------------------------------------------- 11 11 !! 'key_agrif' AGRIF zoom 12 !! 'key_si3' SI3 sea-ice model12 !! 'key_si3' SI3 sea-ice model 13 13 !!---------------------------------------------------------------------- 14 14 IMPLICIT NONE -
NEMO/trunk/src/NST/agrif_ice_interp.F90
r9610 r9656 3 3 !! *** MODULE agrif_ice_interp *** 4 4 !! Nesting module : interp surface ice boundary condition from a parent grid 5 !! Sea-Ice model : LIM 3.6 Sea ice model time-stepping6 5 !!===================================================================================== 7 !! History : 2.0 ! 04-2008 (F. Dupont) initial version6 !! History : 2.0 ! 04-2008 (F. Dupont) initial version 8 7 !! 3.4 ! 09-2012 (R. Benshila, C. Herbaut) update and EVP 9 !! 3.6 ! 05-2016 (C. Rousset) Add LIM3 compatibility8 !! 4.0 ! 2018 (C. Rousset) SI3 compatibility 10 9 !!---------------------------------------------------------------------- 11 10 #if defined key_agrif && defined key_si3 12 11 !!---------------------------------------------------------------------- 13 !! 'key_si3' : LIM 3.6sea-ice model14 !! 'key_agrif' :AGRIF library12 !! 'key_si3' SI3 sea-ice model 13 !! 'key_agrif' AGRIF library 15 14 !!---------------------------------------------------------------------- 16 15 !! agrif_interp_ice : interpolation of ice at "after" sea-ice time step … … 41 40 SUBROUTINE agrif_interp_ice( cd_type, kiter, kitermax ) 42 41 !!----------------------------------------------------------------------- 43 !! *** ROUTINE agrif_ rhg_lim3***42 !! *** ROUTINE agrif_interp_ice *** 44 43 !! 45 44 !! ** Method : simple call to atomic routines using stored values to -
NEMO/trunk/src/NST/agrif_ice_update.F90
r9610 r9656 6 6 !! *** MODULE agrif_ice_update *** 7 7 !! Nesting module : update surface ocean boundary condition over ice from a child grid 8 !! Sea-Ice model : LIM 3.6 Sea ice model time-stepping9 8 !!===================================================================================== 10 !! History : 2.0 ! 04-2008 (F. Dupont) initial version9 !! History : 2.0 ! 04-2008 (F. Dupont) initial version 11 10 !! 3.4 ! 08-2012 (R. Benshila, C. Herbaut) update and EVP 12 !! 3.6 ! 05-2016 (C. Rousset) Add LIM3 compatibility11 !! 4.0 ! 2018 (C. Rousset) SI3 compatibility 13 12 !!---------------------------------------------------------------------- 14 13 #if defined key_agrif && defined key_si3 15 14 !!---------------------------------------------------------------------- 16 !! 'key_si3' : LIM 3.6sea-ice model17 !! 'key_agrif' : AGRIF library15 !! 'key_si3' : SI3 sea-ice model 16 !! 'key_agrif' : AGRIF library 18 17 !!---------------------------------------------------------------------- 19 18 !! agrif_update_ice : update sea-ice on boundaries or total 20 19 !! child domain for velocities and ice properties 21 !! update_tra_ice 22 !! update_u_ice 23 !! update_v_ice 20 !! update_tra_ice : sea-ice properties 21 !! update_u_ice : zonal ice velocity 22 !! update_v_ice : meridional ice velocity 24 23 !!---------------------------------------------------------------------- 25 24 USE dom_oce -
NEMO/trunk/src/NST/agrif_user.F90
r9610 r9656 497 497 !! *** ROUTINE Agrif_InitValues_cont_ice *** 498 498 !! 499 !! ** Purpose :: Initialisation of variables to be interpolated for LIM3499 !! ** Purpose :: Initialisation of variables to be interpolated for ice 500 500 !!---------------------------------------------------------------------- 501 501 USE Agrif_Util … … 541 541 !! *** ROUTINE agrif_declare_var_ice *** 542 542 !! 543 !! ** Purpose :: Declaration of variables to be interpolated for LIM3543 !! ** Purpose :: Declaration of variables to be interpolated for ice 544 544 !!---------------------------------------------------------------------- 545 545 USE Agrif_Util
Note: See TracChangeset
for help on using the changeset viewer.