<Example Program>

	Program minval_example     Real a(2,3)     a = Reshape( (/2.,3.,5.,-1.,4.,-3./), (/2,3/))     Print *, Minval(a)     Print *, Minval(a,Dim=1)     Print *, Minval(a,Dim=2)     Print *, Minval(a,Mask=a>0) End
	Execution Results   -3.0000000     2.0000000  -1.0000000  -3.0000000     2.0000000  -3.0000000     2.0000000