divide_real1d Interface

interface
private module function divide_real1d(a, b) result(c)

Arguments

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

Return Value type(array_type),pointer