Changeset 12171
- Timestamp:
- 2019-12-11T10:36:23+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/OCE/SBC/sbccpl.F90
r12137 r12171 868 868 ELSE IF( sn_snd_crt%clvgrd /= 'T' ) THEN 869 869 CALL ctl_stop( 'sn_snd_crt%clvgrd must be equal to T' ) 870 ssnd(jps_ocx1:jps_ivz1)%clgrid = 'T' ! all oce and ice components on the same unique grid871 870 ENDIF 872 871 ssnd(jps_ocx1:jps_ivz1)%laction = .TRUE. ! default: all are send
Note: See TracChangeset
for help on using the changeset viewer.