U
    M»{jÏë  ã                2   @   s´  d Z ddlZddlZddlZddlmZ ejZejZddl	m
Z
mZmZmZmZmZmZmZmZmZmZmZmZmZmZmZmZmZmZmZmZmZm Z m!Z!m"Z"m#Z#m$Z$m%Z%m&Z&m'Z'm(Z(m)Z)m*Z*m+Z+m,Z,m-Z-m.Z.m/Z/m0Z0m1Z1m2Z2m3Z3m4Z4m5Z5m6Z6m7Z7m8Z8m9Z9m:Z:m;Z;m<Z<m=Z=m>Z>m?Z?m@Z@mAZAmBZBmCZCmDZDmEZEmFZFmGZG ddlmHZH ddlmIZI ddlmJZJ dd	lmKZK dd
lmLZL ddlmMZM i ZNi ZOdD ]ZPdeOeP< �qˆeQejR Sde ¡ ¡ƒZTde Ue VeT¡¡ d edƒ d edƒ d edƒ d edƒ d edƒ d edƒ d edƒ d edƒ d  ed!ƒ d" ed#ƒ d$ ed%ƒ d& ed'ƒ d( ed)ƒ d* ed+ƒ d, ed-ƒ d. e d/ d*d*d0œd1d2d3gd4d5gd6œZWd7d8d9d:d;d<d=d>d>ed?eBeƒd>id@œ
gZXeOdAdBdCdDdEdFdGdHdIdJgedKidLdMgdNgdOœZYddddddPdddddQddddddRœd>d>d>d>d>d>dSdTd>d>d>d>dUdVdWdXdYdZd[d\d>d>d>d]d^gd_d`gdadbdcddded>d>d>d>d>d>d>d>d>d>d>d>d>edfeBeƒd>idgœ/dhdid>eBe/ƒdjœdkdld>e/djœdmeAeBeCe/e!ƒƒeBeƒƒdneAeBe/ƒe!eBeƒƒdoe/d>ed>ieBeCe/e!eƒƒdpeAeBe/ƒe!eBeƒƒdqeAeBe/ƒeƒdrieAeBeCe/e!ƒƒeBeƒƒdsiedtgieduie9dviedwieBeCeeƒƒdxie9dyiedzigeAe7eBe8ƒƒd{œdmeBeCe/eƒƒd|ed>ieBeCe/eƒƒd}edrieBeCe/eƒƒd~ieBeCe/eƒƒddsgied€gied�ie9d‚ieBeCeeƒƒdƒied„ie9d…ied†iged‡œdmeBeCe/eƒƒd|ed>ieBeCe/eƒƒd}edrieBeCe/eƒƒdˆieBeCe/eƒƒddsgied€gied�ie9d‚ieBeCeeƒƒdƒied„ie9d…ied†ige8d‡œd‰eBe$ƒdŠid‹dŒed�igeAee6ƒdŽieAeeBe6ƒƒd�igeAeeBeƒƒd�œeAeBeCe/e!ƒƒeBeƒƒd‘eAeBe/ƒe!eBeƒƒd’ed>ieAeBeCe/e!ƒƒeBeƒƒdpeAeBe/ƒe!eBeƒƒdqedried“eBeƒd”ied•iged�ie9d‚ied–ieBeCeeƒƒd—ie9d…ied†ieAeeƒd˜ieAeeBeƒƒd™igedšieBeƒdsied›ie.dœie,d�igeBe$ƒdžiedŸeBeCee$ƒƒd ieAeeBe6ƒeBeƒƒd¡œ	dneBeCe/e!ƒƒdpeAeBe/ƒe!ƒdqid¢d£gd¤d¥d¦d§d¨d©dªd†d«eduie9d¬id­e9d®iedzied¯id°gdžd d±dsd‰d²geAe6eBeƒƒd³œ
d´dµd¶ed·œg
ZZe-dœe+d�e*d¸e;d¹e?dºe:d»e=d¼e<d¹e@dºe>d¼e3dœiZ[d½eOid¾ed¿igdÀe[dÁœdÂedÃiedÄieAe2eBeƒƒdÅœdÆd‹dÇdÈeAe2eBeƒe'ƒdÉœdÊedËiedÌœdÍdÎgdÏge4dÐœdÑdÒdÓgdÏedÔiedIigedÐœdÕeAeeBeƒƒidÕeAeeBeƒe&ƒid‰ed>dÖœd‰e<d>dÖœd‰e@d>dÖœd‰e>d>dÖœd‰ed>dÖœed×idØe5dÙœgZ\d½eOidÚed¿igdÀd>e[dÛœeAe0e&ƒdÜieAe1e&ƒdÜie'd‹ieAe0e&ƒdÝedfigieAe1e&ƒdÝedfigie'dŒeAee$ƒdfeAee&ƒdÞigid>dßœdàdáeAe&eBe0ƒƒdâœdàdãdáeAe&e0ƒdäœdÇdÈe'dåœe&dæie&dçie&dèidédêe&dëidìdídîeBe"ƒdïige&dðie1dñie0dñie&dòie1dóie0dóidôdõeBe"ƒdöid÷døgedùœeBe"ƒdúie"dûidüedýeBe"ƒdþigidÿg�d �d�dged>�dœdÂe�die!dáeBe!ƒ�die'dÆieAe2eBeƒƒ�dœedÃieAe2eBeƒƒ�dœ�de1dñie0dñie1�d	ie0�d	ie%�d
ie%�die%�dieAe2eBeƒe&ƒ�dœ	e�d�dd>ieAe0eBeƒƒ�d�dd>ieBe)ƒ�die)�dig�deBe)ƒ�dieAe2eBeƒe&ƒd>�dœedÄie[eAe2eBeƒe$ƒd>�dœe�dieAe2eBeƒƒd>�dœdÊe!dáeBe!ƒ�die�die'�die�dœ�de1dñie0dñie1�d	ie0�d	ie%�die%�die%�dieAee&ƒ�dœ	e�dieAe0eBeƒƒ�di�dg�d�dgeAee&ƒd>�dœe'�dieAee$ƒ�dœedËieAee$ƒd>�dœe'�d id›ge�d!œe�died>�dœdÍdÎ�dgdá�d"e�d#ieAe'eBe!ƒƒ�d$ige'dÆidÏeAe'eBe!ƒƒ�d%ige4�d&œ�d'eBe!ƒ�d(ig�d)�ddÏd²eBe!ƒ�d%ige4d>�dœe1dñie0dñie1�d	ie0�d	ieAe%eBe!ƒƒ�d$ie%�d*ige%�die%�deAe%eBe!ƒƒ�d%ieAe4e&ƒ�d+œdÕeAe4e$ƒie�d#ie4d>�dœdÑdÒdÓ�d,�d-gdáe'�d.idÏe�d/œ�d0�d1�d2�d3�d4�d5�d6eAee(ƒ�d7œ�d8eAee(ƒd>�dœ�d9�d1�d2�d3�d:�d5�d;eAee#ƒ�d7œ�d8eAee#ƒd>�dœedÔiedIiged>dÖœ�de1dñie0dñie1�d	ie0�d	ieAee&ƒ�d<œ�d=�d>e$�d?ie&�d@i�dAee&�dBie$�dCie�dDi�dEgig�dFeBeCe'e$ƒƒ�dGieAe$eBe'ƒƒ�dHie�dIiged>�dJœdÕeAeeBeƒƒidÕeAeeBeƒe&ƒid‰ed>dÖœd‰e<d>dÖœd‰e@d>dÖœd‰e>d>dÖœd‰ed>dÖœed×idØe5dÙœg*Z]e�dKidÏ�dLœ�dM�dN�dOeAe2eBeƒƒd>�dPœ�dQ�dR�dSe4d>�dPœ�dT�dU�dVed>�dWœ�dX�dY�dZ�d[œgZ^�d\�d]„ Z_�d^�d_�d`�da�da�da�da�da�da�da�dbœ
Z`�dc�dd„ ZadS (e  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 <pearu@ioc.ee>
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é   )Ú__version__)>Ú
applyrulesÚ	debugcapiÚ
dictappendÚerrmessÚgentitleÚgetargs2ÚhascallstatementÚhasexternalsÚhasinitvalueÚhasnoteÚhasresultnoteÚisarrayÚisarrayofstringsÚ	iscomplexÚiscomplexarrayÚiscomplexfunctionÚiscomplexfunction_warnÚisdummyroutineÚ
isexternalÚ
isfunctionÚisfunction_wrapÚisint1arrayÚisintent_auxÚ
isintent_cÚisintent_callbackÚisintent_copyÚisintent_hideÚisintent_inoutÚisintent_nothideÚisintent_outÚisintent_overwriteÚ	islogicalÚislong_complexÚislong_doubleÚislong_doublefunctionÚislong_longÚislong_longfunctionÚismoduleroutineÚ
isoptionalÚ
isrequiredÚisscalarÚissigned_long_longarrayÚisstringÚisstringarrayÚisstringfunctionÚissubroutineÚissubroutine_wrapÚisthreadsafeÚ
isunsignedÚisunsigned_charÚisunsigned_chararrayÚisunsigned_long_longÚisunsigned_long_longarrayÚisunsigned_shortÚisunsigned_shortarrayÚl_andÚl_notÚl_orÚoutmessÚreplaceÚ
stripcommaÚrequiresf90wrapper)Ú	capi_maps)Úcfuncs)Úcommon_rules)Ú	use_rules)Úf90mod_rules)Ú	func2subr)ÚdeclÚ	frompyobjÚcleanupfrompyobjÚtopyarrÚmethodÚ	pyobjfromÚclosepyobjfromÚfreememÚuserincludesÚ	includes0ÚincludesÚtypedefsÚtypedefs_generatedÚ	cppmacrosrC   Ú	callbacksÚlatexdocÚrestdocÚroutine_defsÚexternroutinesÚinitf2pywraphooksÚcommonhooksÚinitcommonhooksÚf90modhooksÚinitf90modhooksÚ
Ú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 <pearu@cens.ioc.ee>.
 * Generation date: zÇ
 * 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 */

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#

zSee 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
)rW   rX   z*\section{Module \texttt{#texmodulename#}}
z
#modnote#
z
#latexdoc#zdModule #modulename#
================================================================================z

#restdoc#)Ú
modulebodyÚseparatorsforrW   rX   z/*eof body*/z/*eof method*/z/*eof externroutines*/z/*eof routine_defs*/z/*eof initf90modhooks*/z/*eof initf2pywraphooks*/z/*eof initcommonhooks*/Ú z#note#)
ÚbodyrL   rZ   rY   r_   r[   r]   rW   rX   Z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.hZ
CFUNCSMESSZMINMAXz#define DEBUGCFUNCSz1\subsection{Wrapper function \texttt{#texname#}}
zk
\noindent{{}\verb@#docreturn##name#@{}}\texttt{(#latexdocsignatureshort#)}
#routnote#

#latexdocstrsigns#
zlWrapped function ``#name#``
--------------------------------------------------------------------------------)rd   rf   rY   r[   rZ   ÚdocÚdocshortÚdocsÚneedrU   rW   rX   z || z\n"
")ÚcallfortranroutineÚroutdebugenterrH   ÚroutdebugleaveÚroutdebugfailureÚ	setjmpbufÚ	docstrreqÚ	docstroptÚ	docstroutÚ	docstrcbsÚdocstrsignsÚlatexdocstrsignsÚlatexdocstrreqÚlatexdocstroptÚlatexdocstroutÚlatexdocstrcbsz/*decl*/z/*freemem*/z\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:z/*frompyobj*/z/*end of cleanupfrompyobj*/z/*pyobjfrom*/z/*end of closepyobjfrom*/z/*topyarr*/z/*routdebugleave*/z/*routdebugenter*/z/*routdebugfailure*/z/*callfortranroutine*/z
--- #note#)/rd   ÚkwlistÚ	kwlistoptÚcallfortranÚcallfortranappendÚdocsignÚ
docsignoptrH   rO   ZdocsignshortÚdocsignoptshortrt   ru   rp   rq   rr   rs   rv   rw   rx   ry   Ú	args_capiÚ	keys_capiÚfunctyperI   rJ   rM   rN   rK   rm   rl   rn   rk   Ú	argformatÚ	keyformatZneed_cfuncsÚ	docreturnÚreturnÚreturnformatZrformatÚkwlistxaÚkeys_xaÚxaformatÚ	docsignxaÚdocsignxashortÚinitf2pywraphookZroutnotezf2py_rout_#modulename#_#name#z#modulename#.#name#)ZapinameZpynamerH   Ú_checkz-f2py_rout_#modulename#_#f90modulename#_#name#z##modulename#.#f90modulename#.#name#ÚvoidzGextern void #F_FUNC#(#fortranname#,#FORTRANNAME#)(#callprotoargument#);z/extern void #fortranname#(#callprotoargument#);zq    {"#name#",-1,{{-1}},0,(char *)#F_FUNC#(#fortranname#,#FORTRANNAME#),(f2py_init_func)#apiname#,doc_#apiname#},zY    {"#name#",-1,{{-1}},0,(char *)#fortranname#,(f2py_init_func)#apiname#,doc_#apiname#},zH    {"#name#",-1,{{-1}},0,NULL,(f2py_init_func)#apiname#,doc_#apiname#},Z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_defrj   rk   r�   zFextern void #F_WRAPPEDFUNC#(#name_lower#,#NAME#)(#callprotoargument#);zp    {"#name#",-1,{{-1}},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);
    }
    Z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Ž   rj   rk   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);
    }
    z#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†   rr   rx   rk   r�   zJextern #ctype# #F_FUNC#(#fortranname#,#FORTRANNAME#)(#callprotoargument#);z2extern #ctype# #fortranname#(#callprotoargument#);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);zpyobj_from_#ctype#1Z	long_longZlong_doublez	#rformat#z,#name#_return_value_capiz,#name#_return_value)	r‘   r’   rH   rk   rM   rj   rˆ   r‡   r�   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);Z
STRINGFREE)
r‘   r’   rH   r|   rk   rˆ   r‡   rO   rj   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");)rl   rm   rn   r�   Zcomplex_long_doubleZunsigned_charZunsigned_shortZunsignedZunsigned_long_longrd   z1    /* Processing auxiliary variable #varname# */z'    fprintf(stderr,"#vardebuginfo#\n");z,    /* End of cleaning variable #varname# */)rI   rJ   rj   z    #ctype# #varname# = 0;zmath.hz    #varname# = #init#;)rH   rj   rI   r�   z
,#varname#z#outvarname#,z#varrformat#)r‡   rr   r†   rˆ   r�   z    #ctype# #varname#;z3    #varname#.r = #init.r#, #varname#.i = #init.i#;)rH   rI   r�   z    #ctype# #varname# = NULL;z    int slen(#varname#);zlen..)rH   rj   r�   z    #ctype# *#varname# = NULL;z4    npy_intp #varname#_Dims[#rank#] = {#rank*[-1]#};z&    const int #varname#_Rank = #rank#;Zforcombr�   )rj   r�   Ú_dependzflen(#varname#),Ústring)r}   rj   r�   z'    /* Processing variable #varname# */)rI   rJ   r“   rj   z#pydocsign#z\item[]{{}\verb@#pydocsign#@{}}z--- See above.)rq   rp   rr   rw   rv   rx   Zdependz"#varname#",z
#varname#,)rz   r~   r�   z#varname#=#showinit#,)r{   r   r€   r�   )r†   rˆ   r�   z#varname#_extra_args=(),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;z"#varname#_extra_args",ÚOzO!z,&#varname#_cb.capiz!,&PyTuple_Type,&#varname#_xa_capiz(setjmp(#varname#_cb.jmpbuf))z#varname#_cptr,z#cbname#zsetjmp.h)rŒ   r�   rq   rs   ry   rw   rH   r‰   r„   r…   r‹   r�   r‚   rŠ   ro   r|   rj   r�   z�if(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);
    }ZSWAPZcreate_cb_arglist)rI   rJ   rj   r�   r“   z6    fprintf(stderr,"#vardebugshowvalue#\n",#varname#);z&#varname#,)rH   rM   r|   r‡   r�   )rj   r�   z'    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*/ztry_pyarr_from_#ctype#)	rH   r„   r…   r�   r‚   rM   rN   rj   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)rI   rj   r�   r“   )rI   r�   r“   zD    fprintf(stderr,"#vardebugshowvalue#\n",#varname#.r,#varname#.i);z,#varname#_capi)rH   r|   rM   r‡   r�   ze        f2py_success = try_pyarr_from_#ctype#(#varname#_capi,&#varname#);
        if (f2py_success) {z6        } /*if (f2py_success) of #varname# pyobjfrom*/)	rH   r„   r…   r�   r‚   rj   rM   rN   r�   zW    if (#varname#_capi==Py_None) {#varname#.r = #init.r#, #varname#.i = #init.i#;} elsez3    }  /*if (f2py_success) of #varname# frompyobj*/)rH   r�   z4    #varname#_capi = pyobj_from_#ctype#1(#varname#);)rM   rj   r�   zslen(#varname#),zF    fprintf(stderr,"#vardebugshowvalue#\n",slen(#varname#),#varname#);z:        STRINGPADN(#varname#, slen(#varname#), ' ', '\0');Z
STRINGPADN)rH   r|   r}   rM   r‡   rj   r�   zå    slen(#varname#) = #length#;
    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#*/z˜    f2py_success = try_pyarr_from_#ctype#(#varname#_capi, #varname#,
                                          slen(#varname#));
    if (f2py_success) {)r„   r…   r�   r‚   rM   rN   rj   r�   z-    PyArrayObject *capi_#varname#_tmp = NULL;z"    int capi_#varname#_intent = 0;z,capi_#varname#_tmp)rH   r|   r‡   rj   r�   z%    int capi_overwrite_#varname# = 1;z"overwrite_#varname#",Úiz,&capi_overwrite_#varname#zoverwrite_#varname#=1,zoverwrite_#varname#,z9overwrite_#varname# : input int, optional\n    Default: 1)rH   r‰   r‹   rŠ   rŒ   r�   rq   r�   zK    capi_#varname#_intent |= (capi_overwrite_#varname#?0:F2PY_INTENT_COPY);z%    int capi_overwrite_#varname# = 0;zoverwrite_#varname#=0,z9overwrite_#varname# : input int, optional\n    Default: 0)rH   r„   r…   r�   r‚   r�   z    #setdims#;z&    capi_#varname#_intent |= #intent#;zo    capi_#varname#_tmp = array_from_pyobj(#atype#,#varname#_Dims,#varname#_Rank,capi_#varname#_intent,Py_None);zv    capi_#varname#_tmp = array_from_pyobj(#atype#,#varname#_Dims,#varname#_Rank,capi_#varname#_intent,#varname#_capi);av      if (capi_#varname#_tmp == NULL) {
        PyObject *exc, *val, *tb;
        PyErr_Fetch(&exc, &val, &tb);
        PyErr_SetString(exc ? exc : #modulename#_error,"failed in converting #nth# `#varname#' of #pyname# to C/Fortran array" );
        npy_PyErr_ChainExceptionsCause(exc, val, tb);
    } else {
        #varname# = (#ctype# *)(PyArray_DATA(capi_#varname#_tmp));
z$    if (#varname#_capi == Py_None) {z    {z        #ctype# capi_c;ay          int *_i,capi_i=0;
        CFUNCSMESS("#name#: Initializing #varname#=#init#\n");
        if (initforcomb(PyArray_DIMS(capi_#varname#_tmp),PyArray_NDIM(capi_#varname#_tmp),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) {z@    }  /*if (capi_#varname#_tmp == NULL) ... else of #varname#*/zb    if((PyObject *)capi_#varname#_tmp!=#varname#_capi) {
        Py_XDECREF(capi_#varname#_tmp); }z'        Py_XDECREF(capi_#varname#_tmp);z.    }  /*if (f2py_success) of #varname# init*/)rI   rJ   r�   r“   z6    fprintf(stderr,"debug-capi:Checking `#check#'\n");)rI   rj   zQ    CHECKSCALAR(#check#,"#check#","#nth# #varname#","#varshowvalue#",#varname#) {z    } /*CHECKSCALAR(#check#)*/ZCHECKSCALAR)rI   rJ   rj   r�   Ú_breakzQ    CHECKSTRING(#check#,"#check#","#nth# #varname#","#varshowvalue#",#varname#) {z    } /*CHECKSTRING(#check#)*/ZCHECKSTRINGZ
CHECKARRAYz5    CHECKARRAY(#check#,"#check#","#nth# #varname#") {z    } /*CHECKARRAY(#check#)*/)rj   rI   rJ   r�   r—   ZCHECKGENERICz7    CHECKGENERIC(#check#,"#check#","#nth# #varname#") {z    } /*CHECKGENERIC(#check#)*/)rj   rI   rJ   c               	   C   s¤  t d| d  ƒ i }tdd… }t | ¡}tdti|ƒ}g }g }| d D �]}d}	| d D ]<}
|
d dkrttd	ƒ qZ|
d D ]}|d |kr||}	 qZq|qZ|	sªtd
| ƒ qH|	g}d|	krø|	d  ¡ D ]2\}}t 	|	¡}|d= ||d< ||d< | 
|¡ qÄ|D ]N}	t|	ƒ}t|	ƒ\}}|�r6|�r,| 
|¡ n
| 
|¡ t||ƒ}t||ƒ}qüqHt | ¡\}}|�rl| 
|¡ t||ƒ}t||ƒ}t | ¡\}}|�rž| 
|¡ t||ƒ}t||ƒ}|D ](}t || d |d  ¡}t||ƒ}�q¶t ¡ }i }| ¡ D �]6}g ||< || D �]}d}|tjk�r,tj| }nì|tjk�rDtj| }nÔ|tjk�r\tj| }n¼|tjk�rttj| }n¤|tjk�rŒtj| }nŒ|tjk�r¤tj| }nt|tjk�r¼tj| }n\|tjk�rÔtj| }nD|tjk�rìtj| }n,|tjk�rtj| }ntdt|ƒ ƒ �q
||  
|¡ �q
�qô| 
|¡ |D ]>}d|k�rX|d | ƒ�sbd|k�r<t||| ƒ}t||ƒ}�q<tt |ƒ}t!j" #t$d |d ¡}||d< t%|dƒ�}| &|d  'dd¡¡ W 5 Q R X t d| d |f ƒ t$d �rTt!j" #t$d |d d ¡}t%|dƒ�$}| &d¡ | &d #|d ¡¡ W 5 Q R X t dt$d |d f ƒ t$d  �røt!j" #t$d |d d! ¡}||d"< t%|dƒ�P}| &d#t ¡ d$t$k�rÂ| &d%¡ | &d #|d& ¡¡ d$t$k�rÖ| &d'¡ W 5 Q R X t d(t$d |d f ƒ |�r4t!j" #t$d |d) ¡}||d*< t%|dƒ�ü}| &d+¡ | &d,t ¡ | &d-¡ g }d. #|¡d  (d¡D ]ž}d/| )d0¡  k�r„d1k �r˜n n| 
|d ¡ nf|�rð|d/ d2k�rðt*|ƒd1k�rà| 
|dd1… d3 ¡ |d1d… }�q¬| 
|d ¡ n| 
|d ¡ �qbd #|¡ 'd4d¡}| &|¡ W 5 Q R X t d5| ƒ |�r t!j" #t$d d6|d  ¡}||d*< t%|dƒ��&}| &d7¡ | &d8t ¡ | &d9¡ g }d. #|¡d  (d¡D ]È}d/| )d0¡  k�rÆd:k �rÚn n| 
|d ¡ n�t*|ƒd:k�r\|d/ d2k�r\| 
|dd:… d; ¡ |d:d… }t*|ƒd1k�rL| 
|dd1… d; ¡ |d1d… }�q| 
|d ¡ n| 
|d ¡ �q¤d #|¡ 'd4d¡}| &|¡ W 5 Q R X t d<| ƒ |S )=z
    Return
    z    Building module "%s"...
ÚnameNÚf2py_versionZ
interfacedrf   Úblock)Z	interfacezabstract interfacez1buildmodule: Expected interface block. Skipping.
zLbuildmodule: Could not found the body of interfaced routine "%s". Skipping.
ÚentryÚargsZusere   zbuildmodule: unknown need %s.
r�   Z	buildpathZcoutputZcsrcÚwrc   ú	z  z)    Wrote C/API module "%s" to file "%s"
Z	dorestdocÚ
modulenamezmodule.restz.. -*- rest -*-
r`   rX   z;    ReST Documentation is saved to file "%s/%smodule.rest"
Z
dolatexdocz
module.texZltxz6%% This file is auto-generated with f2py (version:%s)
Z
shortlatexzO\documentclass{article}
\usepackage{a4wide}
\begin{document}
\tableofcontents

rW   z\end{document}z5    Documentation is saved to file "%s/%smodule.tex"
Zf2py_wrapper_outputÚfsrczC     -*- fortran -*-
z8C     This file is autogenerated with f2py (version:%s)
z<C     It contains Fortran 77 wrappers to fortran functions.
rb   r   ú!éB   ú z
     &z
     &
z*    Fortran 77 wrappers are saved to "%s"
z%s-f2pywrappers2.f90z!     -*- f90 -*-
z8!     This file is autogenerated with f2py (version:%s)
z<!     It contains Fortran 90 wrappers to fortran functions.
éH   z&
     &z*    Fortran 90 wrappers are saved to "%s"
)+r>   Údefmod_rulesrB   Zmodsign2mapr   r™   r   ÚitemsÚcopyÚdeepcopyÚappendrA   Úbuildapir   rD   Z
buildhooksrF   rE   ZbuildusevarsrC   Z	get_needsÚkeysrQ   rR   rP   rS   rT   rU   rV   r^   r\   ÚreprÚmodule_rulesÚosÚpathÚjoinÚoptionsÚopenÚwriter?   ÚsplitÚfindÚlen) ÚmZumÚretZ	mod_rulesÚvrdÚrdZfuncwrappersZfuncwrappers2ÚnÚnbZbiÚbZnb_listÚkÚaZnb1Zisf90ÚapiÚwrapÚarÚcrÚmrÚuZneedsÚcodeÚcÚrÚfnÚfZwnÚlinesÚl© rÍ   úO/var/www/html/bwave/python/venv/lib/python3.8/site-packages/numpy/f2py/rules.pyÚbuildmoduleš  sb   
ÿ









"
 
 
ÿ
ÿ
 
ÿÿ
ÿ
ÿ
ÿÿ" 
ÿ
ÿÿ"rÏ   ÚstÚndrº   Úth)
r   é   é   é   é   é   é   é   é	   r   c                 C   sò  t  | ¡\} }t| ƒ\}}|t_| d }t| ƒrJtd| d | d f ƒ ntd| d  ƒ t | ¡}ti |ƒ}t	D ]6}d|krŠ|d | ƒs’d|krrt
||| ƒ}t||ƒ}qrd\}	}
i }|D �]
}t ||| ¡}t|| ƒrât}ntt}t|| ƒ�sNt|| ƒ�s(|	d }	t|	ƒt|	d	   d
 |d< n$|
d }
t|
ƒt|
d	   d |d< nd|d< |||< |D ]b}d|k�rt�qbd|k�r�|d || ƒ�sšd|k�rbt
|||| ƒ}t||ƒ}d|k�rb qº�qbqº|D ]Ô}t|| ƒ�rät}nt}|| }|D ]d}d|k�r�qôd|k�r"|d || ƒ�s,d|k�rôt
|||| ƒ}t||ƒ}d|k�rô �qZ�qôd|| k�rÌ|| d D ](}||d< t
t||| ƒ}t||ƒ}�qt�qÌt|d tƒ�r¾|d  ¡  t|d tƒ�rÚ|d  ¡  ttd|d |d |d dœƒƒ|d< ttd|d |d dœƒƒ}|dk�rBttdd|d iƒƒ|d< ntd |d |d!œƒ|d< |d  d"d#¡|d$< |d$  d%d&¡|d$< ttd'|d( |d) d*œƒƒ}t|d) ƒdk�rÒttd+|d( |d) d*œƒƒ|d,< n||d,< ||d(< t|d- tƒ�rttd.d-|d- iƒƒd/ |d-< g |d0< g |d1< d2D ]Ž}||k�rVt|| tƒ�rV|d0 ||  |d0< d3| }||k�r$t|| tƒ�r$|d1 || d4d…  d5g || dd …  d6g |d1< �q$t
t|ƒ}t| ƒ�rÚtd7|d8  ƒ ntd9|d8  ƒ ||fS ):NÚvarsz5            Constructing wrapper function "%s.%s"...
rŸ   r˜   z.        Constructing wrapper function "%s"...
r�   )r   r   r   é
   z	 argumentÚnthz keywordZhiddenr“   r—   ÚcheckrJ   rN   z #docsign##docsignopt##docsignxa#r~   r   rŒ   )r~   r   rŒ   Zdocsignaturez#docsignopt##docsignxa#r�   r€   )rŒ   r   re   z	#docsign#Zdocsignatureshortz#docsign#[#docsignopt#])r~   r   Ú_z\_Zlatexdocsignatureshortú,z, z #callfortran##callfortranappend#r|   r}   )r|   r}   z##callfortran# 0,#callfortranappend#Zcallcompaqfortranr†   z#docreturn#z = rt   ru   )rp   rq   rr   rs   Úlatexr   z\begin{description}z\end{description}z              %s
rh   z          %s
)rG   Zassubrr	   rB   Údepargsr)   r>   Zroutsign2mapr   Ú
rout_rulesr   Zsign2mapr   Ú	aux_rulesÚ	arg_rulesr   r*   r¬   ÚstndÚcheck_rulesÚ
isinstanceÚlistÚreverser@   r?   r¶   Úroutine_rules)ÚroutrÁ   rœ   râ   Úvarr¹   rº   rÈ   rÂ   rÝ   ZnthkZsavevrdr¿   Z_rulesrÇ   ZoptargsÚcfsr¾   rÍ   rÍ   rÎ   rª   X  sö    ÿ



&



&


þÿ
ÿÿ
ÿ
ÿÿÿ ÿ ÿ
 ÿÿÿÿÿþ

rª   )bÚ__doc__r®   Útimer§   re   r   Úversionr™   Znumpy_versionZauxfuncsr   r   r   r   r   r	   r
   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r    r!   r"   r#   r$   r%   r&   r'   r(   r)   r*   r+   r,   r-   r.   r/   r0   r1   r2   r3   r4   r5   r6   r7   r8   r9   r:   r;   r<   r=   r>   r?   r@   rA   rB   rC   rD   rE   rF   rG   r±   Zsepdictr¾   ÚintÚenvironÚgetZgenerationtimeÚasctimeÚgmtimer­   r¥   rë   rã   Ztypedef_need_dicträ   rå   rç   rÏ   ræ   rª   rÍ   rÍ   rÍ   rÎ   Ú<module>   s”  3ÿ ûûïïëëççääáá"Þ"Þ%Û%Û(Ø(Ø.Ò.Ò1Ï1Ï4Ì4Ì7É7É:Æ:Æ<Ä<Ä?Á?Ág™g™ ÿþÿ€ õ ÷ÿ8ÿ·R      ù	                   Ú(üü   ý  þÿÿóå ÿ ÿÿÿÿóÛ' ÿ ÿÿÿÿóÛ'
ÿùï  þ  þ ÿÿþÿÿñ
ý
 ÿÚ(ýÿÿç×,ü€ ‚  
          ö ÿÿüüû	ýÿû	þú
 ÿ ÿþþþþþý±X ÿÿû	
ÿ
ÿ
 ÿÿõýüýÿý
é

ýØ-
Ë9ûþõ ÿ ÿéà"üýûõÿý÷þýýýþÿÿûÿïÿøÿîÿý ÿñ ÿýüöø
ýø
ýýúÿÿ	ÿûñ%ÿù	Ñ3 ÿ ÿþþþþþý€ € € Ö   8þûûûýê" ;    ÿ