File: fdf.pyf

package info (click to toggle)
python-scipy 0.5.2-0.1
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 33,888 kB
  • ctags: 44,231
  • sloc: ansic: 156,256; cpp: 90,347; python: 89,604; fortran: 73,083; sh: 1,318; objc: 424; makefile: 342
file content (16 lines) | stat: -rw-r--r-- 612 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
!%90 -*- f90 -*-

python module fdf
  interface
     subroutine periodic_finite_difference(n,x,y,h,k,m)
       intent(c) periodic_finite_difference
       integer intent(c,hide),depend(x) :: n = len(x)
       real*8 intent(c,in),dimension(n) :: x
       real*8 intent(c,out),dimension(n),depend(n) :: y
       real*8 intent(c,in),depend(n,m,k),optional :: h=2.0*M_PI/n
       integer intent(c,in),optional,check(k>0&&k<=7) :: k = 1
       integer intent (c,in),optional,depend(n),check(m>0&&m<=n&&m<=25) &
            :: m = 1
     end subroutine periodic_finite_difference
  end interface
end python module fdf