U
    ef                     @   sv  d Z ddlZddlZddlZddlZddlmZ ddlm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 G dd deZG dd	 d	eZd
d Zdd Zdd Zdd Z G dd de!Z"e#dZ$e#dZ%e#dej&Z'dd Z(d.ddZ)G dd de!Z*G dd dZ+dZ,d/d d!Z-d0d#d$Z.d1d%d&Z/d2d'd(Z0d3d)d*Z1e2d+krre1d,dd- dS )4zK
This module provides data structures for representing first-order
models.
    Npformat)	decorator)AbstractVariableExpressionAllExpressionAndExpressionApplicationExpressionEqualityExpressionExistsExpression
ExpressionIffExpressionImpExpressionIndividualVariableExpressionIotaExpressionLambdaExpressionNegatedExpressionOrExpressionVariable	is_indvarc                   @   s   e Zd ZdS )ErrorN__name__
__module____qualname__ r   r   R/var/www/html/assets/scripts/venv/lib/python3.8/site-packages/nltk/sem/evaluate.pyr   ,   s   r   c                   @   s   e Zd ZdS )	UndefinedNr   r   r   r   r   r   0   s   r   c                 O   sR   t | }tt|d |}|dd rHt  | D ]}td|  q6| ||S )Nr   tracez%s => %s)inspectgetfullargspecdictzippopprintitems)fargskwZargspecditemr   r   r   r   4   s    
r   c                 C   sN   t | dkrdS tdd | D r>t t| t t| kr>dS td|  dS )z
    Check whether a set represents a relation (of any arity).

    :param s: a set containing tuples of str elements
    :type s: set
    :rtype: bool
    r   Tc                 s   s   | ]}t |tV  qd S N)
isinstancetuple).0elr   r   r   	<genexpr>J   s     zis_rel.<locals>.<genexpr>z.Set %r contains sequences of different lengthsN)lenallmaxmin
ValueError)sr   r   r   is_rel>   s
    	*r6   c                 C   sP   t  }| D ]@}t|tr&||f q
t|tr@|t| q
|| q
|S )aR  
    Convert a set containing individuals (strings or numbers) into a set of
    unary tuples. Any tuples of strings already in the set are passed through
    unchanged.

    For example:
      - set(['a', 'b']) => set([('a',), ('b',)])
      - set([3, 27]) => set([('3',), ('27',)])

    :type s: set
    :rtype: set of tuple of str
    )setr+   straddint)r5   newelemr   r   r   set2relP   s    

r=   c                 C   s    t | dkrdS t t| d S )ze
    Check the arity of a relation.
    :type rel: set of tuples
    :rtype: int of tuple of str
    r   )r0   list)relr   r   r   arityh   s    r@   c                       sT   e Zd ZdZ fddZdd Zdd Zedd	 Zed
d Z	e
dd Z  ZS )	Valuationa  
    A dictionary which represents a model-theoretic Valuation of non-logical constants.
    Keys are strings representing the constants to be interpreted, and values correspond
    to individuals (represented as strings) and n-ary relations (represented as sets of tuples
    of strings).

    An instance of ``Valuation`` will raise a KeyError exception (i.e.,
    just behave like a standard  dictionary) if indexed with an expression that
    is not in its list of symbols.
    c                    sp   t    |D ]\\}}t|ts*t|tr4|| |< qt|trLt|| |< qtjd||f dd}t	|qdS )z=
        :param xs: a list of (symbol, value) pairs.
        zGError in initializing Valuation. Unrecognized value for symbol '%s':
%sB   )widthN)
super__init__r+   r8   boolr7   r=   textwrapfillr4   )selfZxssymvalmsg	__class__r   r   rE      s    


zValuation.__init__c                 C   s$   || krt | |S td| d S )NzUnknown expression: '%s'r    __getitem__r   rI   keyr   r   r   rP      s    zValuation.__getitem__c                 C   s   t | S r*   r   rI   r   r   r   __str__   s    zValuation.__str__c                 C   sN   g }|   D ]8}t|tr&|| qt|ts|dd |D  qt|S )z7Set-theoretic domain of the value-space of a Valuation.c                 S   s"   g | ]}|D ]}|d k	r|qqS r*   r   )r-   tuple_r<   r   r   r   
<listcomp>   s
        z$Valuation.domain.<locals>.<listcomp>)valuesr+   r8   appendrF   extendr7   )rI   domrK   r   r   r   domain   s    

zValuation.domainc                 C   s   t |  S )z9The non-logical constants which the Valuation recognizes.)sortedkeysrS   r   r   r   symbols   s    zValuation.symbolsc                 C   s   t |S r*   )read_valuation)clsr5   r   r   r   
fromstring   s    zValuation.fromstring)r   r   r   __doc__rE   rP   rT   propertyr[   r^   classmethodra   __classcell__r   r   rM   r   rA   s   s   

rA   z	\s*=+>\s*z\s*,\s*zg\s*
                                (\([^)]+\))  # tuple-expression
                                \s*c                 C   s   t | }|d }|d }|dr|dd }t|}|rrg }|D ](}|dd }tt|}|| qFn
t|}t|}||fS )a  
    Read a line in a valuation file.

    Lines are expected to be of the form::

      noosa => n
      girl => {g1, g2}
      chase => {(b1, g1), (b2, g1), (g1, d1), (g2, d2)}

    :param s: input line
    :type s: str
    :return: a pair (symbol, value)
    :rtype: tuple
    r      {)	_VAL_SPLIT_REsplit
startswith
_TUPLES_REfindallr,   _ELEMENT_SPLIT_RErX   r7   )r5   piecessymbolvalueZtuple_stringsZset_elementstselementr   r   r   _read_valuation_line   s    



rt   c                 C   s   |dk	r|  |} g }t|  D ]p\}}| }|ds"|dkrFq"z|t| W q" tk
r } ztd| d| |W 5 d}~X Y q"X q"t|S )a  
    Convert a valuation string into a valuation.

    :param s: a valuation string
    :type s: str
    :param encoding: the encoding of the input string, if it is binary
    :type encoding: str
    :return: a ``nltk.sem`` valuation
    :rtype: Valuation
    N# zUnable to parse line z: )	decode	enumerate
splitlinesstriprk   rX   rt   r4   rA   )r5   encodingZ
statementsZlinenumlineer   r   r   r_      s    
*r_   c                       sT   e Zd ZdZd fdd	Zdd Zdd Zdd	d
Zdd Zdd Z	dd Z
  ZS )
Assignmentae  
    A dictionary which represents an assignment of values to variables.

    An assignment can only assign values from its domain.

    If an unknown expression *a* is passed to a model *M*\ 's
    interpretation function *i*, *i* will first check whether *M*\ 's
    valuation assigns an interpretation to *a* as a constant, and if
    this fails, *i* will delegate the interpretation of *a* to
    *g*. *g* only assigns values to individual variables (i.e.,
    members of the class ``IndividualVariableExpression`` in the ``logic``
    module. If a variable is not assigned a value by *g*, it will raise
    an ``Undefined`` exception.

    A variable *Assignment* is a mapping from individual variables to
    entities in the domain. Individual variables are usually indicated
    with the letters ``'x'``, ``'y'``, ``'w'`` and ``'z'``, optionally
    followed by an integer (e.g., ``'x0'``, ``'y332'``).  Assignments are
    created using the ``Assignment`` constructor, which also takes the
    domain as a parameter.

        >>> from nltk.sem.evaluate import Assignment
        >>> dom = set(['u1', 'u2', 'u3', 'u4'])
        >>> g3 = Assignment(dom, [('x', 'u1'), ('y', 'u2')])
        >>> g3 == {'x': 'u1', 'y': 'u2'}
        True

    There is also a ``print`` format for assignments which uses a notation
    closer to that in logic textbooks:

        >>> print(g3)
        g[u1/x][u2/y]

    It is also possible to update an assignment using the ``add`` method:

        >>> dom = set(['u1', 'u2', 'u3', 'u4'])
        >>> g4 = Assignment(dom)
        >>> g4.add('x', 'u1')
        {'x': 'u1'}

    With no arguments, ``purge()`` is equivalent to ``clear()`` on a dictionary:

        >>> g4.purge()
        >>> g4
        {}

    :param domain: the domain of discourse
    :type domain: set
    :param assign: a list of (varname, value) associations
    :type assign: list
    Nc                    sl   t    || _|rZ|D ]@\}}|| jks<td|| jt|sPtd| || |< qd | _|   d S )Nz'{}' is not in the domain: {}-Wrong format for an Individual Variable: '%s')rD   rE   r[   AssertionErrorformatr   variant_addvariant)rI   r[   ZassignvarrK   rM   r   r   rE   0  s    


zAssignment.__init__c                 C   s$   || krt | |S td| d S )Nz"Not recognized as a variable: '%s'rO   rQ   r   r   r   rP   @  s    zAssignment.__getitem__c                 C   s   t | j}||  |S r*   )r~   r[   update)rI   r;   r   r   r   copyF  s    

zAssignment.copyc                 C   s    |r| |= n|    |   dS )z
        Remove one or all keys (i.e. logic variables) from an
        assignment, and update ``self.variant``.

        :param var: a Variable acting as a key for the assignment.
        N)clearr   )rI   r   r   r   r   purgeK  s
    zAssignment.purgec                 C   s6   d}t | j}|D ]\}}|d| d| d7 }q|S )zQ
        Pretty printing for assignments. {'x', 'u'} appears as 'g[u/x]'
        g[/])r\   r   )rI   Zgstringr   rK   r   r   r   r   rT   Y  s
    
zAssignment.__str__c                 C   s6   g }|   D ]}|d |d f}|| q|| _dS )zK
        Create a more pretty-printable version of the assignment.
        rf   r   N)r$   rX   r   )rI   list_r)   pairr   r   r   r   d  s    zAssignment._addvariantc                 C   sF   || j kst| d| j  t|s2td| || |< |   | S )zh
        Add a new variable-value pair to the assignment, and update
        ``self.variant``.

        z is not in the domain r   )r[   r   r   r   )rI   r   rK   r   r   r   r9   o  s
    zAssignment.add)N)N)r   r   r   rb   rE   rP   r   r   rT   r   r9   re   r   r   rM   r   r~      s   4
r~   c                   @   sP   e Zd ZdZdd Zdd Zdd Zdd	d
ZdddZdddZ	dddZ
dS )Modela[  
    A first order model is a domain *D* of discourse and a valuation *V*.

    A domain *D* is a set, and a valuation *V* is a map that associates
    expressions with values in the model.
    The domain of *V* should be a subset of *D*.

    Construct a new ``Model``.

    :type domain: set
    :param domain: A set of entities representing the domain of discourse of the model.
    :type valuation: Valuation
    :param valuation: the valuation of the model.
    :param prop: If this is set, then we are building a propositional    model and don't require the domain of *V* to be subset of *D*.
    c                 C   s<   t |tst|| _|| _||js8td|j|f d S )NzDThe valuation domain, %s, must be a subset of the model's domain, %s)r+   r7   r   r[   	valuation
issupersetr   )rI   r[   r   r   r   r   rE     s    zModel.__init__c                 C   s   d| j d| jdS )N(z, )r[   r   rS   r   r   r   __repr__  s    zModel.__repr__c                 C   s   d| j  d| j S )Nz	Domain = z,
Valuation = 
r   rS   r   r   r   rT     s    zModel.__str__Nc                 C   s~   zDt |}| j|||d}|r@t  td| d| d|  |W S  tk
rx   |rrt  td| d|  Y dS X dS )aA  
        Read input expressions, and provide a handler for ``satisfy``
        that blocks further propagation of the ``Undefined`` error.
        :param expr: An ``Expression`` of ``logic``.
        :type g: Assignment
        :param g: an assignment to individual variables.
        :rtype: bool or 'Undefined'
        r   'z' evaluates to z
 under M, z' is undefined under M, r   N)r   ra   satisfyr#   r   )rI   exprr   r   parsedrq   r   r   r   evaluate  s    	
zModel.evaluatec                    s  t |trt| \}}t |trL| }t fdd|D }||kS |j }|j }|| S nt |tr|j	  S t |t
r|j o|j S t |trڈ|j p؈|j S t |tr|j  p|j S t |tr.|j |j kS t |trV|j |j kS t |tr  }	jD ],}
|	|jj|
 |j	|	sp dS qpdS t |tr  }	jD ],}
|	|jj|
 |j	|	r dS qdS t |tr:  }	jD ],}
|	|jj|
 |j	|	r dS qdS t |tri }|jj}jD ]$}
|j	 ||
}|||
< qX|S | |S dS )a  
        Recursive interpretation function for a formula of first-order logic.

        Raises an ``Undefined`` error when ``parsed`` is an atomic string
        but is not a symbol or an individual variable.

        :return: Returns a truth value or ``Undefined`` if ``parsed`` is        complex, and calls the interpretation function ``i`` if ``parsed``        is atomic.

        :param parsed: An expression of ``logic``.
        :type g: Assignment
        :param g: an assignment to individual variables.
        c                 3   s   | ]} | V  qd S r*   )r   r-   argr   rI   r   r   r/     s     z Model.satisfy.<locals>.<genexpr>FTN)r+   r   Zuncurryr   r   r,   functionargumentr   termr   firstsecondr   r   r   r	   r   r   r[   r9   variablenamer
   r   r   i)rI   r   r   r   r   	argumentsfunvalZargvalsargvalnew_gucfr   rK   r   r   r   r     sd    




 






zModel.satisfyFc                 C   sD   |j j| jjkr| j|j j S t|tr4||j j S td| dS )a  
        An interpretation function.

        Assuming that ``parsed`` is atomic:

        - if ``parsed`` is a non-logical constant, calls the valuation *V*
        - else if ``parsed`` is an individual variable, calls assignment *g*
        - else returns ``Undefined``.

        :param parsed: an ``Expression`` of ``logic``.
        :type g: Assignment
        :param g: an assignment to individual variables.
        :return: a semantic value
        zCan't find a value for %sN)r   r   r   r^   r+   r   r   )rI   r   r   r   r   r   r   r      s
    
zModel.ir   c              	   C   s:  d}|||  }g }t |tr(t|}	n|}	|	| kr"|r`t  t|| d| d|   | jD ]}
| }||	j|
 |r|dkr|d }nd}| 	|||}|rt|d|   |dkr|rt|d| d	| d
  qf|
|
 |rft|d| d	| d|   qfdd |D }nt|	j d| |S )a  
        Generate the entities from the model's domain that satisfy an open formula.

        :param parsed: an open formula
        :type parsed: Expression
        :param varex: the relevant free individual variable in ``parsed``.
        :type varex: VariableExpression or str
        :param g: a variable assignment
        :type g:  Assignment
        :return: a set of the entities that satisfy ``parsed``.
        z   zOpen formula is 'z' with assignment rf   r   z(trying assignment %s)Fz
value of 'z' under z	 is Falsez is c                 S   s   h | ]}|qS r   r   )r-   cr   r   r   	<setcomp>N  s     z#Model.satisfiers.<locals>.<setcomp>z is not free in )r+   r8   r   freer#   r[   r   r9   r   r   rX   r   )rI   r   Zvarexr   r   ZnestingZspacerindent
candidatesr   r   r   Zlowtracerq   resultr   r   r   
satisfiers  s@    




 zModel.satisfiers)N)N)F)Nr   )r   r   r   rb   rE   r   rT   r   r   r   r   r   r   r   r   r   |  s   


L
r      c                 C   s   t dddgat atttattat  tdt	  td tdt	  td t  tdt tdt	  dd	d
ddddddddddddddg}|D ]:}| rt  t
|t|  qtd| dt
|t  qdS )z!Example of a propositional model.)PT)QT)RF*zPropositional Formulas Demoz7(Propositional constants treated as nullary predicates)z
Model m1:
z(P & Q)z(P & R)z- Pz- Rz- - Pz	- (P & R)z(P | R)z(R | P)z(R | R)z	(- P | R)z	(P | - P)z(P -> Q)z(P -> R)z(R -> P)z	(P <-> P)z	(R <-> R)z	(P <-> R)The value of '' is: N)rA   Zval1r7   Zdom1r   m1r~   g1r#   multr   )r   Z	sentencessentr   r   r   propdemo^  sF    

r   Fc           
      C   s  ddddddhfddd	hfd
dhfdddddhfga tt atjatttattddga| st	  t	dt
  t	d t	dt
  t	dddt t	dt dddddddg}dd |D }t	  |D ]D}zt	d |t|tf  W q tk
r
   t	d!|  Y qX qd"d#d$d%g}|D ]z\}}zDtt|t}td&d' |D }	t	| d(| d)|	|k  W n* tk
r   t	| d(| d* Y nX qd+S ),zExample of a first-order model.)adamb1)Zbettyr   )Zfidod1girlr   g2boyr   b2dogr   love)r   r   )r   r   )r   r   )r   r   )xr   )yr   r   zModels Demoz
Model m2:
z--------------
zVariable assignment = r   walksr   r   zc                 S   s   g | ]}t |qS r   r   ra   )r-   r}   r   r   r   rV     s     zfolmodel.<locals>.<listcomp>z&The interpretation of '%s' in m2 is %sz-The interpretation of '%s' in m2 is Undefined)r   r   )r   )r   )r   )r   r   )r   )r   r   c                 s   s    | ]}t t|tV  qd S r*   )m2r   r   ra   r   r   r   r   r   r/     s     zfolmodel.<locals>.<genexpr>r   z) evaluates to z) evaluates to UndefinedN)Zv2rA   Zval2r[   Zdom2r   r   r~   r   r#   r   r   r   r   ra   r,   )
quietr   exprsZparsed_exprsr   ZapplicationsZfunr&   r   Zargsvalr   r   r   folmodel  sV    

	

 r   c                 C   s   t dd t  tdt  td tdt  ddddd	d
ddddddddddddg}|D ]<}t  | r|t|t|  q\td| dt|t  q\dS )zF
    Interpretation of closed expressions in a first-order model.
    Tr   r   zFOL Formulas Demozlove (adam, betty)z(adam = mia)z\x. (boy(x) | girl(x))z\x. boy(x)(adam)z\x y. love(x, y)z\x y. love(x, y)(adam)(betty)z\x y. love(x, y)(adam, betty)z\x y. (boy(x) & love(x, y))z#\x. exists y. (boy(x) & love(x, y))zexists z1. boy(z1)z!exists x. (boy(x) &  -(x = adam))z&exists x. (boy(x) & all y. love(y, x))zall x. (boy(x) | girl(x))z1all x. (girl(x) -> exists y. boy(y) & love(x, y))z3exists x. (boy(x) & all y. (girl(y) -> love(y, x)))z3exists x. (boy(x) & all y. (girl(y) -> love(x, y)))zall x. (dog(x) -> - girl(x))z-exists x. exists y. (love(x, y) & love(x, y))r   r   N)r   r#   r   r   r   r   r   )r   formulasfmlar   r   r   foldemo  s:    
r   c                 C   s   t   t dt  t d t dt  tdd ddddd	d
dddddddddddddg}| rft t |D ]}t | t| qjdd |D }|D ](}t  t d|t	|dt|  qdS )z5Satisfiers of an open formula in a first order model.r   zSatisfiers DemoTr   zboy(x)z(x = x)z(boy(x) | girl(x))z(boy(x) & girl(x))zlove(adam, x)zlove(x, adam)z-(x = adam)zexists z22. love(x, z22)zexists y. love(y, x)zall y. (girl(y) -> love(x, y))zall y. (girl(y) -> love(y, x))z)all y. (girl(y) -> (boy(x) & love(y, x)))z)(boy(x) & all y. (girl(y) -> love(x, y)))z)(boy(x) & all y. (girl(y) -> love(y, x)))z+(boy(x) & exists y. (girl(y) & love(y, x)))z(girl(x) -> dog(x))zall y. (dog(y) -> (x = y))z&exists y. (love(adam, y) & love(y, x))c                 S   s   g | ]}t |qS r   r   )r-   r   r   r   r   rV     s     zsatdemo.<locals>.<listcomp>zThe satisfiers of '{}' are: {}r   N)
r#   r   r   r   r   ra   r   r   r   r   )r   r   r   r   pr   r   r   satdemo  sH    
r   c                 C   sR   t tttd}z||  |d W n, tk
rL   |D ]} ||  |d q4Y nX dS )aO  
    Run exists demos.

     - num = 1: propositional logic demo
     - num = 2: first order model demo (only if trace is set)
     - num = 3: first order sentences demo
     - num = 4: satisfaction of open formulas demo
     - any other value: run all the demos

    :param trace: trace = 1, or trace = 2 for more verbose tracing
    )rf            r   N)r   r   r   r   KeyError)numr   Zdemosr   r   r   demo'  s    r   __main__r   r   )N)N)FN)N)N)r   N)3rb   r   resysrG   pprintr   Znltk.decoratorsr   Znltk.sem.logicr   r   r   r   r	   r
   r   r   r   r   r   r   r   r   r   r   	Exceptionr   r   r   r6   r=   r@   r    rA   compileri   rn   VERBOSErl   rt   r_   r~   r   r   r   r   r   r   r   r   r   r   r   r   <module>   sD   H
B

#
  _
1
<
,
0

