Changeset 493 for palm/trunk/SOURCE/check_parameters.f90

Timestamp:

Mar 1, 2010 8:30:24 AM (14 years ago)

Author:

raasch

Message:

New:
---
Output in NetCDF4-format. New d3par-parameter netcdf_data_format.

(check_open, check_parameters, close_file, data_output_2d, data_output_3d, header, modules, netcdf, parin)

Modules to be loaded for compilation (mbuild) or job execution (mrun)
can be given in the configuration file using variable modules. Example:

%modules ifort/11.0.069:netcdf lcsgih parallel

This method replaces the (undocumented) mpilib-variable.

WARNING: All fixed settings of modules in the scripts mbuild, mrun, and subjob
have been removed! Please set the modules variable appropriately in your
configuration file. (mbuild, mrun, subjob)

Changed:

---

Parameters netcdf_64bit and netcdf_64bit_3d have been removed. Use
netcdf_data_format = 2 for choosing the classic 64bit-offset format (this is
the default). The offset-format can not be set independently for the
3d-output-data any more.

Parameters netcdf_format_mask, netcdf_format_mask_av, and variables
nc_format_mask, format_parallel_io removed. They are replaced by the new
parameter netcdf_data_format. (check_open, close_file,
data_output_mask, header, init_masks, modules, parin)

Errors:

---

bugfix in trunk/UTIL/Makefile: forgot to compile for interpret_config

Bugfix: timeseries data have to be collected by PE0 (user_statistics)

File:

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

palm/trunk/SOURCE/check_parameters.f90

@@ -4 +4 @@
 ! Current revisions:
 ! -----------------
-! 
+! netcdf_data_format is checked
 !
 ! Former revisions:
@@ -2692 +2692 @@
 
 !
+!-- Check the NetCDF data format
+    IF ( netcdf_data_format > 2 )  THEN
+#if defined( __netcdf4 )
+       CONTINUE
+#else
+       message_string = 'NetCDF: NetCDF4 format requested but no ' // &
+                        'cpp-directive __netcdf4 given & switch '  // &
+                        'back to 64-bit offset format'
+       CALL message( 'check_parameters', 'PA0171', 0, 1, 0, 6, 0 )
+       netcdf_data_format = 2
+#endif
+    ENDIF
+
+!
 !-- Check netcdf precison
     ldum = .FALSE.