Opened 13 years ago

Closed 13 years ago

#496 closed bug (Fixed)

Corrections vertical coordinates stretching function, Vstretching = 4

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

Description

There are some typos in set_scoord.F for Vstretching = 4 introduced in src:ticket:494

line 447:
       Cbot=(EXP(theta_b(ng)*Csur)-1.0-r8)/                        &
should be
       Cbot=(EXP(theta_b(ng)*Csur)-1.0_r8)/                        &


line 461:
       Csur=(1.0_r8-COSH(theta_s(ng)*sc_w))/                       &
should be
       Csur=(1.0_r8-COSH(theta_s(ng)*sc_r))/                       &


line 467:
       Cbot=(EXP(theta_b(ng)*Csur)-1.0-r8)/                        &
should be
       Cbot=(EXP(theta_b(ng)*Csur)-1.0_r8)/                        &

Many thanks to Frederic Castruccio for reporting these typos.

Change History (1)

comment:1 by arango, 13 years ago

Resolution: Fixed
Status: newclosed
Note: See TracTickets for help on using tickets.