Fortran 函数

program main
  real :: add
  stop
end
real function add(a,b)! 表示函数会返回的数值类型！
  real add ! 另一种写法
  add = a + b
  return
end