o rZhR.@sdZddlZddlZddlmZmZddlmZmZddl m Z m Z ddl m Z GdddeeZGd d d eeZdd d ZddZddZddZddZddZdddgfdddgfgZddZedkrledSdS) zA A model builder that makes use of the external 'Mace4' package. N)BaseModelBuilderCommand ModelBuilder)Prover9CommandParent Prover9Parent) Expression Valuation) is_indvarc@steZdZdZdZdddZeddZdd Ze d d Z e d d Z e ddZ ddZ ddZgdfddZdS) MaceCommandz A ``MaceCommand`` specific to the ``Mace`` model builder. It contains a print_assumptions() method that is used to print the list of assumptions in multiple formats. NcCs4|dur t|ts Jnt|}t||||dS)a :param goal: Input expression to prove :type goal: sem.Expression :param assumptions: Input expressions to use as assumptions in the proof. :type assumptions: list(sem.Expression) :param max_models: The maximum number of models that Mace will try before simply returning false. (Use 0 for no maximum.) :type max_models: int N) isinstanceMacer__init__)selfgoal assumptions max_modelsZ model_builderrB/var/www/auris/lib/python3.10/site-packages/nltk/inference/mace.pyr s zMaceCommand.__init__cCs |dS)N valuation)model)mbcrrrr1s zMaceCommand.valuationc Cs||d}g}|dD]}|}|dr+t||dd|d}q |drl|dd krl||dd|d}t|rO|}t||d d|d }| |t |fq |d r||ddd }d|vr|d |d}dd||d d|d  dD} | |t || fq |d |d}t||d d|d }| ||dkfq t|S)z Transform the output file into an NLTK-style Valuation. :return: A model if one is generated; None otherwise. :rtype: sem.Valuation standardFZinterpretation(,function_[]ZrelationNcSsg|]}t|qSr)intstrip).0vrrr Ss z,MaceCommand._convert2val..)_transform_output splitlinesr! startswithr indexfindrupperappendr _make_model_varsplit_make_relation_setr) r valuation_strZvaluation_standard_formatvallinel num_entitiesnamevaluevaluesrrr _convert2val5s6  & $  $zMaceCommand._convert2valc Cs:t}ddt|DD]}|tt|||q |S)a] Convert a Mace4-style relation table into a dictionary. :param num_entities: the number of entities in the model; determines the row length in the table. :type num_entities: int :param values: a list of 1's and 0's that represent whether a relation holds in a Mace4 model. :type values: list of int cSsg|] \}}|dkr|qS)rr)r"posr#rrrr$msz2MaceCommand._make_relation_set..)set enumerateaddtupler _make_relation_tuple)r3r6rpositionrrrr.bs  zMaceCommand._make_relation_setcCsbt|dkrgSt||}||}t||}||||d|}t|gt|||SNr)lenr r r,r=)r?r6r3Z sublist_sizeZ sublist_startZsublist_positionZsublistrrrr=ss   z MaceCommand._make_relation_tuplecCs,gd|}|d}|dkr|t|S|S)z Pick an alphabetic character as identifier for an entity in the model. :param value: where to index into the list of characters :type value: int )abcdefghijkr2mnopqr>stur#wxyzr)str)r5letternumrrrr,s zMaceCommand._make_model_varcCs&|s|S|dkr ||S|||S)a_ Print out a Mace4 model using any Mace4 ``interpformat`` format. See https://www.cs.unm.edu/~mccune/mace4/manual/ for details. :param valuation_str: str with the model builder's output :param format: str indicating the format for displaying models. Defaults to 'standard' format. :return: str r)r7r%rr/formatrrr_decorate_models    zMaceCommand._decorate_modelcCs"|dvr |||gdStd)z Transform the output file into any Mace4 ``interpformat`` format. :param format: Output format for displaying models. :type format: str )rZ standard2portableZtabularrawcookedxmltexrz#The specified format does not exist)_call_interpformat LookupErrorr]rrrr%s zMaceCommand._transform_outputFcCs.|jdur |jd||_|j||j||S)a Call the ``interpformat`` binary with the given input. :param input_str: A string whose contents are used as stdin. :param args: A list of command-line arguments. :return: A tuple (stdout, returncode) :see: ``config_prover9`` NZ interpformat)_interpformat_binZ _modelbuilder _find_binary_call)r input_strargsverboserrrres  zMaceCommand._call_interpformat)NNr N)__name__ __module__ __qualname____doc__rgr propertyrr7 staticmethodr.r=r,r_r%rerrrrr s   -   &r c@s2eZdZdZd ddZd ddZgdfdd ZdS) r Nr cCs ||_dS)N) _end_size)rZend_sizerrrr sz Mace.__init__FcCs.|sg}|j||||d\}}|dk|fS)z Use Mace4 to build a first order model. :return: ``True`` if a model was found (i.e. Mace returns value of 0), else ``False`` )rlr) _call_mace4Z prover9_input)rrrrlstdout returncoderrr _build_models   zMace._build_modelcCsN|jdur |d||_d}|jdkr|d|j7}||7}|||j||S)a  Call the ``mace4`` binary with the given input. :param input_str: A string whose contents are used as stdin. :param args: A list of command-line arguments. :return: A tuple (stdout, returncode) :see: ``config_prover9`` NZmace4rzassign(end_size, %d). ) _mace4_binrhrsri)rrjrkrlZupdated_input_strrrrrts  zMace._call_mace4)r )NNF)rmrnroryr rwrtrrrrr s   r cCstd|dS)N-)print)r\rrrspacersr}cCsdddd|S)zq Decode the result of model_found() :param found: The output of model_found() :type found: bool zCountermodel foundzNo countermodel foundNone)TFNr)foundrrr decode_results rcCsp|D]3\}}t|}dd|D}t||dd}|}|D]}td|qtd|dt|dqd S) z2 Try some proofs and exhibit the results. cSg|]}t|qSrZlpparser"rBrrrr$&z$test_model_found..2)rr %s|- :  N)r fromstringr build_modelr|r) argumentsrrrHalistrMrrBrrrtest_model_found s  rcCstd}dddD}t||d}|ttdt|D]}td|q"td|d t|d ttd tt|jd d S) z0 Try to build a ``nltk.sem.Valuation``. z all x.man(x)cSrr)rrrrrrr$3sz$test_build_model..)z man(John) man(Socrates)z man(Bill)z,some x.(-(x = John) & man(x) & sees(John,x))zsome x.(-(x = Bill) & man(x))z,all x.some y.(man(x) -> gives(Socrates,x,y))rzAssumptions and GoalrrrrrN)rrr rr}r|rr)rrHrrMrBrrrtest_build_model.s  rcCst|d}dd|dD}t||d}||D]}td|qtd|d|d d D]}ttd |tt|j|d q4d S)zJ Transform the model into various Mace4 ``interpformat`` formats. rcSrrrrrrrr$Trz)test_transform_output..rrrrrr)rr`rcrbzUsing '%s' format)r^N)rrr rr|r}r)Z argument_pairrHrrMrBr^rrrtest_transform_outputOs  rcCs\ttjdgddddhkttjdgdddhkttjdgd dd d hkdS) N)rrr)r3r6)rD)rB) rrrrrrrrr)rDrB)rrrrrrrr)rBrCrB)rCrCrB)r|r r.rrrrtest_make_relation_setas"rzmortal(Socrates)zall x.(man(x) -> mortal(x))rz(not mortal(Socrates))cCs ttttttddSr@)rrrrrrrrdemoxsr__main__)rz)rpostempfileZnltk.inference.apirrZnltk.inference.prover9rrZnltk.semrrZnltk.sem.logicrr r r}rrrrrrrrmrrrrs. P + !