Home


About us
PALM
PALM-4U
Installation
Release notes
Documentation
Getting Help
Gallery
Developers area

Changeset 3300 for palm


Ignore:
Timestamp:
Oct 2, 2018 2:16:54 PM (6 years ago)
Author:
gronemeier
Message:

bugfix: rename of variable

File:
1 edited

Legend:

Unmodified
Added
Removed

  • palm/trunk/SOURCE/turbulence_closure_mod.f90

    r3299 r3300  
    17581758          maximum = MAXVAL( array(:,a) )
    17591759          DO  b = 0, rad_k+1
    1760              IF ( array(b,a) == maxi )  THEN
     1760             IF ( array(b,a) == maximum )  THEN
    17611761                loc_k(a) = b
    17621762                EXIT
Note: See TracChangeset for help on using the changeset viewer.
                                                                                                                                                                                                                                                                                                                                                                               
  | Impressum | ©Leibniz Universität Hannover |