forked from kongdd/python_class
-
Notifications
You must be signed in to change notification settings - Fork 0
/
_stripack.pyf
53 lines (51 loc) · 2.75 KB
/
_stripack.pyf
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
! -*- f90 -*-
! Note: the context of this file is case sensitive.
python module _stripack ! in
interface ! in :_stripack
subroutine trans(n,rlat,rlon,x,y,z) ! in :_stripack:_stripack.f90
integer, intent(in) :: n
double precision dimension(n), intent(in) :: rlat
double precision dimension(n), intent(in) :: rlon
double precision dimension(n), intent(out) :: x
double precision dimension(n), intent(out) :: y
double precision dimension(n), intent(out) :: z
end subroutine trans
subroutine trmesh(n,x,y,z,list,lptr,lend,ier) ! in :_stripack:_stripack.f90
integer, intent(in) :: n
double precision dimension(n), intent(in) :: x
double precision dimension(n), intent(in) :: y
double precision dimension(n), intent(in) :: z
integer dimension(6*(n-2)), intent(out) :: list,lptr
integer dimension(n), intent(out) :: lend
integer, intent(out) :: ier
end subroutine trmesh
subroutine intrpc1_n(npts,nptso,olats,olons,x,y,z,data,lst,lptr,lend,odata,ierr)
integer, intent(in) :: npts, nptso
integer, intent(out) :: ierr
double precision, intent(in), dimension(nptso) :: olats,olons
double precision, intent(in), dimension(npts) :: x,y,z,data
double precision, intent(out), dimension(nptso) :: odata
integer, intent(in), dimension(npts) :: lend
integer, intent(in), dimension(6*(npts-2)) :: lst,lptr
end subroutine intrpc1_n
subroutine intrpc0_n(npts,nptso,olats,olons,x,y,z,data,lst,lptr,lend,odata,ierr)
integer, intent(in) :: npts, nptso
integer, intent(out) :: ierr
double precision, intent(in), dimension(nptso) :: olats,olons
double precision, intent(in), dimension(npts) :: x,y,z,data
double precision, intent(out), dimension(nptso) :: odata
integer, intent(in), dimension(npts) :: lend
integer, intent(in), dimension(6*(npts-2)) :: lst,lptr
end subroutine intrpc0_n
subroutine intrpnn_n(npts,nptso,olats,olons,x,y,z,data,lst,lptr,lend,odata,ierr)
integer, intent(in) :: npts, nptso
integer, intent(out) :: ierr
double precision, intent(in), dimension(nptso) :: olats,olons
double precision, intent(in), dimension(npts) :: x,y,z,data
double precision, intent(out), dimension(nptso) :: odata
integer, intent(in), dimension(npts) :: lend
integer, intent(in), dimension(6*(npts-2)) :: lst,lptr
end subroutine intrpnn_n
end python module _stripack
! This file was auto-generated with f2py (version:2).
! See http://cens.ioc.ee/projects/f2py2e/