You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
30 lines
1.3 KiB
Plaintext
30 lines
1.3 KiB
Plaintext
15 years ago
|
! -*- f90 -*-
|
||
|
|
! Note: the context of this file is case sensitive.
|
||
|
|
|
||
|
|
python module erfcoremod ! in
|
||
|
|
interface ! in :erfcoremod
|
||
|
|
module erfcoremod ! in :erfcoremod:erfcoremod.f90
|
||
|
|
function derf(x) result (value) ! in :erfcoremod:erfcoremod.f90:erfcoremod
|
||
|
|
double precision intent(in) :: x
|
||
|
|
double precision :: value
|
||
|
|
end function derf
|
||
|
|
function derfc(x) result (value) ! in :erfcoremod:erfcoremod.f90:erfcoremod
|
||
|
|
double precision intent(in) :: x
|
||
|
|
double precision :: value
|
||
|
|
end function derfc
|
||
|
|
function derfcx(x) result (value) ! in :erfcoremod:erfcoremod.f90:erfcoremod
|
||
|
|
double precision intent(in) :: x
|
||
|
|
double precision :: value
|
||
|
|
end function derfcx
|
||
|
|
subroutine calerf(arg,result,jint) ! in :erfcoremod:erfcoremod.f90:erfcoremod
|
||
|
|
double precision intent(in) :: arg
|
||
|
|
double precision intent(inout) :: result
|
||
|
|
integer intent(in) :: jint
|
||
|
|
end subroutine calerf
|
||
|
|
end module erfcoremod
|
||
|
|
end interface
|
||
|
|
end python module erfcoremod
|
||
|
|
|
||
|
|
! This file was auto-generated with f2py (version:2_5972).
|
||
|
|
! See http://cens.ioc.ee/projects/f2py2e/
|