suquad Subroutine

public recursive subroutine suquad(kn, prange, kquad, prw, prt, pr)

Arguments

Type IntentOptional Attributes Name
integer(kind=jpim), intent(in) :: kn
real(kind=JPRBT), intent(in) :: prange
integer(kind=jpim), intent(in) :: kquad
real(kind=JPRBT), intent(out) :: prw(:)
real(kind=JPRBT), intent(out) :: prt(:)
real(kind=JPRBT), intent(out) :: pr

Calls

proc~~suquad~~CallsGraph proc~suquad suquad proc~wts500 WTS500 proc~suquad->proc~wts500 abor1 abor1 proc~wts500->abor1

Called by

proc~~suquad~~CalledByGraph proc~suquad suquad proc~setup_seefmm setup_seefmm proc~setup_seefmm->proc~suquad proc~suleg SULEG proc~suleg->proc~setup_seefmm proc~suleg~2 SULEG proc~suleg~2->proc~setup_seefmm proc~setup_trans SETUP_TRANS proc~setup_trans->proc~suleg proc~setup_trans~2 SETUP_TRANS proc~setup_trans~2->proc~suleg