Changeset 1195 for palm/trunk/SOURCE/read_var_list.f90

Timestamp:

Jul 1, 2013 12:27:57 PM (11 years ago)

Author:

heinze

Message:

bugfix in allocation of ref_state

File:

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

palm/trunk/SOURCE/read_var_list.f90

@@ -20 +20 @@
 ! Current revisions:
 ! ------------------
-!
+! Bugfix: allocate ref_state
 !
 ! Former revisions:
@@ -257 +257 @@
        ALLOCATE( lad(0:nz+1), ug(0:nz+1), u_init(0:nz+1), vg(0:nz+1),    &
                  v_init(0:nz+1), pt_init(0:nz+1), q_init(0:nz+1),        &
-                 sa_init(0:nz+1),                                        &
+                 ref_state(0:nz+1), sa_init(0:nz+1),                     &
                  hom(0:nz+1,2,pr_palm+max_pr_user,0:statistic_regions),  &
                  hom_sum(0:nz+1,pr_palm+max_pr_user,0:statistic_regions) )