- Timestamp:
- 2015-12-17T11:08:49+01:00 (8 years ago)
- Location:
- branches/2014/dev_r4621_NOC4_BDY_VERT_INTERP/NEMOGCM/NEMO/TOP_SRC
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2014/dev_r4621_NOC4_BDY_VERT_INTERP/NEMOGCM/NEMO/TOP_SRC
- Property svn:mergeinfo deleted
-
branches/2014/dev_r4621_NOC4_BDY_VERT_INTERP/NEMOGCM/NEMO/TOP_SRC/trcsub.F90
r5901 r6079 502 502 z1_rau0 = 0.5 / rau0 503 503 ssha(:,:) = ( sshb(:,:) - z2dt * ( z1_rau0 * ( emp_b(:,:) + emp(:,:) ) + zhdiv(:,:) ) ) * tmask(:,:,1) 504 #if ! defined key_dynspg_ts 504 505 505 ! These lines are not necessary with time splitting since 506 506 ! boundary condition on sea level is set during ts loop … … 512 512 CALL lbc_lnk( ssha, 'T', 1. ) 513 513 #endif 514 #endif515 516 514 517 515 ! !------------------------------!
Note: See TracChangeset
for help on using the changeset viewer.