- Timestamp:
- 2018-07-13T09:28:50+02:00 (6 years ago)
- Location:
- NEMO/branches/2018/dev_r9838_ENHANCE04_RK3
- Files:
-
- 1 edited
- 1 copied
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2018/dev_r9838_ENHANCE04_RK3/src/OCE/LDF/ldftra.F90
r9737 r9939 852 852 ! 853 853 ! 854 zztmp = 0.5_wp * r au0 * rcp854 zztmp = 0.5_wp * rho0_rcp 855 855 IF( iom_use('ueiv_heattr') .OR. iom_use('ueiv_heattr3d') ) THEN 856 856 zw2d(:,:) = 0._wp
Note: See TracChangeset
for help on using the changeset viewer.