Changeset 4131 for palm/trunk/SOURCE/init_3d_model.f90
- Timestamp:
- Aug 2, 2019 11:06:18 AM (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/init_3d_model.f90
r4130 r4131 25 25 ! ----------------- 26 26 ! $Id$ 27 ! Allocate sums and sums_l to allow profile output for salsa variables. 28 ! 29 ! 4130 2019-08-01 13:04:13Z suehring 27 30 ! Effectively reduce 3D initialization to 1D initial profiles. This is because 28 31 ! 3D initialization produces structures in the w-component that are correlated … … 765 768 ngp_2dh_s_inner_l(nzb:nzt+1,0:statistic_regions), & 766 769 rmask(nysg:nyng,nxlg:nxrg,0:statistic_regions), & 767 sums(nzb:nzt+1,pr_palm+max_pr_user+max_pr_cs ),&768 sums_l(nzb:nzt+1,pr_palm+max_pr_user+max_pr_cs ,0:threads_per_task-1),&770 sums(nzb:nzt+1,pr_palm+max_pr_user+max_pr_cs+max_pr_salsa), & 771 sums_l(nzb:nzt+1,pr_palm+max_pr_user+max_pr_cs+max_pr_salsa,0:threads_per_task-1), & 769 772 sums_l_l(nzb:nzt+1,0:statistic_regions,0:threads_per_task-1), & 770 773 sums_wsts_bc_l(nzb:nzt+1,0:statistic_regions) )
Note: See TracChangeset
for help on using the changeset viewer.