Changes between Initial Version and Version 1 of Ticket #191


Ignore:
Timestamp:
08/08/08 03:36:15 (16 years ago)
Author:
arango
Comment:

Legend:

Unmodified
Added
Removed
Modified

  • Ticket #191

    • Property Resolution → Fixed
    • Property Status new → closed

  • Ticket #191 – Description

    initial v1  
    1 Correction in swanout1.F to allow table output from SWAN during a coupled run.
    2 1) Correct file Waves/SWAN/Src/swanout1.F
    3 near lines 302, replace
     1Correction in '''swanout1.F''' to allow table output from SWAN during a coupled run.
     2
     31) Correct file '''Waves/SWAN/Src/swanout1.F''' near lines 302, replace
     4{{{
    45        IF (RTYPE(1:2) .EQ. 'SP') THEN
    56          IVTYPE=500
    … …  
    78          IVTYPE=CORQ%IVTYP(1)
    89        END IF
     10}}}
    911with
     12
     13{{{
    1014        IF (RTYPE(1:3) .EQ. 'BLK') THEN
    1115          IVTYPE=CORQ%IVTYP(1)
    … …  
    1317          IVTYPE=500
    1418        END IF
    15 
    16 2) Modify file Waves/SWAN/External/swan_inlet_test.in to add the line:
     19}}}
     202) Modify file '''Waves/SWAN/External/swan_inlet_test.in''' to add the line:
    1721
    1822TABLE   'point1' HEADER 'point1.table' HSIGN DIR WLEN OUTPUT 20000101.000000 1 HR
    1923
    2024This will allow a test for this output option.
    21 
    22 both of these files are modified in my branch.