f771 assertion failure

[Aaron Jackson]

>>Also, I get several of these
>>
>>> apsi.f: In subroutine `rffti1':
>>> apsi.f:4886: warning:
>>>          CALL RFFTI1 (N,WSAVE(N+1),WSAVE(2*N+1))
>>>               1
>>> apsi.f:4983: (continued):
>>>          SUBROUTINE RFFTI1 (N,WA,IFAC)
>>>                     2
>>> Argument #3 (named `ifac') of `rffti1' is one type at (2) but is \
>>> some other type at (1) [info -f g77 M GLOBALS]
>>
>>but don't know enough about Fortran to know what the implications
>>are.  What actually happens?  The subroutine gets fed bad data?
>>Something similar to c++'s non-const-reference, which gets fed
>>the address of a temporary?

Not knowing what's going on...but looking at the line numbers brings up
a question:  is that a recursive subroutine?  FORTRAN77 does not support
recursive functions or subroutines, that's a FORTRAN90 thang.

Aaron Jackson		jackson@msrce.howard.edu