子程序能作为参数传递吗？

shrine

最近在看最小二乘法minpack，简洁起见，过多参数用省略号表示，fcn是需要自己提供的
subroutine lmder(fcn,......wa4)
      integer ....      
      double .....


      call fcn(m,n,x,fvec,fjac,ldfjac,iflag)
end
      既然要call fcn，那肯定是subroutine，而不是function，但是subroutine怎么能作为参数传递呢？