GETWAVE (Get Wave Kinematics)
Utility Routine Interface
PARAMETER(MWCOMP=number of wave components)
DIMENSION WAMP(MWCOMP),WPERD(MWCOMP),WXLAMB(MWCOMP),
1 WPHI(MWCOMP),WOFF(3),WANG(2,MWCOMP)
...
CALL GETWAVE(MWCOMP,NWCOMP,WAMP,WPERD,WXLAMB,WPHI,WOFF,WANG,
1 ELEVB,ELEVS,JWTYPE,JRCD)
Variables Returned from the Utility Routine
- NWCOMP
Number of wave components (always 1 for Stokes wave theory).
- WAMP
Array containing the amplitude of the wave components.
- WPERD
Array containing the period of the wave components.
- WXLAMB
Array containing the wavelength of the wave components.
- WPHI
Array containing the phase angle of the wave components.
- WOFF
Used only for gridded wave data (JWTYPE=2), when WOFF gives the position of the origin of the gridded coordinate system with respect to the global system.
- WANG(2,*)
For Stokes fifth-order wave theory WANG(1,1) and WANG(2,1) are the direction cosines of wave travel. For Airy wave theory WANG(1,K1) and WANG(2,K1) are the direction cosines of the direction of travel of the K1th wave. For gridded wave data WANG(1,1) and WANG(2,1) are the direction cosines of the wave data grid. In all cases these direction cosines are with respect to the global coordinate system.
- ELEVB
User-defined elevation of the seabed.
- ELEVS
User-defined elevation of the still water surface.
- JWTYPE
Integer flag indicating the wave type, as follows:
JWTYPE=0 Airy wave theory JWTYPE=1 Stokes fifth-order wave theory JWTYPE=2 Wave data obtained from gridded values - JRCD
The error flag JRCD is returned from GETWAVE as 0 if all the wave kinematic data are read correctly and as −1 if an error occurred (for instance, NWCOMP is greater that MWCOMP).