Opened 16 years ago

Closed 16 years ago

#191 closed bug (Fixed)

Table output for SWAN coupling

Reported by: jcwarner Owned by: arango
Priority: major Milestone: Release ROMS/TOMS 3.2
Component: Nonlinear Version: 3.2
Keywords: Cc:

Description (last modified by arango)

Correction in swanout1.F to allow table output from SWAN during a coupled run.

1) Correct file Waves/SWAN/Src/swanout1.F near lines 302, replace

        IF (RTYPE(1:2) .EQ. 'SP') THEN
          IVTYPE=500
        ELSE
          IVTYPE=CORQ%IVTYP(1)
        END IF

with

        IF (RTYPE(1:3) .EQ. 'BLK') THEN
          IVTYPE=CORQ%IVTYP(1)
        ELSE
          IVTYPE=500
        END IF

2) Modify file Waves/SWAN/External/swan_inlet_test.in to add the line:

TABLE 'point1' HEADER 'point1.table' HSIGN DIR WLEN OUTPUT 20000101.000000 1 HR

This will allow a test for this output option.

Change History (1)

comment:1 by arango, 16 years ago

Description: modified (diff)
Resolution: Fixed
Status: newclosed
Note: See TracTickets for help on using tickets.