Ignore:
Timestamp:
Dec 28, 2007 9:44:53 AM (14 years ago)
Author:
raasch
Message:

first preliminary update for turbulent inflow

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/parin.f90

    r139 r143  
    44! Actual revisions:
    55! -----------------
    6 !
     6! Allocation of hom_sum moved from init_3d_model to here
    77!
    88! Former revisions:
     
    243243
    244244       ALLOCATE( ug(0:nz+1), vg(0:nz+1), &
    245                  pt_init(0:nz+1), q_init(0:nz+1), sa_init(0:nz+1), &
    246                  u_init(0:nz+1), v_init(0:nz+1),                   &
    247                  hom(0:nz+1,2,pr_palm+max_pr_user,0:statistic_regions) )
     245                 pt_init(0:nz+1), q_init(0:nz+1), sa_init(0:nz+1),          &
     246                 u_init(0:nz+1), v_init(0:nz+1),                            &
     247                 hom(0:nz+1,2,pr_palm+max_pr_user,0:statistic_regions),     &
     248                 hom_sum(nzb:nzt+1,pr_palm+max_pr_user,0:statistic_regions) )
    248249       hom = 0.0
    249250
Note: See TracChangeset for help on using the changeset viewer.