Opened 14 years ago

Closed 14 years ago

#385 closed bug (Fixed)

Bug in def_rst.F for perfect restart in 2D configurations

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

Description (last modified by arango)

In def_rst.F we need to move 2D only logic out of a SOLVE3D loop. This is needed for the radiation stresses.

Lines 460-464:

        su2dgrd(1)=DimIDs(18)
        su2dgrd(2)=DimIDs(12)
        sv2dgrd(1)=DimIDs(19)
        sv2dgrd(2)=DimIDs(12)

and Lines 472-477:

        su2dgrd(1)=DimIDs( 2)
        su2dgrd(2)=DimIDs( 6)
        su2dgrd(3)=DimIDs(12)
        sv2dgrd(1)=DimIDs( 3)
        sv2dgrd(2)=DimIDs( 7)
        sv2dgrd(3)=DimIDs(12)

They need to be moved down about 20 lines outside of the SOLVE3D loop.

Change History (1)

comment:1 by arango, 14 years ago

Description: modified (diff)
Resolution: Fixed
Status: newclosed
Summary: def_rst 2d optionBug in def_rst.F for perfect restart in 2D configurations
Note: See TracTickets for help on using tickets.