!l Z 0 d Z ddlZddlZddlZddlZddlmZ ddlmZ ddlm Z ddlm
Z
ddlm Z dd lm Z dd
lm
Z
dd lmZ dd lmZ ej Zej Zej j Zej Ze j Zd
e de dZd Zd Zd Zd Z d Z ddZ d Z d Z d Z!dS )a
f2py2e - Fortran to Python C/API generator. 2nd Edition.
See __usage__ below.
Copyright 1999--2011 Pearu Peterson all rights reserved,
Pearu Peterson
Permission to use, modify, and distribute this software is given under the
terms of the NumPy License.
NO WARRANTY IS EXPRESSED OR IMPLIED. USE AT YOUR OWN RISK.
$Date: 2005/05/06 08:31:19 $
Pearu Peterson
N)Path ) crackfortran)rules)cb_rules)auxfuncs)cfuncs) f90mod_rules) __version__) capi_mapsa Usage:
1) To construct extension module sources:
f2py [] [[[only:]||[skip:]] \
] \
[: ...]
2) To compile fortran files and build extension modules:
f2py -c [, , ]
3) To generate signature files:
f2py -h ...< same options as in (1) >
Description: This program generates a Python C/API file (module.c)
that contains wrappers for given fortran functions so that they
can be called from Python. With the -c option the corresponding
extension modules are built.
Options:
--2d-numpy Use numpy.f2py tool with NumPy support. [DEFAULT]
--2d-numeric Use f2py2e tool with Numeric support.
--2d-numarray Use f2py2e tool with Numarray support.
--g3-numpy Use 3rd generation f2py from the separate f2py package.
[NOT AVAILABLE YET]
-h Write signatures of the fortran routines to file
and exit. You can then edit and use it instead
of . If ==stdout then the
signatures are printed to stdout.
Names of fortran routines for which Python C/API
functions will be generated. Default is all that are found
in .
Paths to fortran/signature files that will be scanned for
in order to determine their signatures.
skip: Ignore fortran functions that follow until `:'.
only: Use only fortran functions that follow until `:'.
: Get back to mode.
-m Name of the module; f2py generates a Python/C API
file module.c or extension module .
Default is 'untitled'.
'-include' Writes additional headers in the C wrapper, can be passed
multiple times, generates #include each time.
--[no-]lower Do [not] lower the cases in . By default,
--lower is assumed with -h key, and --no-lower without -h key.
--build-dir All f2py generated files are created in .
Default is tempfile.mkdtemp().
--overwrite-signature Overwrite existing signature file.
--[no-]latex-doc Create (or not) module.tex.
Default is --no-latex-doc.
--short-latex Create 'incomplete' LaTeX document (without commands
\documentclass, \tableofcontents, and \begin{document},
\end{document}).
--[no-]rest-doc Create (or not) module.rst.
Default is --no-rest-doc.
--debug-capi Create C/API code that reports the state of the wrappers
during runtime. Useful for debugging.
--[no-]wrap-functions Create Fortran subroutine wrappers to Fortran 77
functions. --wrap-functions is default because it ensures
maximum portability/compiler independence.
--include-paths ::... Search include files from the given
directories.
--help-link [..] List system resources found by system_info.py. See also
--link- switch below. [..] is optional list
of resources names. E.g. try 'f2py --help-link lapack_opt'.
--f2cmap Load Fortran-to-Python KIND specification from the given
file. Default: .f2py_f2cmap in current directory.
--quiet Run quietly.
--verbose Run with extra verbosity.
--skip-empty-wrappers Only generate wrapper files when needed.
-v Print f2py version ID and exit.
numpy.distutils options (only effective with -c):
--fcompiler= Specify Fortran compiler type by vendor
--compiler= Specify C compiler type (as defined by distutils)
--help-fcompiler List available Fortran compilers and exit
--f77exec= Specify the path to F77 compiler
--f90exec= Specify the path to F90 compiler
--f77flags= Specify F77 compiler flags
--f90flags= Specify F90 compiler flags
--opt= Specify optimization flags
--arch= Specify architecture specific optimization flags
--noopt Compile without optimization
--noarch Compile without arch-dependent optimization
--debug Compile with debugging information
Extra options (only effective with -c):
--link- Link extension module with as defined
by numpy.distutils/system_info.py. E.g. to link
with optimized LAPACK libraries (vecLib on MacOSX,
ATLAS elsewhere), use --link-lapack_opt.
See also --help-link switch.
-L/path/to/lib/ -l
-D -U
-I/path/to/include/
.o .so .a
Using the following macros may be required with non-gcc Fortran
compilers:
-DPREPEND_FORTRAN -DNO_APPEND_FORTRAN -DUPPERCASE_FORTRAN
-DUNDERSCORE_G77
When using -DF2PY_REPORT_ATEXIT, a performance report of F2PY
interface is printed out at exit (platforms: Linux).
When using -DF2PY_REPORT_ON_ARRAY_COPY=, a message is
sent to stderr whenever F2PY interface makes a copy of an
array. Integer sets the threshold for array sizes when
a message should be shown.
Version: z
numpy Version: z
Requires: Python 3.5 or higher.
License: NumPy license (see LICENSE.txt in the NumPy source code)
Copyright 1999 - 2011 Pearu Peterson all rights reserved.
https://web.archive.org/web/20140822061353/http://cens.ioc.ee/projects/f2py2ec t g g g g f\ }}}}d\ }}}}} }
} } }
d}d}d}d}d}d}d}g }d\ }}|d d d}| D ]2}|d k r
|d
k rd}|d k rd} |d k rd}%|d d
dk r | |d
d Q|dk rd}Z|dk rd} c|dk rd}l|dk rd}u|dk r|dz
}|dk rd}|dk rd}|dk rd}|dk rd}|dk rd}|dk rd}|dk rd|d< |d k rd} |d k rd} |d k rd}
|d k rd|d < |d!k rd}|d"k rd}|d d# d$k r)t t t j 3|d%k rd}=|d d
d&k rQt
j d' |d(d d)|d
d z t
j |d(d < |d d* d+v rt d, d}
|d d* d-v rd}
|d.k rd/}|d d0k r4t d1t | z t j |rd}|} |rd}|}%| rd} |}-|
r6d}
| | t j e| r d} ||d2< p| r d} ||d3< {|
r d}
||d4< |dk rn t | 5 d d d n # 1 swxY w Y | | # t $ r!}t d5|d6|d7 Y d }~d }~ww xY w|dk r| | |dk r| | 4|s+|s)|s't t" t j t j | s(|st d8|z t j | |r t j || }|rHt j | r)d |vr%t d9|z t j ||d:< ||d;< ||d<< |dk r|sd|d=< n||d=< |r||d>< |r||d?< |r||d@< |r||dA< ||dB< ||dC< ||dD< ||dE< ||dF< | d4d ||fS )GN) r r r r r r r r r r Tr .)NN) buildpathcoutputf2py_wrapper_output only:skip:: z--debug-z--lower --build-dirz
--no-lower--quietz --verbosez --latex-docz--no-latex-docz
--rest-docz
--no-rest-docz--wrap-functionsz--no-wrap-functionsz
--short-latex
shortlatexz --coutputz--f2py-wrapper-output--f2cmapz--overwrite-signaturez h-overwritez-h-m z-vz--show-compilersz-include userincludes z #include --include_pathszHf2py option --include_paths is deprecated, use --include-paths instead.
--include-pathsz--skip-empty-wrappersF-zUnknown option %s
r r f2cmap_filez OSError: z. Skipping file "z".
z Creating build directory %s
zFSignature file "%s" exists!!! Use --overwrite-signature to overwrite.
emptygendebugverbosedo-lowermodule signsfile onlyfuncs skipfuncs
dolatexdoc dorestdoc wrapfuncsr
include_paths)appendprint f2py_versionsysexitr outneedsr outmesserrmessreprextendsplitospathsepopenOSError __usage__pathisdirmkdirjoinisfile
setdefault) inputlinefilesr, r+ r& ff2f3f5f6f7f8f9f10r' r% dolcr- r. r/ r r0 r*
modulenameoptionsldetails e/builddir/build/BUILD/cloudlinux-venv-1.0.10/venv/lib64/python3.11/site-packages/numpy/f2py/f2py2e.py
scaninputlinerX s )+RR &E9i)B&Ar2r2r2r3GH
DJIIIM &Iz % &*, ,G a a 77
'\\AA
'\\AA
#XXAA
rrUj
LL122
)^^DD
-
BB
,
DD
)^^GG
+
qLGG
-
JJ
"
"
"JJ
,
II
/
!
!II
$
$
$II
'
'
'II
/
!
!$%GL ! !
+
BB
)
)
)BB
*__CC
)
)
)%&GM " "
$YYBB
$YYBB
rrUd]] , HJJJJ
$
$
$BB
rrUj
ON + 2 21QrT7 ; ; ;+6122+>F !B$ ( (
ssV(
(
( [
]
]
]BB
ssV(
(
(BB
)
)
) HH
qTS[[ )DGG3 4 4 4 HJJJJ
BII
BJJ
BII
B !4!4 5 5 5 5
B!"GI
B-.G) * *
C%&GM " "
!VV
J!WW Q
J
J
JHFHHqHHHIIIIIIII
J
"WW Q
!VV Q
e J
i
7== # # C 3yA B B B
7GLLI66 RW^^I.. =3O3O UYb c e e e
"GJ GG GI rzz)z
"
' & ) ( ) ( ) ( &GL$GK$GK$GK ,GO }d+++ '>s< LK L K# #L&K# 'L
L, L''L,c b |t _ |d t _ |d t _ d|v r|d t _ d|v r|d t _ d|v r|d t _ |d t j d d < |d t _ t j | }d|v rt d |d z t j | }|d d
d d k r t j
| nCt |d d 5 }| | d d d n # 1 swxY w Y |d
|D ]}d|d z |d
< n|D ]
}|d
|d
< |d |D ]}d|d z |d< n|D ]
}|d |d< |S )Nr& r' r) r, r+ r0 r( r* z Saving signatures to file "%s"
istdoutwr z
%smodule.cnamer z%s-f2pywrappers.f)r rT r r& r'
f77modulenamer, r+ r0 dolowercaser7
crack2fortranr4 rZ writer> )rH rT postlistpyfrI mods rW callcrackfortranrd J s4 EM )L"9-L7%,X%6 "g !(!5 g !(!5 $+O$z buildmodules.. s& B Bavz B B B B B B z.
z Module "z" uses nonexisting "z" which will be ignored.
)
r buildcfuncsr7 r buildcallbackskeysr1 ziprD index dict_appendr buildmodule)
lstmodulesmnamesisusedbyitemuretr) r\ ums
rW buildmodulesr n s6
#$$$ "BXVG
(
( f % % #D ) ) ) )}} e))++ 5 5A((&( QK&&tF|4444 NN4 MM$v, ' ' ' '
CGV,, B B 8 Gchh B B8D> B B BBBBBD
E
E
E
E B ++-- 8 8AH}}f '&,,q//":;;;; 7 7 71 7 7 78 8 8 8 CI D 5#4VR#@#@ A A A A Jro c | D ]M\ }}|| vrg | |< t |t r| | |z | |< 2| | | Nd S N)items
isinstancelistr1 )d_outd_inkvs rW ru ru sw **,, A E>>E!H a Qx!|E!HH !HOOA
ro c t j t j t j t j }t j |dd }t j |dd }t | \ }}|t _ t j
|d t || }i }|D ]M}d|v rG|d D ],} | |vrg || < || |d -N|D ]w}|d dk rid |d v r_|d |v rUt# d
|d d d d
||d D xd|v re|d dk rWt# d t# t j t( j d d|d d dS |D ]F}|d dk r8d|vrt- d t/ dt1 |d z G|d t _ |t4 _ |d t _ t9 | }
|
D ]} t; |
| ||d |
S )au
Equivalent to running::
f2py
where ``=string.join(,' ')``, but in Python. Unless
``-h`` is used, this function returns a dictionary containing
information on generated modules and their dependencies on source
files.
You cannot build extension modules with this function, that is,
using ``-c`` is not allowed. Use the ``compile`` command instead.
Examples
--------
The command ``f2py -m scalar scalar.f`` can be executed from Python as
follows.
.. literalinclude:: ../../source/f2py/code/results/run_main_session.dat
:language: python
srczfortranobject.hzfortranobject.cr$ rg r\ blockz
python modulerf z$Skipping Makefile build for module "z" which is used by {}
rh c 3 " K | ]
}d | d V dS )"Nrj rk s rW rn zrun_main.. s* K KaQ K K K K K Kro r* r' r zKStopping. Edit the signature file and then run f2py on the signature file: r
NzJTip: If your original code is Fortran source then you must use -m option.
z2All blocks must be python module blocks but got %sr& r/ )csrch) r reset_global_f2py_varsr< rA dirnameabspathr __file__rD rX r rT r load_f2cmap_filerd rr r1 r7 formatbasenamer4 argvr8 TypeErrorr9 debugoptionsr
r/ r ru ) comline_listf2pydirfobjhsrcfobjcsrcrH rT ra rz plistr| r} mns rW run_mainr s . ')))goobgoofo > >??Gw||GU,=>>Hw||GU,=>>H"<00NE7 H
w} 5666 w//HH 2 2 E>>5\&&((
2
2H$$"$HQK ""5=1111 N N >_ , ,uV}1L1LV}((,5= , , ,,2F K K8E&M3J K K KKK-M -MN N N g 9 ! ! ]
_
_
_ W%%chqk2222GK4H4H4HJ
K
K
K ' ' >_ , , g--ac c c PU7^$$ & ' '
' - $G ,H"L -H
x
Chhjj @ @CGhX > >???? Jro c g g }}t j | dz |z dz j }|rt | }nd}d |D D ]@} || r | ||d +| | A||fS )z,
Filter files by prefix and suffix.
z.*z\Zr c 6 g | ]}| S rj )strip)rl xs rW
z filter_files.. s ***q***ro N)recompilematchlenr1 ) prefixsuffixrH
remove_prefixfilteredrestr indfiles rW filter_filesr s dH Jv~.6 7 7 =E &kk**E*** 5;; OODJ ' ' ' ' KK T>ro c t j t j | j }|S r )r< rA r r )r) ps rW
get_prefixr s*
8899A Hro c
$%&'()*+,-. ddl } t j d }t j |= d} t j d }n# t $ r d}Y nw xY w|3t j |dz }t j |dz = t j |= nd}| }t
j d $$fdt j dd D ..fdt j D t _ .r d .D .t
j d
%%fd t j dd D ))fd t j D t _ g *d}t j dd D ].}|d
v rd}n|dk rd}|s|dk r* | /*r!*d dk r* d ) * *fdt j D t _ t
j d &&fdt j dd D ,,fdt j D t _ t
j d ''fdt j dd D ++fdt j D t _ g },D ] }d}|dt | |k rddl m } |
t | j }
|t | d x} } | |
vr[i }
|
| } nM# t$ $ r@ | |
vr't) d|t | d z Y nw xY w| } , | }d| z ,|< |D ]}, | },|= t , dk sJ t+ , t
j d ((fd t j dd D --fd t j D t _ d )v r- d d }t j dd }d D ]}|t j v rzt j | }) t j ||dz t j |dz = t j |= t j dd }d!t j v rft j d! }t j |dz }t j |dz = t j |= t j dd }n3dd"lm} t1 d#d$| \ }}||z }|D ]} || }|r nt1 d#d%| \ }}t1 d&d#|d' \ }}t1 d(d#|d' \ }}t1 d)d#|d' \ }}t1 d*d#|d' \ }}t1 d+d#|d' \ }}t3 t | D ]|}|| d,d }t | dk r| d t | dk rt7 | ||< lt) d-| }dd.l m } i } | r)| | d/g dd0l m } m!} ||||||||)d1 } .r@dd2l"m#} .D ]7}! ||! }|s tI d3t+ |! z | | fi | 8 | d>i | }"t j d g-z t _ t j d4d5|d6|d7d8d9g +r#t j d:g+z ,r#t j d;g,z | |"g< |rLtJ j& ' | r/ddl(}#tI d=|z |#) | dS dS dS )?z
Do it all in one call!
r N-cr r z--link-c > g | ]} | |S rj r )rl _m_reg1s rW r z run_compile.. s( BBBB%++b//BRBBBro c g | ]}|v| S rj rj )rl r
sysinfo_flagss rW r z run_compile.. s# AAAr=)@)@)@)@)@ro c " g | ] }|d d
S ) Nrj )rl rI s rW r z run_compile.. s 6661122666ro zN--((no-|)(wrap-functions|lower)|debug-capi|quiet|skip-empty-wrappers)|-includec > g | ]} | |S rj r )rl r _reg2s rW r z run_compile.. ( ???u{{2?"???ro c g | ]}|v| S rj rj )rl r
f2py_flagss rW r z run_compile.. # >>>r:)=)=)=)=)=ro )r r r r c g | ]}|v| S rj rj )rl r f2py_flags2s rW r z run_compile..& # ???r;)>)>)>)>)>ro z4--((f(90)?compiler(-exec|)|compiler)=|help-compiler)c > g | ]} | |S rj r )rl r _reg3s rW r z run_compile..) r ro c g | ]}|v| S rj rj )rl r
flib_flagss rW r z run_compile..* r ro zH--((f(77|90)(flags|exec)|opt|arch)=|(debug|noopt|noarch|help-fcompiler))c > g | ]} | |S rj r )rl r _reg4s rW r z run_compile..- s( ===rU[[__====ro c g | ]}|v| S rj rj )rl r fc_flagss rW r z run_compile... s# << g | ]} | |S rj r )rl r _reg5s rW r z run_compile..I s( @@@" B@2@@@ro c g | ]}|v| S rj rj )rl r setup_flagss rW r z run_compile..J r ro r untitled)r! r" r r )get_f2py_modulenamer z[.]pyf([.]src|)z[.](o|a|so|dylib)z-I)r z-Lz-lz-Uz-D=zInvalid use of -D:)get_info include_dirs)setup Extension) r\ sourcesr library_dirs libraries
define_macros undef_macros
extra_objects f2py_options)ru z9No %s resources found in system (try `f2py --help-link`)
buildz --build-tempz --build-basez--build-platlibr z--disable-optimization config_fc build_ext) ext_modulesz Removing build directory %s
rj )*tempfiler4 r rt
ValueErrormkdtempr r r1 r: r numpy.distutilsr load_all_fcompiler_classesr fcompiler_classrr lowerKeyErrorvaluesr2 r9 !numpy.distutils.command.build_srcr r ranger; tuplenumpy.distutils.system_infor getnumpy.distutils.corer r numpy.distutils.misc_utilru r7 r< rA existsshutilrmtree)/r iremove_build_dir build_dirfladel_listrm r r allowed_keysnvovvmaprS r optnamer pyf_filesrI r r r r r r
name_valuer num_infor r ext_argsru nextr r r r r r r r r r r r s/ @@@@@@@@@@@rW run_compiler
s OOO t A HNN= ) ) }HQUO HQUO HQKK $$&& Jz " "EBBBB#(122,BBBMAAAASXAAACH 766
666
JY
[
[E????sx|???J>>>>SX>>>CHK
B
Xabb\ " " " " "BB
#XXB
"c q ! ! ! {2#--3 k"""????SX???CH J?
A
AE????sx|???J>>>>SX>>>CH JS
U
UE====SXabb\===H<<< > @ @AALAj&&(( (B %%E bBB E E E .. 4#a&&''
CDDDE ##A *R /JqM Q qMM z??a j!1!1 J~ & &E@@@@ @@@K????SX???CHJ 9%%%JhqrrlGE # # ch w''A chqQw / 0 0 0Q!hqrrlG sx HNN4 Xa!e_
HQUOSXa[(122,IIIIII )".? I I 7g% A,,Q//J
*".A7 K KM7 (r7! L L LL' (r7! L L LL'%dBqIIIIw (r7! L L LL' )$G1 M M MM7
3}%%
&
& 4 4"1%++C33
z??a d # # # z??a $Z 0 0M! &
3 3 3 3444444H >HLL < <===55555555"w , , &!. ,!. * H '999999 ' 'A A
C 69=aB C C C K & &A & & & &
)
h
C }{*CHHOOW#Y#Y&- / 0 0 0 2
0111 4
2333 Ese !BGNN9 5 5 !
/9=>>>
i ! ! ! !s$ A A.-A.M""AN,+N,c : dt j dd v r1t j d ddlm} | d S dt j dd v r4t j d t j d ndt j dd v r t j d ndt j dd v r?t j d t j d n7d
t j dd v r t j d
n d t j dd v rt d S t t j dd d S ) Nz --help-linkr r show_allz
--g3-numpyz*G3 f2py support is not implemented, yet.\nz --2e-numericz
--2e-numarrayz
-DNUMARRAYz
--2e-numpyr ) r4 r remover r stderrr` r5 r1 r
r r s rW mainr sg $$
&&&888888
sx|##
FGGG 38ABB< ' ' '''' CHQRRL ( ( %%% (((( !"" % % %%%% sx|
!"" ro r )"__doc__r4 r< pprintr pathlibr r r r r r r r
r r versionr3
numpy_versionr r` r8 showr7 r@ rX rd r ru r r r r
r rj ro rW r s
" #
*
}
HQF GHQ HQH IHQ HQ HQ
XT T Tn! ! !H F D D DN $
i! i! i!X ro