Changeset 9029
- Timestamp:
- 2017-12-14T10:54:39+01:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_merge_2017/NEMOGCM/NEMO/OPA_SRC/SBC/sbcwave.F90
r9023 r9029 99 99 REAL(wp) :: zbot_u, zbot_v, zkb_u, zkb_v, zke3_u, zke3_v, zda_u, zda_v 100 100 REAL(wp) :: zstokes_psi_u_bot, zstokes_psi_v_bot 101 REAL(wp) :: zdep_u, zdep_v, zkh_u, zkh_v 101 102 REAL(wp), DIMENSION(:,:) , POINTER :: zk_t, zk_u, zk_v, zu0_sd, zv0_sd ! 2D workspace 102 103 REAL(wp), DIMENSION(:,:) , POINTER :: zstokes_psi_u_top, zstokes_psi_v_top ! 2D workspace
Note: See TracChangeset
for help on using the changeset viewer.