- Timestamp:
- 2017-08-08T17:53:09+02:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/icethd.F90
r8424 r8426 36 36 USE icetab ! 1D <==> 2D transformation 37 37 USE icevar ! 38 USE icecons ! conservation tests39 38 USE icectl ! control print 40 39 ! … … 93 92 94 93 IF( kt == nit000 .AND. lwp ) THEN 95 WRITE(numout,*) ''96 WRITE(numout,*)' ice _thd '97 WRITE(numout,*)' ~~~~~~~ ~'94 WRITE(numout,*) 95 WRITE(numout,*)' icethd ' 96 WRITE(numout,*)' ~~~~~~~' 98 97 ENDIF 99 98
Note: See TracChangeset
for help on using the changeset viewer.