Ignore:
Timestamp:
Nov 11, 2008 9:09:24 AM (13 years ago)
Author:
raasch
Message:

manual updated for changes in the user interface

File:
1 edited

Legend:

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

    r198 r212  
    44! Actual revisions:
    55! -----------------
     6! Bugfix in calculating k index in case of oceans runs (sort_particles)
    67! TEST: PRINT statements on unit 9 (commented out)
    78!
     
    18751876
    18761877!
    1877 !--    User-defined actions after the evaluation of the new particle position
     1878!--    User-defined actions after the calculation of the new particle position
    18781879       CALL user_advec_particles
    18791880
     
    38903891       i = ( particles(n)%x + 0.5 * dx ) * ddx
    38913892       j = ( particles(n)%y + 0.5 * dy ) * ddy
    3892        k = particles(n)%z / dz + 1 + offset_ocean_nzt_m1
     3893       k = particles(n)%z / dz + 1 + offset_ocean_nzt
    38933894           ! only exact if equidistant
    38943895
     
    39253926       i = ( particles(n)%x + 0.5 * dx ) * ddx
    39263927       j = ( particles(n)%y + 0.5 * dy ) * ddy
    3927        k = particles(n)%z / dz + 1 + offset_ocean_nzt_m1
     3928       k = particles(n)%z / dz + 1 + offset_ocean_nzt
    39283929           ! only exact if equidistant
    39293930
Note: See TracChangeset for help on using the changeset viewer.