max Interface

public interface max

Module Procedures

private function max_array(a, b) result(c)

Find maximum value between two autodiff arrays

Arguments

Type	Intent	Optional	Attributes		Name
class(array_type),	intent(in),		target	::	a
class(array_type),	intent(in),		target	::	b

Return Value type(array_type), pointer

private function max_scalar(a, scalar) result(c)

Find maximum value between an autodiff array and a scalar

Arguments

Type	Intent	Optional	Attributes		Name
class(array_type),	intent(in),		target	::	a
real(kind=real32),	intent(in)			::	scalar

Return Value type(array_type), pointer