Skip to content

Commit

Permalink
Paco: remove trailing blanks
Browse files Browse the repository at this point in the history
  • Loading branch information
nadezhin committed Jan 6, 2017
1 parent 7514e95 commit d667a75
Show file tree
Hide file tree
Showing 4 changed files with 6 additions and 6 deletions.
2 changes: 1 addition & 1 deletion books/projects/paco/books/proveall.lsp
Original file line number Diff line number Diff line change
Expand Up @@ -178,7 +178,7 @@

(dthm idempotent-isort
(equal (isort (isort x)) (isort x)))

(defun del (x lst)
(cond ((atom lst) nil)
((equal x (car lst)) (cdr lst))
Expand Down
2 changes: 1 addition & 1 deletion books/projects/paco/database.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -322,7 +322,7 @@
val))

(fn-numes-trip


; If you change the layout of the FN-NUMES value below, change
; fn-nume!
Expand Down
2 changes: 1 addition & 1 deletion books/projects/paco/rewrite.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -913,7 +913,7 @@
(disable assume-true-false
type-set))
("Subgoal 27" :do-not '(preprocess)
:by rewrite-clique-speedup-5)
:by rewrite-clique-speedup-5)
("Subgoal 26" :do-not '(preprocess)
:by rewrite-clique-speedup-4)
; ("Subgoal 17" :do-not '(preprocess)
Expand Down
6 changes: 3 additions & 3 deletions books/projects/paco/utilities.acl2
Original file line number Diff line number Diff line change
Expand Up @@ -4,7 +4,7 @@

(defpkg "PACO"
'(

; ACL2 primitives:

ACL2-NUMBERP BAD-ATOM BAD-ATOM<=
Expand Down Expand Up @@ -34,7 +34,7 @@

floor ceiling truncate round mod rem evenp oddp zerop
plusp minusp min max abs signum lognot expt binary-append

nfix e0-ordinalp e0-ord-<

CHAR< CHAR> CHAR<= CHAR>= STRING< STRING> STRING<=
Expand Down Expand Up @@ -169,6 +169,6 @@
msg

))

(set-verify-guards-eagerness 0)
(certify-book "utilities" ? t)

0 comments on commit d667a75

Please sign in to comment.