Changeset 3456 for palm/trunk/UTIL/inifor/src/inifor.f90

Timestamp:

Oct 30, 2018 2:29:54 PM (5 years ago)

Author:

eckhard

Message:

inifor: Removed surface forcing and internal arrays from netCDF output

File:

• palm/trunk/UTIL/inifor/src/inifor.f90 (modified) (3 diffs)

palm/trunk/UTIL/inifor/src/inifor.f90

@@ -26 +26 @@
 ! -----------------
 ! $Id$
+! NetCDf output of internal arrays only with --debug option 
+! 
+! 
+! 3401 2018-10-23 09:33:31Z eckhard
 ! Re-compute geostrophic winds every time step
 ! 
@@ -125 +129 @@
 
     ! Add the output variables to the netCDF output file
-    CALL setup_netcdf_variables(output_file % name, output_var_table)
+    CALL setup_netcdf_variables(output_file % name, output_var_table,          &
+                                cfg % debug)
 
     CALL setup_io_groups()
@@ -424 +429 @@
                       message = "Writing variable '" // TRIM(output_var%name) // "'."
                       CALL report('main loop', message)
-                      CALL update_output(output_var, output_arr, iter, output_file)
+                      CALL update_output(output_var, output_arr, iter,         &
+                                         output_file, cfg)
  CALL run_control('time', 'write')
                    END IF