Ignore:
Timestamp:
Sep 14, 2018 9:42:06 AM (3 years ago)
Author:
sward
Message:

Minor format changes

File:
1 edited

Legend:

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

    r3246 r3248  
    2525! -----------------
    2626! $Id$
     27! Minor formating changes
     28!
     29! 3246 2018-09-13 15:14:50Z sward
    2730! Added error handling for input namelist via parin_fail_message
    2831!
     
    985988
    986989 10 BACKSPACE( 11 )
    987     READ( 11 ,fmt='(A)') line
    988     CALL parin_fail_message ( 'stg_par', line )
     990    READ( 11 , '(A)') line
     991    CALL parin_fail_message( 'stg_par', line )
    989992
    990993 20 CONTINUE
Note: See TracChangeset for help on using the changeset viewer.