optval_real Function

public function optval_real(val, default)

Set a value to a default if it is not defined

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=pr),	intent(inout),	optional		::	val
real(kind=pr),	intent(in)			::	default

Return Value real(kind=pr)