Changeset 9576 for branches/2017/dev_merge_2017/NEMOGCM/CONFIG/TEST_CASES
- Timestamp:
- 2018-05-11T16:50:48+02:00 (6 years ago)
- Location:
- branches/2017/dev_merge_2017/NEMOGCM/CONFIG/TEST_CASES
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_merge_2017/NEMOGCM/CONFIG/TEST_CASES/CANAL/MY_SRC/diawri.F90
r9403 r9576 51 51 USE ioipsl ! 52 52 53 #if defined key_ lim353 #if defined key_si3 54 54 USE icewri 55 55 #endif … … 1076 1076 ENDIF 1077 1077 1078 #if defined key_ lim31078 #if defined key_si3 1079 1079 IF( nn_ice == 2 ) THEN ! condition needed in case agrif + ice-model but no-ice in child grid 1080 1080 CALL ice_wri_state( kt, id_i, nh_i ) -
branches/2017/dev_merge_2017/NEMOGCM/CONFIG/TEST_CASES/WAD/MY_SRC/bdyini.F90
r9168 r9576 344 344 IF(lwp) WRITE(numout,*) 345 345 346 #if defined key_ lim3346 #if defined key_si3 347 347 IF(lwp) WRITE(numout,*) 'Boundary conditions for sea ice: ' 348 348 SELECT CASE( cn_ice_lim(ib_bdy) )
Note: See TracChangeset
for help on using the changeset viewer.