Return Array from Function in Fortran 77

[javarestart]

hello,
is it possible to return an array from a function in fortran 77. I understand that it is possible in fortran 90, but i need to use it in fortran 77. Thanks in advance for your kind response.

 

[xwb]

Yes, as an argument to a subroutine: not as a value to a function. As an extension to

http://www.tek-tips.com/viewthread.cfm?qid=1613318&page=2

it will be something like

      subroutine xxx (in_value, out_value)
      integer in_value
      real out_value(*)
      ...