ocn_misr.f File Reference

Go to the source code of this file.

Functions/Subroutines
program	__ocn_misr.f__
subroutine	convtc (num, nchar, loc)
subroutine	probl (zx, zy, v, prob, pi, sig, iprob)
subroutine	rufocn (ei, thpd, phpd, xr, xi, v, pha, tha, phcnd, thcnd, thcel, phcel, opt, ftrx, pti, pi, con, ntha, nphi, iprob, nthcnd, nphcnd)
subroutine	rtang (tha, pha, thcnd, phcnd, thp, dlth, dlph, solz, ntha, nphi, nthcnd, nphcnd, nthp, nloop)
subroutine	rufint (pi, con, amuo, thcnd, phcnd, opt, pti, xi_hgcnt, nthcnd, nphcnd)
subroutine	solidz (thp, php, thsl, phsl, domgan, domega, con)
subroutine	zangl (thp, php, ths, phs, thn, phn, xr, xi, tmio, ei, cost, thcnt, phcnt, tzm)
subroutine	znorml (thnl, phnl, domgan)
subroutine	riwat (wl, xsal, nr, ni)
subroutine	ufunc (pi, xmu, sig, uu)
function	erfz (x)
function	gammp (a, x)
subroutine	gser (gamser, a, x, gln)
subroutine	gcf (gammcf, a, x, gln)
function	gammln (xx)
subroutine	probl_hg (pi, xmup, phirpx, xmux, phirx, sig, alfa, prob, xi_hg)
subroutine	rufint_new (pi, con, amuo, thcnd, phcnd, opt, pti, xi_hgcnt, nthcnd, nphcnd)

Function/Subroutine Documentation

__ocn_misr.f__()

program __ocn_misr.f__

Definition at line 7 of file ocn_misr.f.

convtc()

subroutine convtc	(	integer	num,
		integer	nchar,
		character, dimension(1)	loc
	)

Definition at line 176 of file ocn_misr.f.

erfz()

function erfz

(

x

)

Definition at line 1199 of file ocn_misr.f.

gammln()

function gammln

(

xx

)

Definition at line 1288 of file ocn_misr.f.

gammp()

function gammp	(		a,
			x
	)

Definition at line 1212 of file ocn_misr.f.

gcf()

subroutine gcf	(		gammcf,
			a,
			x,
			gln
	)

Definition at line 1254 of file ocn_misr.f.

gser()

subroutine gser	(		gamser,
			a,
			x,
			gln
	)

Definition at line 1228 of file ocn_misr.f.

probl()

subroutine probl	(		zx,
			zy,
			v,
			prob,
			pi,
			sig,
			iprob
	)

Definition at line 248 of file ocn_misr.f.

probl_hg()

subroutine probl_hg	(		pi,
			xmup,
			phirpx,
			xmux,
			phirx,
			sig,
			alfa,
			prob,
			xi_hg
	)

Definition at line 1312 of file ocn_misr.f.

riwat()

subroutine riwat	(		wl,
			xsal,
		real*8	nr,
		real*8	ni
	)

Definition at line 1099 of file ocn_misr.f.

rtang()

subroutine rtang	(	real*8, dimension(26)	tha,
		real*8, dimension(47)	pha,
		real*8, dimension(25)	thcnd,
		real*8, dimension(46)	phcnd,
		real*8, dimension(25)	thp,
			dlth,
			dlph,
		real*8, dimension(25)	solz,
			ntha,
			nphi,
			nthcnd,
			nphcnd,
			nthp,
			nloop
	)

Definition at line 735 of file ocn_misr.f.

rufint()

subroutine rufint	(		pi,
			con,
			amuo,
		real*8, dimension(25)	thcnd,
		real*8, dimension(46)	phcnd,
			opt,
		real * 8, dimension(8,25,46)	pti,
		real*8, dimension(25,46)	xi_hgcnt,
			nthcnd,
			nphcnd
	)

Definition at line 764 of file ocn_misr.f.

rufint_new()

subroutine rufint_new	(		pi,
			con,
			amuo,
		real*8, dimension(25)	thcnd,
		real*8, dimension(46)	phcnd,
			opt,
		real * 8, dimension(8,25,46)	pti,
		real*8, dimension(25,46)	xi_hgcnt,
			nthcnd,
			nphcnd
	)

Definition at line 1372 of file ocn_misr.f.

rufocn()

subroutine rufocn	(	real*8, dimension(4)	ei,
			thpd,
			phpd,
			xr,
			xi,
			v,
		real*8, dimension(47)	pha,
		real*8, dimension(26)	tha,
		real*8, dimension(46)	phcnd,
		real*8, dimension(25)	thcnd,
			thcel,
			phcel,
			opt,
		real*8, dimension(16,25,46)	ftrx,
		real*8, dimension(8,25,46)	pti,
			pi,
			con,
			ntha,
			nphi,
			iprob,
			nthcnd,
			nphcnd
	)

Definition at line 311 of file ocn_misr.f.

solidz()

subroutine solidz	(		thp,
			php,
		real*8, dimension(3)	thsl,
		real*8, dimension(3)	phsl,
			domgan,
			domega,
			con
	)

Definition at line 807 of file ocn_misr.f.

ufunc()

subroutine ufunc	(		pi,
			xmu,
			sig,
			uu
	)

Definition at line 1182 of file ocn_misr.f.

zangl()

subroutine zangl	(		thp,
			php,
			ths,
			phs,
			thn,
			phn,
			xr,
			xi,
		real*8, dimension(4)	tmio,
		real*8, dimension(4)	ei,
			cost,
			thcnt,
			phcnt,
		real*8, dimension(4,4)	tzm
	)

Definition at line 865 of file ocn_misr.f.

znorml()

subroutine znorml	(	real*8, dimension(3,3)	thnl,
		real*8, dimension(3,3)	phnl,
			domgan
	)

Definition at line 1025 of file ocn_misr.f.