yZ>m?Z?m@Z@mAZAmBZBmCZCmDZDmEZEmFZFmGZGmHZHmIZImJZJmKZKmLZL ddlmMZM ddlmNZN dd lmOZO dd
lmPZP dd lmQZQ dd lmRZR ejS ZTejS ZUi ZVi ZWd
D ]ZXdeWeX< eYejZ [ d ej Z\d ej] ej^ e\ z dz ed z dz ed z dz ed z dz ed z dz ed z dz ed z d z ed z d z ed z d!z ed" z d#z ed$ z d%z ed& z d'z ed( z d)z ed* z d+z ed, z d-z ed. z d/z eUz d0z d+d+d1g d2d3d4gd5Z_d6d7d8d9d:d;d eGe d=id?
gZ`eWd@dAdBdCdDdEdFg dGe dHidIdJgdKgdL Zai dMi dNddOddPddQddRddSdTdUddVddWddXddYdZd[dd\dd]dd^dd_dd`d=dad=dbd=dcd=ddd=ded=dPdfdgdhdid=djd=dYd=d[d=dUdkdVdldWdmdXdni d\dod]dpd^dqd_drdsd=dtd=dud=dvdwdxdygdzd{d|d}gd~ddQddOddRddNddd=d=d=d=d=d=d=d=d=d=d=d=d=ed eGe d=id
ddd= eGe3 dddd=e3dd eF eG eHe3e% eGe d eF eGe3 e% eGe de3d=e d=i eG eHe3e%e d eF eGe3 e% eGe d eF eGe3 e di eF eG eHe3e% eGe die dgiedie>diedi eG eHee die>diedig eFe; eGe= dd eG eHe3e de d=i eG eHe3e de di eG eHe3e di eG eHe3e ddgie dgiedie>di eG eHee diedie>diedige!dd eG eHe3e de d=i eG eHe3e de di eG eHe3e di eG eHe3e ddgie dgiedie>di eG eHee diedie>diedige=dd eGe( diddedig eFe e: di eFe eGe: dig eFe eGe! d eF eG eHe3e% eGe d eF eGe3 e% eGe de d=i eF eG eHe3e% eGe d eF eGe3 e% eGe de die d eGe die digedie>diedi eG eHee die>diedi eFe e di eFe eGe dige di eGe die die2die0dig eGe( die d eG eHe e( di eFe eGe: eGe! d d eG eHe3e% d eF eGe3 e% diddgdddddddddedie>dide>diedie didgdddg dԢ eFe: eGe! d՜
ddde dٜg
Zbe1de/de.de@deDde?deBdeAdeEdeCde7de"dedi
ZcdMeWide digdecddediedi eFe6 eGe ddddd eFe6 eGe e+ ddediedddgdge8dg ddediedigedd eFe eGe id eFe eGe e* ide#d=dd eHeAe@ d=ddeEd=ddeCd=dded=dedide9dgZdg dMeWide digdd=ecd eFe4e* di eFe5e* die+di eFe4e* dedigi eFe5e* dedigie+d eFee( d eFee* d igid=ddd eFe* eGe4 dddd eFe*e4 ddde+di de*d id
e*d idVe*d idXd
d_dd]e*didPddd eGe& digde*dide5dide4dide*didse5didte4didd dSd db eGe& d id d d!gde i eGe& d"ie&d#id$e d% eGe& d&igid'gd(d)d*ge d=d+de d,i eHe%e< d eG eHe%e< d-ie+di eFe6 eGe d.edi eFe6 eGe d/d0e5die4die5d1ie4d1ie)d2ie)d3ie)d4i eFe6 eGe eGe8 e* d5 ed6d7d=i eFe4 eGe d8d7d=i eGe- d9ie-d:igd; eGe- dde%d eGe% d-ie d?ie+d@iedAd0e5die4die5d1ie4d1ie)d4ie)dBie)dCi eFee* dD edEi eFe4 eGe d8id9gdFde+dHidgedIe d?ied=d>g dJddKe dLi eFe+ eGe% dMige+did eFe+ eGe% dNige8dOdP eGe% dQigdRddVdWdXdYdZe9d[igde9dKie+d\ided]d^d_d`dadbdcdd eFee, dedf eFee, d=d>dgd_d`dadhdcdi eFee' dedf eFee' d=d>ediediged=dd0e5die4die5d1ie4d1i eFee* djdkdldme(dnie*doidpe9dqiee*drie(dsiedtidugigdv eG eHe+e( dwi eFe( eGe+ dxiedyiged=dzd eFe eGe id eFe eGe e* ide#d=ddeAd=ddeEd=ddeCd=dded=dded/ded/edide9dZee d{idd|d}d~d eFe6 eGe d=dddde8d=dddded=dddddgZfd Zgddddddddddd
Zhd ZidS ( aG
Rules for building C/API module with f2py2e.
Here is a skeleton of a new wrapper function (13Dec2001):
wrapper_function(args)
declarations
get_python_arguments, say, `a' and `b'
get_a_from_python
if (successful) {
get_b_from_python
if (successful) {
callfortran
if (successful) {
put_a_to_python
if (successful) {
put_b_to_python
if (successful) {
buildvalue = ...
}
}
}
}
cleanup_b
}
cleanup_a
return buildvalue
Copyright 1999,2000 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/08/30 08:58:42 $
Pearu Peterson
N)Path ) __version__)C
applyrules debugcapi
dictappenderrmessgentitlegetargs2hascallstatement hasexternals hasinitvaluehasnote
hasresultnoteisarrayisarrayofstrings ischaracterischaracterarray ischaracter_or_characterarray iscomplexiscomplexarrayiscomplexfunctioniscomplexfunction_warnisdummyroutine
isexternal
isfunctionisfunction_wrapisint1 isint1array isintent_aux
isintent_cisintent_callback
isintent_copy
isintent_hideisintent_inoutisintent_nothide isintent_outisintent_overwrite islogicalislong_complex
islong_doubleislong_doublefunction islong_longislong_longfunctionismoduleroutine
isoptional
isrequiredisscalarissigned_long_longarrayisstring
isstringarrayisstringfunction issubroutine isattr_valueissubroutine_wrap isthreadsafe
isunsignedisunsigned_charisunsigned_chararrayisunsigned_long_longisunsigned_long_longarrayisunsigned_shortisunsigned_shortarrayl_andl_notl_oroutmessreplace
stripcommarequiresf90wrapper) capi_maps)cfuncs) common_rules) use_rules) f90mod_rules) func2subr)decl frompyobjcleanupfrompyobjtopyarrmethod pyobjfromclosepyobjfromfreemem userincludes includes0includestypedefstypedefs_generated cppmacrosrJ callbackslatexdocrestdoc routine_defsexternroutinesinitf2pywraphooks commonhooksinitcommonhooks f90modhooksinitf90modhooks
SOURCE_DATE_EPOCHz/* File: #modulename#module.c
* This file is auto-generated with f2py (version:#f2py_version#).
* f2py is a Fortran to Python Interface Generator (FPIG), Second Edition,
* written by Pearu Peterson .
* Generation date: a
* Do not edit this file directly unless you know what you are doing!!!
*/
#ifdef __cplusplus
extern "C" {
#endif
#ifndef PY_SSIZE_T_CLEAN
#define PY_SSIZE_T_CLEAN
#endif /* PY_SSIZE_T_CLEAN */
/* Unconditionally included */
#include
#include
z See f2py2e/cfuncs.py: includesz
#includes#
#includes0#
z,See f2py2e/rules.py: mod_rules['modulebody']zM
static PyObject *#modulename#_error;
static PyObject *#modulename#_module;
z See f2py2e/cfuncs.py: typedefsz
#typedefs#
z(See f2py2e/cfuncs.py: typedefs_generatedz
#typedefs_generated#
z See f2py2e/cfuncs.py: cppmacrosz
#cppmacros#
z See f2py2e/cfuncs.py: cfuncsz
#cfuncs#
z"See f2py2e/cfuncs.py: userincludesz
#userincludes#
z"See f2py2e/capi_rules.py: usercodez9
#usercode#
/* See f2py2e/rules.py */
#externroutines#
z#See f2py2e/capi_rules.py: usercode1z
#usercode1#
z%See f2py2e/cb_rules.py: buildcallbackz
#callbacks#
z See f2py2e/rules.py: buildapiz
#body#
z&See f2py2e/f90mod_rules.py: buildhooksz
#f90modhooks#
z/See f2py2e/rules.py: module_rules['modulebody']
z&See f2py2e/common_rules.py: buildhooksz
#commonhooks#
zSee f2py2e/rules.pya,
static FortranDataDef f2py_routine_defs[] = {
#routine_defs#
{NULL}
};
static PyMethodDef f2py_module_methods[] = {
#pymethoddef#
{NULL,NULL}
};
static struct PyModuleDef moduledef = {
PyModuleDef_HEAD_INIT,
"#modulename#",
NULL,
-1,
f2py_module_methods,
NULL,
NULL,
NULL,
NULL
};
PyMODINIT_FUNC PyInit_#modulename#(void) {
int i;
PyObject *m,*d, *s, *tmp;
m = #modulename#_module = PyModule_Create(&moduledef);
Py_SET_TYPE(&PyFortran_Type, &PyType_Type);
import_array();
if (PyErr_Occurred())
{PyErr_SetString(PyExc_ImportError, "can't initialize module #modulename# (failed to import numpy)"); return m;}
d = PyModule_GetDict(m);
s = PyUnicode_FromString("#f2py_version#");
PyDict_SetItemString(d, "__version__", s);
Py_DECREF(s);
s = PyUnicode_FromString(
"This module '#modulename#' is auto-generated with f2py (version:#f2py_version#).\nFunctions:\n"
#docs#".");
PyDict_SetItemString(d, "__doc__", s);
Py_DECREF(s);
s = PyUnicode_FromString("az ");
PyDict_SetItemString(d, "__f2py_numpy_version__", s);
Py_DECREF(s);
#modulename#_error = PyErr_NewException ("#modulename#.error", NULL, NULL);
/*
* Store the error object inside the dict, so that it could get deallocated.
* (in practice, this is a module, so it likely will not and cannot.)
*/
PyDict_SetItemString(d, "_#modulename#_error", #modulename#_error);
Py_DECREF(#modulename#_error);
for(i=0;f2py_routine_defs[i].name!=NULL;i++) {
tmp = PyFortranObject_NewAsAttr(&f2py_routine_defs[i]);
PyDict_SetItemString(d, f2py_routine_defs[i].name, tmp);
Py_DECREF(tmp);
}
#initf2pywraphooks#
#initf90modhooks#
#initcommonhooks#
#interface_usercode#
#ifdef F2PY_REPORT_ATEXIT
if (! PyErr_Occurred())
on_exit(f2py_report_on_exit,(void*)"#modulename#");
#endif
return m;
}
#ifdef __cplusplus
}
#endif
)r^ r_ )z*\section{Module \texttt{#texmodulename#}}
z
#modnote#
z
#latexdoc#zdModule #modulename#
================================================================================z
#restdoc#)
modulebody
separatorsforr^ r_ z /*eof body*/z/*eof method*/z/*eof externroutines*/z/*eof routine_defs*/z/*eof initf90modhooks*/z/*eof initf2pywraphooks*/z/*eof initcommonhooks*/ z#note#)
bodyrS ra r` rf rb rd r^ r_ modnotea=
#begintitle#
static char doc_#apiname#[] = "\
#docreturn##name#(#docsignatureshort#)\n\nWrapper for ``#name#``.\
\n#docstrsigns#";
/* #declfortranroutine# */
static PyObject *#apiname#(const PyObject *capi_self,
PyObject *capi_args,
PyObject *capi_keywds,
#functype# (*f2py_func)(#callprotoargument#)) {
PyObject * volatile capi_buildvalue = NULL;
volatile int f2py_success = 1;
#decl#
static char *capi_kwlist[] = {#kwlist##kwlistopt##kwlistxa#NULL};
#usercode#
#routdebugenter#
#ifdef F2PY_REPORT_ATEXIT
f2py_start_clock();
#endif
if (!PyArg_ParseTupleAndKeywords(capi_args,capi_keywds,\
"#argformat#|#keyformat##xaformat#:#pyname#",\
capi_kwlist#args_capi##keys_capi##keys_xa#))
return NULL;
#frompyobj#
/*end of frompyobj*/
#ifdef F2PY_REPORT_ATEXIT
f2py_start_call_clock();
#endif
#callfortranroutine#
if (PyErr_Occurred())
f2py_success = 0;
#ifdef F2PY_REPORT_ATEXIT
f2py_stop_call_clock();
#endif
/*end of callfortranroutine*/
if (f2py_success) {
#pyobjfrom#
/*end of pyobjfrom*/
CFUNCSMESS("Building return value.\n");
capi_buildvalue = Py_BuildValue("#returnformat#"#return#);
/*closepyobjfrom*/
#closepyobjfrom#
} /*if (f2py_success) after callfortranroutine*/
/*cleanupfrompyobj*/
#cleanupfrompyobj#
if (capi_buildvalue == NULL) {
#routdebugfailure#
} else {
#routdebugleave#
}
CFUNCSMESS("Freeing memory.\n");
#freemem#
#ifdef F2PY_REPORT_ATEXIT
f2py_stop_clock();
#endif
return capi_buildvalue;
}
#endtitle#
z
#routine_def#z#initf2pywraphook#z#declfortranroutine#z!#docreturn##name#(#docsignature#)z&#docreturn##name#(#docsignatureshort#)z*" #docreturn##name#(#docsignature#)\n"
)z
arrayobject.h
CFUNCSMESSMINMAXz#define DEBUGCFUNCSz1\subsection{Wrapper function \texttt{#texname#}}
zk
\noindent{{}\verb@#docreturn##name#@{}}\texttt{(#latexdocsignatureshort#)}
#routnote#
#latexdocstrsigns#
zlWrapped function ``#name#``
--------------------------------------------------------------------------------) rk rm r` rb ra docdocshortdocsneedr\ r^ r_ rk callfortranroutineroutdebugenterrO routdebugleaveroutdebugfailure setjmpbufz || docstrreq docstropt docstrout docstrcbs docstrsignsz\n"
"latexdocstrsignslatexdocstrreqlatexdocstroptlatexdocstroutlatexdocstrcbskwlist kwlistopt callfortrancallfortranappenddocsign
docsignoptz/*decl*/rV z /*freemem*/ docsignshortdocsignoptshortz\nParameters\n----------z$\nOther Parameters\n----------------z\nReturns\n-------z'\nNotes\n-----\nCall-back functions::\nz \noindent Required arguments:z \noindent Optional arguments:z\noindent Return objects:z \noindent Call-back functions: args_capi keys_capifunctyperP z
/*frompyobj*/rQ z/*end of cleanupfrompyobj*/rT z
/*pyobjfrom*/rU z/*end of closepyobjfrom*/rR z /*topyarr*/z/*routdebugleave*/z/*routdebugenter*/z/*routdebugfailure*/z/*callfortranroutine*/ argformatz
--- #note#)
keyformat need_cfuncs docreturnreturn returnformatrformatkwlistxakeys_xaxaformat docsignxadocsignxashortinitf2pywraphookroutnotez f2py_rout_#modulename#_#name#z#modulename#.#name#)apinamepynamerO _checkz-f2py_rout_#modulename#_#f90modulename#_#name#z##modulename#.#f90modulename#.#name#voidzGextern void #F_FUNC#(#fortranname#,#FORTRANNAME#)(#callprotoargument#);z/extern void #fortranname#(#callprotoargument#);zw {"#name#",-1,{{-1}},0,0,(char *) #F_FUNC#(#fortranname#,#FORTRANNAME#), (f2py_init_func)#apiname#,doc_#apiname#},z] {"#name#",-1,{{-1}},0,0,(char *)#fortranname#, (f2py_init_func)#apiname#,doc_#apiname#},zL {"#name#",-1,{{-1}},0,0,NULL, (f2py_init_func)#apiname#,doc_#apiname#},F_FUNCzU fprintf(stderr,"debug-capi:Fortran subroutine `#fortranname#(#callfortran#)'\n");zI if (#setjmpbuf#) {
f2py_success = 0;
} else {z" Py_BEGIN_ALLOW_THREADSzQ #callstatement#;
/*(*f2py_func)(#callfortran#);*/z, (*f2py_func)(#callfortran#);z Py_END_ALLOW_THREADSz })r declfortranroutine routine_defrt ru r zFextern void #F_WRAPPEDFUNC#(#name_lower#,#NAME#)(#callprotoargument#);zv {"#name#",-1,{{-1}},0,0,(char *) #F_WRAPPEDFUNC#(#name_lower#,#NAME#), (f2py_init_func)#apiname#,doc_#apiname#},a
{
extern #ctype# #F_FUNC#(#name_lower#,#NAME#)(void);
PyObject* o = PyDict_GetItemString(d,"#name#");
tmp = F2PyCapsule_FromVoidPtr((void*)#F_FUNC#(#name_lower#,#NAME#),NULL);
PyObject_SetAttrString(o,"_cpointer", tmp);
Py_DECREF(tmp);
s = PyUnicode_FromString("#name#");
PyObject_SetAttrString(o,"__name__", s);
Py_DECREF(s);
}
F_WRAPPEDFUNCz\ fprintf(stderr,"debug-capi:Fortran subroutine `f2pywrap#name_lower#(#callfortran#)'\n");z= if (#setjmpbuf#) {
f2py_success = 0;
} else {z Py_BEGIN_ALLOW_THREADSz (*f2py_func)(#callfortran#);z9 #callstatement#;
/*(*f2py_func)(#callfortran#);*/z Py_END_ALLOW_THREADSz })r r r r rt ru r a
{
extern void #F_FUNC#(#name_lower#,#NAME#)(void);
PyObject* o = PyDict_GetItemString(d,"#name#");
tmp = F2PyCapsule_FromVoidPtr((void*)#F_FUNC#(#name_lower#,#NAME#),NULL);
PyObject_SetAttrString(o,"_cpointer", tmp);
Py_DECREF(tmp);
s = PyUnicode_FromString("#name#");
PyObject_SetAttrString(o,"__name__", s);
Py_DECREF(s);
}
#ctype#z#rname#,z#pydocsignout#z"\item[]{{}\verb@#pydocsignout#@{}}z--- #resultnote#z#ifdef USESCOMPAQFORTRAN
fprintf(stderr,"debug-capi:Fortran function #ctype# #fortranname#(#callcompaqfortran#)\n");
#else
fprintf(stderr,"debug-capi:Fortran function #ctype# #fortranname#(#callfortran#)\n");
#endif
zZ fprintf(stderr,"debug-capi:Fortran function #ctype# #fortranname#(#callfortran#)\n");
)r r r| r ru r zJextern #ctype# #F_FUNC#(#fortranname#,#FORTRANNAME#)(#callprotoargument#);z2extern #ctype# #fortranname#(#callprotoargument#);zJ {"#name#",-1,{{-1}},0,0,NULL,(f2py_init_func)#apiname#,doc_#apiname#},z& #ctype# #name#_return_value={0,0};z" #ctype# #name#_return_value=0;z1 PyObject *#name#_return_value_capi = Py_None;zP #callstatement#;
/* #name#_return_value = (*f2py_func)(#callfortran#);*/
z6 #name#_return_value = (*f2py_func)(#callfortran#);zY fprintf(stderr,"#routdebugshowvalue#\n",#name#_return_value.r,#name#_return_value.i);zA fprintf(stderr,"#routdebugshowvalue#\n",#name#_return_value);zH #name#_return_value_capi = pyobj_from_#ctype#1(#name#_return_value);zpyobj_from_#ctype#1 long_long long_doublez #rformat#z,#name#_return_value_capiz,#name#_return_value) r r rO ru rT rt r r r zs {"#name#",-1,{{-1}},0,0,(char *)#F_FUNC#(#fortranname#,#FORTRANNAME#),(f2py_init_func)#apiname#,doc_#apiname#},z[ {"#name#",-1,{{-1}},0,0,(char *)#fortranname#,(f2py_init_func)#apiname#,doc_#apiname#},z' #ctype# #name#_return_value = NULL;z$ int #name#_return_value_len = 0;z,#name#_return_value,#name#_return_value_len,z( #name#_return_value_len = #rlength#;zS if ((#name#_return_value = (string)malloc(#name#_return_value_len+1) == NULL) {z< PyErr_SetString(PyExc_MemoryError, "out of memory");z f2py_success = 0;z } else {z> (#name#_return_value)[#name#_return_value_len] = '\0';z if (f2py_success) {z Py_BEGIN_ALLOW_THREADSzv#ifdef USESCOMPAQFORTRAN
(*f2py_func)(#callcompaqfortran#);
#else
(*f2py_func)(#callfortran#);
#endif
z Py_END_ALLOW_THREADSz] fprintf(stderr,"#routdebugshowvalue#\n",#name#_return_value_len,#name#_return_value);z2 } /* if (f2py_success) after (string)malloc */z$ STRINGFREE(#name#_return_value);)r r
STRINGFREE)
r r rO r ru r r rV rt r z] fprintf(stderr,"debug-capi:Python C/API function #modulename#.#name#(#docsignature#)\n");zZ fprintf(stderr,"debug-capi:Python C/API function #modulename#.#name#: successful.\n");zW fprintf(stderr,"debug-capi:Python C/API function #modulename#.#name#: failure.\n");)rv rw rx r complex_long_double
unsigned_charunsigned_shortunsignedunsigned_long_long signed_char characterz1 /* Processing auxiliary variable #varname# */z' fprintf(stderr,"#vardebuginfo#\n");z, /* End of cleaning variable #varname# */)rP rQ rt z #ctype# #varname# = 0;zmath.hz #varname# = #init#;)rO rt rP r z
,#varname#z
#outvarname#,z #varrformat#)r r| r r r z #ctype# #varname#;z3 #varname#.r = #init.r#, #varname#.i = #init.i#;)rO rP r #ctype# #varname# = NULL; int slen(#varname#);zlen..)rO rt r ) #ctype# *#varname# = NULL;4 npy_intp #varname#_Dims[#rank#] = {#rank*[-1]#};& const int #varname#_Rank = #rank#;forcombro r )rt r _dependzflen(#varname#),string)r rt r z' /* Processing variable #varname# */)rP rQ r rt z #pydocsign#z \item[]{{}\verb@#pydocsign#@{}}z--- See above.)r{ rz r| r r r dependz "#varname#",z
#varname#,)r r r z#varname#=#showinit#,)r r r r )r r r r z#varname#_extra_args=(),r z#varname#_extra_args,z=#varname#_extra_args : input tuple, optional\n Default: ()z
#cbdocstr#z\item[] #cblatexdocstr#z}\item[]{{}\verb@#varname#_extra_args := () input tuple@{}} --- Extra arguments for call-back function {{}\verb@#varname#@{}}.z3 #cbname#_t #varname#_cb = { Py_None, NULL, 0 };z1 #cbname#_t *#varname#_cb_ptr = &#varname#_cb;z, PyTupleObject *#varname#_xa_capi = NULL;z$ #cbname#_typedef #varname#_cptr;r z"#varname#_extra_args",Or r zO!z,&#varname#_cb.capir z!,&PyTuple_Type,&#varname#_xa_capiz (setjmp(#varname#_cb.jmpbuf))z#varname#_cptr,rt z#cbname#zsetjmp.hzif(F2PyCapsule_Check(#varname#_cb.capi)) {
#varname#_cptr = F2PyCapsule_AsVoidPtr(#varname#_cb.capi);
} else {
#varname#_cptr = #cbname#;
}
a if (#varname#_cb.capi==Py_None) {
#varname#_cb.capi = PyObject_GetAttrString(#modulename#_module,"#varname#");
if (#varname#_cb.capi) {
if (#varname#_xa_capi==NULL) {
if (PyObject_HasAttrString(#modulename#_module,"#varname#_extra_args")) {
PyObject* capi_tmp = PyObject_GetAttrString(#modulename#_module,"#varname#_extra_args");
if (capi_tmp) {
#varname#_xa_capi = (PyTupleObject *)PySequence_Tuple(capi_tmp);
Py_DECREF(capi_tmp);
}
else {
#varname#_xa_capi = (PyTupleObject *)Py_BuildValue("()");
}
if (#varname#_xa_capi==NULL) {
PyErr_SetString(#modulename#_error,"Failed to convert #modulename#.#varname#_extra_args to tuple.\n");
return NULL;
}
}
}
}
if (#varname#_cb.capi==NULL) {
PyErr_SetString(#modulename#_error,"Callback #varname# not defined (as an argument or module #modulename# attribute).\n");
return NULL;
}
}
z if (create_cb_arglist(#varname#_cb.capi,#varname#_xa_capi,#maxnofargs#,#nofoptargs#,&#varname#_cb.nofargs,&#varname#_cb.args_capi,"failed in processing argument list for call-back #varname#.")) {
z fprintf(stderr,"debug-capi:Assuming %d arguments; at most #maxnofargs#(-#nofoptargs#) is expected.\n",#varname#_cb.nofargs);
CFUNCSMESSPY("for #varname#=",#varname#_cb.capi);zK fprintf(stderr,"#vardebugshowvalue# (call-back in C).\n",#cbname#);z CFUNCSMESS("Saving callback variables for `#varname#`.\n");
#varname#_cb_ptr = swap_active_#cbname#(#varname#_cb_ptr);z CFUNCSMESS("Restoring callback variables for `#varname#`.\n");
#varname#_cb_ptr = swap_active_#cbname#(#varname#_cb_ptr);
Py_DECREF(#varname#_cb.args_capi);
}SWAPcreate_cb_arglist)rP rQ rt r r z6 fprintf(stderr,"#vardebugshowvalue#\n",#varname#);z &#varname#,)rO rT r r r )rt r ' PyObject *#varname#_capi = Py_None;z,&#varname#_capiz] f2py_success = try_pyarr_from_#ctype#(#varname#_capi,&#varname#);
if (f2py_success) {z2 } /*if (f2py_success) of #varname# pyobjfrom*/ztry_pyarr_from_#ctype#) rO r r r r rT rU rt r z; if (#varname#_capi == Py_None) #varname# = #init#; elser z" if (#varname#_capi != Py_None)z f2py_success = #ctype#_from_pyobj(&#varname#,#varname#_capi,"#pyname#() #nth# (#varname#) can't be converted to #ctype#");
if (f2py_success) {zo #varname# = (#ctype#)PyObject_IsTrue(#varname#_capi);
f2py_success = 1;
if (f2py_success) {z( } /*if (f2py_success) of #varname#*/z#ctype#_from_pyobj)rP rt r r )rP r r zD fprintf(stderr,"#vardebugshowvalue#\n",#varname#.r,#varname#.i);z,#varname#_capi)rO r rT r r ze f2py_success = try_pyarr_from_#ctype#(#varname#_capi,&#varname#);
if (f2py_success) {z6 } /*if (f2py_success) of #varname# pyobjfrom*/) rO r r r r rt rT rU r zW if (#varname#_capi==Py_None) {#varname#.r = #init.r#, #varname#.i = #init.i#;} elsez3 } /*if (f2py_success) of #varname# frompyobj*/)rO r z4 #varname#_capi = pyobj_from_#ctype#1(#varname#);)rT rt r )r r r zslen(#varname#),zF fprintf(stderr,"#vardebugshowvalue#\n",slen(#varname#),#varname#);z: STRINGPADN(#varname#, slen(#varname#), ' ', '\0');
STRINGPADN)rO r r rT r rt r z slen(#varname#) = #elsize#;
f2py_success = #ctype#_from_pyobj(&#varname#,&slen(#varname#),#init#,#varname#_capi,"#ctype#_from_pyobj failed in converting #nth#`#varname#' of #pyname# to C #ctype#");
if (f2py_success) {z: STRINGPADN(#varname#, slen(#varname#), '\0', ' ');zH STRINGFREE(#varname#);
} /*if (f2py_success) of #varname#*/r z f2py_success = try_pyarr_from_#ctype#(#varname#_capi, #varname#,
slen(#varname#));
if (f2py_success) {)r r r r rT rU rt r r r r z2 PyArrayObject *capi_#varname#_as_array = NULL;z" int capi_#varname#_intent = 0;z int slen(#varname#) = 0;z,capi_#varname#_as_array)rO r r r rt r z% int capi_overwrite_#varname# = 1;z"overwrite_#varname#",iz,&capi_overwrite_#varname#zoverwrite_#varname#=1,zoverwrite_#varname#,z9overwrite_#varname# : input int, optional\n Default: 1)rO r r r r r r{ r zK capi_#varname#_intent |= (capi_overwrite_#varname#?0:F2PY_INTENT_COPY);z% int capi_overwrite_#varname# = 0;zoverwrite_#varname#=0,z9overwrite_#varname# : input int, optional\n Default: 0)rO r r r r r z #setdims#;z& capi_#varname#_intent |= #intent#;zk const char * capi_errmess = "#modulename#.#pyname#: failed to create array from the #nth# `#varname#`";z capi_#varname#_as_array = ndarray_from_pyobj( #atype#,#elsize#,#varname#_Dims,#varname#_Rank, capi_#varname#_intent,Py_None,capi_errmess);z capi_#varname#_as_array = ndarray_from_pyobj( #atype#,#elsize#,#varname#_Dims,#varname#_Rank, capi_#varname#_intent,#varname#_capi,capi_errmess);a9 if (capi_#varname#_as_array == NULL) {
PyObject* capi_err = PyErr_Occurred();
if (capi_err == NULL) {
capi_err = #modulename#_error;
PyErr_SetString(capi_err, capi_errmess);
}
} else {
#varname# = (#ctype# *)(PyArray_DATA(capi_#varname#_as_array));
z/ slen(#varname#) = f2py_itemsize(#varname#);z$ if (#varname#_capi == Py_None) {z {z #ctype# capi_c;a int *_i,capi_i=0;
CFUNCSMESS("#name#: Initializing #varname#=#init#\n");
if (initforcomb(PyArray_DIMS(capi_#varname#_as_array),
PyArray_NDIM(capi_#varname#_as_array),1)) {
while ((_i = nextforcomb()))
#varname#[capi_i++] = #init#; /* fortran way */
} else {
PyObject *exc, *val, *tb;
PyErr_Fetch(&exc, &val, &tb);
PyErr_SetString(exc ? exc : #modulename#_error,
"Initialization of #nth# #varname# failed (initforcomb).");
npy_PyErr_ChainExceptionsCause(exc, val, tb);
f2py_success = 0;
}
}
if (f2py_success) {zG } /* if (capi_#varname#_as_array == NULL) ... else of #varname# */zl if((PyObject *)capi_#varname#_as_array!=#varname#_capi) {
Py_XDECREF(capi_#varname#_as_array); }z, Py_XDECREF(capi_#varname#_as_array);z. } /*if (f2py_success) of #varname# init*/)rP rQ r r z6 fprintf(stderr,"debug-capi:Checking `#check#'\n");)rP rt zQ CHECKSCALAR(#check#,"#check#","#nth# #varname#","#varshowvalue#",#varname#) {z } /*CHECKSCALAR(#check#)*/ CHECKSCALAR)rP rQ rt r _breakzQ CHECKSTRING(#check#,"#check#","#nth# #varname#","#varshowvalue#",#varname#) {z } /*CHECKSTRING(#check#)*/ CHECKSTRING
CHECKARRAYz5 CHECKARRAY(#check#,"#check#","#nth# #varname#") {z } /*CHECKARRAY(#check#)*/)rt rP rQ r r CHECKGENERICz7 CHECKGENERIC(#check#,"#check#","#nth# #varname#") {z } /*CHECKGENERIC(#check#)*/)rt rP rQ c : t d| d z i }t dd }t j | }t dt
i| }g }g }| d D ]I}d} | d D ]7}
|
d dvrt
d |
d D ]} | d |k r| } n8| s t d
|z t j f| g} d | v rV| d
D ];\ }
}t j | }|d = |
|d< ||d
< |
| <| D ]} t | }t d rt d }|d }t d t! | d|d |rut d| d t! | d| d t d| d t! | d| d n:t d| d t! | d| d t% | \ }}|r-|r|
| n|
| t' || }t || }Kt) j | \ }}|r|
| t' || }t || }t- j | \ }}|r|
| t' || }t || }|D ]9}t/ j || d |d }t || }:t3 j }|dxx d t j D z
cc< i }| D ]}g ||< || D ]}
d }|
t2 j v rt2 j |
}nL|
t2 j v rt2 j |
}n*|
t2 j v rt2 j |
}n|
t2 j v rt2 j |
}n|
t2 j! v rt2 j! |
}n|
t2 j" v rt2 j" |
}n|
t2 j v rt2 j |
}n|
t2 j# v rt2 j# |
}nc|
t2 j$ v rt2 j$ |
}nB|
t2 j% v rt2 j% |
}n!t
d tM |
z s||
| |
| |D ]<} d | v r | d | sd | vr!t' | || }t || }=t' tN | }tP j) * t d |d } | |d < tW | d 5 } | , |d! - d"d# ddd n # 1 swxY w Y t d$| d d%| d& t d' rtP j) * t d |d d(z } tW | d 5 } | , d) | , d** |d+ ddd n # 1 swxY w Y t d,t d d|d d- t d. rtP j) * t d |d d/z } | |d0< tW | d 5 } | , d1t
z d2t vrC| , d3 | , d** |d4 d2t vr| , d5 ddd n # 1 swxY w Y t d6t d d|d d7 |rtP j) * t d |d8 } | |d9< tW | d 5 } | , d: | , d;t
z | , d< g } d=* | d*z . d* D ]}!d>|!/ d? cxk rd@k r n n|
|!d*z >|!ru|!d> dAk rita |! d@k r=|
|!dd@ dBz |!d@d }!ta |! d@k =|
|!d*z |
|!d*z d * | - dCd* } | , | ddd n # 1 swxY w Y t dD| z |r0tP j) * t d dE|d z } | |d9< tW | d 5 } | , dF | , dGt
z | , dH g } d=* | d*z . d* D ] }!d>|!/ d? cxk rdIk r n n|
|!d*z ?ta |! dIk r|!d> dAk r|
|!ddI dJz |!dId }!ta |! d@k r=|
|!dd@ dJz |!d@d }!ta |! d@k =|
|!d*z |
|!d*z d * | - dCd* } | , | ddd n # 1 swxY w Y t dK| z |S )Lz
Return
z Building module "%s"...
nameN f2py_version
interfacedrm block) interfacezabstract interfacez1buildmodule: Expected interface block. Skipping.
zKbuildmodule: Could not find the body of interfaced routine "%s". Skipping.
)fileentryargsemptygen buildpath
modulenamez( Generating possibly empty wrappers"
/coutputz Maybe empty "z-f2pywrappers2.f90"
z-f2pywrappers2.f90z-f2pywrappers.f"
z-f2pywrappers.fuserZ c H g | ] }|t v | S )typedef_need_dictvalues).0cvars d/builddir/build/BUILD/cloudlinux-venv-1.0.12/venv/lib64/python3.11/site-packages/numpy/f2py/rules.py
z buildmodule../ s< A A A4 !%6%=%=%?%? ? ? ? ? ? rl z buildmodule: unknown need %s.
r csrcwrj z z Wrote C/API module "z " to file "z"
dorestdocz module.restz.. -*- rest -*-
rg r_ z) ReST Documentation is saved to file "z
module.rest"
dolatexdocz
module.texltxz6%% This file is auto-generated with f2py (version:%s)
shortlatexzO\documentclass{article}
\usepackage{a4wide}
\begin{document}
\tableofcontents
r^ z\end{document}z$ Documentation is saved to file "z module.tex"
f2py_wrapper_outputfsrczC -*- fortran -*-
z8C This file is autogenerated with f2py (version:%s)
z>BE " ^bcdknku
w
w
w
w $ b==7 ))++
$
$1mB''L F F s#### $ $B 'r**Ez"
F - \*CDDD11Y 112288::: F M M M MNNNF??V???@@FFHHH J J J JKKKF<>E
GGENNN' ( =DEEE F
W\\ K "8C >tDD
+
+s ((((b(((((LLT****VVb[[QqTS[[LL3B3+!5666"##A a&&2++ QssVk%9::: bccF a&&2++ LLT****LLT****GGENN**<>>E
GGENNN+ , =DEEE Js^ "0Y Y"%Y"A\&&\*-\*/Baa
a>Fi ii4F>q>>rrstndr th)
r r c t j | \ } }t | \ }}|t _ | d }t | r#t
d| d d| d d nt
d| d z t j | }t i | }t D ]<}d|v r |d | sd|vr!t ||| }t || }=d \ } }
i } |D ]$} t j | || }t || rt }
nt }
t || smt! || s,| d
z } t# | t$ | d z z d z |d
< n1|
d
z }
t# |
t$ |
d z z dz |d
< nd|d
< || | < |
D ]S}d|v rd|v r |d || sd|vr-t |||| }t || }d|v r nT&|D ]} t || rt }
nt }
| | }|
D ]S}d|vrd|v r |d || sd|vr-t |||| }t || }d|v r nTd|| v rB|| d D ]3}||d< t t& ||| }t || }4t) |d t* r|d t) |d t* r|d t/ t1 d|d |d |d d |d< t/ t1 d|d |d d }|d k r)t/ t1 d d|d i |d!< n t1 d"|d |d# |d!< |d! d$d% |d&< |d& d'd( |d&< t/ t1 d)|d* |d+ d, }t3 |d+ d
k r0t/ t1 d-|d* |d+ d, |d.< n||d.< ||d*< t) |d/ t* r+t/ t1 d0d/|d/ i d1z |d/< g |d2< g |d3< d4D ]}||v r/t) || t* r|d2 || z |d2< d5|z }||v rPt) || t* r5|d3 || d6d
z d7gz || d
d z d8gz |d3< t t4 | }t | rt
d9|d: z nt
d;|d: z ||fS ) #> #**C68m9@+- +-#. #. $&&9#:#B#B3#N#NB #% $"")'#t"4"4
W ?$&}$5BObLcBe Be f f g gC
2! "##a''",W5Z<>} r? r@ rA rB rC rD rE rF rG rH rI rJ rK rL rM rN versionr
numpy_versionr sepdictr intenvirongetgenerationtimeasctimegmtimer r rL rC r rE rF rH r& rG r r r r ra sv" 2 2f ( " #
, A GAJJ RZ^^$7EEFF
'$,{t{>'B'BCC D
G * h/00+1*4+2 h=>>3?2B3 : h/00; 1:4; @ h9::A ;@>A#F h011G#2F5G&L h-..M&/L2M)R h344S)5R8S,X h344Y,5X8Y2d h455e26d9e5j h677k58j;k8p h.//q80p3q;v h788w;9v<w>| h@AA}>B|E}@@ h788A@9@<ACF h$%%GC&F()#Gk#V &3Wk3V 6WHR #)!') ) 3 _Q Q h /+151(EE'NNB7
7
p $-, .8 : 5 5 5 23G ; SL L
b' . 6F fVZ *D 2Dd %v &t .9$ ALT &t .;I
-d +D
3CD
+D 3CD ' "' "2' (5b' ;Nr' 2' $R' *0' =' ' .r' r ' .r ' 1 ' =!'" +#'$ B%' '& :''( :)'* 6+', ;-'. R/'. %b/'. +5b/'0 _1'4 : ;5'6 _7': 67;'< =='< #34H='> .?'@ 2A'B 6C'D RE' 'D ')2rb22BZ\ lEE'NNB?M' ' 'P 3'%(( C7! $uUU44+L+L%M%MuuUcOdOd e e hq $uUU?%;%;Z~I^I^ _ _ bS . -r !
E$$
NCC D D
:
E%%((*eeN6K6K L L
: E%%((. 9 9
:
uuTT/: > >??~AVAVWWYab
oq
r
? @
4
5
U44(.99
:
:C
E
= >
? +
% ee,=&>&>??G$ $J $uTT/>%J%J K K NV -r !
E$$77 8 8
:
:
#U44 #H#H I I L ttO^<<==QY?Z[
vx
y
7 8
U44(.99
:
:7
9
L
N
5 6
7 #
"W, ,Z $uTT/>%J%J K K NV -r !
E$$77 8 8
:
:
#U44 #H#H I I L ttO^<<==QY?Z[
vx
y
7 8
U44(.99
:
:7
9
L
N
5 6
7 #
$W, ,Z eM**J7%A )+=>@ %i1A B B E !&i7G1H1H I I L
! %
EE/$:$:;;# & %uUU44+L+L%M%MuuUcOdOd e e ht $uUU?%;%;Z~I^I^ _ _ bV -r !
E%%_j99::%''
)
);
E%%((*eeN6K6K L L;
8
)*R%)**,PR#EG
7 8
U44(.99
:
:M
O
5 6
7 #
U9 /
0
0q
s
U9ee$5 6 6
7
79} ~ @ ()st%''2#%:;%{3' 79 }--{;$&A5 / ??@@BXZ%
EE*:$;$;UU?=S=STT_0 0b h dd?J ? ?@@ P eeO 4 4jAAw
;79D H H ^ 9 , _ % 7 + . ,-M N ,-K L +[ 9 ( #C D R3 6 $(9333')?)?@@S* *X {w v wa
J !+"M#%:$o%'7 )+?)?*,<.0D,k]2K
" J "LMQ J! - x("$=>%%% "2"233 %$&%%% "2"2LAA )"$YZ 1+ y , 2\<4PQ
%%~!6!677 %%~!6!68HII
t(/::
$
(
/0B C _T
lI
I
@ "LMQ J! I
eJ(899=IeJ(899=I"$45 5-=>>AdBI>AdBI!%%% "2"2MBB iI
t !Z[%%% "2"233 sI
@ )"L%%
2C2C]S !hi !23 I
L : #& #& "45 "45 !9:$ ' *+cd% #344 KI
d $%~ uZ|)<)<== CE23
R%&% #344
cI
x HI% =11 wI
~ #$YZ% =11 }I
F #$Z[&' EI
N !hi MI
Z< < < # .
D
E U<z!2!2
3
3
J
L
.% eeJ&7&788,GI# YI
@
U:
J
L
- &w %
##\24% }I
d !#& #& "45 "45
U>55#4#4
5
5
J
L
*+_` !9~uuZ'8'899<I%"233 cI
D %%-00C I
H !jk G I
T 2G9E5 !?@ # +-? @ !;<
S I
n 8,/-0Q%!344 m I
@
c%!344 I
J
8,/-0Q% // I
I
\
c% // [
I
d
*\<,HI c
I
l
: #& #& "45 "45%!122
k
I
|
4D
>
? E
F
>
@
!79 ( !:;
3/b
O
U44 m44
5
5 82
3 U=%% "5"5
6
6G
I
K L
y= =y
I
x %%~!6!677w I
| %%~!6!68HII{ I
B
C
I
L
# M
I
V
$ W
I
`
( a
I
j
k
I
v
u
I
@ "
I
J /0B C II
^ !]^ o < %%% "2"233 o < P ; R = - DI I IZ DTdt DTdt5 5s s s s sr