Changeset 8858
- Timestamp:
- 2017-11-30T15:50:38+01:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_r8600_xios_read_write_v2/NEMOGCM/NEMO/OPA_SRC/DOM/domain.F90
r8857 r8858 350 350 WRITE(numout,*) ' NetCDF chunksize (bytes) nn_chunksz = ', nn_chunksz 351 351 WRITE(numout,*) ' IS coupling at the restart step ln_iscpl = ', ln_iscpl 352 WRITE(numout,*) ' READ restart for a single file using XIOS ln_xios_read =', ln_xios_read 353 IF( TRIM(Agrif_CFixed()) /= '0') & 354 & WRITE(numout,*) ' READ restart for a single file using XIOS WILL not use AGRIF setting.' 355 IF( TRIM(Agrif_CFixed()) == '0' ) & 356 & WRITE(numout,*) ' Write restart using XIOS nn_wxios = ', nn_wxios 352 IF( TRIM(Agrif_CFixed()) == '0' ) THEN 353 WRITE(numout,*) ' READ restart for a single file using XIOS ln_xios_read =', ln_xios_read 354 WRITE(numout,*) ' Write restart using XIOS nn_wxios = ', nn_wxios 355 ELSE 356 WRITE(numout,*) " AGRIF: nn_wxios will be ingored. See setting for parent" 357 WRITE(numout,*) " AGRIF: ln_xios_read will be ingored. See setting for parent" 358 ENDIF 357 359 ENDIF 358 360 … … 440 442 IF (nn_wxios > 0) lwxios = .TRUE. 441 443 nxioso = nn_wxios 442 ELSE443 IF(lwp) THEN444 write(numout,*)445 write(numout,*) "AGRIF: nn_wxios will be ingored. See setting for parent"446 write(numout,*) "AGRIF: ln_xios_read will be ingored. See setting for parent"447 write(numout,*)448 ENDIF449 444 ENDIF 450 445
Note: See TracChangeset
for help on using the changeset viewer.