- Timestamp:
- 2020-05-14T21:46:00+02:00 (4 years ago)
- Location:
- NEMO/branches/2019/dev_r11078_OSMOSIS_IMMERSE_Nurser
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2019/dev_r11078_OSMOSIS_IMMERSE_Nurser
- Property svn:externals
-
old new 6 6 ^/vendors/FCM@HEAD ext/FCM 7 7 ^/vendors/IOIPSL@HEAD ext/IOIPSL 8 9 # SETTE 10 ^/utils/CI/sette@HEAD sette
-
- Property svn:externals
-
NEMO/branches/2019/dev_r11078_OSMOSIS_IMMERSE_Nurser/src/TOP/AGE/trcini_age.F90
r10070 r12928 25 25 CONTAINS 26 26 27 SUBROUTINE trc_ini_age 27 SUBROUTINE trc_ini_age( Kmm ) 28 28 !!---------------------------------------------------------------------- 29 29 !! *** trc_ini_age *** … … 32 32 !! 33 33 !!---------------------------------------------------------------------- 34 INTEGER, INTENT(in) :: Kmm ! time level indices 34 35 INTEGER :: jn 35 36 CHARACTER(len = 20) :: cltra … … 57 58 58 59 59 IF( .NOT. ln_rsttr ) tr n(:,:,:,jp_age) = 0.60 IF( .NOT. ln_rsttr ) tr(:,:,:,jp_age,Kmm) = 0. 60 61 ! 61 62 END SUBROUTINE trc_ini_age
Note: See TracChangeset
for help on using the changeset viewer.