Go to the source code of this file.
Functions/Subroutines | |
| subroutine | source (S0U, S0V, S0W, S1U, S1V, S1W, UN3, VN3, WSN3, WN3, VOLU, VOLUN, T3, NPOIN3, NTRAC, LT, AT, DT, PRIVE, NONHYD, NPOIN2, NSCE, ISCE, KSCE, QSCE, USCE, VSCE, MAXSCE) |
Function/Subroutine Documentation
◆ source()
| subroutine source | ( | type(bief_obj), intent(inout) | S0U, |
| type(bief_obj), intent(inout) | S0V, | ||
| type(bief_obj), intent(inout) | S0W, | ||
| type(bief_obj), intent(inout) | S1U, | ||
| type(bief_obj), intent(inout) | S1V, | ||
| type(bief_obj), intent(inout) | S1W, | ||
| type(bief_obj), intent(in) | UN3, | ||
| type(bief_obj), intent(in) | VN3, | ||
| type(bief_obj), intent(in) | WSN3, | ||
| type(bief_obj), intent(in) | WN3, | ||
| type(bief_obj), intent(in) | VOLU, | ||
| type(bief_obj), intent(in) | VOLUN, | ||
| type(bief_obj), intent(inout) | T3, | ||
| integer, intent(in) | NPOIN3, | ||
| integer, intent(in) | NTRAC, | ||
| integer, intent(in) | LT, | ||
| double precision, intent(in) | AT, | ||
| double precision, intent(in) | DT, | ||
| type(bief_obj), intent(in) | PRIVE, | ||
| logical, intent(in) | NONHYD, | ||
| integer, intent(in) | NPOIN2, | ||
| integer, intent(in) | NSCE, | ||
| integer, dimension(nsce), intent(in) | ISCE, | ||
| integer, dimension(nsce), intent(in) | KSCE, | ||
| double precision, dimension(nsce), intent(in) | QSCE, | ||
| double precision, dimension(nsce), intent(in) | USCE, | ||
| double precision, dimension(nsce), intent(in) | VSCE, | ||
| integer, intent(in) | MAXSCE | ||
| ) |
- Parameters
-
[in] npoin3 AT Time [in] DT Time step [in] ISCE Node adresses in 2d mesh for sources [in,out] KSCE Number of plane for sources [in] LT Iteration number [in] MAXSCE Maximum number of sources [in] NONHYD Logical for non-hydrostatic option [in] NPOIN2 Number of points in 2d [in] NPOIN3 Number of points in the mesh [in] NSCE Number of given points for sources [in] NTRAC Number of tracers [in] PRIVE Block of arrays for user [in] QSCE Water discharge of sources [in,out] S0U Explicit source terms on velocities u [in,out] S0V Explicit source terms on velocities v [in,out] S0W Explicit source terms on velocities w [in,out] S1U Implicit source terms on velocities u [in,out] S1V Implicit source terms on velocities v [in,out] S1W Implicit source terms on velocities w [in,out] T3 Work array: not used [in] UN3 Components of velocity at previous time step [in] USCE Velocity for source [in] VN3 Components of velocity at previous time step [in] VOLU Volume around points at time n+1 [in] VOLUN Volume around points at time n [in] VSCE Velocity for source [in] WN3 Components of velocity at previous time step [in] WSN3 Sigma-transformed vertical velocity component [in] ntrac AT Time [in] DT Time step [in] ISCE Node adresses in 2d mesh for sources [in,out] KSCE Number of plane for sources [in] LT Iteration number [in] MAXSCE Maximum number of sources [in] NONHYD Logical for non-hydrostatic option [in] NPOIN2 Number of points in 2d [in] NPOIN3 Number of points in the mesh [in] NSCE Number of given points for sources [in] NTRAC Number of tracers [in] PRIVE Block of arrays for user [in] QSCE Water discharge of sources [in,out] S0U Explicit source terms on velocities u [in,out] S0V Explicit source terms on velocities v [in,out] S0W Explicit source terms on velocities w [in,out] S1U Implicit source terms on velocities u [in,out] S1V Implicit source terms on velocities v [in,out] S1W Implicit source terms on velocities w [in,out] T3 Work array: not used [in] UN3 Components of velocity at previous time step [in] USCE Velocity for source [in] VN3 Components of velocity at previous time step [in] VOLU Volume around points at time n+1 [in] VOLUN Volume around points at time n [in] VSCE Velocity for source [in] WN3 Components of velocity at previous time step [in] WSN3 Sigma-transformed vertical velocity component [in] lt AT Time [in] DT Time step [in] ISCE Node adresses in 2d mesh for sources [in,out] KSCE Number of plane for sources [in] LT Iteration number [in] MAXSCE Maximum number of sources [in] NONHYD Logical for non-hydrostatic option [in] NPOIN2 Number of points in 2d [in] NPOIN3 Number of points in the mesh [in] NSCE Number of given points for sources [in] NTRAC Number of tracers [in] PRIVE Block of arrays for user [in] QSCE Water discharge of sources [in,out] S0U Explicit source terms on velocities u [in,out] S0V Explicit source terms on velocities v [in,out] S0W Explicit source terms on velocities w [in,out] S1U Implicit source terms on velocities u [in,out] S1V Implicit source terms on velocities v [in,out] S1W Implicit source terms on velocities w [in,out] T3 Work array: not used [in] UN3 Components of velocity at previous time step [in] USCE Velocity for source [in] VN3 Components of velocity at previous time step [in] VOLU Volume around points at time n+1 [in] VOLUN Volume around points at time n [in] VSCE Velocity for source [in] WN3 Components of velocity at previous time step [in] WSN3 Sigma-transformed vertical velocity component [in] maxsce AT Time [in] DT Time step [in] ISCE Node adresses in 2d mesh for sources [in,out] KSCE Number of plane for sources [in] LT Iteration number [in] MAXSCE Maximum number of sources [in] NONHYD Logical for non-hydrostatic option [in] NPOIN2 Number of points in 2d [in] NPOIN3 Number of points in the mesh [in] NSCE Number of given points for sources [in] NTRAC Number of tracers [in] PRIVE Block of arrays for user [in] QSCE Water discharge of sources [in,out] S0U Explicit source terms on velocities u [in,out] S0V Explicit source terms on velocities v [in,out] S0W Explicit source terms on velocities w [in,out] S1U Implicit source terms on velocities u [in,out] S1V Implicit source terms on velocities v [in,out] S1W Implicit source terms on velocities w [in,out] T3 Work array: not used [in] UN3 Components of velocity at previous time step [in] USCE Velocity for source [in] VN3 Components of velocity at previous time step [in] VOLU Volume around points at time n+1 [in] VOLUN Volume around points at time n [in] VSCE Velocity for source [in] WN3 Components of velocity at previous time step [in] WSN3 Sigma-transformed vertical velocity component
Definition at line 10 of file source.f.
Here is the call graph for this function: Here is the caller graph for this function: