Changeset 3914
- Timestamp:
- 2013-06-12T22:17:48+02:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/NEMO/OPA_SRC/SBC/sbccpl.F90
r3680 r3914 388 388 ! 389 389 IF( TRIM( sn_rcv_tau%cldes ) /= 'oce and ice' ) THEN ! 'oce and ice' case ocean stress on ocean mesh used 390 srcv(jpr_it x1:jpr_itz2)%laction = .FALSE. ! ice components not received390 srcv(jpr_itz1:jpr_itz2)%laction = .FALSE. ! ice components not received (itx1 and ity1 used later) 391 391 srcv(jpr_itx1)%clgrid = 'U' ! ocean stress used after its transformation 392 392 srcv(jpr_ity1)%clgrid = 'V' ! i.e. it is always at U- & V-points for i- & j-comp. resp. … … 911 911 !! third as 2 components on the cp_ice_msh point 912 912 !! 913 !! In 'oce and ice' case, only one vector stress field913 !! Except in 'oce and ice' case, only one vector stress field 914 914 !! is received. It has already been processed in sbc_cpl_rcv 915 915 !! so that it is now defined as (i,j) components given at U- 916 !! and V-points, respectively. Therefore, hereonly the third916 !! and V-points, respectively. Therefore, only the third 917 917 !! transformation is done and only if the ice-grid is a 'I'-grid. 918 918 !!
Note: See TracChangeset
for help on using the changeset viewer.