看这个 http://www.personal.psu.edu/jhm/f90/lectures/19.html
报错原因是参数少，amin1不支持数组，必须是amin1(1.0,2.0,3.0....)，也就是参数是一个一个的数。但是类又是elemental的，如果是写subroutine/function的时候，可以处理数组。
要进行数组运算，使用minval函数，比较绝对值的话就是minval(abs(b))比较

例子：
Program test
implicit none
integer i
real :: b(10) = (/(i,i=1,10)/)
write(*,*) minval(abs(b))
stop
end program test