Changeset 30 for trunk/src/readcommand.f90
- Timestamp:
- Oct 21, 2014, 8:08:00 AM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/src/readcommand.f90
r27 r30 109 109 nested_output, & 110 110 linit_cond, & 111 lnetcdfout, & 111 112 surf_only 112 113 … … 138 139 nested_output=0 139 140 linit_cond=0 141 lnetcdfout=0 140 142 surf_only=0 141 143 … … 344 346 endif 345 347 348 ! check for netcdf output switch (use for non-namelist input only!) 349 if (iout.ge.8) then 350 lnetcdfout = 1 351 iout = iout - 8 352 #ifndef NETCDF_OUTPUT 353 print*,'ERROR: netcdf output not activated during compile time but used in COMMAND file!' 354 print*,'Please recompile with netcdf library or use standard output format.' 355 stop 356 #endif 357 endif 358 346 359 ! Check whether a valid option for gridded model output has been chosen 347 360 !********************************************************************** … … 349 362 if ((iout.lt.1).or.(iout.gt.5)) then 350 363 write(*,*) ' #### FLEXPART MODEL ERROR! FILE COMMAND: #### ' 351 write(*,*) ' #### IOUT MUST BE 1, 2, 3, 4, OR 5! #### ' 364 write(*,*) ' #### IOUT MUST BE 1, 2, 3, 4, OR 5 FOR #### ' 365 write(*,*) ' #### STANDARD FLEXPART OUTPUT OR 9 - 13 #### ' 366 write(*,*) ' #### FOR NETCDF OUTPUT #### ' 352 367 stop 353 368 endif … … 361 376 stop 362 377 endif 363 364 378 365 379
Note: See TracChangeset
for help on using the changeset viewer.