- Timestamp:
- 2020-07-01T15:42:06+02:00 (4 years ago)
- Location:
- NEMO/branches/2020/dev_r12377_KERNEL-06_techene_e3
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2020/dev_r12377_KERNEL-06_techene_e3
- Property svn:externals
-
old new 8 8 9 9 # SETTE 10 ^/utils/CI/sette@ HEADsette10 ^/utils/CI/sette@12931 sette
-
- Property svn:externals
-
NEMO/branches/2020/dev_r12377_KERNEL-06_techene_e3/src/OCE/DIA/diawri.F90
r12911 r13193 191 191 CALL iom_put( "sbs", z2d ) ! bottom salinity 192 192 ENDIF 193 194 CALL iom_put( "rhop", rhop(:,:,:) ) ! 3D potential density (sigma0) 193 195 194 196 IF ( iom_use("taubot") ) THEN ! bottom stress … … 1033 1035 CALL iom_close( inum ) 1034 1036 ENDIF 1037 ! 1035 1038 #endif 1036 1037 1039 END SUBROUTINE dia_wri_state 1038 1040
Note: See TracChangeset
for help on using the changeset viewer.