tridslv.f90 File Reference

Solve a tridiagonal system of equations. More...

Go to the source code of this file.

Functions/Subroutines
subroutine	tridslv (a, d, b, c, jmin, jmax, mnd1, ns, nrhs)
	Solve a tridiagonal system of equations.

Detailed Description

Solve a tridiagonal system of equations.

Definition in file tridslv.f90.

Function/Subroutine Documentation

tridslv()

subroutine tridslv	(	real(rprec), dimension(ns,0:mnd1)	a,
		real(rprec), dimension(ns,0:mnd1)	d,
		real(rprec), dimension(ns,0:mnd1)	b,
		real(rprec), dimension(ns,0:mnd1, nrhs), intent(inout)	c,
		integer, dimension(0:mnd1), intent(in)	jmin,
		integer, intent(in)	jmax,
		integer, intent(in)	mnd1,
		integer, intent(in)	ns,
		integer, intent(in)	nrhs )

Solve a tridiagonal system of equations.

Parameters

a	sup-diagonal coefficients
d	diagonal coefficients
b	sub-diagonal coefficients
c	on entry: right-hand side; on exit: solution
jmin	minimum index in radial direction for which to solve
jmax	maximum index in radial direction for which to solve
mnd1	number of Fourier modes for which to solve this SIMULTANEOUSLY
ns	total radial size (ca. jmax-jmin)
nrhs	number of right-hand sides for which to compute the solution

Definition at line 15 of file tridslv.f90.

Referenced by scalfor().

Here is the caller graph for this function: