Changeset 3727 for palm/trunk/SOURCE/netcdf_interface_mod.f90

Timestamp:

Feb 8, 2019 2:52:10 PM (5 years ago)

Author:

gronemeier

Message:

New: surface output available in NetCDF format (Makefile, netcdf_interface_mod, surface_data_output_mod)

File:

• palm/trunk/SOURCE/netcdf_interface_mod.f90 (modified) (4 diffs)

palm/trunk/SOURCE/netcdf_interface_mod.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! make several routines publicly available
+! 
+! 3701 2019-01-26 18:57:21Z knoop
 ! Statement added to prevent compiler warning about unused variable
 ! 
@@ -599 +602 @@
     END INTERFACE netcdf_create_file
 
+    INTERFACE netcdf_create_global_atts
+       MODULE PROCEDURE netcdf_create_global_atts
+    END INTERFACE netcdf_create_global_atts
+
     INTERFACE netcdf_create_var
        MODULE PROCEDURE netcdf_create_var
@@ -619 +626 @@
     END INTERFACE netcdf_open_write_file
 
-    PUBLIC netcdf_create_file, netcdf_define_header,                           &
+    PUBLIC netcdf_create_att, netcdf_create_dim, netcdf_create_file,           &
+           netcdf_create_global_atts, netcdf_create_var, netcdf_define_header, &
            netcdf_handle_error, netcdf_open_write_file
 
@@ -6756 +6764 @@
           CALL message( 'define_netcdf_header', 'PA0259', 0, 0, 0, 6, 0 )
 
-          
+
        CASE DEFAULT