pertsupport.f File Reference

Functions/Subroutines
subroutine	flushbuffer (k)
real function	opnormold (v1, v2, v3, weight)
function	opnorm2 (v1, v2, v3)
function	tnorm (temp)
real function	dmnorm (v1, v2, v3, temp)
subroutine	opscale (v1, v2, v3, temp, alpha)
subroutine	opscalev (v1, v2, v3, alpha)
subroutine	computelyap
subroutine	computelyap1 (vxq, vyq, vzq, tq, jpp)
subroutine	rescalepert (pertnorm, pertinvnorm, jpp)
subroutine	initialize
subroutine	initialize1 (jpp)
subroutine	get_useric
subroutine	out_pert
subroutine	pert_add2s2 (i, j, scale)
function	pert_inner_prod (i, j)
subroutine	pert_ortho_norm
subroutine	pert_ortho_norm1 (k)

Function/Subroutine Documentation

computelyap()

subroutine computelyap

computelyap1()

subroutine computelyap1	(	real, dimension(1)	vxq,
		real, dimension(1)	vyq,
		real, dimension(1)	vzq,
		real, dimension(1)	tq,
			jpp
	)

dmnorm()

real function dmnorm	(	real, dimension(1)	v1,
		real, dimension(1)	v2,
		real, dimension(1)	v3,
		real, dimension(1)	temp
	)

flushbuffer()

subroutine flushbuffer

(

integer

k

)

get_useric()

subroutine get_useric

initialize()

subroutine initialize

initialize1()

subroutine initialize1

(

jpp

)

opnorm2()

function opnorm2	(	real, dimension(1)	v1,
		real, dimension(1)	v2,
		real, dimension(1)	v3
	)

opnormold()

real function opnormold	(	real, dimension(1)	v1,
		real, dimension(1)	v2,
		real, dimension(1)	v3,
		real, dimension(1)	weight
	)

opscale()

subroutine opscale	(	real, dimension(1)	v1,
		real, dimension(1)	v2,
		real, dimension(1)	v3,
		real, dimension(1)	temp,
		real	alpha
	)

opscalev()

subroutine opscalev	(	real, dimension(*)	v1,
		real, dimension(*)	v2,
		real, dimension(*)	v3,
		real	alpha
	)

out_pert()

subroutine out_pert

pert_add2s2()

subroutine pert_add2s2	(		i,
			j,
			scale
	)

pert_inner_prod()

function pert_inner_prod	(		i,
			j
	)

pert_ortho_norm()

subroutine pert_ortho_norm

pert_ortho_norm1()

subroutine pert_ortho_norm1

(

k

)

rescalepert()

subroutine rescalepert	(		pertnorm,
			pertinvnorm,
			jpp
	)

tnorm()

function tnorm

(

real, dimension(*)

temp

)