Go to the source code of this file.
|
subroutine | almesh (MESH, NOM, IELM, SPHERI, CFG, FFORMAT, NFIC, EQUA, REFINE, NPLAN, NPMAX, NPTFRX, NELMAX, PROJECTION, LATI0, LONGI0, CONVERGENCE, RLEVEL) |
|
◆ almesh()
subroutine almesh |
( |
type(bief_mesh), intent(inout) |
MESH, |
|
|
character(len=6), intent(in) |
NOM, |
|
|
integer, intent(in) |
IELM, |
|
|
logical, intent(in) |
SPHERI, |
|
|
integer, dimension(2), intent(inout) |
CFG, |
|
|
character(len=8), intent(in) |
FFORMAT, |
|
|
integer, intent(in) |
NFIC, |
|
|
character(len=20), intent(in) |
EQUA, |
|
|
integer, intent(in) |
REFINE, |
|
|
integer, intent(in), optional |
NPLAN, |
|
|
integer, intent(in), optional |
NPMAX, |
|
|
integer, intent(in), optional |
NPTFRX, |
|
|
integer, intent(in), optional |
NELMAX, |
|
|
integer, intent(in), optional |
PROJECTION, |
|
|
double precision, intent(in), optional |
LATI0, |
|
|
double precision, intent(in), optional |
LONGI0, |
|
|
logical, intent(in), optional |
CONVERGENCE, |
|
|
integer, intent(in), optional |
RLEVEL |
|
) |
| |
- Parameters
-
[in,out] | mesh | [in] CONVERGENCE If yes, we are in a refinement procedure |
[in] | EQUA | Name in 20 characters to enable different OPTIONS. OPTIONS ARE: "SAINT-VENANT EF" "SAINT-VENANT VF" "BOUSSINESQ" |
[in] | IELM | Element type with the larget number of degrees OF FREEDOM THAT WILL BE USED |
[in] | LATI0 | Latitude of origin point |
[in] | LONGI0 | Longitude of origin point |
[in] | MESH | Mesh structure to be allocated |
[in] | NELMAX | Maximum number of elements in the mesh |
[in] | NFIC | Logical unit where to read the mesh |
[in] | NOM | Name of the mesh |
[in] | NPLAN | Number of planes (optional,3d meshes of prisms) |
[in] | NPMAX | Maximum number of points in the mesh |
[in] | NPTFRX | Maximum number of boundary nodes |
[in,out] | PROJECTION | Spatial projection type |
[in] | REFINE | Number of refinement levels for convergence |
[in] | RLEVEL | Refinement level for convergence |
[in] | SPHERI | Logical, if yes : spherical coordinates |
Definition at line 8 of file almesh.f.