o
    ‡ÎÖaa  ã                   @   s˜   d Z ddlZddlmZmZmZ ddlmZmZm	Z	m
Z
mZmZmZmZmZ g d¢ZG dd„ deƒZG dd	„ d	eƒZG d
d„ deƒZG dd„ deƒZdS )z×
    pygments.lexers.algebra
    ~~~~~~~~~~~~~~~~~~~~~~~

    Lexers for computer algebra systems.

    :copyright: Copyright 2006-2021 by the Pygments team, see AUTHORS.
    :license: BSD, see LICENSE for details.
é    N)Ú
RegexLexerÚbygroupsÚwords)	ÚTextÚCommentÚOperatorÚKeywordÚNameÚStringÚNumberÚPunctuationÚ
Whitespace)ÚGAPLexerÚMathematicaLexerÚ
MuPADLexerÚBCLexerc                   @   s„   e Zd ZdZdZdgZg d¢Zddejfde	fde
fd	efd
ejfdejfdefdejfdejfdefdefdefgiZdd„ ZdS )r   zX
    For `GAP <http://www.gap-system.org>`_ source code.

    .. versionadded:: 2.0
    ÚGAPÚgap)z*.gz*.gdz*.giz*.gapÚrootz#.*$ú"(?:[^"\\]|\\.)*"ú\(|\)|\[|\]|\{|\}aV  (?x)\b(?:
                if|then|elif|else|fi|
                for|while|do|od|
                repeat|until|
                break|continue|
                function|local|return|end|
                rec|
                quit|QUIT|
                IsBound|Unbind|
                TryNextMethod|
                Info|Assert
              )\bzD(?x)\b(?:
                true|false|fail|infinity
              )\bzx(?x)\b(?:
                (Declare|Install)([A-Z][A-Za-z]+)|
                   BindGlobal|BIND_GLOBAL
              )\bz\.|,|:=|;|=|\+|-|\*|/|\^|>|<z=(?x)\b(?:
                and|or|not|mod|in
              )\bzC(?x)
              (?:\w+|`[^`]*`)
              (?:::\w+|`[^`]*`)*ú[0-9]+(?:\.[0-9]*)?(?:e[0-9]+)?ú\.[0-9]+(?:e[0-9]+)?Ú.c                 C   s6   d}t  d| ¡r|d7 }t  d| ¡r|d7 }t|dƒS )Ng        zl(InstallTrueMethod|Declare(Attribute|Category|Filter|Operation|GlobalFunction|Synonym|SynonymAttr|Property))gffffffæ?zm(DeclareRepresentation|Install(GlobalFunction|Method|ImmediateMethod|OtherMethod)|New(Family|Type)|Objectify)g      ð?)ÚreÚsearchÚmin)ÚtextÚscore© r   ú9/usr/lib/python3/dist-packages/pygments/lexers/algebra.pyÚanalyse_textF   s   þþ
zGAPLexer.analyse_textN)Ú__name__Ú
__module__Ú__qualname__Ú__doc__ÚnameÚaliasesÚ	filenamesr   ÚSingler
   r   r   r	   ÚConstantÚBuiltinr   ÚWordÚVariabler   r   Útokensr!   r   r   r   r    r      s>    õýüýþÝÿ(r   c                   @   s¢   e Zd ZdZdZg d¢Zg d¢Zg d¢ZdZdZ	dd	„ Z
d
defdejfdejfdejfdefdejfdejfdejfeeƒefee	ƒefdefdejfgiZdS )r   zp
    Lexer for `Mathematica <http://www.wolfram.com/mathematica/>`_ source code.

    .. versionadded:: 2.0
    ÚMathematica)ÚmathematicaÚmmaÚnb)z*.nbz*.cdfz*.nbpz*.ma)zapplication/mathematicaz#application/vnd.wolfram.mathematicaz+application/vnd.wolfram.mathematica.packagezapplication/vnd.wolfram.cdf) z;;ú=z=.z!===z:=z->z:>z/.ú+ú-Ú*ú/ú^z&&z||ú!z<>ú|z/;ú?ú@z//z/@z@@z@@@z~~z===ú&ú<ú>z<=z>=)ú,ú;ú(ú)ú[ú]ú{ú}c                 C   s   dd  dd„ | D ƒ¡ S )Nz(%s)r:   c                 s   s   � | ]}t  |¡V  qd S )N)r   Úescape)Ú.0Úentryr   r   r    Ú	<genexpr>r   s   € z1MathematicaLexer._multi_escape.<locals>.<genexpr>)Újoin)Úentriesr   r   r    Ú_multi_escapeq   s   zMathematicaLexer._multi_escaper   z(?s)\(\*.*?\*\)z([a-zA-Z]+[A-Za-z0-9]*`)z([A-Za-z0-9]*_+[A-Za-z0-9]*)z#\d*z([a-zA-Z]+[a-zA-Z0-9]*)z
-?\d+\.\d*z
-?\d*\.\d+z-?\d+z".*?"ú\s+N)r"   r#   r$   r%   r&   r'   r(   Ú	mimetypesÚ	operatorsÚpunctuationrN   r   r	   Ú	Namespacer-   r   ÚFloatÚIntegerr   r   r   r
   r   r   r.   r   r   r   r    r   Z   s0    

ñÿr   c                   @   sÐ   e Zd ZdZdZdgZdgZdejfdej	dfde
fd	efd
efdejfdejfdejjfdefdejfdefdeejeeƒfdejfdefdefdefdefgdej	fdej	dfdej	dfdej	fgdœZdS )r   z�
    A `MuPAD <http://www.mupad.com>`_ lexer.
    Contributed by Christopher Creutzig <christopher@creutzig.de>.

    .. versionadded:: 0.8
    ÚMuPADÚmupadz*.muz//.*?$ú/\*Úcommentr   r   a¹  (?x)\b(?:
                next|break|end|
                axiom|end_axiom|category|end_category|domain|end_domain|inherits|
                if|%if|then|elif|else|end_if|
                case|of|do|otherwise|end_case|
                while|end_while|
                repeat|until|end_repeat|
                for|from|to|downto|step|end_for|
                proc|local|option|save|begin|end_proc|
                delete|frame
              )\baU  (?x)\b(?:
                DOM_ARRAY|DOM_BOOL|DOM_COMPLEX|DOM_DOMAIN|DOM_EXEC|DOM_EXPR|
                DOM_FAIL|DOM_FLOAT|DOM_FRAME|DOM_FUNC_ENV|DOM_HFARRAY|DOM_IDENT|
                DOM_INT|DOM_INTERVAL|DOM_LIST|DOM_NIL|DOM_NULL|DOM_POLY|DOM_PROC|
                DOM_PROC_ENV|DOM_RAT|DOM_SET|DOM_STRING|DOM_TABLE|DOM_VAR
              )\bz�(?x)\b(?:
                PI|EULER|E|CATALAN|
                NIL|FAIL|undefined|infinity|
                TRUE|FALSE|UNKNOWN
              )\bz\b(?:dom|procname)\bz-\.|,|:|;|=|\+|-|\*|/|\^|@|>|<|\$|\||!|\'|%|~=zž(?x)\b(?:
                and|or|not|xor|
                assuming|
                div|mod|
                union|minus|intersect|in|subset
              )\bz \b(?:I|RDN_INF|RD_NINF|RD_NAN)\bzi(?x)
              ((?:[a-zA-Z_#][\w#]*|`[^`]*`)
              (?:::[a-zA-Z_#][\w#]*|`[^`]*`)*)(\s*)([(])z](?x)
              (?:[a-zA-Z_#][\w#]*|`[^`]*`)
              (?:::[a-zA-Z_#][\w#]*|`[^`]*`)*r   r   rO   r   z[^/*]+z#pushú\*/ú#popú[*/]©r   rY   N)r"   r#   r$   r%   r&   r'   r(   r   r)   Ú	Multiliner
   r   r   r	   ÚClassr*   r+   ÚPseudor   r,   r   r   ÚFunctionr   r-   r   r.   r   r   r   r    r   ‰   sR    

öûû
úýþÏ4

ü
Ìr   c                	   @   s€   e Zd ZdZdZdgZdgZdejdfde	fde
fed	d
d�efdefdefdefdefgdejfdejdfdejfgdœZdS )r   zV
    A `BC <https://www.gnu.org/software/bc/>`_ lexer.

    .. versionadded:: 2.1
    ÚBCÚbcz*.bcrX   rY   r   z[{}();,])ÚifÚelseÚwhileÚforÚbreakÚcontinueÚhaltÚreturnÚdefineÚautoÚprintÚreadÚlengthÚscaleÚsqrtÚlimitsÚquitÚwarrantyz\b)Úsuffixz!\+\+|--|\|\||&&|([-<>+*%\^/!=])=?z[0-9]+(\.[0-9]*)?z\.[0-9]+r   z[^*/]+rZ   r[   r\   r]   N)r"   r#   r$   r%   r&   r'   r(   r   r^   r
   r   r   r   r   r   r   r.   r   r   r   r    r   Ñ   s2    
ýýÿó
ý
ðr   )r%   r   Úpygments.lexerr   r   r   Úpygments.tokenr   r   r   r   r	   r
   r   r   r   Ú__all__r   r   r   r   r   r   r   r    Ú<module>   s    
,F/H