Submit
Path:
~
/
/
proc
/
thread-self
/
root
/
opt
/
alt
/
python35
/
lib64
/
python3.5
/
site-packages
/
numpy
/
f2py
/
__pycache__
/
File Content:
func2subr.cpython-35.opt-1.pyc
W��f�# � @ s� d Z d d l m Z m Z m Z d d d � Z d Z d d l 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 d d d d � Z d d d � Z d d d � Z d d � Z d S)aW Rules for building C/API module with f2py2e. 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: 2004/11/26 11:13:06 $ Pearu Peterson � )�division�absolute_import�print_functionz$Revision: 1.16 $� � z See `f2py -v`N) �getfortranname� isexternal� isfunction�isfunction_wrap� isintent_in� isintent_out�islogicalfunction�ismoduleroutine�isscalar� issubroutine�issubroutine_wrap�outmess�showc C s? | d k r | } | | k r: t | � t d | � d Sd | | k rj t | | � t d | � d S| | d } | d k r� d | | k r� d | | | d f } i } d } d | | k r� | | d } d } n$ d | | k r| | d } d } d | k r�| rL| d d k r2d | } q�d | | | d f } q�| d d k rsd | | d f } q�d | | d f } np d | k r�d | | d f } d | k r�d | | d f } q�d | } n d | k r�d | | d f } d | | f } d | | k r;d | d j | | d � f } | S) Nz1var2fixfortran: No definition for argument "%s". � �typespecz/var2fixfortran: No typespec for argument "%s". �type�typenamez%s(%s)Z kindselector�kind� charselector�len�*�:�(*)z %s(len=*)z %s(%s=%s)z%s*(%s)z%s*%sz %s(len=%sz %s,kind=%s)z%s)z %s(kind=%s)z%s %s� dimension�,)r r r )r r )r r �join)�vars�aZfa�f90modeZvardef�selectorZlk� r% � /func2subr.py�var2fixfortran sP !r' c s� g � | d } x� | d D]� } | d | } x� t | j d g � � D]y \ } } | d k rH d | | f } t d d d d g � } d | | f | d <� j | � | | | <| | d | <qH Wq W| d j � � t � � } d g } | d d � } | d } t | � } t | � } d | } | | k rb| | | | <| g | d d d � } n | g | d } t | | | | � } | d d � d k r�| r�d | d d � } n d | d d � } | | d } | j d d � d k r�d | d <d j | � } | rP| d | d | | f � | s�| d | d | f � n6 | d | | f � | s�| d | � | d | } | r�x: | d j d! � D]% } | j � j d" � r�| | � q�W| d d � } g } x9 | D]1 } t | | � r�| d | � | j | � q�WxS | D]K } | | k r7q"t | | � r"| t | | d# | �� | j | � q"WxS | D]K } | | k r�qxt | | � rx| t | | d# | �� | j | � qxWx6 | D]. } | | k r�q�| t | | d# | �� q�W| | � | rA| rn( | d$ � | | d j � � | d% � d j � f d& d' � | D� � } | s�t | � r�| d( | | | f � n | d) | | | f � | r�| d* | d | f � n | d+ � | d, S)-Nr! �argsr r z f2py_%s_d%sr �integer�intent�hidez shape(%s, %s)�=r c S s d | d | f | d <d S)Nz %s %sr r% )�line�retr% r% r& �addc s z createfuncwrapper.<locals>.add�namez %sf2pywrapr � z character*(*)zcharacter(len=10)z character*10r r z(*)Z10z, z subroutine f2pywrap_%s_%s (%s)� modulenamezuse %s, only : %szsubroutine f2pywrap%s (%s)z external %s�saved_interface� zuse r# � interfacez end interfacec s" g | ] } | � k r | � q Sr% r% )�.0r" )� extra_argsr% r& � <listcomp>� s z%createfuncwrapper.<locals>.<listcomp>z%s = .not.(.not.%s(%s))z %s = %s(%s)z end subroutine f2pywrap_%s_%s�endr )� enumerate�get�dict�append�extend�boolr r r' r �split�lstrip� startswithr r r r )�rout� signaturer! r" �v�i�d�dn�dv�need_interfacer. r/ r0 � fortrannamer# Znewnamer( �lZ charselect�sargsr- � dumped_argsr% )r7 r& �createfuncwrapperO s� % " rO c s] g � | d } x� | d D]� } | d | } x� t | j d g � � D]y \ } } | d k rH d | | f } t d d d d g � } d | | f | d <� j | � | | | <| | d | <qH Wq W| d j � � t � � } d g } | d d � } | d } t | � } t | � } | d } d j | � } | r{| d | d | | f � | s�| d | d | f � n( | d | | f � | s�| d | � | r�x: | d j d � D]% } | j � j d � r�| | � q�Wg } x9 | D]1 } t | | � r�| d | � | j | � q�WxS | D]K } | | k rDq/t | | � r/| t | | d | �� | j | � q/Wx6 | D]. } | | k r�q�| t | | d | �� q�W| r�| r�n( | d � | | d j � � | d � d j � f d d � | D� � } | s*| d | | f � | rK| d | d | f � n | d � | d! S)"Nr! r( r r z f2py_%s_d%sr r) r* r+ z shape(%s, %s)r, r c S s d | d | f | d <d S)Nz %s %sr r% )r- r. r% r% r& r/ � s z createsubrwrapper.<locals>.addr0 z, z subroutine f2pywrap_%s_%s (%s)r2 zuse %s, only : %szsubroutine f2pywrap%s (%s)z external %sr3 r4 zuse r# r5 z end interfacec s" g | ] } | � k r | � q Sr% r% )r6 r" )r7 r% r& r8 � s z%createsubrwrapper.<locals>.<listcomp>z call %s(%s)z end subroutine f2pywrap_%s_%sr9 r )r: r; r< r= r> r? r r r r@ rA rB r r r' )rC rD r! r" rE rF rG rH rI rJ r. r/ r0 rK r# r( rM r- rN r% )r7 r& �createsubrwrapper� sz % " rP c C s� t | � r9t | � } | d } t d | | f � t j | � } | } | } d | k r} | d } | d | | d | <| d | } t | � s d | k r� g | d <| d j d � d } x( | d D] } | j d � r� d } Pq� W| r | d j d | � | g | d | d d d � <| t | � f St | � r�t | � } | d } t d | | f � t j | � } | t | � f S| d f S)Nr0 z6 Creating wrapper for Fortran function "%s"("%s")... �resultr! r* �outr zout=r zout=%sr( z8 Creating wrapper for Fortran subroutine "%s"("%s")... r ) r r r �copyr r= rB rO r rP )rC rK r0 ZfnameZrnameZfvar�flagrF r% r% r& �assubr sB rU ���)�__doc__Z __future__r r r � __version__Z f2py_versionrS Zauxfuncsr r r r r r r r r r r r r r' rO rP rU r% r% r% r& �<module> s X1jP
Edit
Rename
Chmod
Delete
FILE
FOLDER
Name
Size
Permission
Action
__init__.cpython-35.opt-1.pyc
2126 bytes
0644
__init__.cpython-35.pyc
2126 bytes
0644
__main__.cpython-35.opt-1.pyc
815 bytes
0644
__main__.cpython-35.pyc
815 bytes
0644
__version__.cpython-35.opt-1.pyc
397 bytes
0644
__version__.cpython-35.pyc
397 bytes
0644
auxfuncs.cpython-35.opt-1.pyc
24393 bytes
0644
auxfuncs.cpython-35.pyc
24393 bytes
0644
capi_maps.cpython-35.opt-1.pyc
19711 bytes
0644
capi_maps.cpython-35.pyc
19711 bytes
0644
cb_rules.cpython-35.opt-1.pyc
15593 bytes
0644
cb_rules.cpython-35.pyc
15593 bytes
0644
cfuncs.cpython-35.opt-1.pyc
36580 bytes
0644
cfuncs.cpython-35.pyc
36580 bytes
0644
common_rules.cpython-35.opt-1.pyc
5063 bytes
0644
common_rules.cpython-35.pyc
5063 bytes
0644
crackfortran.cpython-35.opt-1.pyc
83282 bytes
0644
crackfortran.cpython-35.pyc
83402 bytes
0644
diagnose.cpython-35.opt-1.pyc
4063 bytes
0644
diagnose.cpython-35.pyc
4063 bytes
0644
f2py2e.cpython-35.opt-1.pyc
20776 bytes
0644
f2py2e.cpython-35.pyc
20830 bytes
0644
f2py_testing.cpython-35.opt-1.pyc
1588 bytes
0644
f2py_testing.cpython-35.pyc
1588 bytes
0644
f90mod_rules.cpython-35.opt-1.pyc
7947 bytes
0644
f90mod_rules.cpython-35.pyc
7947 bytes
0644
func2subr.cpython-35.opt-1.pyc
7364 bytes
0644
func2subr.cpython-35.pyc
7435 bytes
0644
info.cpython-35.opt-1.pyc
278 bytes
0644
info.cpython-35.pyc
278 bytes
0644
rules.cpython-35.opt-1.pyc
35856 bytes
0644
rules.cpython-35.pyc
35932 bytes
0644
setup.cpython-35.opt-1.pyc
3972 bytes
0644
setup.cpython-35.pyc
3972 bytes
0644
use_rules.cpython-35.opt-1.pyc
3334 bytes
0644
use_rules.cpython-35.pyc
3334 bytes
0644
N4ST4R_ID | Naxtarrr
