Parent Directory | Revision Log | Revision Graph | Patch
revision 1.2 by adcroft, Fri Feb 2 21:36:30 2001 UTC | revision 1.3 by cnh, Sun Feb 4 14:38:50 2001 UTC | |
---|---|---|
# | Line 1 | Line 1 |
1 | C $Header$ | |
2 | C $Name$ | |
3 | C SUBROUTINE RFFTB (N,R,WSAVE) | C SUBROUTINE RFFTB (N,R,WSAVE) |
4 | C DIMENSION R(1) ,WSAVE(1) | C DIMENSION R(1) ,WSAVE(1) |
5 | C IF (N .EQ. 1) RETURN | C IF (N .EQ. 1) RETURN |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |