Changeset 924

Timestamp:

Jun 6, 2012 7:44:41 AM (12 years ago)

Author:

maronga

Message:

bugfix in check_parameters.f90

File:

• palm/trunk/SOURCE/check_parameters.f90 (modified) (2 diffs)

palm/trunk/SOURCE/check_parameters.f90

@@ -4 +4 @@
 ! Current revisions:
 ! -----------------
-!
+! Bugfix: preprocessor directives caused error during compilation
 !
 ! Former revisions:
@@ -2981 +2981 @@
 !
 !-- Check the NetCDF data format
+#if ! defined ( __check )
     IF ( netcdf_data_format > 2 )  THEN
-#if defined( __netcdf4 ) && ! defined ( __check )
+#if defined( __netcdf4 )
        CONTINUE
 #else
-#if ! defined ( __check )
        message_string = 'NetCDF: NetCDF4 format requested but no ' // &
                         'cpp-directive __netcdf4 given & switch '  // &