Changeset 8273 for branches/UKMO/dev_r5518_GO6_package_inc_asm
- Timestamp:
- 2017-07-04T12:56:02+02:00 (7 years ago)
- Location:
- branches/UKMO/dev_r5518_GO6_package_inc_asm/NEMOGCM/NEMO
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_GO6_package_inc_asm/NEMOGCM/NEMO/OPA_SRC/ASM/asminc.F90
r8043 r8273 896 896 897 897 ELSE 898 898 #if defined key_asminc 899 899 ssh_iau(:,:) = 0.0 900 900 #endif 901 901 ENDIF 902 902 -
branches/UKMO/dev_r5518_GO6_package_inc_asm/NEMOGCM/NEMO/OPA_SRC/DYN/dynhpg.F90
r8190 r8273 139 139 140 140 !Deallocate tempory variables 141 DEALLOCATE( z_rhd_st (jpi,jpj,jpk),&142 & z_gru_st (jpi,jpj), &143 & z_grv_st (jpi,jpj))141 DEALLOCATE( z_rhd_st, & 142 & z_gru_st, & 143 & z_grv_st ) 144 144 ENDIF 145 145 ! -
branches/UKMO/dev_r5518_GO6_package_inc_asm/NEMOGCM/NEMO/TOP_SRC/TRP/trcadv.F90
r7203 r8273 73 73 INTEGER, INTENT(in) :: kt ! ocean time-step index 74 74 ! 75 INTEGER :: jk 75 INTEGER :: jk, jn 76 76 CHARACTER (len=22) :: charout 77 77 REAL(wp), POINTER, DIMENSION(:,:,:) :: zun, zvn, zwn ! effective velocity
Note: See TracChangeset
for help on using the changeset viewer.