ran Function

function ran(idum)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=k4b),	intent(inout)			::	idum

Return Value real