Ignore:
Timestamp:
Nov 2, 2015 2:28:56 PM (6 years ago)
Author:
maronga
Message:

bugfix in write_var_list (restart runs not possible)

File:
1 edited

Legend:

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

    r1698 r1705  
    1919! Current revisions:
    2020! -----------------
    21 !
     21! Typo removed
    2222!
    2323! Former revisions:
     
    136136    INTEGER(iwp) ::  i            !< loop index x direction
    137137    INTEGER(iwp) ::  j            !< loop index y direction
    138     INTEGER(iwp) ::  k            !< loop indey z direction
     138    INTEGER(iwp) ::  k            !< loop index z direction
    139139
    140140    INTEGER(iwp), PARAMETER     :: num_steps = 15000  !< number of steps in the lookup table
Note: See TracChangeset for help on using the changeset viewer.