all函数和any函数

胆怯滴大侠

[Fortran] 查看源码 复制源码

program sheng
    implicit none
    integer a(3)
    data a /9,9,9/
    any(a>1)
end program

[Fortran] 查看源码 复制源码

program sheng
    implicit none
    integer a(3)
    data a /9,9,9/
    all(a>1)
end program

请教一个小问题，按照教程里面的all和any函数，结果都运行不了
错误是Unclassifiable statement

liudy02

一个函数不能成为一个语句
write(*,*) any(a>1)
这样