Index | Rundeck: E6TomaF40 | Created: Fri May 17 03:30:39 EDT 2024 |
docalc | Module: | File: FFT144.f |
Author : Gary Russell
Version:
Declaration:
subroutine docalc(f)
- f :
real*8, intent(in), dimension(KM)
- input grid point array
- n :
integer
- loop variables
- iq :
integer
- loop variables
- q :
integer
- q3 :
integer
- q9 :
integer
- x :
real*8
- y :
real*8