Changeset 10029 for utils/tools/NESTING
- Timestamp:
- 2018-08-02T17:35:22+02:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
utils/tools/NESTING/src/agrif_readwrite.f90
r10025 r10029 557 557 jperio = 0 558 558 559 bottom_level(1:nx,1 ) = 0 560 bottom_level(1:nx, ny) = 0 561 bottom_level(1 ,1:ny) = 0 562 bottom_level( nx,1:ny) = 0 563 564 top_level(1:nx,1 ) = 0 565 top_level(1:nx, ny) = 0 566 top_level(1 ,1:ny) = 0 567 top_level( nx,1:ny) = 0 568 559 569 ! ------------------- 560 570 ! write domain_cfg.nc
Note: See TracChangeset
for help on using the changeset viewer.