device_mma_math Module Reference

Functions/Subroutines
subroutine, public	device_mma_gensub1 (low_d, upp_d, x_d, xmin_d, xmax_d, asyinit, n)
subroutine, public	device_mma_gensub2 (low_d, upp_d, x_d, xold1_d, xold2_d, xmin_d, xmax_d, asydecr, asyincr, n)
subroutine, public	device_mma_gensub3 (x_d, df0dx_d, dfdx_d, low_d, upp_d, min_d, max_d, alpha_d, beta_d, p0j_d, q0j_d, pij_d, qij_d, n, m)
subroutine, public	device_mma_gensub4 (x_d, low_d, upp_d, pij_d, qij_d, n, m, bi_d)
subroutine, public	device_mma_max (xsi_d, x_d, alpha_d, n)
subroutine, public	device_max2 (a_d, b, c_d, d, n)
subroutine, public	device_rex (rex_d, x_d, low_d, upp_d, pij_d, p0j_d, qij_d, q0j_d, lambda_d, xsi_d, eta_d, n, m)
real(kind=rp) function, public	device_lcsc2 (a_d, b_d, n)
subroutine, public	device_relambda (relambda_d, x_d, upp_d, low_d, pij_d, qij_d, n, m)
subroutine, public	device_sub2cons2 (rexsi_d, xsi_d, x_d, alpha_d, epsi, n)
real(kind=rp) function, public	device_maxval (rex_d, n)
real(kind=rp) function, public	device_norm (rex_d, n)
subroutine, public	device_delx (delx_d, x_d, low_d, upp_d, pij_d, qij_d, p0j_d, q0j_d, alpha_d, beta_d, lambda_d, epsi, n, m)
subroutine, public	device_add2inv2 (a_d, b_d, c, n)
subroutine, public	device_gg (gg_d, x_d, low_d, upp_d, pij_d, qij_d, n, m)
subroutine, public	device_diagx (diagx_d, x_d, xsi_d, low_d, upp_d, p0j_d, q0j_d, pij_d, qij_d, alpha_d, beta_d, eta_d, lambda_d, n, m)
subroutine, public	device_bb (bb_d, gg_d, delx_d, diagx_d, n, m)
subroutine, public	device_updatebb (bb_d, dellambda_d, dely_d, d_d, mu_d, y_d, delz, m)
subroutine, public	device_aa (aa_d, gg_d, diagx_d, n, m)
subroutine, public	device_updateaa (aa_d, globaltmp_mm_d, s_d, lambda_d, d_d, mu_d, y_d, a_d, zeta, z, m)
subroutine, public	device_dx (dx_d, delx_d, diagx_d, gg_d, dlambda_d, n, m)
subroutine, public	device_dy (dy_d, dely_d, dlambda_d, d_d, mu_d, y_d, n)
subroutine, public	device_dxsi (dxsi_d, xsi_d, dx_d, x_d, alpha_d, epsi, n)
subroutine, public	device_deta (deta_d, eta_d, dx_d, x_d, beta_d, epsi, n)
real(kind=rp) function, public	device_maxval2 (dxx_d, xx_d, cons, n)
real(kind=rp) function, public	device_maxval3 (dx_d, x_d, alpha_d, cons, n)
subroutine, public	device_kkt_rex (rex_d, df0dx_d, dfdx_d, xsi_d, eta_d, lambda_d, n, m)

Function/Subroutine Documentation

device_aa()

subroutine, public device_mma_math::device_aa	(	type(c_ptr)	aa_d,
		type(c_ptr)	gg_d,
		type(c_ptr)	diagx_d,
		integer(c_int)	n,
		integer(c_int)	m
	)

Definition at line 349 of file device_mma_math.f90.

device_add2inv2()

subroutine, public device_mma_math::device_add2inv2	(	type(c_ptr)	a_d,
		type(c_ptr)	b_d,
		real(kind=rp)	c,
		integer(c_int)	n
	)

Definition at line 271 of file device_mma_math.f90.

device_bb()

subroutine, public device_mma_math::device_bb	(	type(c_ptr)	bb_d,
		type(c_ptr)	gg_d,
		type(c_ptr)	delx_d,
		type(c_ptr)	diagx_d,
		integer(c_int)	n,
		integer(c_int)	m
	)

Definition at line 320 of file device_mma_math.f90.

device_delx()

subroutine, public device_mma_math::device_delx	(	type(c_ptr)	delx_d,
		type(c_ptr)	x_d,
		type(c_ptr)	low_d,
		type(c_ptr)	upp_d,
		type(c_ptr)	pij_d,
		type(c_ptr)	qij_d,
		type(c_ptr)	p0j_d,
		type(c_ptr)	q0j_d,
		type(c_ptr)	alpha_d,
		type(c_ptr)	beta_d,
		type(c_ptr)	lambda_d,
		real(kind=rp)	epsi,
		integer(c_int)	n,
		integer(c_int)	m
	)

Definition at line 253 of file device_mma_math.f90.

device_deta()

subroutine, public device_mma_math::device_deta	(	type(c_ptr)	deta_d,
		type(c_ptr)	eta_d,
		type(c_ptr)	dx_d,
		type(c_ptr)	x_d,
		type(c_ptr)	beta_d,
		real(c_rp)	epsi,
		integer(c_int)	n
	)

Definition at line 423 of file device_mma_math.f90.

device_diagx()

subroutine, public device_mma_math::device_diagx	(	type(c_ptr)	diagx_d,
		type(c_ptr)	x_d,
		type(c_ptr)	xsi_d,
		type(c_ptr)	low_d,
		type(c_ptr)	upp_d,
		type(c_ptr)	p0j_d,
		type(c_ptr)	q0j_d,
		type(c_ptr)	pij_d,
		type(c_ptr)	qij_d,
		type(c_ptr)	alpha_d,
		type(c_ptr)	beta_d,
		type(c_ptr)	eta_d,
		type(c_ptr)	lambda_d,
		integer(c_int)	n,
		integer(c_int)	m
	)

Definition at line 301 of file device_mma_math.f90.

device_dx()

subroutine, public device_mma_math::device_dx	(	type(c_ptr)	dx_d,
		type(c_ptr)	delx_d,
		type(c_ptr)	diagx_d,
		type(c_ptr)	gg_d,
		type(c_ptr)	dlambda_d,
		integer(c_int)	n,
		integer(c_int)	m
	)

Definition at line 380 of file device_mma_math.f90.

device_dxsi()

subroutine, public device_mma_math::device_dxsi	(	type(c_ptr)	dxsi_d,
		type(c_ptr)	xsi_d,
		type(c_ptr)	dx_d,
		type(c_ptr)	x_d,
		type(c_ptr)	alpha_d,
		real(c_rp)	epsi,
		integer(c_int)	n
	)

Definition at line 408 of file device_mma_math.f90.

device_dy()

subroutine, public device_mma_math::device_dy	(	type(c_ptr)	dy_d,
		type(c_ptr)	dely_d,
		type(c_ptr)	dlambda_d,
		type(c_ptr)	d_d,
		type(c_ptr)	mu_d,
		type(c_ptr)	y_d,
		integer(c_int)	n
	)

Definition at line 394 of file device_mma_math.f90.

device_gg()

subroutine, public device_mma_math::device_gg	(	type(c_ptr)	gg_d,
		type(c_ptr)	x_d,
		type(c_ptr)	low_d,
		type(c_ptr)	upp_d,
		type(c_ptr)	pij_d,
		type(c_ptr)	qij_d,
		integer(c_int)	n,
		integer(c_int)	m
	)

Definition at line 287 of file device_mma_math.f90.

device_kkt_rex()

subroutine, public device_mma_math::device_kkt_rex	(	type(c_ptr)	rex_d,
		type(c_ptr)	df0dx_d,
		type(c_ptr)	dfdx_d,
		type(c_ptr)	xsi_d,
		type(c_ptr)	eta_d,
		type(c_ptr)	lambda_d,
		integer(c_int)	n,
		integer(c_int)	m
	)

Definition at line 477 of file device_mma_math.f90.

device_lcsc2()

real(kind=rp) function, public device_mma_math::device_lcsc2	(	type(c_ptr)	a_d,
		type(c_ptr)	b_d,
		integer(c_int)	n
	)

Definition at line 173 of file device_mma_math.f90.

device_max2()

subroutine, public device_mma_math::device_max2	(	type(c_ptr)	a_d,
		real(c_rp)	b,
		type(c_ptr)	c_d,
		real(c_rp)	d,
		integer	n
	)

Definition at line 139 of file device_mma_math.f90.

device_maxval()

real(kind=rp) function, public device_mma_math::device_maxval	(	type(c_ptr)	rex_d,
		integer(c_int)	n
	)

Definition at line 219 of file device_mma_math.f90.

device_maxval2()

real(kind=rp) function, public device_mma_math::device_maxval2	(	type(c_ptr)	dxx_d,
		type(c_ptr)	xx_d,
		real(kind=rp), intent(in)	cons,
		integer	n
	)

Definition at line 438 of file device_mma_math.f90.

device_maxval3()

real(kind=rp) function, public device_mma_math::device_maxval3	(	type(c_ptr)	dx_d,
		type(c_ptr)	x_d,
		type(c_ptr)	alpha_d,
		real(kind=rp), intent(in)	cons,
		integer(c_int)	n
	)

Definition at line 457 of file device_mma_math.f90.

device_mma_gensub1()

subroutine, public device_mma_math::device_mma_gensub1	(	type(c_ptr)	low_d,
		type(c_ptr)	upp_d,
		type(c_ptr)	x_d,
		type(c_ptr)	xmin_d,
		type(c_ptr)	xmax_d,
		real(c_rp)	asyinit,
		integer	n
	)

Definition at line 61 of file device_mma_math.f90.

device_mma_gensub2()

subroutine, public device_mma_math::device_mma_gensub2	(	type(c_ptr)	low_d,
		type(c_ptr)	upp_d,
		type(c_ptr)	x_d,
		type(c_ptr)	xold1_d,
		type(c_ptr)	xold2_d,
		type(c_ptr)	xmin_d,
		type(c_ptr)	xmax_d,
		real(c_rp)	asydecr,
		real(c_rp)	asyincr,
		integer	n
	)

Definition at line 77 of file device_mma_math.f90.

device_mma_gensub3()

subroutine, public device_mma_math::device_mma_gensub3	(	type(c_ptr)	x_d,
		type(c_ptr)	df0dx_d,
		type(c_ptr)	dfdx_d,
		type(c_ptr)	low_d,
		type(c_ptr)	upp_d,
		type(c_ptr)	min_d,
		type(c_ptr)	max_d,
		type(c_ptr)	alpha_d,
		type(c_ptr)	beta_d,
		type(c_ptr)	p0j_d,
		type(c_ptr)	q0j_d,
		type(c_ptr)	pij_d,
		type(c_ptr)	qij_d,
		integer	n,
		integer	m
	)

Definition at line 94 of file device_mma_math.f90.

device_mma_gensub4()

subroutine, public device_mma_math::device_mma_gensub4	(	type(c_ptr)	x_d,
		type(c_ptr)	low_d,
		type(c_ptr)	upp_d,
		type(c_ptr)	pij_d,
		type(c_ptr)	qij_d,
		integer	n,
		integer	m,
		type(c_ptr)	bi_d
	)

Definition at line 111 of file device_mma_math.f90.

device_mma_max()

subroutine, public device_mma_math::device_mma_max	(	type(c_ptr)	xsi_d,
		type(c_ptr)	x_d,
		type(c_ptr)	alpha_d,
		integer	n
	)

Definition at line 125 of file device_mma_math.f90.

device_norm()

real(kind=rp) function, public device_mma_math::device_norm	(	type(c_ptr)	rex_d,
		integer(c_int)	n
	)

Definition at line 236 of file device_mma_math.f90.

device_relambda()

subroutine, public device_mma_math::device_relambda	(	type(c_ptr)	relambda_d,
		type(c_ptr)	x_d,
		type(c_ptr)	upp_d,
		type(c_ptr)	low_d,
		type(c_ptr)	pij_d,
		type(c_ptr)	qij_d,
		integer(c_int)	n,
		integer(c_int)	m
	)

Definition at line 190 of file device_mma_math.f90.

device_rex()

subroutine, public device_mma_math::device_rex	(	type(c_ptr)	rex_d,
		type(c_ptr)	x_d,
		type(c_ptr)	low_d,
		type(c_ptr)	upp_d,
		type(c_ptr)	pij_d,
		type(c_ptr)	p0j_d,
		type(c_ptr)	qij_d,
		type(c_ptr)	q0j_d,
		type(c_ptr)	lambda_d,
		type(c_ptr)	xsi_d,
		type(c_ptr)	eta_d,
		integer(c_int)	n,
		integer(c_int)	m
	)

Definition at line 156 of file device_mma_math.f90.

device_sub2cons2()

subroutine, public device_mma_math::device_sub2cons2	(	type(c_ptr)	rexsi_d,
		type(c_ptr)	xsi_d,
		type(c_ptr)	x_d,
		type(c_ptr)	alpha_d,
		real(kind=rp)	epsi,
		integer(c_int)	n
	)

Definition at line 204 of file device_mma_math.f90.

device_updateaa()

subroutine, public device_mma_math::device_updateaa	(	type(c_ptr)	aa_d,
		type(c_ptr)	globaltmp_mm_d,
		type(c_ptr)	s_d,
		type(c_ptr)	lambda_d,
		type(c_ptr)	d_d,
		type(c_ptr)	mu_d,
		type(c_ptr)	y_d,
		type(c_ptr)	a_d,
		real(c_rp)	zeta,
		real(c_rp)	z,
		integer(c_int)	m
	)

Definition at line 363 of file device_mma_math.f90.

device_updatebb()

subroutine, public device_mma_math::device_updatebb	(	type(c_ptr)	bb_d,
		type(c_ptr)	dellambda_d,
		type(c_ptr)	dely_d,
		type(c_ptr)	d_d,
		type(c_ptr)	mu_d,
		type(c_ptr)	y_d,
		real(c_rp)	delz,
		integer(c_int)	m
	)

Definition at line 334 of file device_mma_math.f90.