randten_sign Function

public function randten_sign(ten, th1, th2, rand_grad, n1, n2, tot) result(rand_ten)

Arguments

Type IntentOptional AttributesName
type(tensor), intent(in) :: ten
real(kind=8), intent(in) :: th1
real(kind=8), intent(in) :: th2
type(randomer), intent(inout) :: rand_grad
integer, intent(inout) :: n1
integer, intent(inout) :: n2
integer, intent(inout) :: tot

Return Value type(tensor)


Contents

None