Changes between Initial Version and Version 1 of Ticket #2137, comment 2
- Timestamp:
- 2019-01-17T11:12:58+01:00 (5 years ago)
Legend:
- Unmodified
- Added
- Removed
- Modified
-
Ticket #2137, comment 2
initial v1 2 2 3 3 ice_update : 4 4 {{{#!f 5 5 DO jj = 2, jpjm1 !* update the stress WITHOUT an ice-ocean rotation angle 6 6 DO ji = fs_2, fs_jpim1 ! Vect. Opt. … … 17 17 vtau(ji,jj) = ( 1._wp - zat_v ) * vtau_oce(ji,jj) + zat_v * zvtau_ice 18 18 END DO 19 }}}