- Timestamp:
- 2021-06-14T15:30:07+02:00 (3 years ago)
- Location:
- NEMO/branches/2021/ticket2669_isf_fluxes/src/OCE/ISF
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2021/ticket2669_isf_fluxes/src/OCE/ISF/isfcav.F90
r14907 r14989 59 59 !! - compute heat and fwf fluxes 60 60 !! - output 61 !! 62 !! ** Convention : all fluxes are from oce to isf ( > 0 out of the ocean ) 63 !! 61 64 !!--------------------------------------------------------------------- 62 65 !!-------------------------- OUT -------------------------------------- … … 132 135 zqlat(:,:) = - pqfwf(:,:) * rLfusisf ! 2d latent heat flux (W/m2) 133 136 ! 134 ! total heat flux ( > 0 out )137 ! total heat flux ( > 0 out ) 135 138 zqh(:,:) = ( zqhc (:,:) + zqoce(:,:) ) 136 139 ! -
NEMO/branches/2021/ticket2669_isf_fluxes/src/OCE/ISF/isfpar.F90
r14924 r14989 56 56 !! (ie average T/S over a specific depth (can be across multiple levels)) 57 57 !! the name tbl was kept. 58 !! 59 !! ** Convention : all fluxes are from oce to isf ( > 0 out of the ocean ) 58 60 !! 59 61 !!---------------------------------------------------------------------
Note: See TracChangeset
for help on using the changeset viewer.