Changes between Initial Version and Version 1 of Ticket #2137, comment 2


Ignore:
Timestamp:
2019-01-17T11:12:58+01:00 (19 months ago)
Author:
nemo
Comment:

Legend:

Unmodified
Added
Removed
Modified
  • Ticket #2137, comment 2

    initial v1  
    22 
    33ice_update :   
    4  
     4{{{#!f 
    55    DO jj = 2, jpjm1                                !* update the stress WITHOUT an ice-ocean rotation angle 
    66         DO ji = fs_2, fs_jpim1   ! Vect. Opt.    
     
    1717            vtau(ji,jj) = ( 1._wp - zat_v ) * vtau_oce(ji,jj) + zat_v * zvtau_ice 
    1818         END DO 
     19}}}