a
    hÝEbÏë  ã                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œg d1¢d2d3gd4œZWd5d6d7d8d9d:d;d<d<ed=eBeƒd<id>œ
gZXeOd?d@dAdBdCdDdEg dF¢edGidHdIgdJgdKœZYddddddLdddddMddddddNœd<d<d<d<d<d<dOdPd<d<d<d<dQdRdSdTdUdVdWdXd<d<d<dYdZgd[d\gd]d^d_d`dad<d<d<d<d<d<d<d<d<d<d<d<d<edbeBeƒd<idcœ/ddded<eBe/ƒdfœdgdhd<e/dfœdieAeBeCe/e!ƒƒeBeƒƒdjeAeBe/ƒe!eBeƒƒdke/d<ed<ieBeCe/e!eƒƒdleAeBe/ƒe!eBeƒƒdmeAeBe/ƒeƒdnieAeBeCe/e!ƒƒeBeƒƒdoiedpgiedqie9driedsieBeCeeƒƒdtie9duiedvigeAe7eBe8ƒƒdwœdieBeCe/eƒƒdxed<ieBeCe/eƒƒdyednieBeCe/eƒƒdzieBeCe/eƒƒd{dog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ƒœdieBeCe/eƒƒdxed<ieBeCe/eƒƒdyednieBeCe/eƒƒd„ieBeCe/eƒƒd{dog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ƒƒdleAeBe/ƒe!eBeƒƒdmedni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ƒdoied—ie.d˜ie,d™igeBe$ƒdšied›eBeCee$ƒƒdœieAeeBe6ƒeBeƒƒd�œ	djeBeCe/e!ƒƒdleAeBe/ƒe!ƒdmidždŸgd d¡d¢d£d¤d¥d¦d‚d§edqie9d¨id©e9dªiedvied«id¬gdšdœd­g d®¢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Ìœg dÍ¢dËedÎiedÏi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dbigieAe1e&ƒdØedbigie'dˆeAee$ƒdbeAe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œg �d¢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œg �d)¢dÜe'�d*idËe�d+œ�d,�d-�d.�d/�d0�d1�d2eAee(ƒ�d3œ�d4eAee(ƒd<�dœ�d5�d-�d.�d/�d6�d1�d7eAee#ƒ�d3œ�d4eAee#ƒd<�dœedÎiedÏiged<dÑœ�de1dìie0dìie1�die0�dieAee&ƒ�d8œ�d9�d:e$�d;ie&�d<i�d=ee&�d>ie$�d?ie�d@i�dAgig�dBeBeCe'e$ƒƒ�dCieAe$eBe'ƒƒ�dDie�dEiged<�dFœ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�dGidË�dHœ�dI�dJ�dKeAe2eBeƒƒd<�dLœ�dM�dN�dOe4d<�dLœ�dP�dQ�dRed<�dSœ�dT�dU�dV�dWœgZ^�dX�dY„ Z_�dZ�d[�d\�d]�d]�d]�d]�d]�d]�d]�d^œ
Z`�d_�d`„ ZadS (a  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.hÚ
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Údocsignoptshortru   rv   rq   rr   rs   rt   rw   rx   ry   rz   Ú	args_capiÚ	keys_capiÚfunctyperI   rJ   rM   rN   rK   rn   rm   ro   rl   Ú	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#},Ú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_defrk   rl   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�   rk   rl   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‡   rs   ry   rl   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   rl   rM   rk   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);)r’   r•   Ú
STRINGFREE)
r“   r”   rH   r}   rl   r‰   rˆ   rO   rk   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");)rm   rn   ro   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   rk   z    #ctype# #varname# = 0;zmath.hz    #varname# = #init#;)rH   rk   rI   r�   z
,#varname#z#outvarname#,z#varrformat#)rˆ   rs   r‡   r‰   r�   z    #ctype# #varname#;z3    #varname#.r = #init.r#, #varname#.i = #init.i#;)rH   rI   r�   ú    #ctype# #varname# = NULL;ú    int slen(#varname#);zlen..)rH   rk   r�   )ú    #ctype# *#varname# = NULL;ú4    npy_intp #varname#_Dims[#rank#] = {#rank*[-1]#};ú&    const int #varname#_Rank = #rank#;Zforcombrg   r�   )rk   r�   Ú_dependzflen(#varname#),Ústring)r~   rk   r�   z'    /* Processing variable #varname# */)rI   rJ   rœ   rk   z#pydocsign#z\item[]{{}\verb@#pydocsign#@{}}z--- See above.)rr   rq   rs   rx   rw   ry   Zdependz"#varname#",z
#varname#,)r{   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Ž   rr   rt   rz   rx   rH   rŠ   r…   r†   rŒ   r‚   rƒ   r‹   rp   r}   rk   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   rk   r�   rœ   z6    fprintf(stderr,"#vardebugshowvalue#\n",#varname#);z&#varname#,)rH   rM   r}   rˆ   r�   )rk   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*/ztry_pyarr_from_#ctype#)	rH   r…   r†   r‚   rƒ   rM   rN   rk   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   rk   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ƒ   rk   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   rk   r�   )r—   r˜   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ˆ   rk   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#*/r–   z˜    f2py_success = try_pyarr_from_#ctype#(#varname#_capi, #varname#,
                                          slen(#varname#));
    if (f2py_success) {)r…   r†   r‚   rƒ   rM   rN   rk   r�   )r™   rš   r›   z-    PyArrayObject *capi_#varname#_tmp = NULL;z"    int capi_#varname#_intent = 0;z,capi_#varname#_tmp)rH   r}   rˆ   rk   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Ž   rr   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   rk   zQ    CHECKSCALAR(#check#,"#check#","#nth# #varname#","#varshowvalue#",#varname#) {z    } /*CHECKSCALAR(#check#)*/ZCHECKSCALAR)rI   rJ   rk   r�   Ú_breakzQ    CHECKSTRING(#check#,"#check#","#nth# #varname#","#varshowvalue#",#varname#) {z    } /*CHECKSTRING(#check#)*/ZCHECKSTRINGZ
CHECKARRAYz5    CHECKARRAY(#check#,"#check#","#nth# #varname#") {z    } /*CHECKARRAY(#check#)*/)rk   rI   rJ   r�   r¡   ZCHECKGENERICz7    CHECKGENERIC(#check#,"#check#","#nth# #varname#") {z    } /*CHECKGENERIC(#check#)*/)rk   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vrttd	ƒ qZ|
d D ]}|d |kr||}	 qZq|qZ|	sªtd
| ƒ qH|	g}d|	v 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v �r,tj| }nì|tjv �rDtj| }nÔ|tjv �r\tj| }n¼|tjv �rttj| }n¤|tjv �rŒtj| }nŒ|tjv �r¤tj| }nt|tjv �r¼tj| }n\|tjv �rÔtj| }nD|tjv �rìtj| }n,|tjv �rtj| }ntdt|ƒ ƒ �q
||  
|¡ �q
�qô| 
|¡ |D ]>}d|v �rX|d | ƒ�sbd|v�r<t||| ƒ}t||ƒ}�q<tt |ƒ}t!j" #t$d |d ¡}||d< t%|dƒ�&}| &|d  'dd¡¡ W d  ƒ n1 �sÜ0    Y  t d| d |f ƒ t$d �r€t!j" #t$d |d d ¡}t%|dƒ�.}| &d¡ | &d #|d ¡¡ W d  ƒ n1 �s^0    Y  t dt$d |d f ƒ t$d  �r:t!j" #t$d |d d! ¡}||d"< t%|dƒ�Z}| &d#t ¡ d$t$v�rî| &d%¡ | &d #|d& ¡¡ d$t$v�r| &d'¡ W d  ƒ n1 �s0    Y  t d(t$d |d f ƒ |�rŽt!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|�r4|d/ d2k�r4t*|ƒd1k�r$| 
|dd1… d3 ¡ |d1d… }�qð| 
|d ¡ n| 
|d ¡ �q¦d #|¡ 'd4d¡}| &|¡ W d  ƒ n1 �sx0    Y  t d5| ƒ |�rt!j" #t$d d6|d  ¡}||d*< t%|dƒ��0}| &d7¡ | &d8t ¡ | &d9¡ g }d. #|¡d  (d¡D ]È}d/| )d0¡  k�r d:k �r4n n| 
|d ¡ n�t*|ƒd:k�r¶|d/ d2k�r¶| 
|dd:… d; ¡ |d:d… }t*|ƒd1k�r¦| 
|dd1… d; ¡ |d1d… }�qr| 
|d ¡ n| 
|d ¡ �qþd #|¡ 'd4d¡}| &|¡ W d  ƒ n1 �sú0    Y  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×   úP/home/ja/django-apps/lartica_env/lib/python3.9/site-packages/numpy/f2py/rules.pyÚbuildmoduleš  s\   
ÿ









"
6
ÿ
4ÿ
ÿÿ
ÿ
*ÿ
ÿÿ"*ÿ
ÿÿ"*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|v rŠ|d | ƒs’d|v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|v �rt�qbd|v �r�|d || ƒ�sšd|v�rbt
|||| ƒ}t||ƒ}d|v �rb qº�qbqº|D ]Ô}t|| ƒ�rät}nt}|| }|D ]d}d|v�r�qôd|v �r"|d || ƒ�s,d|v�rôt
|||| ƒ}t||ƒ}d|v �rô �qZ�qôd|| v �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 ]Ž}||v �rVt|| tƒ�rV|d0 ||  |d0< d3| }||v �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 keywordÚ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 = ru   rv   )rq   rr   rs   rt   Úlatexr   z\begin{description}z\end{description}z              %s
ri   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þûûûýê" ;ÿ