子例程

通过CALL语句中使用过程名来调用，并通过参数表获取输入数值和返回结果。一般格式如下：

SUBROUTINE subroutine_name(argument_list)
    ...
  (Declaration section)
  ...
  (Execution section)
  ...
  RETURN
  END SUBROUTINR [subroutine_name]

调用格式：

CALL subroutine_name(argument_list)