Renaming schelog to logic and racketing

This commit is contained in:
Jay McCarthy 2010-04-28 13:37:57 -06:00
parent 8a6cdfe582
commit 7cd703f034
22 changed files with 1443 additions and 1482 deletions

4
collects/logic/info.rkt Normal file
View File

@ -0,0 +1,4 @@
#lang setup/infotab
(define scribblings
'(("logic.scrbl" (multi-page) (tool))))

1421
collects/logic/logic.scrbl Normal file

File diff suppressed because it is too large Load Diff

3
collects/logic/main.rkt Normal file
View File

@ -0,0 +1,3 @@
#lang racket
(require "logic.rkt")
(provide (all-from-out "logic.rkt"))

View File

@ -1772,8 +1772,8 @@ path/s is either such a string or a list of them.
"collects/reader" responsible (mflatt)
"collects/rnrs" responsible (mflatt)
"collects/s-exp" responsible (mflatt eli)
"collects/schelog" responsible (jay)
"collects/tests/schelog" responsible (jay)
"collects/logic" responsible (jay)
"collects/tests/logic" responsible (jay)
"collects/scheme" responsible (mflatt sstrickl samth robby eli)
"collects/scribble" responsible (mflatt eli)
"collects/scribblings" responsible (mflatt eli robby mathias)

View File

@ -1,4 +0,0 @@
#lang setup/infotab
(define scribblings
'(("schelog.scrbl" (multi-page) (tool))))

View File

@ -1,3 +0,0 @@
#lang racket
(require "schelog.rkt")
(provide (all-from-out "schelog.rkt"))

File diff suppressed because it is too large Load Diff

View File

@ -1,6 +1,6 @@
#lang racket
(require schelog
(require logic
schemeunit)
;The following is the "Biblical" database from "The Art of

View File

@ -1,6 +1,6 @@
#lang racket
(require schelog
(require logic
schemeunit)
;The following is a simple database about a certain family in England.

View File

@ -1,6 +1,6 @@
#lang racket
(require schelog)
(require logic)
;The following is a simple database about a certain family in England.
;Should be a piece of cake, but given here so that you can hone

View File

@ -1,5 +1,5 @@
#lang racket
(require schelog tests/eli-tester)
(require logic tests/eli-tester)
(define %factorial
(%rel (x y x1 y1)

View File

@ -1,6 +1,6 @@
#lang racket
(require schelog
(require logic
"./puzzle.rkt"
schemeunit)

View File

@ -1,6 +1,6 @@
#lang racket
(require schelog
(require logic
tests/eli-tester)
;This is a very trivial program. In Prolog, it would be:

View File

@ -1,6 +1,6 @@
#lang racket
(require schelog)
(require logic)
;Exercise 14.1 (iv) from Sterling & Shapiro, p. 217-8

View File

@ -1,12 +1,12 @@
#lang racket
(require (except-in schelog %member))
(require (except-in logic %member))
;map coloring, example from Sterling & Shapiro, p. 212
;(%member x y) holds if x is in y
;; is this different from the %member provided by schelog? fencing that one out.
;; is this different from the %member provided by logic? fencing that one out.
(define %member
(%rel (X Xs Y Ys)

View File

@ -1,6 +1,6 @@
#lang racket
(require schelog)
(require logic)
(provide (all-defined-out))

View File

@ -1,9 +1,9 @@
#lang racket
(require (except-in schelog %append))
(require (except-in logic %append))
;A list of trivial programs in Prolog, just so you can get used
;to schelog syntax.
;to logic syntax.
;(%length l n) holds if length(l) = n

View File

@ -1,5 +1,5 @@
#lang racket
(require schelog
(require logic
tests/eli-tester)
(test