- Timestamp:
- 2014-03-24T10:13:52+01:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/dev_r4028_CNRS_LIM3_MV2014/NEMOGCM/NEMO/LIM_SRC_3/limwri.F90
r4532 r4566 106 106 CALL iom_put( "snowthic_cea" , z2d ) 107 107 ENDIF 108 WRITE(numout,*) ' valore del iom_use snowthic_cea', iom_use( "snowthic_cea" )109 WRITE(numout,*) ' valore del iom_use icethic_cea', iom_use( "icethic_cea" )110 108 IF ( iom_use( "ioceflxb" ) ) THEN 111 109 CALL iom_put( "ioceflxb" , fbif * at_i ) ! oceanic flux at the ice base
Note: See TracChangeset
for help on using the changeset viewer.