I have some problem about the tidal model:
1) in set_tides.F :
Code: Select all
Etide(:,:)=0.0_r8
cff=2.0_r8*pi*(time(ng)-tide_start*day2sec)
DO itide=1,NTC
IF (Tperiod(itide).gt.0.0_r8) THEN
omega=cff/Tperiod(itide)
DO j=JstrR,JendR
DO i=IstrR,IendR
Etide(i,j)=Etide(i,j)+ &
& ramp*SSH_Tamp(i,j,itide)* &
& COS(omega-SSH_Tphase(i,j,itide))
# ifdef MASKING
Etide(i,j)=Etide(i,j)*rmask(i,j)
# endif
END DO
END DO
END IF
END DO
Etide(i,j)=Etide(i,j)+ f(itide)*ramp*SSH_Tamp(i,j,itide)* COS(omega+u(itide)-SSH_Tphase(i,j,itide))
And the Etide(:,:)=0.0_r8, need to modify to Mean tide level?
2)
How about OSU Tidal Data in southeast China coastal waters ?
This is my cpp about tide and boundary:
Code: Select all
/* boundary conditions*/
#define NORTHERN_WALL
#undef EW_PERIODIC
#undef ANA_M2OBC
#undef ANA_FSOBC
#define SOUTH_M3RADIATION
#define SOUTH_TGRADIENT
#define EAST_M3RADIATION
#define EAST_TGRADIENT
#define WEST_M3RADIATION
#define WEST_TGRADIENT
/* define UV_TIDES to specify boundary tidal currents from data e.g. ADCIRC */
/* define UV_TIDES to compute tidal currents using reduced physics */
#define SSH_TIDES /* read tidal SSH from file */
#define SOUTH_FSCHAPMAN
#define EAST_FSCHAPMAN
#define WEST_FSCHAPMAN
#define UV_TIDES /* read tidal U and V from file */
#define RAMP_TIDES /* ramping (over one day) tidal forcing */
#define SOUTH_M2FLATHER
#define WEST_M2FLATHER
#define EAST_M2FLATHER
Why such a big gap between simulation and observation?
My tidal data come from OTPS. It has 10 tide: M2,S2,N2,K2,O1,K1,P1,Q1,M4,MS4. The boundary data from the 10 tides.
Thank you !