M_datapac__d – M

public subroutine BETRAN(N, Alpha, Beta, Iseed, X)

ISEED An integer iseed value. Should be set to a non-negative value to start a new sequence of values. Will be set to -1 on return to indicate the next call should continue the current random sequence walk.

Arguments

Type	Intent		Name
integer,	intent(in)	::	N
real(kind=wp),	intent(in)	::	Alpha
real(kind=wp),	intent(in)	::	Beta
integer,	intent(inout)	::	Iseed
real(kind=wp),	intent(out)	::	X(:)

public subroutine BINCDF(X, P, N, Cdf)

CDF The cumulative distribution function value for the binomial distribution.

Arguments

Type		Name
real(kind=wp)	::	X
real(kind=wp)	::	P
integer	::	N
real(kind=wp)	::	Cdf

public subroutine BINPPF(P, Ppar, N, Ppf)

PPF The percent point function value.

Arguments

Type		Name
real(kind=wp)	::	P
real(kind=wp)	::	Ppar
integer	::	N
real(kind=wp)	::	Ppf

public subroutine BINRAN(N, P, Npar, Iseed, X)

N The desired integer number of random numbers to be generated.

Arguments

Type	Intent		Name
integer,	intent(in)	::	N
real(kind=wp),	intent(in)	::	P
integer,	intent(in)	::	Npar
integer,	intent(inout)	::	Iseed
real(kind=wp),	intent(out)	::	X(:)

public subroutine CAUPLT(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X(:)
integer,	intent(in)			::	N

public subroutine CAUPPF(P, Ppf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp)				::	P
real(kind=wp)				::	Ppf

public subroutine CAURAN(N, Iseed, X)

ISEED An integer seed value. Should be set to a non-negative value to start a new sequence of values. Will be set to -1 on return to indicate the next call should continue the current random sequence walk.

Arguments

Type	Intent		Name
integer,	intent(in)	::	N
integer,	intent(inout)	::	Iseed
real(kind=wp),	intent(out)	::	X(:)

public subroutine CAUSF(P, Sf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp)				::	P
real(kind=wp)				::	Sf

public subroutine CHSCDF(X, Nu, Cdf)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	X
integer,	intent(in)	::	Nu
real(kind=wp),	intent(out)	::	Cdf

public subroutine CHSPPF(P, Nu, Ppf)

Sample program:

Arguments

Type		Name
real(kind=wp)	::	P
integer	::	Nu
real(kind=wp)	::	Ppf

public subroutine CHSRAN(N, Nu, Iseed, X)

–X A vector (of dimension at least N) into which the generated random sample of size N from the chi-squared distribution will be placed.

Arguments

Type	Intent		Name
integer,	intent(in)	::	N
integer,	intent(in)	::	Nu
integer,	intent(inout)	::	Iseed
real(kind=wp),	intent(out)	::	X(:)

public subroutine CODE(X, N, Y)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	X(:)
integer,	intent(in)	::	N
real(kind=wp),	intent(out)	::	Y(:)

public subroutine CORR(X, Y, N, Iwrite, C)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
real(kind=wp),	dimension(:)	::	Y
integer		::	N
integer		::	Iwrite
real(kind=wp)		::	C

public subroutine COUNT(X, N, Xmin, Xmax, Iwrite, Xcount)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp)		::	Xmin
real(kind=wp)		::	Xmax
integer		::	Iwrite
real(kind=wp)		::	Xcount

public subroutine DECOMP(N, K, Eta, Tol, Irank, Insing)

Sample program:

Arguments

Type		Name
integer	::	N
integer	::	K
real(kind=wp)	::	Eta
real(kind=wp)	::	Tol
integer	::	Irank
integer	::	Insing

public subroutine DEFINE(X, N, Xnew)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(out)	::	X(:)
integer,	intent(in)	::	N
real(kind=wp),	intent(in)	::	Xnew

public subroutine DELETE(X, N, Xmin, Xmax, Newn)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp)		::	Xmin
real(kind=wp)		::	Xmax
integer		::	Newn

public subroutine DEMOD(X, N, F)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp)		::	F

public subroutine DEXPLT(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),			dimension(:)	::	X
integer				::	N

public subroutine DEXPPF(P, Ppf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	P
real(kind=wp),	intent(out)			::	Ppf

public subroutine DEXSF(P, Sf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	P
real(kind=wp),	intent(out)			::	Sf

public subroutine DISCR2(X, N, Numcla, Y)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
integer		::	Numcla
real(kind=wp),	dimension(:)	::	Y

public subroutine DISCR3(X, N, Numcla, Y)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
integer		::	Numcla
real(kind=wp),	dimension(:)	::	Y

public subroutine DISCRE(X, N, Xmin, Xdel, Xmax, Y)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp)		::	Xmin
real(kind=wp)		::	Xdel
real(kind=wp)		::	Xmax
real(kind=wp),	dimension(:)	::	Y

public subroutine EV1CDF(X, Cdf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X
real(kind=wp),	intent(out)			::	Cdf

public subroutine EV1PLT(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),			dimension(:)	::	X
integer				::	N

public subroutine EV1PPF(P, Ppf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	P
real(kind=wp),	intent(out)			::	Ppf

public subroutine EV1RAN(N, Iseed, X)

Sample program:

Arguments

Type	Intent		Name
integer,	intent(in)	::	N
integer,	intent(inout)	::	Iseed
real(kind=wp),	intent(out)	::	X(:)

public subroutine EV2CDF(X, Gamma, Cdf)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	X
real(kind=wp),	intent(in)	::	Gamma
real(kind=wp),	intent(out)	::	Cdf

public subroutine EV2PLT(X, N, Gamma)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp)		::	Gamma

public subroutine EV2PPF(P, Gamma, Ppf)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	P
real(kind=wp),	intent(in)	::	Gamma
real(kind=wp),	intent(out)	::	Ppf

public subroutine EV2RAN(N, Gamma, Iseed, X)

Sample program:

Arguments

Type	Intent		Name
integer,	intent(in)	::	N
real(kind=wp),	intent(in)	::	Gamma
integer,	intent(inout)	::	Iseed
real(kind=wp),	intent(out)	::	X(:)

public subroutine EXPCDF(X, Cdf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X
real(kind=wp),	intent(out)			::	Cdf

public subroutine EXPPDF(X, Pdf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X
real(kind=wp),	intent(out)			::	Pdf

public subroutine EXPPLT(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),			dimension(:)	::	X
integer				::	N

public subroutine EXPPPF(P, Ppf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	P
real(kind=wp),	intent(out)			::	Ppf

public subroutine EXPRAN(N, Iseed, X)

Sample program:

Arguments

Type	Intent		Name
integer,	intent(in)	::	N
integer,	intent(inout)	::	Iseed
real(kind=wp),	intent(out)	::	X(:)

public subroutine EXPSF(P, Sf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	P
real(kind=wp),	intent(out)			::	Sf

public subroutine EXTREM(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),			dimension(:)	::	X
integer				::	N

public subroutine FRAN(N, Nu1, Nu2, Istart, X)

Sample program:

Arguments

Type	Intent		Name
integer,	intent(in)	::	N
integer,	intent(in)	::	Nu1
integer,	intent(in)	::	Nu2
integer,	intent(inout)	::	Istart
real(kind=wp),	intent(out)	::	X(:)

public subroutine FREQ(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X(:)
integer,	intent(in)			::	N

public subroutine GAMCDF(X, Gamma, Cdf)

(On the UNIVAC 1108, EXEC 8 system at NBS)

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	X
real(kind=wp),	intent(in)	::	Gamma
real(kind=wp),	intent(out)	::	Cdf

public subroutine GAMPLT(X, N, Gamma)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	X(:)
integer,	intent(in)	::	N
real(kind=wp),	intent(in)	::	Gamma

public subroutine GAMPPF(P, Gamma, Ppf)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	P
real(kind=wp),	intent(in)	::	Gamma
real(kind=wp),	intent(out)	::	Ppf

public subroutine GAMRAN(N, Gamma, Iseed, X)

ISEED An integer seed value. Should be set to a non-negative value to start a new sequence of values. Will be set to -1 on return to indicate the next call should continue the current random sequence walk.

Arguments

Type	Intent		Name
integer,	intent(in)	::	N
real(kind=wp),	intent(in)	::	Gamma
integer,	intent(inout)	::	Iseed
real(kind=wp),	intent(out)	::	X(:)

public subroutine GEOCDF(X, P, Cdf)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	X
real(kind=wp),	intent(in)	::	P
real(kind=wp),	intent(out)	::	Cdf

public subroutine GEOPLT(X, N, P)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp)		::	P

public subroutine GEOPPF(P, Ppar, Ppf)

Sample program:

Arguments

Type		Name
real(kind=wp)	::	P
real(kind=wp)	::	Ppar
real(kind=wp)	::	Ppf

public subroutine HFNPLT(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X(:)
integer,	intent(in)			::	N

public subroutine HFNPPF(P, Ppf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	P
real(kind=wp),	intent(out)			::	Ppf

public subroutine HIST(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X(:)
integer,	intent(in)			::	N

public subroutine LAMCDF(X, Alamba, Cdf)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	X
real(kind=wp),	intent(in)	::	Alamba
real(kind=wp),	intent(out)	::	Cdf

public subroutine LAMPLT(X, N, Alamba)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp)		::	Alamba

public subroutine LAMPPF(P, Alamba, Ppf)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	P
real(kind=wp),	intent(in)	::	Alamba
real(kind=wp),	intent(out)	::	Ppf

public subroutine LAMSF(P, Alamba, Sf)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	P
real(kind=wp),	intent(in)	::	Alamba
real(kind=wp),	intent(out)	::	Sf

public subroutine LGNPLT(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),			dimension(:)	::	X
integer				::	N

public subroutine LGNPPF(P, Ppf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	P
real(kind=wp),	intent(out)			::	Ppf

public subroutine LGNRAN(N, Iseed, X)

ISEED An integer seed value. Should be set to a non-negative value to start a new sequence of values. Will be set to -1 on return to indicate the next call should continue the current random sequence walk.

Arguments

Type	Intent		Name
integer,	intent(in)	::	N
integer,	intent(inout)	::	Iseed
real(kind=wp),	intent(out)	::	X(:)

public subroutine LOC(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X(:)
integer,	intent(in)			::	N

public subroutine LOGCDF(X, Cdf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X
real(kind=wp),	intent(out)			::	Cdf

public subroutine LOGPDF(X, Pdf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X
real(kind=wp),	intent(out)			::	Pdf

public subroutine LOGPLT(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X(:)
integer,	intent(in)			::	N

public subroutine LOGPPF(P, Ppf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	P
real(kind=wp),	intent(out)			::	Ppf

public subroutine LOGRAN(N, Iseed, X)

ISEED An integer seed value. Should be set to a non-negative value to start a new sequence of values. Will be set to -1 on return to indicate the next call should continue the current random sequence walk.

Arguments

Type	Intent		Name
integer,	intent(in)	::	N
integer,	intent(inout)	::	Iseed
real(kind=wp),	intent(out)	::	X(:)

public subroutine LOGSF(P, Sf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	P
real(kind=wp),	intent(out)			::	Sf

public subroutine MAX(X, N, Iwrite, Xmax)

Sample program:

Arguments

Type		Name
real(kind=wp)	::	X(:)
integer	::	N
integer	::	Iwrite
real(kind=wp)	::	Xmax

public subroutine MEDIAN(X, N, Iwrite, Xmed)

Sample program:

Arguments

Type		Name
real(kind=wp)	::	X(:)
integer	::	N
integer	::	Iwrite
real(kind=wp)	::	Xmed

public subroutine MIDM(X, N, Iwrite, Xmidm)

Sample program:

Arguments

Type		Name
real(kind=wp)	::	X(:)
integer	::	N
integer	::	Iwrite
real(kind=wp)	::	Xmidm

public subroutine MIDR(X, N, Iwrite, Xmidr)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	X(:)
integer,	intent(in)	::	N
integer,	intent(in)	::	Iwrite
real(kind=wp),	intent(out)	::	Xmidr

public subroutine MOVE(X, M, Ix1, Iy1, Y)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	X(:)
integer,	intent(in)	::	M
integer,	intent(in)	::	Ix1
integer,	intent(in)	::	Iy1
real(kind=wp)		::	Y(:)

public subroutine NBCDF(X, P, N, Cdf)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	X
real(kind=wp),	intent(in)	::	P
integer		::	N
real(kind=wp),	intent(out)	::	Cdf

public subroutine NBPPF(P, Ppar, N, Ppf)

Sample program:

Arguments

Type		Name
real(kind=wp)	::	P
real(kind=wp)	::	Ppar
integer	::	N
real(kind=wp)	::	Ppf

public subroutine NBRAN(N, P, Npar, Istart, X)

Sample program:

Arguments

Type	Intent		Name
integer,	intent(in)	::	N
real(kind=wp),	intent(in)	::	P
integer,	intent(in)	::	Npar
integer,	intent(inout)	::	Istart
real(kind=wp),	intent(out)	::	X(:)

public subroutine NORPDF(X, Pdf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X
real(kind=wp),	intent(out)			::	Pdf

public subroutine NORPLT(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),			dimension(:)	::	X
integer				::	N

public subroutine NORPPF(P, Ppf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp)				::	P
real(kind=wp)				::	Ppf

public subroutine NORSF(P, Sf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	P
real(kind=wp),	intent(out)			::	Sf

public subroutine PARCDF(X, Gamma, Cdf)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	X
real(kind=wp),	intent(in)	::	Gamma
real(kind=wp),	intent(out)	::	Cdf

public subroutine PARPLT(X, N, Gamma)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp)		::	Gamma

public subroutine PARPPF(P, Gamma, Ppf)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	P
real(kind=wp),	intent(in)	::	Gamma
real(kind=wp),	intent(out)	::	Ppf

public subroutine PARRAN(N, Gamma, Iseed, X)

Sample program:

Arguments

Type		Name
integer	::	N
real(kind=wp)	::	Gamma
integer	::	Iseed
real(kind=wp)	::	X(:)

public subroutine PLOT(Y, X, n)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	Y(:)
real(kind=wp),	intent(in)	::	X(:)
integer,	intent(in)	::	n

public subroutine PLOT10(Y, X, Char, N, Ymin, Ymax, Xmin, Xmax, D, Dmin, Dmax, Yaxid, Xaxid, Plchid)

Sample program:

Arguments

Type		Name
real(kind=wp)	::	Y(:)
real(kind=wp)	::	X(:)
real(kind=wp)	::	Char(:)
integer	::	N
real(kind=wp)	::	Ymin
real(kind=wp)	::	Ymax
real(kind=wp)	::	Xmin
real(kind=wp)	::	Xmax
real(kind=wp)	::	D(:)
real(kind=wp)	::	Dmin
real(kind=wp)	::	Dmax
real(kind=wp)	::	Yaxid
real(kind=wp)	::	Xaxid
real(kind=wp)	::	Plchid

public subroutine PLOT6(Y, X, N, Ymin, Ymax, Xmin, Xmax)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	Y
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp)		::	Ymin
real(kind=wp)		::	Ymax
real(kind=wp)		::	Xmin
real(kind=wp)		::	Xmax

public subroutine PLOT7(Y, X, Char, N, Ymin, Ymax, Xmin, Xmax)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	Y
real(kind=wp),	dimension(:)	::	X
real(kind=wp),	dimension(:)	::	Char
integer		::	N
real(kind=wp)		::	Ymin
real(kind=wp)		::	Ymax
real(kind=wp)		::	Xmin
real(kind=wp)		::	Xmax

public subroutine PLOT8(Y, X, Char, N, Ymin, Ymax, Xmin, Xmax, D, Dmin, Dmax)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	Y
real(kind=wp),	dimension(:)	::	X
real(kind=wp),	dimension(:)	::	Char
integer		::	N
real(kind=wp)		::	Ymin
real(kind=wp)		::	Ymax
real(kind=wp)		::	Xmin
real(kind=wp)		::	Xmax
real(kind=wp),	dimension(:)	::	D
real(kind=wp)		::	Dmin
real(kind=wp)		::	Dmax

public subroutine PLOT9(Y, X, Char, N, Ymin, Ymax, Xmin, Xmax, Yaxid, Xaxid, Plchid)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	Y
real(kind=wp),	dimension(:)	::	X
real(kind=wp),	dimension(:)	::	Char
integer		::	N
real(kind=wp)		::	Ymin
real(kind=wp)		::	Ymax
real(kind=wp)		::	Xmin
real(kind=wp)		::	Xmax
real(kind=wp)		::	Yaxid
real(kind=wp)		::	Xaxid
real(kind=wp)		::	Plchid

public subroutine PLOTC(Y, X, Char, N)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	Y
real(kind=wp),	dimension(:)	::	X
real(kind=wp),	dimension(:)	::	Char
integer		::	N

public subroutine PLOTCO(Y, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp)				::	Y(:)
integer				::	N

public subroutine PLOTCT(Y, X, Char, N)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	Y
real(kind=wp),	dimension(:)	::	X
real(kind=wp),	dimension(:)	::	Char
integer		::	N

public subroutine PLOTS(Y, X, N, D, Dmin, Dmax)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	Y
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp),	dimension(:)	::	D
real(kind=wp)		::	Dmin
real(kind=wp)		::	Dmax

public subroutine PLOTSC(Y, X, Char, N, D, Dmin, Dmax)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	Y
real(kind=wp),	dimension(:)	::	X
real(kind=wp),	dimension(:)	::	Char
integer		::	N
real(kind=wp),	dimension(:)	::	D
real(kind=wp)		::	Dmin
real(kind=wp)		::	Dmax

public subroutine PLOTSP(Y, N, Idf)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	Y(:)
integer,	intent(in)	::	N
integer,	intent(in)	::	Idf

public subroutine PLOTST(Y, X, N, D, Dmin, Dmax)

! INPUT ARGUMENTS–Y = THE VECTOR OF ! (UNSORTED OR SORTED) OBSERVATIONS ! TO BE PLOTTED VERTICALLY. ! –X = THE VECTOR OF ! (UNSORTED OR SORTED) OBSERVATIONS ! TO BE PLOTTED HORIZONTALLY. ! –N = THE INTEGER NUMBER OF OBSERVATIONS ! IN THE VECTOR Y. ! –D = THE VECTOR ! WHICH ‘DEFINES’ THE VARIOUS ! POSSIBLE SUBSETS. ! –DMIN = THE VALUE ! WHICH DEFINES THE LOWER BOUND ! (INCLUSIVELY) OF THE PARTICULAR ! SUBSET OF INTEREST TO BE PLOTTED. ! –DMAX = THE VALUE ! WHICH DEFINES THE UPPER BOUND ! (INCLUSIVELY) OF THE PARTICULAR ! SUBSET OF INTEREST TO BE PLOTTED. ! OUTPUT–A NARROW-WIDTH (71-CHARACTER) TERMINAL PLOT ! OF Y(I) VERSUS X(I), ! FOR ONLY OF A SPECIFIED SUBSET OF THE DATA. ! THE BODY OF THE PLOT (NOT COUNTING AXIS VALUES ! AND MARGINS) IS 25 ROWS (LINES) AND 49 COLUMNS.

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	Y
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp),	dimension(:)	::	D
real(kind=wp)		::	Dmin
real(kind=wp)		::	Dmax

public subroutine PLOTT(Y, X, N)

Y The vector of (unsorted or sorted) observations to be plotted vertically.

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	Y(:)
real(kind=wp),	intent(in)	::	X(:)
integer,	intent(in)	::	N

public subroutine PLOTU(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),			dimension(:)	::	X
integer				::	N

public subroutine PLOTX(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),			dimension(:)	::	X
integer				::	N

public subroutine PLOTXT(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X(:)
integer,	intent(in)			::	N

public subroutine PLOTXX(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),			dimension(:)	::	X
integer				::	N

public subroutine PLTSCT(Y, X, Char, N, D, Dmin, Dmax)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	Y
real(kind=wp),	dimension(:)	::	X
real(kind=wp),	dimension(:)	::	Char
integer		::	N
real(kind=wp),	dimension(:)	::	D
real(kind=wp)		::	Dmin
real(kind=wp)		::	Dmax

public subroutine PLTXXT(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),			dimension(:)	::	X
integer				::	N

public subroutine POICDF(X, Alamba, Cdf)

Sample program:

Arguments

Type		Name
real(kind=wp)	::	X
real(kind=wp)	::	Alamba
real(kind=wp)	::	Cdf

public subroutine POIPLT(X, N, Alamba)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp)		::	Alamba

public subroutine POIPPF(P, Alamba, Ppf)

Sample program:

Arguments

Type		Name
real(kind=wp)	::	P
real(kind=wp)	::	Alamba
real(kind=wp)	::	Ppf

public subroutine POIRAN(N, Alamba, Iseed, X)

Sample program:

Arguments

Type	Intent		Name
integer,	intent(in)	::	N
real(kind=wp),	intent(in)	::	Alamba
integer,	intent(inout)	::	Iseed
real(kind=wp),	intent(out)	::	X(:)

public subroutine PROPOR(X, N, Xmin, Xmax, Iwrite, Xprop)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp)		::	Xmin
real(kind=wp)		::	Xmax
integer		::	Iwrite
real(kind=wp)		::	Xprop

public subroutine RANGE(X, N, Iwrite, Xrange)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
integer		::	Iwrite
real(kind=wp)		::	Xrange

public subroutine RANK(X, N, Xr)

The rank of the first element of the vector X will be placed in the first position of the vector XR, the rank of the second element of the vector X will be placed in the second position of the vector XR, etc.

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	X(:)
integer,	intent(in)	::	N
real(kind=wp),	intent(out)	::	Xr(:)

public subroutine RANPER(N, Istart, X)

Sample program:

Arguments

Type	Intent		Name
integer,	intent(in)	::	N
integer,	intent(inout)	::	Istart
real(kind=wp)		::	X(:)

public subroutine RELSD(X, N, Iwrite, Xrelsd)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
integer		::	Iwrite
real(kind=wp)		::	Xrelsd

public subroutine REPLAC(X, N, Xmin, Xmax, Xnew)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp)		::	Xmin
real(kind=wp)		::	Xmax
real(kind=wp)		::	Xnew

public subroutine RETAIN(X, N, Xmin, Xmax, Newn)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp)		::	Xmin
real(kind=wp)		::	Xmax
integer		::	Newn

public subroutine RUNS(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X(:)
integer,	intent(in)			::	N

public subroutine SAMPP(X, N, P, Iwrite, Pp)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp)		::	P
integer		::	Iwrite
real(kind=wp)		::	Pp

public subroutine SCALE(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),			dimension(:)	::	X
integer				::	N

public subroutine SD(X, N, Iwrite, Xsd)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
integer		::	Iwrite
real(kind=wp)		::	Xsd

public subroutine SORT(X, n, Y)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	n
real(kind=wp),	dimension(:)	::	Y

public subroutine SORTC(X, Y, N, Xs, Yc)

Sample program:

Arguments

Type		Name
real(kind=wp)	::	X(:)
real(kind=wp)	::	Y(:)
integer	::	N
real(kind=wp)	::	Xs(:)
real(kind=wp)	::	Yc(:)

public subroutine SORTP(X, N, Y, Xpos)

SORTP(3f) sorts (in ascending order) the N elements of the precision precision vector X, puts the resulting N sorted values into the precision precision vector Y; and puts the position (in the original vector X) of each of the sorted values into the REAL vector XPOS.

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp),	dimension(:)	::	Y
real(kind=wp),	dimension(:)	::	Xpos

public subroutine SPCORR(X, Y, N, Iwrite, Spc)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
real(kind=wp),	dimension(:)	::	Y
integer		::	N
integer		::	Iwrite
real(kind=wp)		::	Spc

public subroutine STMOM3(X, N, Iwrite, Xsmom3)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
integer		::	Iwrite
real(kind=wp)		::	Xsmom3

public subroutine STMOM4(X, N, Iwrite, Xsmom4)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
integer		::	Iwrite
real(kind=wp)		::	Xsmom4

public subroutine SUBSE1(X, N, D, Dmin, Dmax, Y, Ny)

Sample program:

Arguments

Type		Name
real(kind=wp)	::	X(:)
integer	::	N
real(kind=wp)	::	D(:)
real(kind=wp)	::	Dmin
real(kind=wp)	::	Dmax
real(kind=wp)	::	Y(:)
integer	::	Ny

public subroutine SUBSE2(X, N, D1, D1min, D1max, D2, D2min, D2max, Y, Ny)

Sample program:

Arguments

Type		Name
real(kind=wp)	::	X(:)
integer	::	N
real(kind=wp)	::	D1(:)
real(kind=wp)	::	D1min
real(kind=wp)	::	D1max
real(kind=wp)	::	D2(:)
real(kind=wp)	::	D2min
real(kind=wp)	::	D2max
real(kind=wp)	::	Y(:)
integer	::	Ny

public subroutine SUBSET(X, N, D, Dmin, Dmax, Newn)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp),	dimension(:)	::	D
real(kind=wp)		::	Dmin
real(kind=wp)		::	Dmax
integer		::	Newn

public subroutine TAIL(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp)				::	X(:)
integer				::	N

public subroutine TCDF(X, Nu, Cdf)

Sample program:

Arguments

Type		Name
real(kind=wp)	::	X
integer	::	Nu
real(kind=wp)	::	Cdf

public subroutine TIME(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),			dimension(:)	::	X
integer				::	N

public subroutine TOL(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),			dimension(:)	::	X
integer				::	N

public subroutine TPLT(X, N, Nu)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	X(:)
integer,	intent(in)	::	N
integer,	intent(in)	::	Nu

public subroutine TPPF(P, Nu, Ppf)

Sample program:

Arguments

Type		Name
real(kind=wp)	::	P
integer	::	Nu
real(kind=wp)	::	Ppf

public subroutine TRIM(X, N, P1, P2, Iwrite, Xtrim)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	X(:)
integer,	intent(in)	::	N
real(kind=wp),	intent(in)	::	P1
real(kind=wp),	intent(in)	::	P2
integer,	intent(in)	::	Iwrite
real(kind=wp),	intent(out)	::	Xtrim

public subroutine UNIMED(N, X)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	N
real(kind=wp),	intent(out)			::	X(:)

public subroutine UNIPDF(X, Pdf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X
real(kind=wp),	intent(out)			::	Pdf

public subroutine UNIPLT(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X(:)
integer,	intent(in)			::	N

public subroutine UNIPPF(P, Ppf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	P
real(kind=wp),	intent(out)			::	Ppf

public subroutine UNIRAN(N, Iseed, X)

Sample program:

Arguments

Type	Intent		Name
integer,	intent(in)	::	N
integer,	intent(inout)	::	Iseed
real(kind=wp),	intent(out)	::	X(:)

public subroutine UNISF(P, Sf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	P
real(kind=wp),	intent(out)			::	Sf

public subroutine VAR(X, N, Iwrite, Xvar)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	X(:)
integer,	intent(in)	::	N
integer,	intent(in)	::	Iwrite
real(kind=wp),	intent(out)	::	Xvar

public subroutine WEIB(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),			dimension(:)	::	X
integer				::	N

public subroutine WEICDF(X, Gamma, Cdf)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	X
real(kind=wp),	intent(in)	::	Gamma
real(kind=wp),	intent(out)	::	Cdf

public subroutine WEIPLT(X, N, Gamma)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp)		::	Gamma

public subroutine WEIPPF(P, Gamma, Ppf)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	P
real(kind=wp),	intent(in)	::	Gamma
real(kind=wp),	intent(out)	::	Ppf

public subroutine WEIRAN(N, Gamma, Iseed, X)

Sample program:

Arguments

Type		Name
integer	::	N
real(kind=wp)	::	Gamma
integer	::	Iseed
real(kind=wp)	::	X(:)

public subroutine WIND(X, N, P1, P2, Iwrite, Xwind)

Sample program:

Arguments

Type	Attributes		Name
real(kind=wp),	dimension(:)	::	X
integer		::	N
real(kind=wp)		::	P1
real(kind=wp)		::	P2
integer		::	Iwrite
real(kind=wp)		::	Xwind

public subroutine autoco(x, n, iwrite, xautoc)

Sample program:

Arguments

Type		Name
real(kind=wp)	::	x(:)
integer	::	n
integer	::	iwrite
real(kind=wp)	::	xautoc

public subroutine caucdf(X, Cdf)

CDF The cumulative distribution function value.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X
real(kind=wp),	intent(out)			::	Cdf

public subroutine caupdf(X, Pdf)

PDF The probability density function value.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X
real(kind=wp),	intent(out)			::	Pdf

public subroutine copy(X, N, Y)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	X(:)
integer,	intent(in)	::	N
real(kind=wp),	intent(inout)	::	Y(:)

public subroutine dexcdf(X, Cdf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X
real(kind=wp),	intent(out)			::	Cdf

public subroutine dexpdf(X, Pdf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X
real(kind=wp),	intent(out)			::	Pdf

public subroutine dexran(N, Istart, X)

Sample program:

Arguments

Type	Intent		Name
integer,	intent(in)	::	N
integer,	intent(inout)	::	Istart
real(kind=wp)		::	X(:)

public subroutine dot(A, B, Imin, Imax, Parpro, Dotpro)

Sample program:

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	A(:)
real(kind=wp),	intent(in)	::	B(:)
integer,	intent(in)	::	Imin
integer,	intent(in)	::	Imax
real(kind=wp),	intent(in)	::	Parpro
real(kind=wp),	intent(out)	::	Dotpro

public subroutine hfncdf(X, Cdf)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X
real(kind=wp),	intent(out)			::	Cdf

public subroutine hfnran(N, Iseed, X)

ISEED An integer iseed value. Should be set to a non-negative value to start a new sequence of values. Will be set to -1 on return to indicate the next call should continue the current random sequence walk.

Arguments

Type	Intent		Name
integer,	intent(in)	::	N
integer,	intent(inout)	::	Iseed
real(kind=wp),	intent(out)	::	X(:)

public subroutine mean(X, N, Iwrite, Xmean)

X The vector of (unsorted or sorted) observations.

Arguments

Type	Intent		Name
real(kind=wp),	intent(in)	::	X(:)
integer,	intent(in)	::	N
integer,	intent(in)	::	Iwrite
real(kind=wp),	intent(out)	::	Xmean

public subroutine min(X, N, Iwrite, Xmin)

X The vector of (unsorted or sorted) observations.

Arguments

Type		Name
real(kind=wp)	::	X(:)
integer	::	N
integer	::	Iwrite
real(kind=wp)	::	Xmin

public subroutine norout(X, N)

Sample program:

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X(:)
integer,	intent(in)			::	N

public subroutine unicdf(X, Cdf)

CDF the REAL cumulative distribution function value.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	X
real(kind=wp),	intent(out)			::	Cdf

M_datapac__d Module

Contents

Interfaces

Subroutines

Uses

Interfaces

public interface chsplt

public interface chsplt()

Arguments

public interface fcdf

public interface fcdf()

Arguments

public interface fourie

public interface fourie()

Arguments

public interface georan

public interface georan()

Arguments

public interface lampdf

public interface lampdf()

Arguments

public interface lamran

public interface lamran()

Arguments

public interface lgncdf

public interface lgncdf()

Arguments

public interface norcdf

public interface norcdf()

Arguments

public interface norran

public interface norran()

Arguments

public interface tran

public interface tran()

Arguments

Subroutines

public subroutine BETRAN(N, Alpha, Beta, Iseed, X)

Arguments

public subroutine BINCDF(X, P, N, Cdf)

Arguments

public subroutine BINPPF(P, Ppar, N, Ppf)

Arguments

public subroutine BINRAN(N, P, Npar, Iseed, X)

Arguments

public subroutine CAUPLT(X, N)

Arguments

public subroutine CAUPPF(P, Ppf)

Arguments

public subroutine CAURAN(N, Iseed, X)

Arguments

public subroutine CAUSF(P, Sf)

Arguments

public subroutine CHSCDF(X, Nu, Cdf)

Arguments

public subroutine CHSPPF(P, Nu, Ppf)

Arguments

public subroutine CHSRAN(N, Nu, Iseed, X)

Arguments

public subroutine CODE(X, N, Y)

Arguments

public subroutine CORR(X, Y, N, Iwrite, C)

Arguments

public subroutine COUNT(X, N, Xmin, Xmax, Iwrite, Xcount)

Arguments

public subroutine DECOMP(N, K, Eta, Tol, Irank, Insing)

Arguments

public subroutine DEFINE(X, N, Xnew)

Arguments

public subroutine DELETE(X, N, Xmin, Xmax, Newn)

Arguments

public subroutine DEMOD(X, N, F)

Arguments

public subroutine DEXPLT(X, N)

Arguments

public subroutine DEXPPF(P, Ppf)

Arguments

public subroutine DEXSF(P, Sf)

Arguments

public subroutine DISCR2(X, N, Numcla, Y)