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) 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
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).