walk3d Subroutine

subroutine walk3d(iseed, rp0, rpb, ck, fs, t0, t, tsp, ns, dnsk0, bv0, nsplvl)

Arguments

Type IntentOptional Attributes Name
integer, intent(inout) :: iseed
real(kind=real64), intent(in) :: rp0(5)
real(kind=real64), intent(out) :: rpb(5)
real(kind=real64), intent(inout) :: ck
real(kind=real64), intent(inout) :: fs
real(kind=real64), intent(in) :: t0
real(kind=real64), intent(out) :: t
real(kind=real64), intent(in) :: tsp
integer, intent(out) :: ns
real(kind=real64), intent(inout) :: dnsk0
real(kind=real64), intent(inout) :: bv0(3)
integer, intent(in) :: nsplvl

Common Blocks

read_param (subroutine)
cofm (subroutine)
solarwind1 (function)
f0mod (subroutine)
split (subroutine)
vfunc (subroutine)
solarwind (subroutine)
drvbmag (subroutine)
preparecme (subroutine)
inorout (subroutine)
sim3d (program)
walk3d (subroutine)
sim3d_em (program)
walk3d (subroutine)
sksurface (subroutine)
shockfront (program)
"> common /bpark/

Type Attributes Name Initial
real(kind=real64) :: b1au
real(kind=real64) :: densw0
real(kind=real64) :: facip
real(kind=real64) :: k4ok2
real(kind=real64) :: k6ok2
real(kind=real64) :: omega
real(kind=real64) :: vom
real(kind=real64) :: vsw

preparefb (subroutine)
f0mod (subroutine)
sim3d (program)
walk3d (subroutine)
sim3d_em (program)
walk3d (subroutine)
shockfront (program)
"> common /fbcnst/

Type Attributes Name Initial
real(kind=real64) :: deltat
integer :: nfbconst
real(kind=real64) :: rb0
real(kind=real64) :: rk
real(kind=real64) :: rmax
real(kind=real64) :: tc
real(kind=real64) :: tl
real(kind=real64) :: tmodel0

read_param (subroutine)
split (subroutine)
sim3d (program)
walk3d (subroutine)
sim3d_em (program)
walk3d (subroutine)
shockfront (program)
"> common /ndpdt/

Type Attributes Name Initial
integer :: ndpdt

read_param (subroutine)
split (subroutine)
walk3d (subroutine)
walk3d (subroutine)
"> common /nlambdaconst/

Type Attributes Name Initial
integer :: nlambdaconst

e2p (function)
rp2e (function)
rp2beta (function)
beta2p (function)
fs0 (function)
prepareptcl (subroutine)
vfunc (subroutine)
arriv_time (program)
sim3d (program)
walk3d (subroutine)
sim3d_em (program)
walk3d (subroutine)
shockfront (program)
"> common /specie/

Type Attributes Name Initial
real(kind=real64) :: rnm
real(kind=real64) :: rnz

preparefb (subroutine)
prepareptcl (subroutine)
f0mod (subroutine)
split (subroutine)
vfunc (subroutine)
sim3d (program)
walk3d (subroutine)
sim3d_em (program)
walk3d (subroutine)
shockfront (program)
"> common /srcmod/

Type Attributes Name Initial
real(kind=real64) :: ap
real(kind=real64) :: gp
real(kind=real64) :: h0
real(kind=real64) :: scanw
real(kind=real64) :: sp
real(kind=real64) :: sp0
real(kind=real64) :: trgtfs(4)

prepareptcl (subroutine)
split (subroutine)
preparecme (subroutine)
inorout (subroutine)
sim3d (program)
walk3d (subroutine)
sim3d_em (program)
walk3d (subroutine)
sksurface (subroutine)
shockfront (program)
"> common /tmprm/

Type Attributes Name Initial
real(kind=real64) :: dmapjul
real(kind=real64) :: t0org
real(kind=real64) :: tcme0
real(kind=real64) :: tdl
real(kind=real64) :: te