Question

fortran 最小值的位置 紧急求教

有个minloc,用法是怎么用的？简单点说看下面：
program main
inetegr :: i,a
real :: h(4)
do i=1,4
h(i)=i
end do
a=minloc(h) ! 赋值
print,* minloc(h) !输出

end

赋值出现错误，但把赋值那行去掉,可以输出？为什么？

Answer 1

The result is an array of type integer.
声明a的时候弄成数组
integer a(1)

Answer 2

把赋值那行改成：a=minloc(h,1)