- Timestamp:
- 2013-11-04T13:54:28+01:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2013/dev_LOCEAN_2013/NEMOGCM/NEMO/OPA_SRC/SBC/sbccpl.F90
r4147 r4148 373 373 ! 374 374 IF( TRIM( sn_rcv_tau%cldes ) /= 'oce and ice' ) THEN ! 'oce and ice' case ocean stress on ocean mesh used 375 srcv(jpr_it x1:jpr_itz2)%laction = .FALSE. ! ice components not received375 srcv(jpr_itz1:jpr_itz2)%laction = .FALSE. ! ice components not received (itx1 and ity1 used later) 376 376 srcv(jpr_itx1)%clgrid = 'U' ! ocean stress used after its transformation 377 377 srcv(jpr_ity1)%clgrid = 'V' ! i.e. it is always at U- & V-points for i- & j-comp. resp. … … 896 896 !! third as 2 components on the cp_ice_msh point 897 897 !! 898 !! In 'oce and ice' case, only one vector stress field898 !! Except in 'oce and ice' case, only one vector stress field 899 899 !! is received. It has already been processed in sbc_cpl_rcv 900 900 !! so that it is now defined as (i,j) components given at U- 901 !! and V-points, respectively. Therefore, hereonly the third901 !! and V-points, respectively. Therefore, only the third 902 902 !! transformation is done and only if the ice-grid is a 'I'-grid. 903 903 !!
Note: See TracChangeset
for help on using the changeset viewer.