Changeset 2532 for palm/trunk/SOURCE


Ignore:
Timestamp:
Oct 11, 2017 4:00:46 PM (6 years ago)
Author:
scharf
Message:

bugfixes in lsm_data_output_3d

File:
1 edited

Legend:

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

    r2516 r2532  
    2525! -----------------
    2626! $Id$
     27! bugfixes in data_output_3d
     28!
     29! 2516 2017-10-04 11:03:04Z suehring
    2730! Remove tabs
    2831!
     
    42054208            ENDDO
    42064209         ELSE
    4207             DO  i = nxlg, nxrg
    4208                DO  j = nysg, nyng
     4210            DO  i = nxl, nxr
     4211               DO  j = nys, nyn
    42094212                  DO  k = nzb_soil, nzt_soil
    42104213                     local_pf(i,j,k) = m_soil_av(k,j,i)
     
    42254228            ENDDO
    42264229         ELSE
    4227             DO  i = nxlg, nxrg
    4228                DO  j = nysg, nyng
     4230            DO  i = nxl, nxr
     4231               DO  j = nys, nyn
    42294232                  DO  k = nzb_soil, nzt_soil
    42304233                     local_pf(i,j,k) = t_soil_av(k,j,i)
Note: See TracChangeset for help on using the changeset viewer.