gamup Subroutine

private recursive subroutine gamup(a, x, gu)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	a
real,	intent(in)			::	x
real,	intent(out)			::	gu