Step Module

Ray propagation with adaptive step size control and boundary interaction handling


Uses

  • module~~step~~UsesGraph module~step Step module~bellhopmod bellhopMod module~step->module~bellhopmod module~sspmod sspmod module~step->module~sspmod module~mathconstants MathConstants module~bellhopmod->module~mathconstants iso_fortran_env iso_fortran_env module~sspmod->iso_fortran_env module~fatalerror FatalError module~sspmod->module~fatalerror module~monotonicmod monotonicMod module~sspmod->module~monotonicmod module~splinec splinec module~sspmod->module~splinec

Used by

  • module~~step~~UsedByGraph module~step Step proc~traceray2d TraceRay2D proc~traceray2d->module~step

Subroutines

public subroutine Step2D(ray0, ray2, topRefl, botRefl, Topx, Topn, Botx, Botn)

Arguments

Type IntentOptional Attributes Name
type(ray2DPt), intent(inout) :: ray0
type(ray2DPt), intent(inout) :: ray2
logical, intent(out) :: topRefl
logical, intent(out) :: botRefl
real(kind=8), intent(in) :: Topx(2)
real(kind=8), intent(in) :: Topn(2)
real(kind=8), intent(in) :: Botx(2)
real(kind=8), intent(in) :: Botn(2)

public subroutine ReduceStep2D(x0, urayt, iSegz0, iSegr0, Topx, Topn, Botx, Botn, h)

Arguments

Type IntentOptional Attributes Name
real(kind=8), intent(in) :: x0(2)
real(kind=8), intent(in) :: urayt(2)
integer, intent(in) :: iSegz0
integer, intent(in) :: iSegr0
real(kind=8), intent(in) :: Topx(2)
real(kind=8), intent(in) :: Topn(2)
real(kind=8), intent(in) :: Botx(2)
real(kind=8), intent(in) :: Botn(2)
real(kind=8), intent(inout) :: h

public subroutine StepToBdry2D(x0, x2, urayt, h, topRefl, botRefl, iSegz0, iSegr0, Topx, Topn, Botx, Botn)

Arguments

Type IntentOptional Attributes Name
real(kind=8), intent(in) :: x0(2)
real(kind=8), intent(inout) :: x2(2)
real(kind=8), intent(in) :: urayt(2)
real(kind=8), intent(inout) :: h
logical, intent(out) :: topRefl
logical, intent(out) :: botRefl
integer, intent(in) :: iSegz0
integer, intent(in) :: iSegr0
real(kind=8), intent(in) :: Topx(2)
real(kind=8), intent(in) :: Topn(2)
real(kind=8), intent(in) :: Botx(2)
real(kind=8), intent(in) :: Botn(2)