+
    i='                         R t ^ RIt^RIHt ^RIHtHtHtHtH	t	H
t
HtHtHtHtHtHtHt R	R ltR tR
R ltR
R ltR tR# )a;  

Rules for building C/API module with f2py2e.

Copyright 1999 -- 2011 Pearu Peterson all rights reserved.
Copyright 2011 -- present NumPy Developers.
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.
N)isoc_kindmap)getfortranname
isexternal
isfunctionisfunction_wrapisintent_inisintent_outislogicalfunctionismoduleroutineisscalarissubroutineissubroutine_wrapoutmessshowc                 l   Vf   TpW9  d   \        V 4       \        RV R24       R# RW,          9  d#   \        W,          4       \        RV R24       R# W,          R,          pVR8X  d#   RW,          9   d   V RW,          R,           R	2p/ pRpR
W,          9   d   W,          R
,          pRpMRW,          9   d   W,          R,          pRpRV9   d]   V'       d(   VR,          R9   d   V R2pMV RV RVR,           R	2pMuVR,          R9   d   V RVR,           R	2pMWV RVR,           2pMHRV9   d,   V RVR,           2pRV9   d   V RVR,           R	2pMV R	2pMRV9   d   V RVR,           R	2pV RV 2pRW,          9   d%   V RRP                  W,          R,          4       R	2pV# )Nz,var2fixfortran: No definition for argument "z".
 typespecz*var2fixfortran: No typespec for argument "typetypename()kindselectorkindcharselectorlen*z(len=*)=z*(z(len=z,kind=z(kind= 	dimension,)r   :(*))r   r    )r   r   join)varsafaf90modevardefselectorlks   &&&&   t/Users/tonyclaw/.openclaw/workspace/skills/math-calculator/venv/lib/python3.14/site-packages/numpy/f2py/func2subr.pyvar2fixfortranr+       s   	z}T
>qcFG TW<QCtDEWZ FJ$'181TWZ013H	B 7>*	47	"7>*
h} 11"87+"81RD(3-:c]j(xr(3-2Fxq#0F	(	85% 12Xxvhv&6%7q9Fxq\F	8	86(6"2!315xqFdg81SXXdgk&:;<A>M    c                     R pV R,          P                  4        F2  pVP                  R/ 4      P                  R4      pV\        9   g   K1   R# 	  V# )Fr#   r   r   T)valuesgetr   )routuseisocvalue
kind_values   &   r*   useiso_c_bindingr4   N   sK    Gf$$&YY~r266v>
% ' Nr,   c           	      
   \        V 4      '       g   Q h. pV R ,          pV R,           F{  pV R ,          V,          p\        VP                  R. 4      4       FI  w  rgVR8X  g   K  RV RV 2pRRRR	./p	R
V RV R2V	R&   VP                  V4       WV&   WR,          V&   KK  	  K}  	  V R,          P	                  V4       \        V4      p
R.pV3R lpV R,          p\        V 4      p\        V 4      pV R2pVV9  d%   W=,          VV&   V.V R,          R,          ,           pMV.V R,          ,           p\        W=RV4      pVR,          R8X  dU   V'       d   RVR,          ,           pMRVR,          ,           pW=,          R,          pVP                  RR4      R8X  d   RVR&   VP                  RV4      pRp\        V 4      pRP                  V4      pV'       d|   VP                  V R2R4      pV Uu. uF  pVV8w  g   K  VNK  	  ppVV R&   V! RV R,           R V R!V R24       V'       g   V! R"V R,           R#V 24       V'       d	   V! R$4       MRV! R%V R!V R24       V'       d	   V! R$4       V
'       g,   V! R&V 24       VP                  RR4      R',           V,           pV
'       dX   V R(,          P                  R)4       F;  pVP                  4       P                  R"4      '       g   K*  R*V9  g   K3  V! V4       K=  	  VR,          p. pV F8  p\        W4,          4      '       g   K  V! R&V 24       VP                  V4       K:  	  V FI  pVV9   d   K  \!        W4,          4      '       g   K%  V! \        W4VR+7      4       VP                  V4       KK  	  V FI  pVV9   d   K  \#        W4,          4      '       g   K%  V! \        W4VR+7      4       VP                  V4       KK  	  V F  pVV9   d   K  V! \        W4VR+7      4       K!  	  V! V4       Ve	   V! V4       V
'       d7   V'       d   M-V! R,4       V! V R(,          P                  4       4       V! R-4       RP                  V Uu. uF  qDV9  g   K  VNK  	  up4      pV'       g5   \%        V 4      '       d   V! V R.V R/V R024       MV! V R1V R/V R24       V'       d   V! R2V R,           R V 24       V^ ,          # V! R34       V^ ,          # u upi u upi )4r#   argsr   r    f2py__dr   integerintenthideshape(, r   r   r   c                 (    V^ ,           RV  2V^ &   R#     z
      N linerets   &&r*   addcreatefuncwrapper.<locals>.addj       F88D6*Ar,   namef2pywrap:   NNz
@@@NAME@@@:N   Nzcharacter*(*)zcharacter(len=10):rK   NNzcharacter*10r   r   r!   10Nsubroutine f2pywrap_
modulename_ (use 	, only : use iso_c_bindingsubroutine f2pywrap	external r   saved_interface
__user__r&   	interfaceend interfacez = .not.(.not.r   z))z = end subroutine f2pywrap_end)r   	enumerater/   appendextendboolr   r
   r+   replacer4   r"   splitlstrip
startswithr   r   r   r	   )r0   	signature
extra_argsr#   r$   viddndvneed_interfacerD   rE   rH   fortrannamer&   newnamer6   l_tmpl
charselectl1rlr1   sargsargrC   dumped_argss   &&                         r*   createfuncwrapperrw   V   s   dJ<D&\\LOaeeK45DACxQCr!% )Xx@"1#Rs!,3!!"%R$&+q! 6  	L
#*%N$C +<D &Kd#GhGd
Wy4<++y4<'Dg>Fc{o%(6#;6F#fSk1FZ/
>>#r"e+"JsO	g	.B	Bt$GIIdOE bk2.#3tsd{t3V"4#5"6avRwaHI$tL)*)K=AB#$!$r%23#$)K=)*b1C7+EB*+11$7D{{}''//Jd4JD	 8 8DKdg)A3 q!  DGt89q!  twt89q!  N4G45 
 G	~B&'..01 II$>$Q:*=qq$>?ET""7)>+awbAB7)3{m1UG156&tL'9&:!D6BC q6M 	E
q6MG 4p ?s   3	T T 3T Tc           	      :   \        V 4      '       g   Q h. pV R ,          pV R,           F{  pV R ,          V,          p\        VP                  R. 4      4       FI  w  rgVR8X  g   K  RV RV 2pRRRR	./p	R
V RV R2V	R&   VP                  V4       WV&   WR,          V&   KK  	  K}  	  V R,          P	                  V4       \        V4      p
R.pV3R lpV R,          p\        V 4      p\        V 4      pV R,          p\        V 4      pRP                  V4      pV'       dH   V! RV R,           RV RV R24       V'       d	   V! R4       V'       g   V! RV R,           RV 24       M2V! RV RV R24       V'       d	   V! R4       V
'       g   V! RV 24       V
'       dX   V R,          P                  R4       F;  pVP                  4       P                  R4      '       g   K*  RV9  g   K3  V! V4       K=  	  . pV F8  p\        W4,          4      '       g   K  V! RV 24       VP                  V4       K:  	  V FI  pVV9   d   K  \        W4,          4      '       g   K%  V! \        W4VR7      4       VP                  V4       KK  	  V F  pVV9   d   K  V! \        W4VR7      4       K!  	  V
'       do   V'       d   MeV! R4       V R,          P                  R4       F9  pVP                  4       P                  R4      '       d
   RV9   d   K1  V! V4       K;  	  V! R4       RP                  V Uu. uF  qDV9  g   K  VNK  	  up4      pV'       g   V! R V R!V R24       V'       d   V! R"V R,           RV 24       V^ ,          # V! R#4       V^ ,          # u upi )$r#   r6   r   r    r7   r8   r   r9   r:   r;   r<   r=   r   r   r   c                 (    V^ ,           RV  2V^ &   R# r?   rA   rB   s   &&r*   rE   createsubrwrapper.<locals>.add   rG   r,   rH   rM   rN   rO   rP   rS   rQ   rR   rT   rU   rV   rW   rX   rY   rZ   r[   zcall r   r\   r]   )r   r^   r/   r_   r`   ra   r   r
   r4   r"   rc   rd   re   r   r   r+   )r0   rf   rg   r#   r$   rh   ri   rj   rk   rl   rm   rD   rE   rH   rn   r&   r6   r1   rt   rC   rv   s   &&                   r*   createsubrwrapperr{      sq   J<D&\\LOaeeK45DACxQCr!% )Xx@"1#Rs!,3!!"%R$&+q! 6  	L
#*%N$C +<D &Kd#G<Dt$GIIdOE"4#5"6avRwaHI#$$tL)*)K=AB!$r%23#$)K=)**+11$7D{{}''//Jd4JD	 8 Kdg)A3 q!  DGt89q!  N4G45 
 ./55d;;;=++F33
d8JD	 <  II$>$Q:*=qq$>?EeK=%*+&tL'9&:!D6BC q6M 	E
q6M ?s   0N=Nc                 8   \        V 4      '       Ed*   \        V 4      pV R ,          p\        RV: RV: R24       \        P                  ! V 4      p TpTpRV 9   d$   V R,          pV R,          V,          V R,          V&   V R,          V,          p\	        V4      '       gu   RV9  d   . VR&   VR,          P                  R4       ^pVR,           F  pVP                  R4      '       g   K  ^ p M	  V'       d   VR,          P                  RV 24       V.V R	,          ,           V R	,          R
&   V \        V 4      3# \        V 4      '       dL   \        V 4      pV R ,          p\        RV: RV: R24       \        P                  ! V 4      p V \        V 4      3# V R3# )rH   z)		Creating wrapper for Fortran function "z"("z")...
resultr#   r:   outzout=r6   :NNNz+		Creating wrapper for Fortran subroutine "r   )
r   r   r   copyr   r_   re   rw   r   r{   )r0   rn   rH   fnamernamefvarflagri   s   &       r*   assubrr   (  sv   t$T*F|+ 	 yytNE"&v,u"5DLF|E"D!!t#!#XN!!%(D(^^<<''D $ X%%UGn5 'DL0VQ&t,,,$T*F|& 	'yy&t,,,8Or,   )NN)r@   )__doc__r   	_isocbindr   auxfuncsr   r   r   r   r   r   r	   r
   r   r   r   r   r   r+   r4   rw   r{   r   rA   r,   r*   <module>r      sD   
  #   ",\xvTn!r,   