Go to the source code of this file.
|
subroutine | iniphy (XK, CG, B, NPOIN2, NF) |
|
◆ iniphy()
subroutine iniphy |
( |
double precision, dimension(npoin2,nf), intent(inout) |
XK, |
|
|
double precision, dimension(npoin2,nf), intent(inout) |
CG, |
|
|
double precision, dimension(npoin2,nf), intent(inout) |
B, |
|
|
integer, intent(in) |
NPOIN2, |
|
|
integer, intent(in) |
NF |
|
) |
| |
- Parameters
-
[in] | nf | [out] B Jacobian to transform n(kx,ky) into f(fr,teta) |
[out] | CG | Discretized group velocity |
[in] | COSPHI | Cosine of the latitudes of the points 2d |
[in] | DEPTH | Water depth |
[in] | FREQ | Discretized frequencies |
[in] | NF | Number of frequencies |
[in] | NPOIN2 | Number of points in 2d mesh |
[in] | PROINF | Logical indicating infinite depth assumption |
[in] | SPHE | Logical indicating spherical coord assumption |
[out] | XK | Discretized wave number |
[in] | npoin2 | [out] B Jacobian to transform n(kx,ky) into f(fr,teta) |
[out] | CG | Discretized group velocity |
[in] | COSPHI | Cosine of the latitudes of the points 2d |
[in] | DEPTH | Water depth |
[in] | FREQ | Discretized frequencies |
[in] | NF | Number of frequencies |
[in] | NPOIN2 | Number of points in 2d mesh |
[in] | PROINF | Logical indicating infinite depth assumption |
[in] | SPHE | Logical indicating spherical coord assumption |
[out] | XK | Discretized wave number |
Definition at line 7 of file iniphy.f.