Changeset 11878 for NEMO/branches/2019/dev_r11842_SI3-10_EAP/src
- Timestamp:
- 2019-11-08T18:25:33+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2019/dev_r11842_SI3-10_EAP/src/ICE/icedyn_rhg_eap.F90
r11877 r11878 797 797 DEALLOCATE( zsig1 , zsig2 , zsig3 ) 798 798 ENDIF 799 800 ! --- anisotropy tensor --- ! 801 IF( iom_use('aniso') ) THEN 802 CALL iom_put( 'aniso' , aniso_11 * zmsk00 ) 803 ENDIF 799 804 800 805 ! --- SIMIP --- !
Note: See TracChangeset
for help on using the changeset viewer.