B
    G0d              2   @   sT  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 ZOxdD ]ZPdeOeP< qW eQejRSd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dgiedie9dieBeCeediedie9diedigeddmeBeCe/ed|ed>ieBeCe/ed}edrieBeCe/edieBeCe/eddsgiedgiedie9dieBeCeediedie9diedige8ddeBe$diddedigeAee6dieAeeBe6digeAeeBedeAeBeCe/e!eBedeAeBe/e!eBeded>ieAeBeCe/e!eBedpeAeBe/e!eBedqedriedeBediedigedie9diedieBeCeedie9diedieAeedieAeeBedigedieBedsiedie.die,digeBe$diedeBeCee$dieAeeBe6eBed	dneBeCe/e!dpeAeBe/e!dqiddgdddddddddeduie9dide9diedziedidgddddsddgeAe6eBed
dddedg
ZZe-de+de*de;de?de:de=de<de@de>de3diZ[deOidedigde[ddediedieAe2eBedŜddddeAe2eBee'dɜdedied̜ddgdge4dМdddgdediedIigedМdeAeeBeideAeeBee&ided>d֜de<d>d֜de@d>d֜de>d>d֜ded>d֜edide5dٜgZ\deOidedigdd>e[dۜeAe0e&dieAe1e&die'dieAe0e&dedfigieAe1e&dedfigie'deAee$dfeAee&digid>dߜddeAe&eBe0ddddeAe&e0ddde'de&die&die&didde&didddeBe"dige&die1die0die&die1die0diddeBe"diddgedeBe"die"didedeBe"digidgd ddged>ddedie!deBe!die'dieAe2eBededieAe2eBedde1die0di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die[eAe2eBee$d>dedieAe2eBed>dde!deBe!diedie'diedde1die0di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dieAee$d>de'd idged!edied>dddΐdgdd"ed#ie'didge4d$d%d&dddge4d>de1die0die1d	ie0d	ie%d'ie%die%dieAe4e&d(deAe4e$ied#ie4d>ddddӐd)d*gde'd+ided,d-d.d/d0d1d2d3eAee(d4d5eAee(d>dd6d.d/d0d7d2d8eAee#d4d5eAee#d>dediedIiged>d֜de1die0die1d	ie0d	ieAee&d9d:d;e$d<ie&d=id>ee&d?ie$d@iedAidBgigdCeBeCe'e$dDieAe$eBe'dEiedFiged>dGdeAeeBeideAeeBee&ided>d֜de<d>d֜de@d>d֜de>d>d֜ded>d֜edide5dٜg*Z]edHidϐdIdJdKdLeAe2eBed>dMdNdOdPe4d>dMdQdRdSed>dTdUdVdWdXgZ^dYdZ Z_d[d\d]d^d^d^d^d^d^d^d_
Z`d`da ZadS (b  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: zv
 * Do not edit this file directly unless you know what you are doing!!!
 */

#ifdef __cplusplus
extern "C" {
#endif

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

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("a;  ");
	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#``
--------------------------------------------------------------------------------)rc   re   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#)/rc   kwlist	kwlistoptcallfortrancallfortranappenddocsign
docsignoptrH   rO   Zdocsignshortdocsignoptshortrs   rt   ro   rp   rq   rr   ru   rv   rw   rx   	args_capi	keys_capifunctyperI   rJ   rM   rN   rK   rl   rk   rm   rj   	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#);zn	{"#name#",-1,{{-1}},0,(char *)#F_FUNC#(#fortranname#,#FORTRANNAME#),(f2py_init_func)#apiname#,doc_#apiname#},zV	{"#name#",-1,{{-1}},0,(char *)#fortranname#,(f2py_init_func)#apiname#,doc_#apiname#},zE	{"#name#",-1,{{-1}},0,NULL,(f2py_init_func)#apiname#,doc_#apiname#},ZF_FUNCzR	fprintf(stderr,"debug-capi:Fortran subroutine `#fortranname#(#callfortran#)'\n");z4		if (#setjmpbuf#) {
			f2py_success = 0;
		} else {z			Py_BEGIN_ALLOW_THREADSz9				#callstatement#;
				/*(*f2py_func)(#callfortran#);*/z 				(*f2py_func)(#callfortran#);z			Py_END_ALLOW_THREADSz		})r   declfortranroutineroutine_defri   rj   r   zFextern void #F_WRAPPEDFUNC#(#name_lower#,#NAME#)(#callprotoargument#);zm	{"#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_WRAPPEDFUNCzY	fprintf(stderr,"debug-capi:Fortran subroutine `f2pywrap#name_lower#(#callfortran#)'\n");z1	if (#setjmpbuf#) {
		f2py_success = 0;
	} else {z	Py_BEGIN_ALLOW_THREADSz	(*f2py_func)(#callfortran#);z3	#callstatement#;
	/*(*f2py_func)(#callfortran#);*/z	Py_END_ALLOW_THREADSz	})r   r   r   r   ri   rj   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
zW	fprintf(stderr,"debug-capi:Fortran function #ctype# #fortranname#(#callfortran#)\n");
)r   r   rq   rw   rj   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;z.	PyObject *#name#_return_value_capi = Py_None;zJ	#callstatement#;
/*	#name#_return_value = (*f2py_func)(#callfortran#);*/
z3	#name#_return_value = (*f2py_func)(#callfortran#);zV	fprintf(stderr,"#routdebugshowvalue#\n",#name#_return_value.r,#name#_return_value.i);z>	fprintf(stderr,"#routdebugshowvalue#\n",#name#_return_value);zE	#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   rj   rM   ri   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#;z`	if ((#name#_return_value = (string)malloc(sizeof(char)*(#name#_return_value_len+1))) == NULL) {z6		PyErr_SetString(PyExc_MemoryError, "out of memory");z		f2py_success = 0;z		} else {z8		(#name#_return_value)[#name#_return_value_len] = '\0';z	if (f2py_success) {z		Py_BEGIN_ALLOW_THREADSzj#ifdef USESCOMPAQFORTRAN
		(*f2py_func)(#callcompaqfortran#);
#else
		(*f2py_func)(#callfortran#);
#endif
z		Py_END_ALLOW_THREADSzW		fprintf(stderr,"#routdebugshowvalue#\n",#name#_return_value_len,#name#_return_value);z/	} /* if (f2py_success) after (string)malloc */z!	STRINGFREE(#name#_return_value);Z
STRINGFREE)
r   r   rH   r{   rj   r   r   rO   ri   r   zZ	fprintf(stderr,"debug-capi:Python C/API function #modulename#.#name#(#docsignature#)\n");zW	fprintf(stderr,"debug-capi:Python C/API function #modulename#.#name#: successful.\n");zT	fprintf(stderr,"debug-capi:Python C/API function #modulename#.#name#: failure.\n");)rk   rl   rm   r   Zcomplex_long_doubleZunsigned_charZunsigned_shortZunsignedZunsigned_long_longrc   z.	/* Processing auxiliary variable #varname# */z$	fprintf(stderr,"#vardebuginfo#\n");z)	/* End of cleaning variable #varname# */)rI   rJ   ri   z	#ctype# #varname# = 0;zmath.hz	#varname# = #init#;)rH   ri   rI   r   z
,#varname#z#outvarname#,z#varrformat#)r   rq   r   r   r   z	#ctype# #varname#;z0	#varname#.r = #init.r#, #varname#.i = #init.i#;)rH   rI   r   z	#ctype# #varname# = NULL;z	int slen(#varname#);zlen..)rH   ri   r   z	#ctype# *#varname# = NULL;z1	npy_intp #varname#_Dims[#rank#] = {#rank*[-1]#};z#	const int #varname#_Rank = #rank#;Zforcombr   )ri   r   _dependzflen(#varname#),string)r|   ri   r   z$	/* Processing variable #varname# */)rI   rJ   r   ri   z#pydocsign#z\item[]{{}\verb@#pydocsign#@{}}z--- See above.)rp   ro   rq   rv   ru   rw   Zdependz"#varname#",z
#varname#,)ry   r}   r   z#varname#=#showinit#,)rz   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   rp   rr   rx   rv   rH   r   r   r   r   r   r   r   rn   r{   ri   r   zif(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   ri   r   r   z3	fprintf(stderr,"#vardebugshowvalue#\n",#varname#);z&#varname#,)rH   rM   r{   r   r   )ri   r   z$	PyObject *#varname#_capi = Py_None;z,&#varname#_capizW	f2py_success = try_pyarr_from_#ctype#(#varname#_capi,&#varname#);
	if (f2py_success) {z/	} /*if (f2py_success) of #varname# pyobjfrom*/ztry_pyarr_from_#ctype#)	rH   r   r   r   r   rM   rN   ri   r   z8	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) {z`		#varname# = (#ctype#)PyObject_IsTrue(#varname#_capi);
		f2py_success = 1;
	if (f2py_success) {z%	} /*if (f2py_success) of #varname#*/z#ctype#_from_pyobj)rI   ri   r   r   )rI   r   r   zA	fprintf(stderr,"#vardebugshowvalue#\n",#varname#.r,#varname#.i);z,#varname#_capi)rH   r{   rM   r   r   zY		f2py_success = try_pyarr_from_#ctype#(#varname#_capi,&#varname#);
		if (f2py_success) {z0		} /*if (f2py_success) of #varname# pyobjfrom*/)	rH   r   r   r   r   ri   rM   rN   r   zT	if (#varname#_capi==Py_None) {#varname#.r = #init.r#, #varname#.i = #init.i#;} elsez0	}  /*if (f2py_success) of #varname# frompyobj*/)rH   r   z1	#varname#_capi = pyobj_from_#ctype#1(#varname#);)rM   ri   r   zslen(#varname#),zC	fprintf(stderr,"#vardebugshowvalue#\n",slen(#varname#),#varname#);)rH   r{   r|   rM   r   ri   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?		STRINGFREE(#varname#);
	}  /*if (f2py_success) of #varname#*/zV	f2py_success = try_pyarr_from_#ctype#(#varname#_capi,#varname#);
	if (f2py_success) {)r   r   r   r   rM   rN   ri   r   z*	PyArrayObject *capi_#varname#_tmp = NULL;z	int capi_#varname#_intent = 0;z,capi_#varname#_tmp)rH   r{   r   ri   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   rp   r   zH	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#;zl	capi_#varname#_tmp = array_from_pyobj(#atype#,#varname#_Dims,#varname#_Rank,capi_#varname#_intent,Py_None);zs	capi_#varname#_tmp = array_from_pyobj(#atype#,#varname#_Dims,#varname#_Rank,capi_#varname#_intent,#varname#_capi);aR  	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;a  		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#*/zY	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   z3	fprintf(stderr,"debug-capi:Checking `#check#'\n");)rI   ri   zN	CHECKSCALAR(#check#,"#check#","#nth# #varname#","#varshowvalue#",#varname#) {z	} /*CHECKSCALAR(#check#)*/ZCHECKSCALAR)rI   rJ   ri   r   _breakzN	CHECKSTRING(#check#,"#check#","#nth# #varname#","#varshowvalue#",#varname#) {z	} /*CHECKSTRING(#check#)*/ZCHECKSTRINGZ
CHECKARRAYz2	CHECKARRAY(#check#,"#check#","#nth# #varname#") {z	} /*CHECKARRAY(#check#)*/)ri   rI   rJ   r   r   ZCHECKGENERICz4	CHECKGENERIC(#check#,"#check#","#nth# #varname#") {z	} /*CHECKGENERIC(#check#)*/)ri   rI   rJ   c           	   C   s  t d| d   i }tdd }t| }tdti|}g }g }x"| d D ]}d}	xJ| d D ]>}
|
d dkrztd	 q`x"|
d D ]}|d |kr|}	P qW q`W |	std
|  qL|	g}d|	krxB|	d  D ]2\}}t	|	}|d= ||d< ||d< |
| qW xX|D ]P}	t|	}t|	\}}|rH|r>|
| n
|
| t||}t||}qW qLW t| \}}|r|
| t||}t||}t| \}}|r|
| t||}t||}x0|D ](}t|| d |d  }t||}qW t }i }xJ| D ]<}g ||< x*|| D ]}d}|tjkrPtj| }n|tjkrhtj| }n|tjkrtj| }n|tjkrtj| }n|tjkrtj| }n|tjkrtj| }nt|tjkrtj| }n\|tjkrtj| }nD|tjkrtj| }n,|tjkr(tj| }ntdt|  q.|| 
| q.W qW |
| xF|D ]>}d|kr|d | sd|krft||| }t||}qfW tt |}t!j"#t$d |d }||d< t%|d}|&|d 'dd W dQ R X t d| d |f  t$d rt!j"#t$d |d d }t%|d$}|&d |&d#|d  W d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 dQ R X t d(t$d |d f  |rjt!j"#t$d |d) }||d*< t%|d}|&d+ |&d,t  |&d- g }xd.#|d (dD ]}d/|)d0  krd1k rn n|
|d  nj|r$|d/ d2kr$x6t*|d1kr|
|dd1 d3  |d1d }qW |
|d  n|
|d  qW d#|'d4d}|&| W dQ R X t d5|  |rt!j"#t$d d6|d  }||d*< t%|d.}|&d7 |&d8t  |&d9 g }xd.#|d (dD ]}d/|)d0  krd:k rn n|
|d  nt*|d:kr|d/ d2kr|
|dd: d;  |d:d }x6t*|d1kr|
|dd1 d;  |d1d }qRW |
|d  n|
|d  qW d#|'d4d}|&| W dQ R X t d<|  |S )=z
    Return
    z	Building module "%s"...
nameNf2py_versionZ
interfacedre   block)Z	interfacezabstract interfacez1buildmodule: Expected interface block. Skipping.
zLbuildmodule: Could not found the body of interfaced routine "%s". Skipping.
entryargsZuserd   zbuildmodule: unknown need %s.
r   Z	buildpathZcoutputZcsrcwrb   	z  z&	Wrote C/API module "%s" to file "%s"
Z	dorestdoc
modulenamezmodule.restz.. -*- rest -*-
r`   rX   z8	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}z2	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.
z

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   B/var/www/html/venv/lib/python3.7/site-packages/numpy/f2py/rules.pybuildmodule  sD   
















"
 







"

"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 |}x>t	D ]6}d|kr|d | sd|krtt
||| }t||}qtW d\}	}
i }x|D ]}t||| }t|| rt}ntt}t|| sVt|| s0|	d }	t|	t|	d	   d
 |d< n$|
d }
t|
t|
d	   d |d< nd|d< |||< xh|D ]`}d|kr~qld|kr|d || sd|krlt
|||| }t||}d|krlP qlW qW x|D ]}t|| rt}nt}|| }xh|D ]`}d|krqd|kr2|d || s<d|krt
|||| }t||}d|krP qW d|| krx8|| d D ](}||d< t
t||| }t||}qW qW 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rVt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rt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< xd2D ]}||krlt|| trl|d0 ||  |d0< d3| }||kr:t|| tr:|d1 || d4d  d5g || dd   d6g |d1< q:W t
t|}t| rtd7|d8   ntd9|d8   ||fS ):Nvarsz,			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~   rd   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 = rs   rt   )ro   rp   rq   rr   latexr   z\begin{description}z\end{description}z			  %s
rg   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   >  s    




&




&



,

r   )b__doc__r   timer   rd   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>4   sN   
e
8
	















	


	 ;