Ignore:
Timestamp:
Jul 6, 2009 10:13:41 AM (15 years ago)
Author:
raasch
Message:

small updates

File:
1 edited

Legend:

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

    r337 r346  
    676676!
    677677!-- 1D-profiles
    678     dopr_chr = 'Pofile:'
     678    dopr_chr = 'Profile:'
    679679    IF ( dopr_n /= 0 )  THEN
    680680       WRITE ( io, 331 )
Note: See TracChangeset for help on using the changeset viewer.