o rZh=@sdZddlZddlZddlZddlmZmZddlmZm Z m Z m Z m Z m Z mZmZmZddddd d d d d d ZGdddZGdddeeZGdddZddZddZGdddeeZGdddeZGdddeZGdd d eZd!d"Zd#d$Zd%d&Zd'gfd(gfd)gfd*gfd+gfd(gfd)gfd+gfd,gfd-gfd.d/d0gfd1gfd2gfd3gfd4d5gfd6d5gfgZgd7Z d>d9d:Z!d;d<Z"e#d=kre"dSdS)?zD A theorem prover that makes use of the external 'Prover9' package. N)BaseProverCommandProver) AllExpression AndExpressionEqualityExpressionExistsExpression Expression IffExpression ImpExpressionNegatedExpression OrExpressionTz(FATAL)Fz (MAX_MEGS)z (MAX_SECONDS)z (MAX_GIVEN)z (MAX_KEPT)z(ACTION)z (SIGSEGV)) rec@seZdZdZdddZdS)Prover9CommandParentz A common base class used by both ``Prover9Command`` and ``MaceCommand``, which is responsible for maintaining a goal and a set of assumptions, and generating prover9-style input files from them. nltkcCs\|dkr|D]}t|q dS|dkr(t|D]}t|qdStd|)z< Print the list of the current assumptions. rprover9z*Unrecognized value for 'output_format': %sN)lower assumptionsprintconvert_to_prover9 NameError)selfZ output_formatarE/var/www/auris/lib/python3.10/site-packages/nltk/inference/prover9.pyprint_assumptions6s     z&Prover9CommandParent.print_assumptionsN)r)__name__ __module__ __qualname____doc__r!rrrr r/src@s$eZdZdZd ddZd ddZdS) Prover9Commandz A ``ProverCommand`` specific to the ``Prover9`` prover. It contains the a print_assumptions() method that is used to print the list of assumptions in multiple formats. N<cCs<|sg}|durt|tsJnt|}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 timeout: number of seconds before timeout; set to 0 for no timeout. :type timeout: int :param prover: a prover. If not set, one will be created. :type prover: Prover9 N) isinstanceProver9r__init__)rgoalrtimeoutZproverrrr r*Ms  zProver9Command.__init__TcCs$|r|j|dgdS|S)z9 :see BaseProverCommand.decorate_proof() Z striplabelsr)Z_prover_call_prooftransrstrip)rZ proof_stringsimplifyrrr decorate_proofdszProver9Command.decorate_proof)NNr'N)T)r"r#r$r%r*r0rrrr r&Fs r&c@sFeZdZdZdZdddZddZdd Zdd d Zgdfd d Z dS) Prover9Parentz A common class extended by both ``Prover9`` and ``Mace ``. It contains the functionality required to convert NLTK-style expressions into Prover9-style expressions. NFcCsX|dur d|_d|_dSd}tjj||dgd||dg|d|_|jtjjd|_dS)NrPROVER9'https://www.cs.unm.edu/~mccune/prover9/.exe)Z path_to_binenv_varsurl binary_namesverboser ) _binary_location _prover9_binr internals find_binaryrsplitospathsep)rZbinary_locationr8namerrr config_prover9ys  zProver9Parent.config_prover9cCsZd}|r|d7}t|D]}|d|7}q |d7}|r+|d7}|dt|7}|d7}|S)z :return: The input string that should be provided to the prover9 binary. This string is formed based on the goal, assumptions, and timeout value of this object. zformulas(assumptions). z %s. zend_of_list. zformulas(goals). )r)rr+rsZ p9_assumptionrrr prover9_inputs zProver9Parent.prover9_inputcCsgdS)z A list of directories that should be searched for the prover9 executables. This list is used by ``config_prover9`` when searching for the prover9 executables. )z/usr/local/bin/prover9z/usr/local/bin/prover9/binz/usr/local/binz/usr/binz/usr/local/prover9z/usr/local/share/prover9r)rrrr binary_locationsszProver9Parent.binary_locationscCs@|}|jdur||jg7}tjj||dgd||dg|dS)Nr2r3r4)Z searchpathr5r6r7r8)rFr9rr;r<)rrAr8rFrrr _find_binarys   zProver9Parent._find_binaryc Cs|rtd|td|td|d|g|}z|d}Wn ty'Ynwtj|tjtjtjd}|j|d\}}|rTtd|j|rLtd |d|rTtd |d| d |jfS) a= Call the binary with the given input. :param input_str: A string whose contents are used as stdin. :param binary: The location of the binary to call :param args: A list of command-line arguments. :return: A tuple (stdout, returncode) :see: ``config_prover9`` zCalling:zArgs:zInput:  utf8)stdoutstderrstdin)inputz Return code:zstdout: zstderr: zutf-8) rencodeAttributeError subprocessPopenPIPESTDOUT communicate returncodedecode) r input_strbinaryargsr8cmdprJrKrrr _calls*        zProver9Parent._call)F) r"r#r$r%r9rBrErFrGr\rrrr r1ps   r1cCsjt|tr#g}|D]}z |t|Wq td||Szt|WStd|)z; Convert a ``logic.Expression`` to Prover9 format. z4input %s cannot be converted to Prover9 input syntax)r(listappend_convert_to_prover9r/r)rMresultrDrrr rs   rcCsBt|trdt|jdt|jSt|tr&dt|jdt|jSt|tr4dt|jdSt|trIdt|j dt|j dSt|t r^dt|j dt|j dSt|t rsdt|j d t|j dSt|t rdt|j d t|j dSt|trdt|j d t|j dSt|S) zC Convert ``logic.Expression`` to Prover9 formatted string. zexists  zall z-()(z & z | z -> z <-> z = )r(rstrvariabler_termrr rfirstsecondr r r r)Z expressionrrr r_s        r_c@sLeZdZdZdZdddZdddZdd Zgdfd d Zgdfd d Z dS)r)Nr'cCs ||_dS)N)_timeout)rr,rrr r*7szProver9.__init__FcCs.|sg}|j||||d\}}|dk|fS)z Use Prover9 to prove a theorem. :return: A pair whose first element is a boolean indicating if the proof was successful (i.e. returns value of 0) and whose second element is the output of the prover. )r8r) _call_prover9rE)rr+rr8rJrUrrr _prove=s   zProver9._provecCsd}|t|||S)z3 :see: Prover9Parent.prover9_input zclear(auto_denials). )r1rE)rr+rrDrrr rELszProver9.prover9_inputc Cs|jdur |d||_d}|jdkr|d|j7}||7}|||j||\}}|dvrQd}||vrA||}||d} nd} |dvrLt|| t|| ||fS) a Call the ``prover9`` 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`` NrrCrzassign(max_seconds, %d). )rrz%%ERROR:)rrrr)r:rGrir\indexstripProver9LimitExceededExceptionProver9FatalException) rrWrYr8Zupdated_input_strrJrUZerrormsgprefixZmsgstartZerrormsgrrr rjSs&      zProver9._call_prover9cCs*|jdur |d||_|||j||S)a Call the ``prooftrans`` 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 prooftrans)_prooftrans_binrGr\)rrWrYr8rrr r-vs zProver9._call_prooftrans)r')NNF) r"r#r$r:rpr*rkrErjr-rrrr r)3s  #r)c@seZdZddZdS)Prover9ExceptioncCs(t|}|r |d|7}t||dS)Nz %s)p9_return_codes Exceptionr*)rrUmessagemsgrrr r*s zProver9Exception.__init__N)r"r#r$r*rrrr rqs rqc@ eZdZdS)roNr"r#r$rrrr roroc@rv)rnNrwrrrr rnrxrncCsRtd}td}t||gd}d|_g|_|t|t|dS)Nz(walk(j) & sing(j))zwalk(j)r)r fromstringr&Z_executable_pathZprover9_searchproverZproof)rgr[rrr test_configs   r}cCs$|D] }t|}tt|qdS)z% Test that parsing works OK. N)rrzrr)exprterrr test_convert_to_prover9s rcCsf|D].\}}t|}dd|D}t||d}|D]}td|qtd|d|dqdS) z2 Try some proofs and exhibit the results. cSsg|]}t|qSr)rrz).0rrrr sztest_prove..ryz %sz|- z: rHN)rrzr&r{r) argumentsr+rr|alistr[rrrr test_proves  rz(man(x) <-> (not (not man(x))))z(not (man(x) & (not man(x))))z(man(x) | (not man(x)))z(man(x) & (not man(x)))z(man(x) -> man(x))z(man(x) <-> man(x))z(not (man(x) <-> (not man(x))))zmortal(Socrates)zall x.(man(x) -> mortal(x))z man(Socrates)zA((all x.(man(x) -> walks(x)) & man(Socrates)) -> some y.walks(y))z(all x.man(x) -> all x.man(x))zsome x.all y.sees(x,y)z#some e3.(walk(e3) & subj(e3, mary))zWsome e1.(see(e1) & subj(e1, john) & some e2.(pred(e1, e2) & walk(e2) & subj(e2, mary)))zVsome x e1.(see(e1) & subj(e1, x) & some e2.(pred(e1, e2) & walk(e2) & subj(e2, mary)))) zsome x y.sees(x,y)zsome x.(man(x) & walks(x))z\x.(man(x) & walks(x))z\x y.sees(x,y)z walks(john)z\x.big(x, \y.mouse(y))z/(walks(x) & (runs(x) & (threes(x) & fours(x))))z(walks(x) -> runs(x))zsome x.(PRO(x) & sees(John, x))z some x.(man(x) & (not walks(x)))zall x.(man(x) -> walks(x))-cCstd|dS)N-)r)numrrr spacersrcCsPtdttttdtttttdtttdS)NzTesting configurationz$Testing conversion to Prover9 formatzTesting proofs)rrr}r expressionsrrrrrr demos r__main__)r)$r%r>rPrZnltk.inference.apirrZnltk.sem.logicrrrrrr r r r rrrr&r1rr_r)rsrqrornr}rrrrrrr"rrrr sr,*n@R