Changeset 4512 for palm


Ignore:
Timestamp:
Apr 30, 2020 12:55:34 PM (7 months ago)
Author:
monakurppa
Message:

bug fix in salsa_mod: segmentation fault in initialising chemical components when all possible chemical components were used

File:
1 edited

Legend:

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

    r4508 r4512  
    2626! -----------------
    2727! $Id$
     28! Fixed a bug in component_index_constructor: index out of bounds if all chemical
     29! components are used
     30!
     31! 4508 2020-04-24 13:32:20Z raasch
    2832! decycling replaced by explicit setting of lateral boundary conditions (Siggi)
    2933!
     
    1266312667    DO WHILE ( listcomp(ncomp+1) /= '  ' .AND. ncomp < nlist )
    1266412668       ncomp = ncomp + 1
     12669       IF ( ncomp > 6 )  EXIT
    1266512670    ENDDO
    1266612671
Note: See TracChangeset for help on using the changeset viewer.