34 interpolation_scheme%dis => dis
35 interpolation_scheme%fmi => fmi
39 function compute(this, n, m, iposnm, phi)
result(phi_face)
44 integer(I4B),
intent(in) :: n
45 integer(I4B),
intent(in) :: m
46 integer(I4B),
intent(in) :: iposnm
47 real(dp),
intent(in),
dimension(:) :: phi
52 qnm = this%fmi%gwfflowja(iposnm)
This module contains simulation constants.
real(dp), parameter dzero
real constant zero
This module defines variable data types.
type(coefficientstype) function compute(this, n, m, iposnm, phi)
type(upstreamschemetype) function constructor(dis, fmi)