subroutine tridin | ( | integer | l, |
integer | n, | ||
integer | nt, | ||
real(kind=kind_phys), dimension(l,2:n) | cl, | ||
real(kind=kind_phys), dimension(l,n) | cm, | ||
real(kind=kind_phys), dimension(l,n-1) | cu, | ||
real(kind=kind_phys), dimension(l,n) | r1, | ||
real(kind=kind_phys), dimension(l,n*nt) | r2, | ||
real(kind=kind_phys), dimension(l,n-1) | au, | ||
real(kind=kind_phys), dimension(l,n) | a1, | ||
real(kind=kind_phys), dimension(l,n*nt) | a2 | ||
) |
Referenced by hedmf::hedmf_run(), and satmedmfvdifq::satmedmfvdifq_run().