Go to the source code of this file.
|
subroutine | caltetap (TETA, XSGBOR, YSGBOR, ADIR, NPTFR) |
|
◆ caltetap()
subroutine caltetap |
( |
double precision, dimension(nptfr) |
TETA, |
|
|
double precision, dimension(nptfr,4), intent(in) |
XSGBOR, |
|
|
double precision, dimension(nptfr,4), intent(in) |
YSGBOR, |
|
|
double precision, dimension(nptfr) |
ADIR, |
|
|
integer |
NPTFR |
|
) |
| |
- Parameters
-
[in] | nptfr | XSGBOR X component of the normal to the boundary segment |
[in] | YSGBOR | Y component of the normal to the boundary segment |
[in] | ADIR | Incidence angle of waves |
[in] | NPTFR | Number of boundary points |
Definition at line 6 of file caltetap.f.