Changeset 1804 for branches/dev_005_AWL/NEMO/OPA_SRC/SOL/solmat.F90
- Timestamp:
- 2010-02-08T11:51:02+01:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/dev_005_AWL/NEMO/OPA_SRC/SOL/solmat.F90
r1601 r1804 142 142 #endif 143 143 144 #if defined key_agrif 145 IF( .NOT.AGRIF_ROOT() ) THEN 144 IF( .NOT. Agrif_Root() ) THEN ! Fine grid boundaries 146 145 ! 147 146 IF( nbondi == -1 .OR. nbondi == 2 ) bmask(2 ,: ) = 0.e0 … … 192 191 ! 193 192 ENDIF 194 #endif195 193 196 194 ! 2. Boundary conditions
Note: See TracChangeset
for help on using the changeset viewer.