Changeset 9913 for NEMO/trunk/src/ICE/icectl.F90
- Timestamp:
- 2018-07-10T15:02:00+02:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/ICE/icectl.F90
r9912 r9913 579 579 WRITE(numout,*) ' hfx_thd : ', hfx_thd(ji,jj) 580 580 WRITE(numout,*) ' hfx_res : ', hfx_res(ji,jj) 581 WRITE(numout,*) ' fhtur : ', fhtur(ji,jj)581 WRITE(numout,*) ' qsb_ice_bot : ', qsb_ice_bot(ji,jj) 582 582 WRITE(numout,*) ' qlead : ', qlead(ji,jj) * r1_rdtice 583 583 WRITE(numout,*)
Note: See TracChangeset
for help on using the changeset viewer.