Changeset 4853 for palm/trunk/SOURCE/modules.f90

Timestamp:

Jan 25, 2021 7:56:09 AM (3 years ago)

Author:

raasch

Message:

array sizes for output profiles increased from 300 to 400

File:

• palm/trunk/SOURCE/modules.f90 (modified) (3 diffs)

palm/trunk/SOURCE/modules.f90

@@ -24 +24 @@
 ! -----------------
 ! $Id$
+! array size for profiles increased from 300 to 400
+!
+! 4845 2021-01-18 11:15:37Z raasch
 ! -use_cmax and arrays required for radiation boundary conditions
 !
@@ -758 +761 @@
 
     CHARACTER (LEN=varnamelength), DIMENSION(200) ::  data_output_pr_user = ' '  !< namelist parameter
-    CHARACTER (LEN=varnamelength), DIMENSION(300) ::  data_output_pr = ' '       !< namelist parameter
+    CHARACTER (LEN=varnamelength), DIMENSION(400) ::  data_output_pr = ' '       !< namelist parameter
     CHARACTER (LEN=varnamelength), DIMENSION(500) ::  data_output = ' '          !< namelist parameter
     CHARACTER (LEN=varnamelength), DIMENSION(500) ::  data_output_user = ' '     !< namelist parameter
@@ -1617 +1620 @@
     INTEGER(iwp) ::  profile_rows = 3     !< number of coordinate systems on a profile plot per row
 
-    INTEGER(iwp) ::  dopr_index(300) = 0                !< index number of respective profile quantity
-    INTEGER(iwp) ::  dopr_initial_index(300) = 0        !< index number of initial profiles to be output
+    INTEGER(iwp) ::  dopr_index(400) = 0                !< index number of respective profile quantity
+    INTEGER(iwp) ::  dopr_initial_index(400) = 0        !< index number of initial profiles to be output
 
     SAVE