Changeset 120 for palm/trunk/SOURCE


Ignore:
Timestamp:
Oct 17, 2007 11:54:43 AM (17 years ago)
Author:
raasch
Message:

small change in check_open

Location:
palm/trunk/SOURCE
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/CURRENT_MODIFICATIONS

    r119 r120  
    1717-------
    1818
     19Status of 3D-volume NetCDF data file only depends on switch netcdf_64bit_3d (check_open)
     20
     21check_open
     22
    1923
    2024Errors:
  • palm/trunk/SOURCE/check_open.f90

    r110 r120  
    44! Actual revisions:
    55! -----------------
    6 !
     6! Status of 3D-volume NetCDF data file only depends on switch netcdf_64bit_3d
    77!
    88! Former revisions:
     
    993993!
    994994!--          Create a new NetCDF output file
    995              IF ( netcdf_64bit .AND. netcdf_64bit_3d )  THEN
     995             IF ( netcdf_64bit_3d )  THEN
    996996#if defined( __netcdf_64bit )
    997997                nc_stat = NF90_CREATE( filename,                               &
Note: See TracChangeset for help on using the changeset viewer.