speclib.f File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	zwgl (Z, W, NP)
subroutine	zwgll (Z, W, NP)
subroutine	zwgj (Z, W, NP, ALPHA, BETA)
subroutine	zwgjd (Z, W, NP, ALPHA, BETA)
subroutine	zwglj (Z, W, NP, ALPHA, BETA)
subroutine	zwgljd (Z, W, NP, ALPHA, BETA)
real *8 function	endw1 (N, ALPHA, BETA)
real *8 function	endw2 (N, ALPHA, BETA)
real *8 function	gammaf (X)
real *8 function	pnormj (N, ALPHA, BETA)
subroutine	jacg (XJAC, NP, ALPHA, BETA)
subroutine	jacobf (POLY, PDER, POLYM1, PDERM1, POLYM2, PDERM2, N, ALP, BET, X)
real function	hgj (II, Z, ZGJ, NP, ALPHA, BETA)
real *8 function	hgjd (II, Z, ZGJ, NP, ALPHA, BETA)
real function	hglj (II, Z, ZGLJ, NP, ALPHA, BETA)
real *8 function	hgljd (I, Z, ZGLJ, NP, ALPHA, BETA)
subroutine	dgj (D, DT, Z, NZ, lzd, ALPHA, BETA)
subroutine	dgjd (D, DT, Z, NZ, lzd, ALPHA, BETA)
subroutine	dglj (D, DT, Z, NZ, lzd, ALPHA, BETA)
subroutine	dgljd (D, DT, Z, NZ, lzd, ALPHA, BETA)
subroutine	dgll (D, DT, Z, NZ, lzd)
real function	hgll (I, Z, ZGLL, NZ)
real function	hgl (I, Z, ZGL, NZ)
real function	pnleg (Z, N)
real function	pndleg (Z, N)
subroutine	dgllgl (D, DT, ZM1, ZM2, IM12, NZM1, NZM2, ND1, ND2)
subroutine	dgljgj (D, DT, ZGL, ZG, IGLG, NPGL, NPG, ND1, ND2, ALPHA, BETA)
subroutine	dgljgjd (D, DT, ZGL, ZG, IGLG, NPGL, NPG, ND1, ND2, ALPHA, BETA)
subroutine	iglm (I12, IT12, Z1, Z2, lz1, lz2, ND1, ND2)
subroutine	igllm (I12, IT12, Z1, Z2, lz1, lz2, ND1, ND2)
subroutine	igjm (I12, IT12, Z1, Z2, lz1, lz2, ND1, ND2, ALPHA, BETA)
subroutine	igljm (I12, IT12, Z1, Z2, lz1, lz2, ND1, ND2, ALPHA, BETA)

Function/Subroutine Documentation

dgj()

subroutine dgj	(	real, dimension(lzd,lzd)	D,
		real, dimension(lzd,lzd)	DT,
		real, dimension(1)	Z,
			NZ,
			lzd,
		real	ALPHA,
		real	BETA
	)

Definition at line 630 of file speclib.f.

References dgjd(), and exitt().

Here is the call graph for this function:

dgjd()

subroutine dgjd	(	real*8, dimension(lzd,lzd)	D,
		real*8, dimension(lzd,lzd)	DT,
		real*8, dimension(1)	Z,
			NZ,
			lzd,
		real*8	ALPHA,
		real*8	BETA
	)

Definition at line 673 of file speclib.f.

References exitt(), and jacobf().

Here is the call graph for this function:

Here is the caller graph for this function:

dglj()

subroutine dglj	(	real, dimension(lzd,lzd)	D,
		real, dimension(lzd,lzd)	DT,
		real, dimension(1)	Z,
			NZ,
			lzd,
		real	ALPHA,
		real	BETA
	)

Definition at line 711 of file speclib.f.

References dgljd(), and exitt().

Here is the call graph for this function:

Here is the caller graph for this function:

dgljd()

subroutine dgljd	(	real*8, dimension(lzd,lzd)	D,
		real*8, dimension(lzd,lzd)	DT,
		real*8, dimension(1)	Z,
			NZ,
			lzd,
		real*8	ALPHA,
		real*8	BETA
	)

Definition at line 754 of file speclib.f.

References exitt(), and jacobf().

Here is the call graph for this function:

Here is the caller graph for this function:

dgljgj()

subroutine dgljgj	(	real, dimension(nd2,nd1)	D,
		real, dimension(nd1,nd2)	DT,
		real, dimension(nd1)	ZGL,
		real, dimension(nd2)	ZG,
		real, dimension(nd2,nd1)	IGLG,
			NPGL,
			NPG,
			ND1,
			ND2,
			ALPHA,
			BETA
	)

Definition at line 969 of file speclib.f.

References dgljgjd(), and exitt().

Here is the call graph for this function:

Here is the caller graph for this function:

dgljgjd()

subroutine dgljgjd	(	real*8, dimension(nd2,nd1)	D,
		real*8, dimension(nd1,nd2)	DT,
		real*8, dimension(nd1)	ZGL,
		real*8, dimension(nd2)	ZG,
		real*8, dimension(nd2,nd1)	IGLG,
			NPGL,
			NPG,
			ND1,
			ND2,
		real*8	ALPHA,
		real*8	BETA
	)

Definition at line 1023 of file speclib.f.

References exitt(), and jacobf().

Here is the call graph for this function:

Here is the caller graph for this function:

dgll()

subroutine dgll	(	real, dimension(lzd,lzd)	D,
		real, dimension(lzd,lzd)	DT,
		real, dimension(1)	Z,
			NZ,
			lzd
	)

Definition at line 800 of file speclib.f.

References pnleg().

Here is the call graph for this function:

Here is the caller graph for this function:

dgllgl()

subroutine dgllgl	(	real, dimension(nd2,nd1)	D,
		real, dimension(nd1,nd2)	DT,
		real, dimension(nd1)	ZM1,
		real, dimension(nd2)	ZM2,
		real, dimension(nd2,nd1)	IM12,
			NZM1,
			NZM2,
			ND1,
			ND2
	)

Definition at line 934 of file speclib.f.

References pnleg().

Here is the call graph for this function:

Here is the caller graph for this function:

endw1()

real*8 function endw1	(		N,
		real*8	ALPHA,
		real*8	BETA
	)

Definition at line 283 of file speclib.f.

References gammaf().

Here is the call graph for this function:

Here is the caller graph for this function:

endw2()

real*8 function endw2	(		N,
		real*8	ALPHA,
		real*8	BETA
	)

Definition at line 327 of file speclib.f.

References gammaf().

Here is the call graph for this function:

Here is the caller graph for this function:

gammaf()

real*8 function gammaf

(

real*8

X

)

Definition at line 371 of file speclib.f.

Here is the caller graph for this function:

hgj()

real function hgj	(		II,
		real	Z,
		real, dimension(1)	ZGJ,
			NP,
		real	ALPHA,
		real	BETA
	)

Definition at line 520 of file speclib.f.

References exitt(), and hgjd().

Here is the call graph for this function:

Here is the caller graph for this function:

hgjd()

real*8 function hgjd	(		II,
		real*8	Z,
		real*8, dimension(1)	ZGJ,
			NP,
		real*8	ALPHA,
		real*8	BETA
	)

Definition at line 549 of file speclib.f.

References jacobf().

Here is the call graph for this function:

Here is the caller graph for this function:

hgl()

real function hgl	(		I,
			Z,
		real, dimension(1)	ZGL,
			NZ
	)

Definition at line 856 of file speclib.f.

References pndleg(), and pnleg().

Here is the call graph for this function:

Here is the caller graph for this function:

hglj()

real function hglj	(		II,
		real	Z,
		real, dimension(1)	ZGLJ,
			NP,
		real	ALPHA,
		real	BETA
	)

Definition at line 573 of file speclib.f.

References exitt(), and hgljd().

Here is the call graph for this function:

Here is the caller graph for this function:

hgljd()

real*8 function hgljd	(		I,
		real*8	Z,
		real*8, dimension(1)	ZGLJ,
			NP,
		real*8	ALPHA,
		real*8	BETA
	)

Definition at line 602 of file speclib.f.

References jacobf().

Here is the call graph for this function:

Here is the caller graph for this function:

hgll()

real function hgll	(		I,
			Z,
		real, dimension(1)	ZGLL,
			NZ
	)

Definition at line 835 of file speclib.f.

References pndleg(), and pnleg().

Here is the call graph for this function:

Here is the caller graph for this function:

igjm()

subroutine igjm	(	real, dimension(nd2,nd1)	I12,
		real, dimension(nd1,nd2)	IT12,
		real, dimension(nd1)	Z1,
		real, dimension(nd2)	Z2,
			lz1,
			lz2,
			ND1,
			ND2,
			ALPHA,
			BETA
	)

Definition at line 1126 of file speclib.f.

References hgj().

Here is the call graph for this function:

Here is the caller graph for this function:

igljm()

subroutine igljm	(	real, dimension(nd2,nd1)	I12,
		real, dimension(nd1,nd2)	IT12,
		real, dimension(nd1)	Z1,
		real, dimension(nd2)	Z2,
			lz1,
			lz2,
			ND1,
			ND2,
			ALPHA,
			BETA
	)

Definition at line 1152 of file speclib.f.

References hglj().

Here is the call graph for this function:

Here is the caller graph for this function:

igllm()

subroutine igllm	(	real, dimension(nd2,nd1)	I12,
		real, dimension(nd1,nd2)	IT12,
		real, dimension(nd1)	Z1,
		real, dimension(nd2)	Z2,
			lz1,
			lz2,
			ND1,
			ND2
	)

Definition at line 1101 of file speclib.f.

References hgll().

Here is the call graph for this function:

Here is the caller graph for this function:

iglm()

subroutine iglm	(	real, dimension(nd2,nd1)	I12,
		real, dimension(nd1,nd2)	IT12,
		real, dimension(nd1)	Z1,
		real, dimension(nd2)	Z2,
			lz1,
			lz2,
			ND1,
			ND2
	)

Definition at line 1076 of file speclib.f.

References hgl().

Here is the call graph for this function:

Here is the caller graph for this function:

jacg()

subroutine jacg	(	real*8, dimension(1)	XJAC,
			NP,
			ALPHA,
			BETA
	)

Definition at line 421 of file speclib.f.

References jacobf(), and swap().

Here is the call graph for this function:

Here is the caller graph for this function:

jacobf()

subroutine jacobf	(		POLY,
			PDER,
			POLYM1,
			PDERM1,
			POLYM2,
			PDERM2,
			N,
			ALP,
			BET,
			X
	)

Definition at line 479 of file speclib.f.

Here is the caller graph for this function:

pndleg()

real function pndleg	(		Z,
			N
	)

Definition at line 907 of file speclib.f.

Here is the caller graph for this function:

pnleg()

real function pnleg	(		Z,
			N
	)

Definition at line 875 of file speclib.f.

Here is the caller graph for this function:

pnormj()

real*8 function pnormj	(		N,
		real*8	ALPHA,
		real*8	BETA
	)

Definition at line 395 of file speclib.f.

References gammaf().

Here is the call graph for this function:

Here is the caller graph for this function:

zwgj()

subroutine zwgj	(	real, dimension(1)	Z,
		real, dimension(1)	W,
			NP,
		real	ALPHA,
		real	BETA
	)

Definition at line 124 of file speclib.f.

References exitt(), and zwgjd().

Here is the call graph for this function:

Here is the caller graph for this function:

zwgjd()

subroutine zwgjd	(	real*8, dimension(1)	Z,
		real*8, dimension(1)	W,
			NP,
		real*8	ALPHA,
		real*8	BETA
	)

Definition at line 155 of file speclib.f.

References exitt(), gammaf(), jacg(), jacobf(), and pnormj().

Here is the call graph for this function:

Here is the caller graph for this function:

zwgl()

subroutine zwgl	(	real, dimension(1)	Z,
		real, dimension(1)	W,
			NP
	)

Definition at line 90 of file speclib.f.

References zwgj().

Here is the call graph for this function:

Here is the caller graph for this function:

zwglj()

subroutine zwglj	(	real, dimension(1)	Z,
		real, dimension(1)	W,
			NP,
		real	ALPHA,
		real	BETA
	)

Definition at line 207 of file speclib.f.

References exitt(), and zwgljd().

Here is the call graph for this function:

Here is the caller graph for this function:

zwgljd()

subroutine zwgljd	(	real*8, dimension(np)	Z,
		real*8, dimension(np)	W,
			NP,
		real*8	ALPHA,
		real*8	BETA
	)

Definition at line 238 of file speclib.f.

References endw1(), endw2(), exitt(), jacobf(), and zwgjd().

Here is the call graph for this function:

Here is the caller graph for this function:

zwgll()

subroutine zwgll	(	real, dimension(1)	Z,
		real, dimension(1)	W,
			NP
	)

Definition at line 107 of file speclib.f.

References zwglj().

Here is the call graph for this function:

Here is the caller graph for this function: