Fortran 77 call的用法

在Fortran 77中，CALL语句用于调用子程序或函数。下面是CALL语句的一般形式：

CALL subprogram-name(argument-list)

其中，subprogram-name是子程序或函数的名称，argument-list是传递给子程序或函数的参数列表。下面是一个示例：

PROGRAM MAIN
    INTEGER A, B, C
    A = 10
    B = 20
    CALL ADD(A, B, C)
    WRITE(*,*) 'The sum of A and B is', C
    STOP
END PROGRAM MAIN

SUBROUTINE ADD(X, Y, Z)
    INTEGER X, Y, Z
    Z = X + Y
    RETURN
END SUBROUTINE ADD

在上面的示例中，CALL语句调用名为ADD的子程序，传递了A和B作为参数。ADD子程序将A和B相加，并将结果存储在变量C中。然后，主程序使用WRITE语句输出变量C的值。