Go to the source code of this file.
Functions/Subroutines | |
| subroutine | front2 (NFRLIQ, LIHBOR, LIUBOR, X, Y, NBOR, KP1BOR, DEJAVU, NPOIN, NPTFR, KLOG, LISTIN, NUMLIQ, MAXFRO) |
Function/Subroutine Documentation
◆ front2()
| subroutine front2 | ( | integer, intent(out) | NFRLIQ, |
| integer, dimension(nptfr), intent(in) | LIHBOR, | ||
| integer, dimension(nptfr), intent(in) | LIUBOR, | ||
| double precision, dimension(npoin), intent(in) | X, | ||
| double precision, dimension(npoin), intent(in) | Y, | ||
| integer, dimension(nptfr), intent(in) | NBOR, | ||
| integer, dimension(nptfr), intent(in) | KP1BOR, | ||
| integer, dimension(nptfr), intent(out) | DEJAVU, | ||
| integer, intent(in) | NPOIN, | ||
| integer, intent(in) | NPTFR, | ||
| integer, intent(in) | KLOG, | ||
| logical, intent(in) | LISTIN, | ||
| integer, dimension(nptfr), intent(out) | NUMLIQ, | ||
| integer, intent(in) | MAXFRO | ||
| ) |
- Parameters
-
[in] npoin [in, out] DEJAVU Work array [out] FINLIQ End of liquid boundaries [out] FINSOL End of solid boundaries [in] KLOG Lihbor(k)=klog : solid boundary [in] KP1BOR Gives the next boundary point in a contour [in] LIHBOR Type of boundary conditions on depth [in] LISTIN If yes, printing on listing [in] LIUBOR Type of boundary conditions on u [in] MAXFRO Maximum number of liquid or solid boundaries [in] NBOR Global number of boundary points [out] NFRLIQ Number of liquid boundaries [in] NPOIN Number of points [in] NPTFR Number of boundary points [in] NUMLIQ Boundary number of boundary points [in] nptfr [in, out] DEJAVU Work array [out] FINLIQ End of liquid boundaries [out] FINSOL End of solid boundaries [in] KLOG Lihbor(k)=klog : solid boundary [in] KP1BOR Gives the next boundary point in a contour [in] LIHBOR Type of boundary conditions on depth [in] LISTIN If yes, printing on listing [in] LIUBOR Type of boundary conditions on u [in] MAXFRO Maximum number of liquid or solid boundaries [in] NBOR Global number of boundary points [out] NFRLIQ Number of liquid boundaries [in] NPOIN Number of points [in] NPTFR Number of boundary points [in] NUMLIQ Boundary number of boundary points [in] klog [in, out] DEJAVU Work array [out] FINLIQ End of liquid boundaries [out] FINSOL End of solid boundaries [in] KLOG Lihbor(k)=klog : solid boundary [in] KP1BOR Gives the next boundary point in a contour [in] LIHBOR Type of boundary conditions on depth [in] LISTIN If yes, printing on listing [in] LIUBOR Type of boundary conditions on u [in] MAXFRO Maximum number of liquid or solid boundaries [in] NBOR Global number of boundary points [out] NFRLIQ Number of liquid boundaries [in] NPOIN Number of points [in] NPTFR Number of boundary points [in] NUMLIQ Boundary number of boundary points [in] maxfro [in, out] DEJAVU Work array [out] FINLIQ End of liquid boundaries [out] FINSOL End of solid boundaries [in] KLOG Lihbor(k)=klog : solid boundary [in] KP1BOR Gives the next boundary point in a contour [in] LIHBOR Type of boundary conditions on depth [in] LISTIN If yes, printing on listing [in] LIUBOR Type of boundary conditions on u [in] MAXFRO Maximum number of liquid or solid boundaries [in] NBOR Global number of boundary points [out] NFRLIQ Number of liquid boundaries [in] NPOIN Number of points [in] NPTFR Number of boundary points [in] NUMLIQ Boundary number of boundary points
Definition at line 8 of file front2.f.
Here is the caller graph for this function: