Go to the source code of this file.
Functions/Subroutines | |
| subroutine | propa (F, B, ELT, ETA, FRE, NPOIN3, NPOIN2, NDIRE, NF, COURAN, TRA01) |
Function/Subroutine Documentation
◆ propa()
| subroutine propa | ( | double precision, dimension(npoin2,ndire,nf), intent(inout) | F, |
| double precision, dimension(npoin2,nf), intent(in) | B, | ||
| integer, dimension(npoin3,nf), intent(inout) | ELT, | ||
| integer, dimension(npoin3,nf), intent(inout) | ETA, | ||
| integer, dimension(*), intent(inout) | FRE, | ||
| integer, intent(in) | NPOIN3, | ||
| integer, intent(in) | NPOIN2, | ||
| integer, intent(in) | NDIRE, | ||
| integer, intent(in) | NF, | ||
| logical, intent(in) | COURAN, | ||
| double precision, dimension(npoin3,nf), intent(inout) | TRA01 | ||
| ) |
- Parameters
-
[in] npoin3 B Jacobian to transform n(kx,ky) into f(fr,teta) [in] COURAN Logical indicating if there is a current [in] ELT Numbers of the elements 2d of the POINTS TO BE ADVECTED [in] ETA Numbers of the layers of the POINTS TO BE ADVECTED [in,out] F Wave action density or variance density DIRECTIONAL SPECTRUM [in] FRE Number of the frequencies of the POINTS TO BE ADVECTED [in] IKLE_EXT Transition between local and global numbering OF THE 2D MESH (IN AN EXTENDED FORM) [in] NF Number of frequencies [in] NDIRE Number of directions [in] NPOIN2 Number of points in 2d mesh [in] NPOIN3 Npoin2*ndire [in] SHF Barycentric coordinates along f of the NODES IN THEIR ASSOCIATED FREQUENCIES "FRE" [in] SHP Barycentric coordinates of the nodes in THEIR ASSOCIATED 2D ELEMENT "ELT" [in] SHZ Barycentric coordinates along teta of the NODES IN THEIR ASSOCIATED LAYER "ETA" [in,out] TRA01 Work table [in] npoin2 B Jacobian to transform n(kx,ky) into f(fr,teta) [in] COURAN Logical indicating if there is a current [in] ELT Numbers of the elements 2d of the POINTS TO BE ADVECTED [in] ETA Numbers of the layers of the POINTS TO BE ADVECTED [in,out] F Wave action density or variance density DIRECTIONAL SPECTRUM [in] FRE Number of the frequencies of the POINTS TO BE ADVECTED [in] IKLE_EXT Transition between local and global numbering OF THE 2D MESH (IN AN EXTENDED FORM) [in] NF Number of frequencies [in] NDIRE Number of directions [in] NPOIN2 Number of points in 2d mesh [in] NPOIN3 Npoin2*ndire [in] SHF Barycentric coordinates along f of the NODES IN THEIR ASSOCIATED FREQUENCIES "FRE" [in] SHP Barycentric coordinates of the nodes in THEIR ASSOCIATED 2D ELEMENT "ELT" [in] SHZ Barycentric coordinates along teta of the NODES IN THEIR ASSOCIATED LAYER "ETA" [in,out] TRA01 Work table [in] ndire B Jacobian to transform n(kx,ky) into f(fr,teta) [in] COURAN Logical indicating if there is a current [in] ELT Numbers of the elements 2d of the POINTS TO BE ADVECTED [in] ETA Numbers of the layers of the POINTS TO BE ADVECTED [in,out] F Wave action density or variance density DIRECTIONAL SPECTRUM [in] FRE Number of the frequencies of the POINTS TO BE ADVECTED [in] IKLE_EXT Transition between local and global numbering OF THE 2D MESH (IN AN EXTENDED FORM) [in] NF Number of frequencies [in] NDIRE Number of directions [in] NPOIN2 Number of points in 2d mesh [in] NPOIN3 Npoin2*ndire [in] SHF Barycentric coordinates along f of the NODES IN THEIR ASSOCIATED FREQUENCIES "FRE" [in] SHP Barycentric coordinates of the nodes in THEIR ASSOCIATED 2D ELEMENT "ELT" [in] SHZ Barycentric coordinates along teta of the NODES IN THEIR ASSOCIATED LAYER "ETA" [in,out] TRA01 Work table [in] nf B Jacobian to transform n(kx,ky) into f(fr,teta) [in] COURAN Logical indicating if there is a current [in] ELT Numbers of the elements 2d of the POINTS TO BE ADVECTED [in] ETA Numbers of the layers of the POINTS TO BE ADVECTED [in,out] F Wave action density or variance density DIRECTIONAL SPECTRUM [in] FRE Number of the frequencies of the POINTS TO BE ADVECTED [in] IKLE_EXT Transition between local and global numbering OF THE 2D MESH (IN AN EXTENDED FORM) [in] NF Number of frequencies [in] NDIRE Number of directions [in] NPOIN2 Number of points in 2d mesh [in] NPOIN3 Npoin2*ndire [in] SHF Barycentric coordinates along f of the NODES IN THEIR ASSOCIATED FREQUENCIES "FRE" [in] SHP Barycentric coordinates of the nodes in THEIR ASSOCIATED 2D ELEMENT "ELT" [in] SHZ Barycentric coordinates along teta of the NODES IN THEIR ASSOCIATED LAYER "ETA" [in,out] TRA01 Work table
Definition at line 8 of file propa.f.
Here is the call graph for this function: Here is the caller graph for this function: