Файловый менеджер - Редактировать - /opt/imh-python/lib/python3.9/site-packages/numpy/f2py/__pycache__/capi_maps.cpython-39.pyc
Ðазад
a e�hz � @ s6 d Z ddlmZ ejZddlZddlZddlZddlm Z ddlm Z ddl m Z ddl T g d �Zg Zi ai Zd d d d d d d d d d d d d d d ddd�Zddddddddddddd d d d d d d d!�Zd"d#d$d%d&d%d'd(d)d*d+d,d-d.d/d0d1d2d3d!�Zd"d#d%d%d'd)d+d,d4d4d4d5d3d6� Zd d d7d8d8d9�d d:d;d d<d=d>d?d@dA� dBdBdCdDdDdE�dBdBdCdDdDd9�d dFd;d d<dG�dHdCidHd7idHdFidI�aete �ae�t�Zg ZdJdK� ZdLdLdMdNdNdOdPdQdNdRdSdTdSdUdUdVdWdXdY�Z dZd[� Z d\d]� Z d^d_� Z dvd`da�Z dbdc� Z!ddde� Z"dfdg� Z#dhdi� Z$djdk� Z%dldm� Z&dndo� Z'dwdpdq�Z(drds� Z)dtdu� Z*dS )xa) 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/05/06 10:57:33 $ Pearu Peterson � )� __version__� N)�markoutercomma)�cb_rules)�iso_c_binding_map)�*) �getctype� getstrlength� getarrdims� getpydocsign� getarrdocsign�getinit�sign2map� routsign2map� modsign2map� cb_sign2map�cb_routsign2map�common_sign2map�float�int�long�complex�string�bytes)�doubler � long_double�char� signed_char� unsigned_char�short�unsigned_shortr r � long_long�unsigned� complex_float�complex_double�complex_long_doubler � characterZ NPY_DOUBLEZ NPY_FLOATZNPY_LONGDOUBLEZNPY_BYTEZ NPY_UBYTEZ NPY_SHORTZ NPY_USHORTZNPY_INTZNPY_UINTZNPY_LONGZ NPY_ULONGZ NPY_LONGLONGZ NPY_ULONGLONGZ NPY_CFLOATZ NPY_CDOUBLEZ NPY_STRING)r r r r r r r r r r" r � unsigned_longr! �unsigned_long_longr# r$ r% r r& �d�f�g�b�B�h�H�i�I�l�L�q�Q�F�D�G�S�c�N�y) r r r r r r r r! r# r$ r% r r& r r )� �4�8Z12�16r r r! r r r" r( ) r= �1�2r> r? �-1z-2z-4z-8r# r$ r% )r= r? r@ Z24Z32r )r= rA rB r> r? r= )�real�integerr Z complexkindZlogicalzdouble complexzdouble precision�bytec C s� t �t�a| d u r&d} tj�| �s&d S �zztd�| �� t | ��$}t |� � � � i i �}W d � n1 sj0 Y |� � D ]6\}}|�� D ]}|| ||� � < q�|| ||� � < q||�� D ]�}|tvr�i t|< || �� D ]�}|| | tv �rf|t| v �r$td||t| | || | f � || | t| |< td|||| | f � t�|| | � q�td|||| | || | tt�� �f � q�q�td� W n2 t�y� } ztd| � W Y d }~n d }~0 0 d S )Nz .f2py_f2cmapz Reading f2cmap from {!r} ... z3 Warning: redefinition of {'%s':{'%s':'%s'->'%s'}} z Mapping "%s(kind=%s)" to "%s" z5 Ignoring map {'%s':{'%s':'%s'}}: '%s' must be in %s z1Successfully applied user defined f2cmap changes z;Failed to apply user defined f2cmap changes: %s. Skipping. )�copy�deepcopy�f2cmap_default� f2cmap_all�os�path�isfile�outmess�format�open�eval�read�lower�items�keys�c2py_map� f2cmap_mapped�append�errmess�list� Exception)Z f2cmap_filer* r) �kZd1Zk1�msg� r^ ��/root/rpmbuild/BUILDROOT/imh-python39-modules-3.9.7-92.el8.x86_64/opt/imh-python/lib/python3.9/site-packages/numpy/f2py/capi_maps.py�load_f2cmap_file� sF 2 ��"� �r` z%gz%Lgz%dz%hhuz%hdz%huz%uz%ldz%luz(%g,%g)z (%Lg,%Lg)z\"%s\"z'%c')r r r r r r r r r r" r r' r! r# r$ r% r r& c C s� d}t | �rRd| v r | d }n| d }|| d v rBt| d | �S td| � �n�t| �r^|S t| �rjdS t| �rvdS d| v �r�| d �� tv �r�| d �� }t| }|d }d | v �r�d | d v �rz|| d d }W n2 t�y td | d d | d d f � Y n0 n�d | d v �r�|d tv �r8t|d }z|| d d }W n� t�y� |tv �rnt| }z|t | d d � }W n@ t�y� td|| d d ||| d d t � � f � Y n0 Y n0 nt | ��s�td| � |S )z Determines C type �void�result�name�vars�,getctype: function %s has no return value?! r& r �typespecr= Z kindselectorr z$getctype: "%s %s %s" not supported. �kindz}getctype: "%s(kind=%s)" is mapped to C "%s" (to override define dict(%s = dict(%s="<C typespec>")) in %s/.f2py_f2cmap file). z2getctype: No C-type found in "%s", assuming void. ) � isfunctionr rY Z issubroutineZ ischaracter_or_characterarrayZisstring_or_stringarrayrS rJ �KeyError�strrK �getcwd� isexternal)�var�ctype�arf Zf2cmapr^ r^ r_ r � sZ � �� r c C s t �dd| �} | S )a^ Rewrite Fortran expression as f2py supported C expression. Due to the lack of a proper expression parser in f2py, this function uses a heuristic approach that assumes that Fortran arithmetic expressions are valid C arithmetic expressions when mapping Fortran function calls to the corresponding C function/CPP macros calls. z\blen\bZ f2py_slen)�re�sub)�exprr^ r^ r_ �f2cexpr s rs c C s� t | �rJd| v r| d }n| d }|| d v r>t| d | �S td| � t| �sbtdt| � � d}d| v r�| d }d|v r�|d }nd |v r�t|d �}t�d |�s�t�d |�r�t| �r�td t| � � d }|S )Nrb rc rd z0getstrlength: function %s has no return value?! z;getstrlength: expected a signature of a string but got: %s rA � charselectorr �lenz\(\s*(\*|:)\s*\)z(\*|:)zMgetstrlength:intent(hide): expected a string with defined length but got: %s rC ) �isstringfunctionr rY �isstring�reprrs rp �match� isintent_hide)rm ro ru r^ r^ r_ r s2 � �r c C s� i }t |�r4t|�s4t|�|d< d|d< d|d< �nJt|�rXd|d< d|d< d|d< �n&t|��r~t�|d �}d�|�|d< ztt|d ��|d< W n ty� Y n0 d �|�|d< tt |��|d< tt |�d g �d d � |d < t t |��D ]|}g }|| t v �r|| g}n,t D ]&}t � d | || ��r|�|� �q|D ](}t �|�t �| �k�rDd||< q�qDq�d\|d< }|D ].}|d }|dv�r�d|d ||f |d< �q�|d �r�|d d d � |d< d\|d< }|d D ]|}|d }|dv�rd|d ||f |d< nLt|��r>td| � d|d |df |d< n |�r�tdt| �t|�f � �q�|d �r~|d d d � |d< |S )N�size�0�rankr= �dimsrA � dimensionr �,���r z rank*[-1]z .*?\b%s\b.*)r= r� Zsetdims)r �:z(*)z(:)z%s#varname#_Dims[%d]=%s,Z cbsetdimsz?getarrdims:warning: assumed shape array, using 0 instead of %r r z]getarrdims: If in call-back function: array argument %s must have bounded dimensions: got %s )rw �isarrayr �isscalarrG �joinrx rQ r[ ru �range�depargsrp ry rX �index� isintent_inrN rY ) ro rm �verbose�ret�dimr0 �v�var) r^ r^ r_ r , sx � � � � � r c C s� t |�rPd|v r|d }n|d }||d v r@t||d | �S td| � dS | | }}d}t|�rld}n t|�rxd}| }t|�r�|d D ]$}|d d � d kr�|d d � } q�q�d}t|�} t|�r�t| |�\}} d | }t |��r4t|��r d | |t | t | |f }nd| |t | |f }d|t | f }�nNt |��r�t|��r^d| |t |�|f }nd| |t |�|f }d|t |�f }n�t|��r|d } tt| ��} d| || t | d�| �|f }| |k�r�d| | t | d�| �f }n d|| t | d�| �| f }n~t|��rvd} | tv �rdt| tv �rddtt| v �rdtt| d } | | k�s`d| } nd} d| | f }|}n td| � ||fS ) Nrb rc rd re �r= r= r= �inputz in/output�intent� �out=z, optional\n Default: %sz %s : %s rank-0 array(%s,'%s')%sz %s : %s %s%sz%s : %sz*%s : %s rank-0 array(string(len=%s),'c')%sz%s : %s string(len=%s)%sz%s : string(len=%s)r z.%s : %s rank-%s array('%s') with bounds (%s)%sr� �)%s : rank-%s array('%s') with bounds (%s)z8%s : rank-%s array('%s') with bounds (%s) and %s storage�argnamez => %sz%s : call-back function%sz7getpydocsign: Could not resolve docsignature for "%s". )rh r rY r� �isintent_inout� isintent_outr � hasinitvaluer r� rV � c2pycode_maprw r r� rx ru r� rl �lcb_map�lcb2_map)ro rm �af�sigZsigout�opt�out_ar\ �initrn �showinitr� r} Zuar^ r^ r_ r i s� � � � � � �� * �r c C s� t |�}t|�r*t|�s*d| t|�f }nVt|�rJd| t| t| f }n6t|�r�|d }tt|��}d| |t| d� |�f }|S )Nz%%s : rank-0 array(string(len=%s),'c')z%s : rank-0 array(%s,'%s')r r� r� ) r rw r� r r� rV r� rx ru r� )ro rm rn r� r� r} r^ r^ r_ r � s& � � ��r c C sL t |�rd\}}nd\}}t|��rD|d }|}t|�s@t|�r�i }zb|d }d|v rzt|dd� ��d�\|d< |d < n*t|i i �}t|j�t|j � |d< |d < W n" t y� t d || f ��Y n0 t |�r�d |d |d f }n\t |��rD|�s d\}}|d d k�r&d|dd� � dd� }|d dk�rDd|dd� }||fS )N)z""z''r� �=r� r r� �@,@�init.r�init.izMgetinit: expected complex number `(r,i)' but got `%s' as initial value of %r.z (capi_c.r=%s,capi_c.i=%s,capi_c)r �'z"%s"�"z\"z'%s')rw r� � iscomplex�iscomplexarrayr �splitrQ rj rD �imagr[ � ValueErrorr� �replace)ro rm r� r� r� r� r^ r^ r_ r � sD �� " � � r c C sD t | �st| �r,t| �}| d �d|�}|S t| �s<t| �r@dS dS )Nrt Zf2py_lenrA )rw � isstringarrayr �getZ ischaracterZischaracterarray)rm �elsizer^ r^ r_ � get_elsize� s r� c " C sH | }t |�r:|d D ]$}|dd� dkr|dd� } q:q| |t|�d�}g }t�� D ] \}}||�rV|�d| � qV|r�d�|�|d< nd|d< t|�r�d |d < n&|d tv r�t|d |d < nd |d < t| |�\|d < |d< t |��r$t |��r$t|��s$t |d dd� �� d�\|d< |d< t |��r�| |d< | tv �r�t| |d< tt| d |d< tt| d |d< tt| d |d< tt| d |d< n | |d< td | tt�� �f � t|��r�t|�|d < t|��r�t|t| |��}t�|d �}|d tv �r&t|d |d < t|�|d < t|��r�td!t d"t d#t d$t d%t d&t d't t!t"t ��d(td)td*t#d+t$d,t%d-t t&t"t%��d.t d/t'd/t(d0g"} g } t)d1t*| �d2�D ]&} | | |��r�| �| | d � �q�t|��r�| �d3| |d f � t|��rd4�t+d5d6� |d |��} | �d7| � t |��rBd8| |d d4�| �f |d9< n"d:|d | |d d4�| �f |d9< t!|��r�|d t,v �r�d;| t,|d f |d<< t|��r�d=| | f |d<< t |��r�d>| |d<< |d t,v �r�d?| t,|d f |d@< dAt,|d |dB< t|��rdC| | f |d@< t-| |�\|dD< |dE< t.|��rD|dF |dF< |S )Gz� varname,ctype,atype init,init.r,init.i,pytype vardebuginfo,vardebugshowvalue,varshowvalue varrformat intent r� Nr� r� )�varnameZ outvarnamern zF2PY_%s�|ZF2PY_INTENT_INr; Z varrformatrn �Or� r� r r� r� r� r� Z cbnamekeyZcbname� maxnofargs� nofoptargsZdocstrZcbdocstrZ latexdocstrZ cblatexdocstrz5sign2map: Confused: external %s is not in lcb_map%s. �lengthr �atyper� r� �outputZinoutput�required�optionalZhiddenzcomplex scalarZscalarr �arrayz complex arrayz string arrayzcomplex function�function�callbackZ auxiliaryr � z slen(%s)=%sr� c S s d| |f S )Nz%s|%sr^ )�xr< r^ r^ r_ �<lambda>D � zsign2map.<locals>.<lambda>zdims(%s)zdebug-capi:%s=>%s:%sZ vardebuginfozdebug-capi:%s %s=%s:%s�debug-capi:%s=%sZvardebugshowvalue�"debug-capi:slen(%s)=%%d %s=\"%%s\"zdebug-capi:%s=%%pz #name#:%s=%sZ varshowvalue�%s�showvalueformatz #name#:slen(%s)=%%d %s=\"%%s\"� pydocsign� pydocsignout�note)/r� r Z isintent_dictrT rX r� r� �c2buildvalue_mapr r� r� r r� rl r� r� rY rZ rU rw r � dictappendr rG � c2capi_mapr� � debugcapir� r� Z isrequired� isoptionalrz Zl_andr� Zl_notr� r� �iscomplexfunctionrh �isintent_callbackZ isintent_auxr� ru �map� cformat_mapr �hasnote) ro rm r� r\ r� Z intent_flagsr* �sr� �ilZrlr0 Zddimr^ r^ r_ r � s� �� � � � � � � � r c C s� | d }t | �}||�dd�|�� |�� t|�td| �||�� t| �pJdt| �pTdt| �p^dd� }d|v rvd|d< nd|d< d|v r�d |d < nd |d < i ad | v �r:| d � � D ]�}|t j v r�t j | D ]j}|d }d | d | v �r(| d | d � � D ]*}| d | d | |d kr�|} �q(q�|d t|< q�q�n0d| v �rj| d �rjt d|d t | d �f � t| t��pxd|d< t| ��r�d| v �r�| d }n| d }||d< t|| �\|d< |d< t| d | �|d< t| ��r| d | d |d< dg| d | d< |d tv �r&t|d |d< n d |d< t d t |d � � t| ��r�|d tv �rrd |t|d f |d < t| ��r�d ||f |d < t| ��r�t| d | �|d!< |d! d"k�r�t d#t | d � � d$|d!< t| ��r�| d |d< dg| d< |S )%zV name,NAME,begintitle,endtitle rname,ctype,rformat routdebugshowvalue rc �_�\_� end of %sr= ) rc ZtexnameZ name_lower�NAME� begintitle�endtitleZ fortrannameZ FORTRANNAMEZ callstatement�usercode� usercode1� F_FUNC_US�F_FUNCZF_WRAPPEDFUNC_USZ F_WRAPPEDFUNCZuser r� r Z externalszMroutsign2map: Confused: function %s has externals %s but no "use" statement. Zcallprotoargumentrb �rnamer� r� rd rn r� Z resultnote�See elsewhere.Zrformatr� z.routsign2map: no c2buildvalue key for type %s r� Zroutdebugshowvaluer� ZrlengthrC zzroutsign2map: expected explicit specification of the length of the string returned by the fortran function %s; taking 10. �10)Zgetfortrannamer� rS �upper�gentitleZgetcallstatement� getusercode� getusercode1r� rU r Zcb_maprY rx Zgetcallprotoargumentrh r r Z hasresultnoter� r� r� rv r r� ) �routrc �fnamer� �u�un�lnr\ ro r^ r^ r_ r ` s� � � � � � � r c C s� t | �r.| d | d �� | d �dd�d�}n$| d | d �� | d �dd�d�}t| �p\g |d< t| �rv| d |d< t| �p�d|d < t| �p�d|d < | d r�t| d d �p�d|d < nd|d < t| �p�d|d< d| v r�| d |d< d| v r�| d |d< |S )z modulename rc r� r� )Z f90modulenameZ F90MODULENAMEZtexf90modulename)� modulenameZ MODULENAMEZ texmodulenameZrestdocr� r= r� r� �bodyr Zinterface_usercodeZ pymethoddefZcoutputZf2py_wrapper_output)�ismoduler� r� Z getrestdocr� r� r� Zgetpymethoddef)�mr� r^ r^ r_ r � s. � � r c C s� d| i}|d |d< t |�|d< |d tv rHt|d |d< t|�|d< |d tv rhdt|d |d< t|�r�t|t| |��}t| |�\|d< |d < t|�r�|d |d < d g|d < |S ) Nr� Z varname_irn r� r� r� r� r� r� r� r� ) r r� r� r� r� r� r r r� )ro rm r� r� r^ r^ r_ r � s r c C s� d| d |f dd�}t | �r`d| d v r0d}nd}d|| d �� | d �� f |d < d |d < n|d |d < d |d < | d |d < t|d �|d < td|d �|d< t| �|d< d|d< |d dkr�d|d< n |d |d< |d dk�rt| �r�d|d< nd|d< |d tv �r$dt|d |d< t| ��r:t| �|d< t | ��r�d| v �rX| d }n| d }t | d | ��r�| d | d |d < d g| d | d < ||d < t || �\|d < |d < t| ��r�d!|d< n t | ��r�| d |d < d g| d < d"}d"}d#| v �rLd| v �rL| d# D ]<}| d | }t t t�|��r|d$ }t|��r|d$ }�qt|�|d%< t|�|d&< t | ��r�t | ��r�d| v �r�| d |d'< d g| d < |S )(z\ name,begintitle,endtitle,argname ctype,rctype,maxnofargs,nofoptargs,returncptr z cb_%s_in_%src r= )rc � returncptrr� r� r� z %s(%s,%s)Z callbacknameZexternZstaticr� r� r� r� rn ra Zrctyper z3 #ifdef F2PY_CB_RETURNCOMPLEX return_value= #endif r� z return_value=r� r� Z strlengthrb rd r� r� r� r� r� z8 #ifdef F2PY_CB_RETURNCOMPLEX #ctype# #else void #endif r �argsr r� r� Zroutnote)r� rS r� r� r r� r� rv r rh r� r Zl_orr� r� r� rx )r� Zumr� r� ro Znofargsr� rm r^ r^ r_ r � sz � �� r c C s� | t |�d�}t|�r d|d< |d tv rFt|d |d< t|�|d< |d tv rfdt|d |d< t|�r�t|t| |��}n t|�r�t |�|d< d |d < t | |�\|d < |d < t |�r�|d |d < dg|d < t | |�|d< |S )N)r� rn r rn r� r� r� r� r{ rA r} r� r� r� r� Z arrdocstr) r r� r� r� r� r� r� r rw r r r� r )ro rm r� r^ r^ r_ r 2 s& r )r )N)+�__doc__r= r �versionZ f2py_versionrG rp rK Z crackfortranr r Z _isocbindr Zauxfuncs�__all__r� r� r� rV r� r� r� rJ Z deep_mergerH rI rW r` r� r rs r r r r r r� r r r r r r r^ r^ r^ r_ �<module> s" ���������� ,�3 =J#jQ R
| ver. 1.1 | |
.
| PHP 8.3.30 | Ð“ÐµÐ½ÐµÑ€Ð°Ñ†Ð¸Ñ Ñтраницы: 0 |
proxy
|
phpinfo
|
ÐаÑтройка