A long overdue scan to eliminate files without terminating newlines.
(DrRacket should really do that.)
This commit is contained in:
Eli Barzilay
parent
a38f384a00
commit
40124a0619
|
|
@ -21,6 +21,3 @@ Neil, would it be okay with you if I provide your csv package from the core:
|
|||
(require (planet neil/csv:1:2/csv))
|
||||
|
||||
If so, could you send me your sources? Thanks -- Matthias
|
||||
|
||||
|
||||
|
||||
|
|
@ -1,4 +1,4 @@
|
|||
#lang racket/base
|
||||
;; this is here as a backwards compatibility file to provide the snipclass
|
||||
(require mrlib/image-core)
|
||||
(provide snip-class)
|
||||
(provide snip-class)
|
||||
|
|
|
|||
|
|
@ -320,4 +320,4 @@
|
|||
(number? mode))
|
||||
(check-arg fn-name (image-color? color) 'image-color i color)]
|
||||
[(eq? mode 'outline)
|
||||
(void)]))
|
||||
(void)]))
|
||||
|
|
|
|||
|
|
@ -8,4 +8,4 @@
|
|||
|
||||
(define (tee tag x)
|
||||
(printf "~a ~s\n" tag x)
|
||||
x)
|
||||
x)
|
||||
|
|
|
|||
|
|
@ -562,4 +562,4 @@
|
|||
(L (rest history) (world-transition world (first history))))))
|
||||
(show (text (format "creating ~a" ANIMATED-GIF-FILE) 18 'red))
|
||||
(create-animated-gif rate (reverse bmps))
|
||||
(show (draw worldN)))))))
|
||||
(show (draw worldN)))))))
|
||||
|
|
|
|||
|
|
@ -12,4 +12,4 @@
|
|||
|
||||
(see-full-rectangle 3 2:rectangle)
|
||||
|
||||
(see-full-rectangle 3 1:rectangle)
|
||||
(see-full-rectangle 3 1:rectangle)
|
||||
|
|
|
|||
|
|
@ -23,4 +23,4 @@
|
|||
(on-tick suivant 1)
|
||||
(on-draw dessiner SIZE SIZE))))
|
||||
|
||||
(animation2)
|
||||
(animation2)
|
||||
|
|
|
|||
|
|
@ -38,4 +38,4 @@
|
|||
number-of-png)))
|
||||
|
||||
(create-n-images 3 3 "images3/")
|
||||
(create-n-images 0 0 "images0/")
|
||||
(create-n-images 0 0 "images0/")
|
||||
|
|
|
|||
|
|
@ -39,4 +39,4 @@
|
|||
#<procedure:set-draw#!>
|
||||
1
|
||||
#<procedure:handler> ...)
|
||||
|#
|
||||
|#
|
||||
|
|
|
|||
|
|
@ -61,25 +61,24 @@
|
|||
(define-clause on-mouse (proc world-nat-nat-mouse->world))
|
||||
(define-clause on-tick (proc world->world))
|
||||
)
|
||||
|
||||
(module utest scheme
|
||||
(module utest scheme
|
||||
(require 'clauses (for-syntax 'clauses syntax/parse) (for-template 'clauses))
|
||||
|
||||
|
||||
(define-syntax (big-bang stx)
|
||||
(syntax-parse stx
|
||||
[(big-bang world0:expr
|
||||
(~or (~optional otk:on-tick-clause)
|
||||
(~optional omc:on-mouse-clause))
|
||||
(~optional omc:on-mouse-clause))
|
||||
...)
|
||||
#`(printf "~s\n"
|
||||
'(bb world0
|
||||
#,(if (attribute omc) "mouse" "no mouse")
|
||||
#,(if (attribute otk) "tick" "no tick")))]))
|
||||
|
||||
|
||||
(big-bang 0)
|
||||
(big-bang 1 (on-tick +) (on-mouse -))
|
||||
(big-bang 2 (on-tick +))
|
||||
(big-bang 3 (on-mouse +))
|
||||
)
|
||||
|
||||
(require 'utest)
|
||||
(require 'utest)
|
||||
|
|
|
|||
|
|
@ -16,4 +16,4 @@
|
|||
(prefix-toplevels p))]))
|
||||
|
||||
(provide/contract
|
||||
[alpha-vary-ctop (compilation-top? . -> . compilation-top?)])
|
||||
[alpha-vary-ctop (compilation-top? . -> . compilation-top?)])
|
||||
|
|
|
|||
|
|
@ -110,4 +110,4 @@ Here's the idea:
|
|||
[("-e" "--exclude-modules") mod
|
||||
"Exclude a module from being batched"
|
||||
(current-excluded-modules (set-add (current-excluded-modules) mod))]
|
||||
#:args (filename) (main filename))
|
||||
#:args (filename) (main filename))
|
||||
|
|
|
|||
|
|
@ -275,4 +275,4 @@
|
|||
first-update)
|
||||
|
||||
(provide/contract
|
||||
[gc-toplevels (compilation-top? . -> . compilation-top?)])
|
||||
[gc-toplevels (compilation-top? . -> . compilation-top?)])
|
||||
|
|
|
|||
|
|
@ -170,4 +170,4 @@
|
|||
(provide/contract
|
||||
[merge-compilation-top (-> get-modvar-rewrite/c
|
||||
compilation-top?
|
||||
compilation-top?)])
|
||||
compilation-top?)])
|
||||
|
|
|
|||
|
|
@ -31,4 +31,4 @@
|
|||
#t))]))
|
||||
|
||||
(provide/contract
|
||||
[wrap-in-kernel-module (symbol? symbol? lang-info/c module-path-index? compilation-top? . -> . compilation-top?)])
|
||||
[wrap-in-kernel-module (symbol? symbol? lang-info/c module-path-index? compilation-top? . -> . compilation-top?)])
|
||||
|
|
|
|||
|
|
@ -28,4 +28,4 @@
|
|||
[MODULE-PATHS (parameter/c (or/c false/c hash?))]
|
||||
[current-module-path (parameter/c path-string?)]
|
||||
[mpi->path! (module-path-index? . -> . (or/c symbol? path?))]
|
||||
[mpi->path* (module-path-index? . -> . (or/c symbol? path?))])
|
||||
[mpi->path* (module-path-index? . -> . (or/c symbol? path?))])
|
||||
|
|
|
|||
|
|
@ -186,4 +186,4 @@
|
|||
[get-modvar-rewrite/c contract?]
|
||||
[current-excluded-modules (parameter/c set?)]
|
||||
[nodep-file (-> path-string?
|
||||
(values compilation-top? lang-info/c module-path-index? get-modvar-rewrite/c))])
|
||||
(values compilation-top? lang-info/c module-path-index? get-modvar-rewrite/c))])
|
||||
|
|
|
|||
|
|
@ -77,4 +77,4 @@
|
|||
(values (unconstrained-domain-> any/c)
|
||||
(unconstrained-domain-> any/c)))]
|
||||
[lang-info/c contract?]
|
||||
[build-compiled-path ((or/c path-string? (symbols 'relative) false/c) path-string? . -> . (or/c path-string? (symbols 'same 'up)))])
|
||||
[build-compiled-path ((or/c path-string? (symbols 'relative) false/c) path-string? . -> . (or/c path-string? (symbols 'same 'up)))])
|
||||
|
|
|
|||
|
|
@ -40,4 +40,4 @@
|
|||
[print-questions ((listof question/c) . -> . void)]
|
||||
[eval-program (program/c . -> . void)]
|
||||
[eval-top-level-statement (statement/c . -> . void)]
|
||||
[eval-statement (statement/c . -> . (or/c void (listof question/c)))])
|
||||
[eval-statement (statement/c . -> . (or/c void (listof question/c)))])
|
||||
|
|
|
|||
|
|
@ -1,3 +1,3 @@
|
|||
#lang setup/infotab
|
||||
(define scribblings '(["scribblings/datalog.scrbl" (multi-page) (language)]))
|
||||
(define compile-omit-paths '("tests"))
|
||||
(define compile-omit-paths '("tests"))
|
||||
|
|
|
|||
|
|
@ -7,4 +7,4 @@
|
|||
'(#(datalog/lang/configure-runtime configure #f))]
|
||||
[else
|
||||
default])))
|
||||
(provide get-info)
|
||||
(provide get-info)
|
||||
|
|
|
|||
|
|
@ -19,4 +19,4 @@
|
|||
(define (this-read-syntax [src #f] [in (current-input-port)])
|
||||
(compile-program
|
||||
(parameterize ([current-source-name src])
|
||||
(parse-program in)))))
|
||||
(parse-program in)))))
|
||||
|
|
|
|||
|
|
@ -3,4 +3,4 @@
|
|||
"stx.rkt")
|
||||
(provide make-theory
|
||||
theory/c
|
||||
(all-from-out "stx.rkt"))
|
||||
(all-from-out "stx.rkt"))
|
||||
|
|
|
|||
|
|
@ -79,4 +79,4 @@
|
|||
[parse-literal (input-port? . -> . literal?)]
|
||||
[parse-clause (input-port? . -> . clause?)]
|
||||
[parse-statement (input-port? . -> . statement/c)]
|
||||
[parse-program (input-port? . -> . program/c)])
|
||||
[parse-program (input-port? . -> . program/c)])
|
||||
|
|
|
|||
|
|
@ -88,4 +88,4 @@
|
|||
[format-retraction (retraction? . -> . doc?)]
|
||||
[format-query (query? . -> . doc?)]
|
||||
[format-statement (statement/c . -> . doc?)]
|
||||
[format-program (program/c . -> . doc?)])
|
||||
[format-program (program/c . -> . doc?)])
|
||||
|
|
|
|||
|
|
@ -14,4 +14,4 @@
|
|||
[env/c contract?]
|
||||
[empty-env (-> env/c)]
|
||||
[lookup ((env/c symbol?) (term/c) . ->* . (or/c false/c term/c))]
|
||||
[extend (env/c symbol? term/c . -> . void)])
|
||||
[extend (env/c symbol? term/c . -> . void)])
|
||||
|
|
|
|||
|
|
@ -33,7 +33,7 @@
|
|||
[#\" (token-STRING (list->string (get-string-token input-port)))]
|
||||
[#\( (token-LPAREN)]
|
||||
[#\, (token-COMMA)]
|
||||
[#\) (token-RPAREN)]
|
||||
[#\) (token-RPAREN)]
|
||||
[#\. (token-DOT)]
|
||||
[#\~ (token-TILDE)]
|
||||
[#\? (token-QMARK)]
|
||||
|
|
@ -41,6 +41,6 @@
|
|||
["!=" (token-NEQUAL)]
|
||||
[(eof) (token-EOF)]))
|
||||
|
||||
(provide dtokens dpunct
|
||||
(provide dtokens dpunct
|
||||
line-break id-chars variable-re identifier-re comment-re
|
||||
dlexer)
|
||||
dlexer)
|
||||
|
|
|
|||
|
|
@ -17,4 +17,4 @@
|
|||
(define dot ".")
|
||||
(define (nest n d) d)
|
||||
(define char string)
|
||||
(define doc? string?)
|
||||
(define doc? string?)
|
||||
|
|
|
|||
|
|
@ -72,4 +72,4 @@
|
|||
[subst-term (env/c term/c . -> . term/c)]
|
||||
[subst-clause (env/c clause? . -> . clause?)]
|
||||
[rename-clause (clause? . -> . clause?)]
|
||||
[rename-question (question/c . -> . question/c)])
|
||||
[rename-question (question/c . -> . question/c)])
|
||||
|
|
|
|||
|
|
@ -56,4 +56,4 @@
|
|||
(provide/contract
|
||||
[unify (question/c question/c . -> . (or/c false/c env/c))]
|
||||
[unify-terms (env/c (listof term/c) (listof term/c) . -> . (or/c false/c env/c))]
|
||||
[unify-term (env/c term/c term/c . -> . (or/c false/c env/c))])
|
||||
[unify-term (env/c term/c term/c . -> . (or/c false/c env/c))])
|
||||
|
|
|
|||
|
|
@ -102,4 +102,4 @@
|
|||
[make-literal-tbl (-> literal-tbl/c)]
|
||||
[literal-tbl-find (literal-tbl/c question/c . -> . (or/c false/c any/c))]
|
||||
[literal-tbl-replace! (literal-tbl/c question/c any/c . -> . void)]
|
||||
[mem-literal (question/c (listof question/c) . -> . boolean?)])
|
||||
[mem-literal (question/c (listof question/c) . -> . boolean?)])
|
||||
|
|
|
|||
|
|
@ -149,4 +149,4 @@
|
|||
[make-theory (-> theory/c)]
|
||||
[assume! (theory/c safe-clause? . -> . void)]
|
||||
[retract! (theory/c clause? . -> . void)]
|
||||
[prove (theory/c question/c . -> . (listof question/c))])
|
||||
[prove (theory/c question/c . -> . (listof question/c))])
|
||||
|
|
|
|||
|
|
@ -176,4 +176,4 @@ Another important reference is
|
|||
@link["http://portal.acm.org/citation.cfm?id=227597"]{Tabled Evaluation with Delaying for General Logic Programs} by W. Chen and D. S. Warren.
|
||||
Datalog is described in
|
||||
@link["http://doi.ieeecomputersociety.org/10.1109/69.43410"]{What You Always Wanted to Know About Datalog (And Never Dared to Ask)}
|
||||
by Stefano Ceri, Georg Gottlob, and Letizia Tanca.
|
||||
by Stefano Ceri, Georg Gottlob, and Letizia Tanca.
|
||||
|
|
|
|||
|
|
@ -83,4 +83,4 @@ External queries invalidate Datalog's guaranteed termination. For example, this
|
|||
(add1 X :- Z)
|
||||
(loop Z)))
|
||||
(? (loop 1)))
|
||||
]
|
||||
]
|
||||
|
|
|
|||
|
|
@ -47,4 +47,4 @@
|
|||
(except-out (all-from-out racket/base)
|
||||
#%top-interaction
|
||||
#%module-begin)
|
||||
! ~ ? :-)
|
||||
! ~ ? :-)
|
||||
|
|
|
|||
|
|
@ -1,2 +1,2 @@
|
|||
(module reader syntax/module-reader
|
||||
#:language 'datalog/sexp/lang)
|
||||
#:language 'datalog/sexp/lang)
|
||||
|
|
|
|||
|
|
@ -51,4 +51,4 @@
|
|||
delimiter-stack
|
||||
closed?)])))))
|
||||
|
||||
(provide repl-submit?)
|
||||
(provide repl-submit?)
|
||||
|
|
|
|||
|
|
@ -33,4 +33,4 @@
|
|||
[(:or "!=" #\= #\? #\~ #\. #\, ":-") (syn-val lexeme 'parenthesis #f start-pos end-pos)]
|
||||
[(eof) (syn-val lexeme 'eof #f start-pos end-pos)]
|
||||
[#\" ((colorize-string start-pos) input-port)]
|
||||
[any-char (syn-val lexeme 'error #f start-pos end-pos)]))
|
||||
[any-char (syn-val lexeme 'error #f start-pos end-pos)]))
|
||||
|
|
|
|||
|
|
@ -104,4 +104,4 @@
|
|||
|
||||
set-syncheck-mode
|
||||
get-syncheck-mode
|
||||
update-menu-status)
|
||||
update-menu-status)
|
||||
|
|
|
|||
|
|
@ -5,13 +5,14 @@
|
|||
racket/match
|
||||
racket/runtime-path)
|
||||
|
||||
;; the constants in this file are pulled from version 1.0.21 of the libsndfile header file. However,
|
||||
;; I think it would be a mistake to specify this in the call to ffi-lib; it appears that
|
||||
;; this version is a conservative extension of the earlier version (1.0.17?), and I
|
||||
;; the constants in this file are pulled from version 1.0.21 of the
|
||||
;; libsndfile header file. However, I think it would be a mistake to
|
||||
;; specify this in the call to ffi-lib; it appears that this version is
|
||||
;; a conservative extension of the earlier version (1.0.17?), and I
|
||||
;; think you'll get graceful failures if the version is wrong.
|
||||
|
||||
(define-runtime-path mac-ffi-path "./lib/libsndfile")
|
||||
(define libsndfile
|
||||
(define libsndfile
|
||||
(match (system-type)
|
||||
['unix (ffi-lib "libsndfile" '("1.0.21" "1.0.20" ""))]
|
||||
['macosx (ffi-lib mac-ffi-path '("1.0.21" "1.0.20" ""))]
|
||||
|
|
@ -31,9 +32,8 @@
|
|||
(define _sndfile
|
||||
(make-ctype _pointer sndfile-ptr
|
||||
(lambda (p)
|
||||
;; can't check here for null-ness of p,
|
||||
;; the check has to be specific to the
|
||||
;; call.
|
||||
;; can't check here for null-ness of p, the check has to be
|
||||
;; specific to the call.
|
||||
(make-sndfile p #f))))
|
||||
|
||||
;; sf_count_t is a count type that depends on the operating system however it
|
||||
|
|
@ -45,7 +45,7 @@
|
|||
(_bitmask '(sfm-read = #x10
|
||||
sfm-write = #x20
|
||||
sfm-rdwrt = #x30
|
||||
|
||||
|
||||
;; I really have no clue what these are for:
|
||||
sf-ambisonic-none = #x40
|
||||
sf-ambisonic-b-format = #x41)))
|
||||
|
|
@ -56,31 +56,31 @@
|
|||
|
||||
(define _sf-format
|
||||
(let ([majors ; Major formats
|
||||
'((wav #x010000) ; Microsoft WAV format (little endian default).
|
||||
(aiff #x020000) ; Apple/SGI AIFF format (big endian).
|
||||
(au #x030000) ; Sun/NeXT AU format (big endian).
|
||||
(raw #x040000) ; RAW PCM data.
|
||||
(paf #x050000) ; Ensoniq PARIS file format.
|
||||
(svx #x060000) ; Amiga IFF / SVX8 / SV16 format.
|
||||
(nist #x070000) ; Sphere NIST format.
|
||||
(voc #x080000) ; VOC files.
|
||||
(ircam #x0A0000) ; Berkeley/IRCAM/CARL
|
||||
(w64 #x0B0000) ; Sonic Foundry's 64 bit RIFF/WAV
|
||||
(mat4 #x0C0000) ; Matlab (tm) V4.2 / GNU Octave 2.0
|
||||
(mat5 #x0D0000) ; Matlab (tm) V5.0 / GNU Octave 2.1
|
||||
(pvf #x0E0000) ; Portable Voice Format
|
||||
(xi #x0F0000) ; Fasttracker 2 Extended Instrument
|
||||
(htk #x100000) ; HMM Tool Kit format
|
||||
(sds #x110000) ; Midi Sample Dump Standard
|
||||
(avr #x120000) ; Audio Visual Research
|
||||
(wavex #x130000) ; MS WAVE with WAVEFORMATEX
|
||||
(sd2 #x160000) ; Sound Designer 2
|
||||
(flac #x170000) ; FLAC lossless file format
|
||||
(caf #x180000) ; Core Audio File format
|
||||
(wve #x190000) ; Psion WVE format
|
||||
(ogg #x200000) ; Xiph OGG container
|
||||
(mpc2k #x210000) ; Akai MPC 2000 sampler
|
||||
(rf64 #x220000) ; RF64 WAV file
|
||||
'((wav #x010000) ; Microsoft WAV format (little endian default).
|
||||
(aiff #x020000) ; Apple/SGI AIFF format (big endian).
|
||||
(au #x030000) ; Sun/NeXT AU format (big endian).
|
||||
(raw #x040000) ; RAW PCM data.
|
||||
(paf #x050000) ; Ensoniq PARIS file format.
|
||||
(svx #x060000) ; Amiga IFF / SVX8 / SV16 format.
|
||||
(nist #x070000) ; Sphere NIST format.
|
||||
(voc #x080000) ; VOC files.
|
||||
(ircam #x0A0000) ; Berkeley/IRCAM/CARL
|
||||
(w64 #x0B0000) ; Sonic Foundry's 64 bit RIFF/WAV
|
||||
(mat4 #x0C0000) ; Matlab (tm) V4.2 / GNU Octave 2.0
|
||||
(mat5 #x0D0000) ; Matlab (tm) V5.0 / GNU Octave 2.1
|
||||
(pvf #x0E0000) ; Portable Voice Format
|
||||
(xi #x0F0000) ; Fasttracker 2 Extended Instrument
|
||||
(htk #x100000) ; HMM Tool Kit format
|
||||
(sds #x110000) ; Midi Sample Dump Standard
|
||||
(avr #x120000) ; Audio Visual Research
|
||||
(wavex #x130000) ; MS WAVE with WAVEFORMATEX
|
||||
(sd2 #x160000) ; Sound Designer 2
|
||||
(flac #x170000) ; FLAC lossless file format
|
||||
(caf #x180000) ; Core Audio File format
|
||||
(wve #x190000) ; Psion WVE format
|
||||
(ogg #x200000) ; Xiph OGG container
|
||||
(mpc2k #x210000) ; Akai MPC 2000 sampler
|
||||
(rf64 #x220000) ; RF64 WAV file
|
||||
)]
|
||||
[subtypes ; Subtypes from here on
|
||||
'((pcm-s8 #x0001) ; Signed 8 bit data
|
||||
|
|
@ -90,27 +90,27 @@
|
|||
(pcm-u8 #x0005) ; Unsigned 8 bit data (WAV and RAW only)
|
||||
(float #x0006) ; 32 bit float data
|
||||
(double #x0007) ; 64 bit float data
|
||||
|
||||
|
||||
(ulaw #x0010) ; U-Law encoded
|
||||
(alaw #x0011) ; A-Law encoded
|
||||
(ima-adpcm #x0012) ; IMA ADPCM
|
||||
(ms-adpcm #x0013) ; Microsoft ADPCM
|
||||
|
||||
|
||||
(gsm610 #x0020) ; GSM 6.10 encoding
|
||||
(vox-adpcm #x0021) ; OKI / Dialogix ADPCM
|
||||
|
||||
|
||||
(g721-32 #x0030) ; 32kbs G721 ADPCM encoding
|
||||
(g723-24 #x0031) ; 24kbs G723 ADPCM encoding
|
||||
(g723-40 #x0032) ; 40kbs G723 ADPCM encoding
|
||||
|
||||
|
||||
(dwvw-12 #x0040) ; 12 bit Delta Width Variable Word encoding
|
||||
(dwvw-16 #x0041) ; 16 bit Delta Width Variable Word encoding
|
||||
(dwvw-24 #x0042) ; 24 bit Delta Width Variable Word encoding
|
||||
(dwvw-n #x0043) ; N bit Delta Width Variable Word encoding
|
||||
|
||||
|
||||
(dpcm-8 #x0050) ; 8 bit differential PCM (XI only)
|
||||
(dpcm-16 #x0051) ; 16 bit differential PCM (XI only)
|
||||
|
||||
|
||||
(vorbis #x0060) ; Xiph Vorbis encoding.
|
||||
)]
|
||||
[endians ; Endian-ness options
|
||||
|
|
@ -231,13 +231,13 @@
|
|||
;; ==================== Utilities for the Scheme interface ====================
|
||||
|
||||
;; get-meta-strings : sndfile -> (listof (list/c sf-str-type string))
|
||||
;; produce an association list for the meta-information associated with
|
||||
;; produce an association list for the meta-information associated with
|
||||
;; the sndfile
|
||||
|
||||
;; Q: can sf-get-string signal an error? apparently so. I think it makes sense
|
||||
;; to identify these errors with the simple lack of the string, which
|
||||
;; requires no change to the code. I hope that such an error doesn't pollute
|
||||
;; later operations on the soundfile.
|
||||
;; Q: can sf-get-string signal an error? apparently so. I think it makes
|
||||
;; sense to identify these errors with the simple lack of the string,
|
||||
;; which requires no change to the code. I hope that such an error
|
||||
;; doesn't pollute later operations on the soundfile.
|
||||
(define (get-meta-strings sndfile)
|
||||
(for/list ([s (in-list str-types)]
|
||||
#:when (sf-get-string sndfile s))
|
||||
|
|
@ -254,7 +254,7 @@
|
|||
|
||||
|
||||
;; read-sound-internal : path-string -> (values/c (or/c cblock (listof (listof sample))) a-list)
|
||||
;; read the data from a file.
|
||||
;; read the data from a file.
|
||||
(define (read-sound-internal file)
|
||||
(let* ([sndfile (sf-open file 'sfm-read)]
|
||||
[strings (get-meta-strings sndfile)]
|
||||
|
|
@ -265,12 +265,10 @@
|
|||
[(short) _int16] [(int) _int] [(float) _double*])]
|
||||
[readf (sample-type->reader (sample-type))]
|
||||
[cblock ((sample-type->vector-maker (sample-type)) (* frames channels))]
|
||||
[num-read (readf sndfile ((sample-type->cpointer-extractor (sample-type)) cblock) frames)]
|
||||
[_ (unless (= frames num-read)
|
||||
(error 'read-sound-internal
|
||||
"wanted ~s frames, but got ~s: ~s"
|
||||
frames num-read
|
||||
(sf-strerror sndfile)))])
|
||||
[num-read (readf sndfile ((sample-type->cpointer-extractor (sample-type)) cblock) frames)])
|
||||
(unless (= frames num-read)
|
||||
(error 'read-sound-internal "wanted ~e frames, but got ~e: ~e"
|
||||
frames num-read (sf-strerror sndfile)))
|
||||
(begin0 (values cblock
|
||||
`((frames ,frames)
|
||||
(samplerate ,(sf-info-samplerate info))
|
||||
|
|
@ -279,8 +277,7 @@
|
|||
(sections ,(sf-info-sections info))
|
||||
,@strings))
|
||||
(unless (= 0 (sf-close sndfile))
|
||||
(error 'read-sound-internal
|
||||
"error while closing file: ~s"
|
||||
(error 'read-sound-internal "error while closing file: ~e"
|
||||
(sf-strerror sndfile))))))
|
||||
|
||||
|
||||
|
|
@ -334,7 +331,7 @@
|
|||
(void)))
|
||||
|
||||
;; write-sound-internal/lists : path-string (listof (listof sample)) (listof (list/c symbol? string?)) -> (void)
|
||||
;; a bunch of guessing happens here...
|
||||
;; a bunch of guessing happens here...
|
||||
(define (write-sound-internal/lists file data meta)
|
||||
(let* ([frames (length data)]
|
||||
[channels (if (or (null? data) (not (pair? (car data))))
|
||||
|
|
@ -377,10 +374,10 @@
|
|||
[else (loop (cdr xs))])))
|
||||
|
||||
;; check-filename-format : format filename -> (void)
|
||||
;; check that the format is compatible with the given
|
||||
;; pathname; it should not be possible to write, e.g., an aiff file
|
||||
;; to a filename ending in ".voc". If we don't recognize the
|
||||
;; filename extension, it's okay.
|
||||
;; check that the format is compatible with the given pathname; it
|
||||
;; should not be possible to write, e.g., an aiff file to a filename
|
||||
;; ending in ".voc". If we don't recognize the filename extension, it's
|
||||
;; okay.
|
||||
;; EFFECT: signals an error if the format and filename are incompatible
|
||||
(define (check-filename-format format filename)
|
||||
(match format
|
||||
|
|
@ -389,10 +386,10 @@
|
|||
(cond [(null? xs) (void)]
|
||||
[(regexp-match (caar xs) filename)
|
||||
(match (cadar xs)
|
||||
[(list major/f minor/f file/f)
|
||||
[(list major/f minor/f file/f)
|
||||
(unless (eq? major major/f)
|
||||
(error 'check-filename-format
|
||||
"can't use format ~s with filename ~s."
|
||||
"can't use format ~s with filename ~s."
|
||||
format
|
||||
filename))]
|
||||
[other
|
||||
|
|
@ -440,7 +437,7 @@
|
|||
(make-parameter
|
||||
'float (lambda (x)
|
||||
(if (memq x '(short int double))
|
||||
x
|
||||
x
|
||||
(error 'sample-type "bad or unsupported type: ~s" x)))))
|
||||
|
||||
|
||||
|
|
@ -499,8 +496,8 @@
|
|||
;; write the cblock sound to the given file as a wav.
|
||||
(provide write-sound/s16vector)
|
||||
(define (write-sound/s16vector data sample-rate file)
|
||||
(write-sound-internal/s16vector file data '(wav pcm-16 file)
|
||||
sample-rate
|
||||
(write-sound-internal/s16vector file data '(wav pcm-16 file)
|
||||
sample-rate
|
||||
(/ (s16vector-length data) global-channels)
|
||||
2
|
||||
'short
|
||||
|
|
@ -508,8 +505,6 @@
|
|||
'()))
|
||||
|
||||
|
||||
|
||||
|
||||
;; test cases for check-filename-format: Commented out until there's a critical mass.
|
||||
|
||||
;; okay even though minor and file don't match:
|
||||
|
|
@ -517,4 +512,4 @@
|
|||
;; major doesn't match:
|
||||
;(check-exn exn:fail? (lambda () (check-filename-format '(wav float file) "/tmp/zabaglione.mat")))
|
||||
;; bad input format:
|
||||
;(check-exn exn:fail? (lambda () (check-filename-format '(spam spam spam spam) "/tmp/zabaglione.wav")))
|
||||
;(check-exn exn:fail? (lambda () (check-filename-format '(spam spam spam spam) "/tmp/zabaglione.wav")))
|
||||
|
|
|
|||
|
|
@ -523,4 +523,3 @@
|
|||
(set-flags (cons 'handles-events (get-flags)))
|
||||
(set-snipclass number-snipclass)
|
||||
(iterate 1))) ;; calc first digits
|
||||
|
||||
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
|
|
@ -1 +1 @@
|
|||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 15x20") (define problems (list (make-problem "19990127aLLO (1)" (quote ((6 2) (1 1 6) (1 1 2 2) (2 2 1 1) (1 2 1) (6 1 4 1) (1 1 1 1 1) (1 1 1 1) (3 1 1 1 1 1) (1 1 1 1) (5 1 1 1 1) (1 1 1 1 1 1) (3 1 1 1 1) (1 1 1 1) (1 1 1 1 1 1) (6 1 1 1) (1 1 1 1 1) (1 2 2 1) (5 4 1) (1 1 2 1))) (quote ((4 2 1 1 3 2) (1 1 1 1 1 1 1) (1 1 1 3 1 1) (1 1 1 1 1 3) (1 1 1 1 3 1 1) (4 1 3) () (16) (2 2) (1 10 2) (2 2 2) (2 2 2) (1 13) (2) (18))) (quote ("xxxx xx x x xxx xx" "x x x x x x x " "x x x xxx x x " "x x x x x xxx" "x x x x xxx x x " "xxxx x xxx " " " " xxxxxxxxxxxxxxxx " " xx xx " " x xxxxxxxxxx xx" "xx xx xx" "xx xx xx " " x xxxxxxxxxxxxx " " xx " " xxxxxxxxxxxxxxxxxx"))) (make-problem "19990127bLLO (2)" (quote ((3) (5) (7) (1 7) (2 4) (7) (5) (5) (5) (8) (6 2) (2 3 1 1) (2 2 2) (8) (5) (5) (5) (7) (7) (5))) (quote ((1) (3) (2 2) (2 3 1) (1 2 3 1 2) (3 15) (4 6 8) (4 5 1 7) (11 8) (19) (4 2) (2) () () ())) (quote (" x " " xxx " " xx xx " " xx xxx x " " x xx xxx x xx " " xxx xxxxxxxxxxxxxxx" "xxxx xxxxxx xxxxxxxx" "xxxx xxxxx x xxxxxxx" "xxxxxxxxxxx xxxxxxxx" " xxxxxxxxxxxxxxxxxxx" " xxxx xx " " xx " " " " " " "))) (make-problem "19990421bMIJ (3)" (quote (() (1 1 1) (2 2) (1 1 1) (2 1) (1 1) (1 1) (1) (1) (1 1 1 1) (3 1 3) (3 4) (1 3) (1 2) (1 1 1) (2 1 1) (2 1) (1 1) (15) (15))) (quote ((2) (1 2) (3 1 2) (10) (3 1 2) (5 1 2) (1 1 1 2) (1 1 13) (1 1 3 2) (5 3 2) (2 2) (2 2) (2) (2) (2))) (quote (" xx" " x xx" " xxx x xx" " xxxxxxxxxx" " xxx x xx" " xxxxx x xx" " x x x xx" " x x xxxxxxxxxxxxx" " x x xxx xx" " xxxxx xxx xx" " xx xx" " xx xx" " xx" " xx" " xx"))))))
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 15x20") (define problems (list (make-problem "19990127aLLO (1)" (quote ((6 2) (1 1 6) (1 1 2 2) (2 2 1 1) (1 2 1) (6 1 4 1) (1 1 1 1 1) (1 1 1 1) (3 1 1 1 1 1) (1 1 1 1) (5 1 1 1 1) (1 1 1 1 1 1) (3 1 1 1 1) (1 1 1 1) (1 1 1 1 1 1) (6 1 1 1) (1 1 1 1 1) (1 2 2 1) (5 4 1) (1 1 2 1))) (quote ((4 2 1 1 3 2) (1 1 1 1 1 1 1) (1 1 1 3 1 1) (1 1 1 1 1 3) (1 1 1 1 3 1 1) (4 1 3) () (16) (2 2) (1 10 2) (2 2 2) (2 2 2) (1 13) (2) (18))) (quote ("xxxx xx x x xxx xx" "x x x x x x x " "x x x xxx x x " "x x x x x xxx" "x x x x xxx x x " "xxxx x xxx " " " " xxxxxxxxxxxxxxxx " " xx xx " " x xxxxxxxxxx xx" "xx xx xx" "xx xx xx " " x xxxxxxxxxxxxx " " xx " " xxxxxxxxxxxxxxxxxx"))) (make-problem "19990127bLLO (2)" (quote ((3) (5) (7) (1 7) (2 4) (7) (5) (5) (5) (8) (6 2) (2 3 1 1) (2 2 2) (8) (5) (5) (5) (7) (7) (5))) (quote ((1) (3) (2 2) (2 3 1) (1 2 3 1 2) (3 15) (4 6 8) (4 5 1 7) (11 8) (19) (4 2) (2) () () ())) (quote (" x " " xxx " " xx xx " " xx xxx x " " x xx xxx x xx " " xxx xxxxxxxxxxxxxxx" "xxxx xxxxxx xxxxxxxx" "xxxx xxxxx x xxxxxxx" "xxxxxxxxxxx xxxxxxxx" " xxxxxxxxxxxxxxxxxxx" " xxxx xx " " xx " " " " " " "))) (make-problem "19990421bMIJ (3)" (quote (() (1 1 1) (2 2) (1 1 1) (2 1) (1 1) (1 1) (1) (1) (1 1 1 1) (3 1 3) (3 4) (1 3) (1 2) (1 1 1) (2 1 1) (2 1) (1 1) (15) (15))) (quote ((2) (1 2) (3 1 2) (10) (3 1 2) (5 1 2) (1 1 1 2) (1 1 13) (1 1 3 2) (5 3 2) (2 2) (2 2) (2) (2) (2))) (quote (" xx" " x xx" " xxx x xx" " xxxxxxxxxx" " xxx x xx" " xxxxx x xx" " x x x xx" " x x xxxxxxxxxxxxx" " x x xxx xx" " xxxxx xxx xx" " xx xx" " xx xx" " xx" " xx" " xx"))))))
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 15x25") (define problems (list (make-problem "19990804aVAC (1)" (quote ((3) (4) (4 4) (7 3) (7 3) (2 2 2) (1 2) (4 2) (7) (8) (2 1 3) (1 2) (2 2) (2 2) (1 1 1 2) (1 1 1 2) (1 1 1 1 2) (6 2 1) (1 1 1 4) (1 3 1 4) (1 1 3 1) (1 6 2) (1 4 2) (1 2 2) (1 2))) (quote ((2 5) (3 1 1) (4 6 1 1) (3 4 3 1 1) (3 2 1 1 2 1) (4 2 6 3) (7 3) (4 3 1) (3 3 3 1) (2 3 1 1) (3 3 2) (5 14 2) (7 10 1) (4 3) (3))) (quote (" xx xxxxx " " xxx x x " " xxxx xxxxxx x x " " xxx xxxx xxx x x " " xxx xx x x xx x" " xxxx xx xxxxxx xxx " " xxxxxxx xxx " " xxxx xxx x" " xxx xxx xxx x" "xx xxx x x " "xxx xxx xx " "xxxxx xxxxxxxxxxxxxx xx " " xxxxxxx xxxxxxxxxx x " " xxxx xxx " " xxx "))))))
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 15x25") (define problems (list (make-problem "19990804aVAC (1)" (quote ((3) (4) (4 4) (7 3) (7 3) (2 2 2) (1 2) (4 2) (7) (8) (2 1 3) (1 2) (2 2) (2 2) (1 1 1 2) (1 1 1 2) (1 1 1 1 2) (6 2 1) (1 1 1 4) (1 3 1 4) (1 1 3 1) (1 6 2) (1 4 2) (1 2 2) (1 2))) (quote ((2 5) (3 1 1) (4 6 1 1) (3 4 3 1 1) (3 2 1 1 2 1) (4 2 6 3) (7 3) (4 3 1) (3 3 3 1) (2 3 1 1) (3 3 2) (5 14 2) (7 10 1) (4 3) (3))) (quote (" xx xxxxx " " xxx x x " " xxxx xxxxxx x x " " xxx xxxx xxx x x " " xxx xx x x xx x" " xxxx xx xxxxxx xxx " " xxxxxxx xxx " " xxxx xxx x" " xxx xxx xxx x" "xx xxx x x " "xxx xxx xx " "xxxxx xxxxxxxxxxxxxx xx " " xxxxxxx xxxxxxxxxx x " " xxxx xxx " " xxx "))))))
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 20x15") (define problems (list (make-problem "19990524-KHO (1)" (quote ((1) (2 2 1) (1 1 2) (3 1) (5 2) (3 3 1) (8 1) (19) (1 14) (1 13) (13) (2 1 1 3 3) (4 1 1 2 2) (4 1 1 1 1) (2 1 1 2 2))) (quote ((2) (3 1 4) (1 4 4) (1 4 2) (3 2) (6 1) (12) (1 7 1) (1 8) (4) (4) (4) (5) (6 1) (8) (4) (6 1) (3 8) (3 5) (4))) (quote (" xx " " xxx x xxxx" " x xxxx xxxx" " x xxxx xx " " xxx xx " " xxxxxx x" " xxxxxxxxxxxx " " x xxxxxxx x" " x xxxxxxxx " " xxxx " " xxxx " " xxxx " " xxxxx " " xxxxxx x" " xxxxxxxx" " xxxx " " xxxxxx x" "xxx xxxxxxxx" " xxx xxxxx " " xxxx "))))))
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 20x15") (define problems (list (make-problem "19990524-KHO (1)" (quote ((1) (2 2 1) (1 1 2) (3 1) (5 2) (3 3 1) (8 1) (19) (1 14) (1 13) (13) (2 1 1 3 3) (4 1 1 2 2) (4 1 1 1 1) (2 1 1 2 2))) (quote ((2) (3 1 4) (1 4 4) (1 4 2) (3 2) (6 1) (12) (1 7 1) (1 8) (4) (4) (4) (5) (6 1) (8) (4) (6 1) (3 8) (3 5) (4))) (quote (" xx " " xxx x xxxx" " x xxxx xxxx" " x xxxx xx " " xxx xx " " xxxxxx x" " xxxxxxxxxxxx " " x xxxxxxx x" " x xxxxxxxx " " xxxx " " xxxx " " xxxx " " xxxxx " " xxxxxx x" " xxxxxxxx" " xxxx " " xxxxxx x" "xxx xxxxxxxx" " xxx xxxxx " " xxxx "))))))
|
||||
|
|
|
|||
File diff suppressed because one or more lines are too long
|
|
@ -1 +1 @@
|
|||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 20x25") (define problems (list (make-problem "19980620-KKA (1)" (quote (() (1) (3) () () () () (1) (2) (1) (2) (2) (2 1 1) (2 3 2) (1 2 4 1 1) (1 2 1 1 2 1) (1 1 2 2 1 1 2) (1 4 1 4 4) (20) () (11 1 3 1) (1 1 1 1 1 1 1 1) (1 3 1 2 1 3 1) (1 1 1 1 1 1 1) (1 3 1 1 1 1 3 1))) (quote ((1 1) (5 5) (1 1) (5 5) (1 2 2 1 1 1) (2 2 1 1 1) (6 1) (1 1 1 1 5) (2 2 1 1 1) (1 4 2 3 5) (4 2 1 1 1) (1 2 1 2) (3) (3 2 5) (2 4) (1 3 1) (5 1 1 1) (3 1 3) (2) (2 3 1))) (quote (" x x " " xxxxx xxxxx" " x x " " xxxxx xxxxx" " x xx xx x x x" " xx xx x x x" " xxxxxx x " " x x x x xxxxx" " xx xx x x x " " x xxxx xx xxx xxxxx" " xxxx xx x x x " " x xx x xx" " xxx " " xxx xx xxxxx" " xx xxxx " " x xxx x" " xxxxx x x x" " xxx x xxx" " xx " " xx xxx x"))) (make-problem "19991113cBAR (2)" (quote ((3 1 2 1) (2 3 2 3 2) (17 1) (19) (19) (12 7) (8 2 1 5) (4 1 5) (3 4) (6 7) (2 3 3 4) (3 2 2 4) (4 5) (4 6) (5 3 6) (4 5 6) (5 1 6) (4 5 5) (4 3 3 3) (2 3) (5 6) (8 7) (17) (13 1) (1 2 3 3))) (quote ((1 5 4 3 1) (21) (23) (7 1 7 5) (5 1 3 4) (7 2 1 4) (8 2 1 4) (7 2 1 2 3) (4 2 1 4) (7 4 3) (6 2 1 3) (4 2 1 2 3) (5 2 1 4) (7 2 1 5) (5 1 4 5) (8 7 3) (24) (22) (18) (1 4 2 6))) (quote (" x xxxxx xxxx xxx x " " xxxxxxxxxxxxxxxxxxxxx " " xxxxxxxxxxxxxxxxxxxxxxx " " xxxxxxx x xxxxxxx xxxxx" " xxxxx x xxx xxxx " "xxxxxxx xx x xxxx" "xxxxxxxx xx x xxxx" "xxxxxxx xx x xx xxx " " xxxx xx x xxxx" "xxxxxxx xxxx xxx" " xxxxxx xx x xxx" " xxxx xx x xx xxx " "xxxxx xx x xxxx" "xxxxxxx xx x xxxxx" " xxxxx x xxxx xxxxx" " xxxxxxxx xxxxxxx xxx " "xxxxxxxxxxxxxxxxxxxxxxxx " " xxxxxxxxxxxxxxxxxxxxxx " " xxxxxxxxxxxxxxxxxx " " x xxxx xx xxxxxx "))) (make-problem "19991113gBAR (3)" (quote (() () (4 4) (8 6) (14 3) (3 7 2) (3 5 2) (6 2) (6 2) (6 3) (6 4) (8 4) (14) (14) (10 3) (14) (16) (18) (3 14) (3 14) (4 13) (4 11) (3 9) (12) (10))) (quote ((2 4) (3 6) (3 9) (4 5 4) (4 8 4) (4 10 2) (2 16 2) (3 18) (21) (21) (21) (21) (3 3 10) (3 13) (3 12) (2 12) (2 4 6) (3 4 4) (9) (7))) (quote (" xx xxxx " " xxx xxxxxx " " xxx xxxxxxxxx " " xxxx xxxxx xxxx " " xxxx xxxxxxxx xxxx" " xxxx xxxxxxxxxx xx" " xx xxxxxxxxxxxxxxxx xx" " xxx xxxxxxxxxxxxxxxxxx" " xxxxxxxxxxxxxxxxxxxxx" " xxxxxxxxxxxxxxxxxxxxx" " xxxxxxxxxxxxxxxxxxxxx" " xxxxxxxxxxxxxxxxxxxxx" " xxx xxx xxxxxxxxxx" " xxx xxxxxxxxxxxxx" " xxx xxxxxxxxxxxx " " xx xxxxxxxxxxxx " " xx xxxx xxxxxx " " xxx xxxx xxxx " " xxxxxxxxx " " xxxxxxx "))) (make-problem "19991115cBAR (4)" (quote ((8 9) (8 8) (4 2 5 1) (4 2 3 1) (4 2 2 1) (1 2 1 1 2) (1 3 1 3) (1 1 3) (1 1 3 2 1) (2 5 1 1) (4 2 4 1) (2 2 4 2 2) (1 1 5 3) (4 2 5) (2 4 4) (1 2 5 2) (4 3 1) (2 1 1 1) (1 2 2 1) (1 2 1 2 1) (2 1 1 4) (5 1 4) (4 2 4) (4 4 5) (5 7 5))) (quote ((13 10) (5 3 2 5) (5 1 1 4) (6 1 1 4) (2 2 1 1 2 1) (2 1 1 1 1) (3 2 1 1) (4 1 5 1 1) (2 3 3 2 2) (2 2 3 2 2) (9 3) (1 3 1 3 7) (3 7 2 1) (7 5) (5) (4 2 1 2 2) (3 1 2 6) (2 2 3 5) (2 3 5 5) (18 6))) (quote ("xxxxxxxxxxxxx xxxxxxxxxx" "xxxxx xxx xx xxxxx" "xxxxx x x xxxx" "xxxxxx x x xxxx" "xx xx x x xx x" "xx x x x x " "xxx xx x x" "xxxx x xxxxx x x" " xx xxx xxx xx xx" " xx xx xxx xx xx" " xxxxxxxxx xxx" "x xxx x xxx xxxxxxx" "xxx xxxxxxx xx x" "xxxxxxx xxxxx " "xxxxx " "xxxx xx x xx xx" "xxx x xx xxxxxx" "xx xx xxx xxxxx" "xx xxx xxxxx xxxxx" "xxxxxxxxxxxxxxxxxx xxxxxx"))))))
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 20x25") (define problems (list (make-problem "19980620-KKA (1)" (quote (() (1) (3) () () () () (1) (2) (1) (2) (2) (2 1 1) (2 3 2) (1 2 4 1 1) (1 2 1 1 2 1) (1 1 2 2 1 1 2) (1 4 1 4 4) (20) () (11 1 3 1) (1 1 1 1 1 1 1 1) (1 3 1 2 1 3 1) (1 1 1 1 1 1 1) (1 3 1 1 1 1 3 1))) (quote ((1 1) (5 5) (1 1) (5 5) (1 2 2 1 1 1) (2 2 1 1 1) (6 1) (1 1 1 1 5) (2 2 1 1 1) (1 4 2 3 5) (4 2 1 1 1) (1 2 1 2) (3) (3 2 5) (2 4) (1 3 1) (5 1 1 1) (3 1 3) (2) (2 3 1))) (quote (" x x " " xxxxx xxxxx" " x x " " xxxxx xxxxx" " x xx xx x x x" " xx xx x x x" " xxxxxx x " " x x x x xxxxx" " xx xx x x x " " x xxxx xx xxx xxxxx" " xxxx xx x x x " " x xx x xx" " xxx " " xxx xx xxxxx" " xx xxxx " " x xxx x" " xxxxx x x x" " xxx x xxx" " xx " " xx xxx x"))) (make-problem "19991113cBAR (2)" (quote ((3 1 2 1) (2 3 2 3 2) (17 1) (19) (19) (12 7) (8 2 1 5) (4 1 5) (3 4) (6 7) (2 3 3 4) (3 2 2 4) (4 5) (4 6) (5 3 6) (4 5 6) (5 1 6) (4 5 5) (4 3 3 3) (2 3) (5 6) (8 7) (17) (13 1) (1 2 3 3))) (quote ((1 5 4 3 1) (21) (23) (7 1 7 5) (5 1 3 4) (7 2 1 4) (8 2 1 4) (7 2 1 2 3) (4 2 1 4) (7 4 3) (6 2 1 3) (4 2 1 2 3) (5 2 1 4) (7 2 1 5) (5 1 4 5) (8 7 3) (24) (22) (18) (1 4 2 6))) (quote (" x xxxxx xxxx xxx x " " xxxxxxxxxxxxxxxxxxxxx " " xxxxxxxxxxxxxxxxxxxxxxx " " xxxxxxx x xxxxxxx xxxxx" " xxxxx x xxx xxxx " "xxxxxxx xx x xxxx" "xxxxxxxx xx x xxxx" "xxxxxxx xx x xx xxx " " xxxx xx x xxxx" "xxxxxxx xxxx xxx" " xxxxxx xx x xxx" " xxxx xx x xx xxx " "xxxxx xx x xxxx" "xxxxxxx xx x xxxxx" " xxxxx x xxxx xxxxx" " xxxxxxxx xxxxxxx xxx " "xxxxxxxxxxxxxxxxxxxxxxxx " " xxxxxxxxxxxxxxxxxxxxxx " " xxxxxxxxxxxxxxxxxx " " x xxxx xx xxxxxx "))) (make-problem "19991113gBAR (3)" (quote (() () (4 4) (8 6) (14 3) (3 7 2) (3 5 2) (6 2) (6 2) (6 3) (6 4) (8 4) (14) (14) (10 3) (14) (16) (18) (3 14) (3 14) (4 13) (4 11) (3 9) (12) (10))) (quote ((2 4) (3 6) (3 9) (4 5 4) (4 8 4) (4 10 2) (2 16 2) (3 18) (21) (21) (21) (21) (3 3 10) (3 13) (3 12) (2 12) (2 4 6) (3 4 4) (9) (7))) (quote (" xx xxxx " " xxx xxxxxx " " xxx xxxxxxxxx " " xxxx xxxxx xxxx " " xxxx xxxxxxxx xxxx" " xxxx xxxxxxxxxx xx" " xx xxxxxxxxxxxxxxxx xx" " xxx xxxxxxxxxxxxxxxxxx" " xxxxxxxxxxxxxxxxxxxxx" " xxxxxxxxxxxxxxxxxxxxx" " xxxxxxxxxxxxxxxxxxxxx" " xxxxxxxxxxxxxxxxxxxxx" " xxx xxx xxxxxxxxxx" " xxx xxxxxxxxxxxxx" " xxx xxxxxxxxxxxx " " xx xxxxxxxxxxxx " " xx xxxx xxxxxx " " xxx xxxx xxxx " " xxxxxxxxx " " xxxxxxx "))) (make-problem "19991115cBAR (4)" (quote ((8 9) (8 8) (4 2 5 1) (4 2 3 1) (4 2 2 1) (1 2 1 1 2) (1 3 1 3) (1 1 3) (1 1 3 2 1) (2 5 1 1) (4 2 4 1) (2 2 4 2 2) (1 1 5 3) (4 2 5) (2 4 4) (1 2 5 2) (4 3 1) (2 1 1 1) (1 2 2 1) (1 2 1 2 1) (2 1 1 4) (5 1 4) (4 2 4) (4 4 5) (5 7 5))) (quote ((13 10) (5 3 2 5) (5 1 1 4) (6 1 1 4) (2 2 1 1 2 1) (2 1 1 1 1) (3 2 1 1) (4 1 5 1 1) (2 3 3 2 2) (2 2 3 2 2) (9 3) (1 3 1 3 7) (3 7 2 1) (7 5) (5) (4 2 1 2 2) (3 1 2 6) (2 2 3 5) (2 3 5 5) (18 6))) (quote ("xxxxxxxxxxxxx xxxxxxxxxx" "xxxxx xxx xx xxxxx" "xxxxx x x xxxx" "xxxxxx x x xxxx" "xx xx x x xx x" "xx x x x x " "xxx xx x x" "xxxx x xxxxx x x" " xx xxx xxx xx xx" " xx xx xxx xx xx" " xxxxxxxxx xxx" "x xxx x xxx xxxxxxx" "xxx xxxxxxx xx x" "xxxxxxx xxxxx " "xxxxx " "xxxx xx x xx xx" "xxx x xx xxxxxx" "xx xx xxx xxxxx" "xx xxx xxxxx xxxxx" "xxxxxxxxxxxxxxxxxx xxxxxx"))))))
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 20x30") (define problems (list (make-problem "19991007aKHO (1)" (quote ((1 1 1 1 1) (1 5 1) (8 2) (8) (8) (2 2) (1 1) (2 2) (1 6 1) (2 8 2) (1 1) (1 2 2 1) (1 1 1 1 1 1) (1 4 4 1) (3 4 4 3) (1 1 1 1 1 1 1 1) (1 1 2 2 2 1 1) (2 1 4 1 2) (3 4 3) (1 4 1) (1 2 1) (2 2) (14) (2 2) (1 2 4 2 1) (1 6 1) (1 1) (14) (5 5) (7 7))) (quote ((3) (1 2 1) (1 1 2) (21) (1 3 3 3) (2 3 4 1 1 3) (4 1 1 2 1 1 1 3) (1 3 2 1 2 1 1 1 1 1) (4 2 4 3 1 2 1) (5 2 5 1 2 1) (4 2 5 1 2 1) (5 2 4 3 1 2 1) (4 2 1 2 1 1 1 1 1) (1 3 1 1 2 1 1 1 3) (1 3 4 1 1 3) (2 3 3 3) (21) (1 1 2) (1 2 1) (3))) (quote (" xxx " " x xx x" " x x xx" " xxxxxxxxxxxxxxxxxxxxx" "x xxx xxx xxx" " xx xxx xxxx x x xxx" " xxxx x x xx x x x xxx" "x xxx xx x xx x x x x x" " xxxx xx xxxx xxx x xx x " "xxxxx xx xxxxx x xx x " " xxxx xx xxxxx x xx x " "xxxxx xx xxxx xxx x xx x " " xxxx xx x xx x x x x x" "x xxx x x xx x x x xxx" " x xxx xxxx x x xxx" " xx xxx xxx xxx" " xxxxxxxxxxxxxxxxxxxxx" " x x xx" " x xx x" " xxx "))) (make-problem "19991007bKHO (2)" (quote ((20) (1 1) (1 16 1) (1 16 1) (1 2 2 1) (1 2 2 1) (1 5 2 1) (1 2 6 1) (1 2 1 1 2 1) (1 2 3 2 1) (1 2 1 1 2 1) (1 3 1 1 1 1 1 2 1) (1 2 1 1 1 1 1 3 1) (1 16 1) (1 16 1) (1 1) (1 6 1) (1 2 1) (1 2 4 1) (1 2 2 4 1) (1 6 4 2 1) (1 6 4 1) (1 2 2 1) (1 2 1) (1 1 1 1) (1 1 1 1 1) (1 2 2 1 1 1) (1 1 1 1 1) (1 1 1 1) (20))) (quote ((30) (1 1) (1 13 2 1) (1 13 2 1) (1 2 1 1 2 6 1) (1 2 1 3 6 1) (1 2 1 1 1 2 2 1 1) (1 2 1 3 1 2 1 1) (1 2 4 2 1 1) (1 2 1 3 1 1 1) (1 2 2 2 1 2 1 1) (1 2 3 1 4 1) (1 2 1 1 2 1 4 1) (1 2 1 3 2 1 1 1) (1 2 1 1 2 2 1 1 2) (1 2 1 3 4 1 1 1) (1 13 4 1 1 2) (1 13 2 1 1 1) (1 1) (30))) (quote ("xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx" "x x" "x xxxxxxxxxxxxx xx x" "x xxxxxxxxxxxxx xx x" "x xx x x xx xxxxxx x" "x xx x xxx xxxxxx x" "x xx x x x xx xx x x" "x xx x xxx x xx x x" "x xx xxxx xx x x" "x xx x xxx x x x" "x xx xx xx x xx x x" "x xx xxx x xxxx x" "x xx x x xx x xxxx x" "x xx x xxx xx x x x" "x xx x x xx xx x x xx" "x xx x xxx xxxx x x x" "x xxxxxxxxxxxxx xxxx x x xx" "x xxxxxxxxxxxxx xx x x x" "x x" "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx"))) (make-problem "19991113bBAR (3)" (quote ((6) (8) (10) (3 8) (1 2 1) (12) (1 1 1 3) (1 6 1) (1 2) (1 4 1) (3 2 4) (5 6) (7 8) (19) (4 10 3) (4 11 3) (17 1) (2 14 1) (1 2 1 1 1 1) (3 15) (14) (14) (13) (11) (4 5) (1 1 2 1) (4 4) (5 5) (6 6) (6 6))) (quote ((5) (5 1) (5 1) (3 6 1) (1 1 5 6) (4 7 3 4 2) (2 3 8 5 3) (4 1 1 7 11) (4 3 1 6 6 4) (4 1 1 2 5 6 4) (4 1 1 2 17) (4 3 1 5 5) (4 1 1 14) (3 2 7 11) (5 10 6 4) (3 8 6 4) (4 2 11) (6 6 3) (5 1 2) (7))) (quote (" xxxxx " " xxxxx x " " xxxxx x " " xxx xxxxxx x " " x x xxxxx xxxxxx " " xxxx xxxxxxx xxx xxxx xx" " xx xxx xxxxxxxx xxxxx xxx" "xxxx x x xxxxxxx xxxxxxxxxxx" "xxxx xxx x xxxxxx xxxxxx xxxx" "xxxx x x xx xxxxx xxxxxx xxxx" "xxxx x x xx xxxxxxxxxxxxxxxxx" "xxxx xxx x xxxxx xxxxx " "xxxx x x xxxxxxxxxxxxxx " " xxx xx xxxxxxx xxxxxxxxxxx" " xxxxx xxxxxxxxxx xxxxxx xxxx" " xxx xxxxxxxx xxxxxx xxxx" " xxxx xx xxxxxxxxxxx" " xxxxxx xxxxxx xxx" " xxxxx x xx" " xxxxxxx "))))))
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 20x30") (define problems (list (make-problem "19991007aKHO (1)" (quote ((1 1 1 1 1) (1 5 1) (8 2) (8) (8) (2 2) (1 1) (2 2) (1 6 1) (2 8 2) (1 1) (1 2 2 1) (1 1 1 1 1 1) (1 4 4 1) (3 4 4 3) (1 1 1 1 1 1 1 1) (1 1 2 2 2 1 1) (2 1 4 1 2) (3 4 3) (1 4 1) (1 2 1) (2 2) (14) (2 2) (1 2 4 2 1) (1 6 1) (1 1) (14) (5 5) (7 7))) (quote ((3) (1 2 1) (1 1 2) (21) (1 3 3 3) (2 3 4 1 1 3) (4 1 1 2 1 1 1 3) (1 3 2 1 2 1 1 1 1 1) (4 2 4 3 1 2 1) (5 2 5 1 2 1) (4 2 5 1 2 1) (5 2 4 3 1 2 1) (4 2 1 2 1 1 1 1 1) (1 3 1 1 2 1 1 1 3) (1 3 4 1 1 3) (2 3 3 3) (21) (1 1 2) (1 2 1) (3))) (quote (" xxx " " x xx x" " x x xx" " xxxxxxxxxxxxxxxxxxxxx" "x xxx xxx xxx" " xx xxx xxxx x x xxx" " xxxx x x xx x x x xxx" "x xxx xx x xx x x x x x" " xxxx xx xxxx xxx x xx x " "xxxxx xx xxxxx x xx x " " xxxx xx xxxxx x xx x " "xxxxx xx xxxx xxx x xx x " " xxxx xx x xx x x x x x" "x xxx x x xx x x x xxx" " x xxx xxxx x x xxx" " xx xxx xxx xxx" " xxxxxxxxxxxxxxxxxxxxx" " x x xx" " x xx x" " xxx "))) (make-problem "19991007bKHO (2)" (quote ((20) (1 1) (1 16 1) (1 16 1) (1 2 2 1) (1 2 2 1) (1 5 2 1) (1 2 6 1) (1 2 1 1 2 1) (1 2 3 2 1) (1 2 1 1 2 1) (1 3 1 1 1 1 1 2 1) (1 2 1 1 1 1 1 3 1) (1 16 1) (1 16 1) (1 1) (1 6 1) (1 2 1) (1 2 4 1) (1 2 2 4 1) (1 6 4 2 1) (1 6 4 1) (1 2 2 1) (1 2 1) (1 1 1 1) (1 1 1 1 1) (1 2 2 1 1 1) (1 1 1 1 1) (1 1 1 1) (20))) (quote ((30) (1 1) (1 13 2 1) (1 13 2 1) (1 2 1 1 2 6 1) (1 2 1 3 6 1) (1 2 1 1 1 2 2 1 1) (1 2 1 3 1 2 1 1) (1 2 4 2 1 1) (1 2 1 3 1 1 1) (1 2 2 2 1 2 1 1) (1 2 3 1 4 1) (1 2 1 1 2 1 4 1) (1 2 1 3 2 1 1 1) (1 2 1 1 2 2 1 1 2) (1 2 1 3 4 1 1 1) (1 13 4 1 1 2) (1 13 2 1 1 1) (1 1) (30))) (quote ("xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx" "x x" "x xxxxxxxxxxxxx xx x" "x xxxxxxxxxxxxx xx x" "x xx x x xx xxxxxx x" "x xx x xxx xxxxxx x" "x xx x x x xx xx x x" "x xx x xxx x xx x x" "x xx xxxx xx x x" "x xx x xxx x x x" "x xx xx xx x xx x x" "x xx xxx x xxxx x" "x xx x x xx x xxxx x" "x xx x xxx xx x x x" "x xx x x xx xx x x xx" "x xx x xxx xxxx x x x" "x xxxxxxxxxxxxx xxxx x x xx" "x xxxxxxxxxxxxx xx x x x" "x x" "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx"))) (make-problem "19991113bBAR (3)" (quote ((6) (8) (10) (3 8) (1 2 1) (12) (1 1 1 3) (1 6 1) (1 2) (1 4 1) (3 2 4) (5 6) (7 8) (19) (4 10 3) (4 11 3) (17 1) (2 14 1) (1 2 1 1 1 1) (3 15) (14) (14) (13) (11) (4 5) (1 1 2 1) (4 4) (5 5) (6 6) (6 6))) (quote ((5) (5 1) (5 1) (3 6 1) (1 1 5 6) (4 7 3 4 2) (2 3 8 5 3) (4 1 1 7 11) (4 3 1 6 6 4) (4 1 1 2 5 6 4) (4 1 1 2 17) (4 3 1 5 5) (4 1 1 14) (3 2 7 11) (5 10 6 4) (3 8 6 4) (4 2 11) (6 6 3) (5 1 2) (7))) (quote (" xxxxx " " xxxxx x " " xxxxx x " " xxx xxxxxx x " " x x xxxxx xxxxxx " " xxxx xxxxxxx xxx xxxx xx" " xx xxx xxxxxxxx xxxxx xxx" "xxxx x x xxxxxxx xxxxxxxxxxx" "xxxx xxx x xxxxxx xxxxxx xxxx" "xxxx x x xx xxxxx xxxxxx xxxx" "xxxx x x xx xxxxxxxxxxxxxxxxx" "xxxx xxx x xxxxx xxxxx " "xxxx x x xxxxxxxxxxxxxx " " xxx xx xxxxxxx xxxxxxxxxxx" " xxxxx xxxxxxxxxx xxxxxx xxxx" " xxx xxxxxxxx xxxxxx xxxx" " xxxx xx xxxxxxxxxxx" " xxxxxx xxxxxx xxx" " xxxxx x xx" " xxxxxxx "))))))
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 25x15") (define problems (list (make-problem "19990709-DAH (1)" (quote ((25) (1 1) (1 3 1) (1 3 1 3 1) (1 3 1 1 1 1) (1 1 1 1 1 1) (1 1 1 1 1 1) (1 1 1 3 1 1) (1 1 3 4 3 1) (1 3 4 4 4 1) (1 4 4 2 4 1) (1 4 2 2 1) (1 2 1) (1 1) (25))) (quote ((15) (1 1) (1 2 1) (1 4 1) (1 4 1) (1 8 1) (1 1 1) (1 1 2 1) (1 1 4 1) (1 1 4 1) (1 8 1) (1 1) (1 1) (1 2 1) (1 4 1) (1 4 1) (1 8 1) (1 1 1) (1 1 2 1) (1 1 4 1) (1 1 4 1) (1 8 1) (1 1) (1 1) (15))) (quote ("xxxxxxxxxxxxxxx" "x x" "x xx x" "x xxxx x" "x xxxx x" "x xxxxxxxx x" "x x x" "x x xx x" "x x xxxx x" "x x xxxx x" "x xxxxxxxx x" "x x" "x x" "x xx x" "x xxxx x" "x xxxx x" "x xxxxxxxx x" "x x x" "x x xx x" "x x xxxx x" "x x xxxx x" "x xxxxxxxx x" "x x" "x x" "xxxxxxxxxxxxxxx"))))))
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 25x15") (define problems (list (make-problem "19990709-DAH (1)" (quote ((25) (1 1) (1 3 1) (1 3 1 3 1) (1 3 1 1 1 1) (1 1 1 1 1 1) (1 1 1 1 1 1) (1 1 1 3 1 1) (1 1 3 4 3 1) (1 3 4 4 4 1) (1 4 4 2 4 1) (1 4 2 2 1) (1 2 1) (1 1) (25))) (quote ((15) (1 1) (1 2 1) (1 4 1) (1 4 1) (1 8 1) (1 1 1) (1 1 2 1) (1 1 4 1) (1 1 4 1) (1 8 1) (1 1) (1 1) (1 2 1) (1 4 1) (1 4 1) (1 8 1) (1 1 1) (1 1 2 1) (1 1 4 1) (1 1 4 1) (1 8 1) (1 1) (1 1) (15))) (quote ("xxxxxxxxxxxxxxx" "x x" "x xx x" "x xxxx x" "x xxxx x" "x xxxxxxxx x" "x x x" "x x xx x" "x x xxxx x" "x x xxxx x" "x xxxxxxxx x" "x x" "x x" "x xx x" "x xxxx x" "x xxxx x" "x xxxxxxxx x" "x x x" "x x xx x" "x x xxxx x" "x x xxxx x" "x xxxxxxxx x" "x x" "x x" "xxxxxxxxxxxxxxx"))))))
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 25x20") (define problems (list (make-problem "19980410-GOS (1)" (quote (() (9) (3 1 4 3) (4 2 1 3 4) (2 1 11 4) (4 2 3 2 1 1) (1 1 2 1 3 1 2 1 1) (2 1 2 3 2 5) (5 5 5 1 1) (3 1 4 3 2 1 1 1) (5 4 3 4 5) (1 4 1 4 2) (1 1 2 1 1 1 2 2 1) (2 1 2 3 3 2 4) (3 3 1 1 1 3 3) (3 1 1 1 3) (2 3 2) (2 2) (7) ())) (quote ((7) (6 2) (2 3 1) (3 1 5) (1 7) (3 4) (2 11) (1 7 3) (1 2 3 1 3) (4 1 3 1 2) (1 1 1 3 1) (1 4 2 1 1 1) (7 4 3 1) (2 4 2 1 1 1) (4 1 3 1) (4 1 3 1 2) (1 2 3 1 3) (1 5 1 3) (2 11) (3 4) (9) (2 1 5) (1 1 1 3) (3 2 2) (7))) (quote (" xxxxxxx " " xxxxxx xx " " xx xxx x " " xxx x xxxxx " " x xxxxxxx " " xxx xxxx " " xx xxxxxxxxxxx " " x xxxxxxx xxx " " x xx xxx x xxx " " xxxx x xxx x xx " " x x x xxx x " " x xxxx xx x x x " " xxxxxxx xxxx xxx x " " xx xxxx xx x x x " " xxxx x xxx x " " xxxx x xxx x xx " " x xx xxx x xxx " " x xxxxx x xxx " " xx xxxxxxxxxxx " " xxx xxxx " " xxxxxxxxx " " xx x xxxxx " " x x x xxx " " xxx xx xx " " xxxxxxx "))) (make-problem "19981116-JAM (2)" (quote ((10) (17) (4 9 3) (4 2 7 2 3) (3 4 5 3 4) (3 4 5 3 4) (4 4 5 3 4) (4 2 5 2 5) (5 6 6) (6 4 2 7) (12 11) (11 10) (10 9) (5 6 5 5) (5 13 4) (4 15 3) (1 1 13 1 1) (5 11 5) (5 5) (8 7))) (quote ((10) (15) (14 2) (14 3) (3 7 4) (2 3 4 1 3) (1 4 7 2) (1 5 8 1) (3 4 9 1) (4 10 1) (12 5 1) (11 5) (9 4) (9 4 1) (11 5 1) (4 3 5 1) (3 3 8 1) (2 5 8 1) (1 5 8 2) (2 5 1 3) (14 3) (14 2) (13 2) (14) (7))) (quote (" xxxxxxxxxx " " xxxxxxxxxxxxxxx " " xxxxxxxxxxxxxx xx " " xxxxxxxxxxxxxx xxx" " xxx xxxxxxx xxxx" " xx xxx xxxx x xxx" " x xxxx xxxxxxx xx" " x xxxxx xxxxxxxx x" "xxx xxxx xxxxxxxxx x" "xxxx xxxxxxxxxx x" "xxxxxxxxxxxx xxxxx x" "xxxxxxxxxxx xxxxx " "xxxxxxxxx xxxx " "xxxxxxxxx xxxx x" "xxxxxxxxxxx xxxxx x" "xxxx xxx xxxxx x" "xxx xxx xxxxxxxx x" "xx xxxxx xxxxxxxx x" " x xxxxx xxxxxxxx xx" " xx xxxxx x xxx" " xxxxxxxxxxxxxx xxx " " xxxxxxxxxxxxxx xx " " xxxxxxxxxxxxx xx " " xxxxxxxxxxxxxx " " xxxxxxx "))) (make-problem "19981119-MSS (3)" (quote ((3 1 3 1 1 1 1 1) (1 1 1 1 1 2 1 1 1 1) (1 1 1 3 1 2 1 1) (1 1 1 1 1 1 1 1 2) () (3) (2 3) (2 2 3) (1 2 2 3) (1 2 2 3) (4 3 1 2) (1) (8 1) (16) (25) (24) (21) (16) (11) (4))) (quote ((1 1 4) (4 1 4) (1 1 4) (3 5) (4 5) (4 5) (1 4 5) (4 1 6) (1 4 5) (4 5) (3 1 5) (1 1 5 5) (3 5 6) (5 6) (4 1 6) (1 9) (1 5) (4 5) (6) (4 6) (6) (2 6) (1 1 5) (1 1 3) (1))) (quote ("x x xxxx " "xxxx x xxxx " "x x xxxx " " xxx xxxxx " "xxxx xxxxx " " xxxx xxxxx " "x xxxx xxxxx " "xxxx x xxxxxx " "x xxxx xxxxx " " xxxx xxxxx " " xxx x xxxxx " "x x xxxxx xxxxx " " xxx xxxxx xxxxxx " " xxxxx xxxxxx " "xxxx x xxxxxx " " x xxxxxxxxx " " x xxxxx " "xxxx xxxxx " " xxxxxx" "xxxx xxxxxx" " xxxxxx" " xx xxxxxx" "x x xxxxx " " x x xxx " " x "))) (make-problem "19990126bLLO (4)" (quote ((2 2 1) (3 7) (6 2 2 5) (6 4 4 2) (4 4 1) (3 2 2 1) (2 3 2) (1 2 3) (1 3 2) (3 2 3) (5 1 3) (7 2) (7 2) (7 2) (5 2) (25) (3) (20 3) (3) (18 2))) (quote ((1 1 1) (1 1 1 1) (2 1 1 1) (3 1 1 1) (3 3 1 1 1) (2 6 1 1) (2 7 1 1) (1 7 1 1) (1 7 1 1) (6 1 1) (3 3 1 1 1) (2 1 1 1) (2 1 1 1) (3 1 1 1) (3 1 1 1) (3 3 1 1 1) (1 1 4 1 1 1) (3 5 1 1 1) (7 1 1) (1 2 1 1) (8 1) (4 6 5) (2 13) (1 2 10) (4 1))) (quote (" x x x" " x x x x" " xx x x x" " xxx x x x" " xxx xxx x x x" " xx xxxxxx x x" " xx xxxxxxx x x" " x xxxxxxx x x" " x xxxxxxx x x" " xxxxxx x x" " xxx xxx x x x" " xx x x x" " xx x x x" " xxx x x x" " xxx x x x" " xxx xxx x x x" " x x xxxx x x x" "xxx xxxxx x x x" "xxxxxxx x x " " x xx x x " "xxxxxxxx x " "xxxx xxxxxx xxxxx" " xx xxxxxxxxxxxxx" "x xx xxxxxxxxxx " " xxxx x "))))))
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 25x20") (define problems (list (make-problem "19980410-GOS (1)" (quote (() (9) (3 1 4 3) (4 2 1 3 4) (2 1 11 4) (4 2 3 2 1 1) (1 1 2 1 3 1 2 1 1) (2 1 2 3 2 5) (5 5 5 1 1) (3 1 4 3 2 1 1 1) (5 4 3 4 5) (1 4 1 4 2) (1 1 2 1 1 1 2 2 1) (2 1 2 3 3 2 4) (3 3 1 1 1 3 3) (3 1 1 1 3) (2 3 2) (2 2) (7) ())) (quote ((7) (6 2) (2 3 1) (3 1 5) (1 7) (3 4) (2 11) (1 7 3) (1 2 3 1 3) (4 1 3 1 2) (1 1 1 3 1) (1 4 2 1 1 1) (7 4 3 1) (2 4 2 1 1 1) (4 1 3 1) (4 1 3 1 2) (1 2 3 1 3) (1 5 1 3) (2 11) (3 4) (9) (2 1 5) (1 1 1 3) (3 2 2) (7))) (quote (" xxxxxxx " " xxxxxx xx " " xx xxx x " " xxx x xxxxx " " x xxxxxxx " " xxx xxxx " " xx xxxxxxxxxxx " " x xxxxxxx xxx " " x xx xxx x xxx " " xxxx x xxx x xx " " x x x xxx x " " x xxxx xx x x x " " xxxxxxx xxxx xxx x " " xx xxxx xx x x x " " xxxx x xxx x " " xxxx x xxx x xx " " x xx xxx x xxx " " x xxxxx x xxx " " xx xxxxxxxxxxx " " xxx xxxx " " xxxxxxxxx " " xx x xxxxx " " x x x xxx " " xxx xx xx " " xxxxxxx "))) (make-problem "19981116-JAM (2)" (quote ((10) (17) (4 9 3) (4 2 7 2 3) (3 4 5 3 4) (3 4 5 3 4) (4 4 5 3 4) (4 2 5 2 5) (5 6 6) (6 4 2 7) (12 11) (11 10) (10 9) (5 6 5 5) (5 13 4) (4 15 3) (1 1 13 1 1) (5 11 5) (5 5) (8 7))) (quote ((10) (15) (14 2) (14 3) (3 7 4) (2 3 4 1 3) (1 4 7 2) (1 5 8 1) (3 4 9 1) (4 10 1) (12 5 1) (11 5) (9 4) (9 4 1) (11 5 1) (4 3 5 1) (3 3 8 1) (2 5 8 1) (1 5 8 2) (2 5 1 3) (14 3) (14 2) (13 2) (14) (7))) (quote (" xxxxxxxxxx " " xxxxxxxxxxxxxxx " " xxxxxxxxxxxxxx xx " " xxxxxxxxxxxxxx xxx" " xxx xxxxxxx xxxx" " xx xxx xxxx x xxx" " x xxxx xxxxxxx xx" " x xxxxx xxxxxxxx x" "xxx xxxx xxxxxxxxx x" "xxxx xxxxxxxxxx x" "xxxxxxxxxxxx xxxxx x" "xxxxxxxxxxx xxxxx " "xxxxxxxxx xxxx " "xxxxxxxxx xxxx x" "xxxxxxxxxxx xxxxx x" "xxxx xxx xxxxx x" "xxx xxx xxxxxxxx x" "xx xxxxx xxxxxxxx x" " x xxxxx xxxxxxxx xx" " xx xxxxx x xxx" " xxxxxxxxxxxxxx xxx " " xxxxxxxxxxxxxx xx " " xxxxxxxxxxxxx xx " " xxxxxxxxxxxxxx " " xxxxxxx "))) (make-problem "19981119-MSS (3)" (quote ((3 1 3 1 1 1 1 1) (1 1 1 1 1 2 1 1 1 1) (1 1 1 3 1 2 1 1) (1 1 1 1 1 1 1 1 2) () (3) (2 3) (2 2 3) (1 2 2 3) (1 2 2 3) (4 3 1 2) (1) (8 1) (16) (25) (24) (21) (16) (11) (4))) (quote ((1 1 4) (4 1 4) (1 1 4) (3 5) (4 5) (4 5) (1 4 5) (4 1 6) (1 4 5) (4 5) (3 1 5) (1 1 5 5) (3 5 6) (5 6) (4 1 6) (1 9) (1 5) (4 5) (6) (4 6) (6) (2 6) (1 1 5) (1 1 3) (1))) (quote ("x x xxxx " "xxxx x xxxx " "x x xxxx " " xxx xxxxx " "xxxx xxxxx " " xxxx xxxxx " "x xxxx xxxxx " "xxxx x xxxxxx " "x xxxx xxxxx " " xxxx xxxxx " " xxx x xxxxx " "x x xxxxx xxxxx " " xxx xxxxx xxxxxx " " xxxxx xxxxxx " "xxxx x xxxxxx " " x xxxxxxxxx " " x xxxxx " "xxxx xxxxx " " xxxxxx" "xxxx xxxxxx" " xxxxxx" " xx xxxxxx" "x x xxxxx " " x x xxx " " x "))) (make-problem "19990126bLLO (4)" (quote ((2 2 1) (3 7) (6 2 2 5) (6 4 4 2) (4 4 1) (3 2 2 1) (2 3 2) (1 2 3) (1 3 2) (3 2 3) (5 1 3) (7 2) (7 2) (7 2) (5 2) (25) (3) (20 3) (3) (18 2))) (quote ((1 1 1) (1 1 1 1) (2 1 1 1) (3 1 1 1) (3 3 1 1 1) (2 6 1 1) (2 7 1 1) (1 7 1 1) (1 7 1 1) (6 1 1) (3 3 1 1 1) (2 1 1 1) (2 1 1 1) (3 1 1 1) (3 1 1 1) (3 3 1 1 1) (1 1 4 1 1 1) (3 5 1 1 1) (7 1 1) (1 2 1 1) (8 1) (4 6 5) (2 13) (1 2 10) (4 1))) (quote (" x x x" " x x x x" " xx x x x" " xxx x x x" " xxx xxx x x x" " xx xxxxxx x x" " xx xxxxxxx x x" " x xxxxxxx x x" " x xxxxxxx x x" " xxxxxx x x" " xxx xxx x x x" " xx x x x" " xx x x x" " xxx x x x" " xxx x x x" " xxx xxx x x x" " x x xxxx x x x" "xxx xxxxx x x x" "xxxxxxx x x " " x xx x x " "xxxxxxxx x " "xxxx xxxxxx xxxxx" " xx xxxxxxxxxxxxx" "x xx xxxxxxxxxx " " xxxx x "))))))
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 25x25") (define problems (list (make-problem "19980522-SDN (1)" (quote ((1 1) (1 1 1) (1 1 3) (3 3) (1 1 3) (1 1 5) (5) (7) (7) (9) (11) (15) (17) (19) (19) (19) (17) (15) (11) (7 1) (1 1 1) (3 1 1) (5 3) (9 1 1) (9 1 1))) (quote (() (5) (1 1) (5 3) (5) (7) (7) (9) (10 2) (13 2) (15 3) (18 4) (25) (18 4) (15 3) (13 2) (10 2) (9) (7) (7) (5) (3) (5) (1 1) (5))) (quote (" " " xxxxx " "x x " " xxxxx xxx " " xxxxx " " xxxxxxx " " xxxxxxx " " xxxxxxxxx " " xxxxxxxxxx xx" " xxxxxxxxxxxxx xx" " xxxxxxxxxxxxxxx xxx" " xxxxxxxxxxxxxxxxxx xxxx" "xxxxxxxxxxxxxxxxxxxxxxxxx" " xxxxxxxxxxxxxxxxxx xxxx" " xxxxxxxxxxxxxxx xxx" " xxxxxxxxxxxxx xx" " xxxxxxxxxx xx" " xxxxxxxxx " " xxxxxxx " " xxxxxxx " " xxxxx " " xxx " " xxxxx" " x x " " xxxxx"))) (make-problem "19980909-YEN (2)" (quote ((10 10) (8 5 8) (5 9 5) (4 7 4 4) (3 7 4 3) (2 7 3 2) (2 8 4 2) (2 9 5 2) (1 16 1) (1 15 1) (14) (12) (11) (9) (7) (1 5 1) (1 4 1) (2 3 1 2) (2 3 3 2) (2 3 5 2) (3 2 3 3) (4 2 1 4) (5 5) (8 8) (10 10))) (quote ((10 10) (8 5 8) (5 9 5) (4 15 4) (3 17 3) (2 19 2) (2 13 1 2) (2 12 2) (1 12 1) (1 12 1) (4 7 1) (3 6 3) (2 4 5) (3 4 3) (4 5 1) (1 8 1) (1 8 1) (2 5 2) (2 2) (2 2) (3 3) (4 4) (5 5) (8 8) (10 10))) (quote ("xxxxxxxxxx xxxxxxxxxx" "xxxxxxxx xxxxx xxxxxxxx" "xxxxx xxxxxxxxx xxxxx" "xxxx xxxxxxxxxxxxxxx xxxx" "xxx xxxxxxxxxxxxxxxxx xxx" "xx xxxxxxxxxxxxxxxxxxx xx" "xx xxxxxxxxxxxxx x xx" "xx xxxxxxxxxxxx xx" "x xxxxxxxxxxxx x" "x xxxxxxxxxxxx x" " xxxx xxxxxxx x " " xxx xxxxxx xxx " " xx xxxx xxxxx " " xxx xxxx xxx " " xxxx xxxxx x " "x xxxxxxxx x" "x xxxxxxxx x" "xx xxxxx xx" "xx xx" "xx xx" "xxx xxx" "xxxx xxxx" "xxxxx xxxxx" "xxxxxxxx xxxxxxxx" "xxxxxxxxxx xxxxxxxxxx"))) (make-problem "19990924-VAL (3)" (quote (() () (1) (1) (1) (10) (12) (6 3 3) (3 2 1 1 1 2) (2 1 1 1 1 2 1) (1 3 3 4) (6 7) (7 2 4) (2 7 2 1) (2 10 1) (6 8) (5 7) (2 7 2) (1 7 1) (11) (4 4) (4 4) (2 6) (1 5) (5))) (quote (() () () () () (3 4) (3 7) (3 3 5) (3 8 4) (4 14) (5 11 1) (3 5 8) (4 3 7 3) (1 3 15) (5 14) (3 2 10) (2 9 4) (3 11) (3 3 3) (3 5) () () () () ())) (quote (" " " " " " " " " " " xxx xxxx " " xxx xxxxxxx " " xxx xxx xxxxx " " xxx xxxxxxxx xxxx " " xxxx xxxxxxxxxxxxxx " " xxxxx xxxxxxxxxxx x" " xxx xxxxx xxxxxxxx" " xxxx xxx xxxxxxx xxx" " x xxx xxxxxxxxxxxxxxx" " xxxxx xxxxxxxxxxxxxx" " xxx xx xxxxxxxxxx " " xx xxxxxxxxx xxxx " " xxx xxxxxxxxxxx " " xxx xxx xxx " " xxx xxxxx " " " " " " " " " " "))) (make-problem "19991020aSHE (4)" (quote ((20 2) (3 14 2) (2 11 2) (1 9 3) (2 9 3) (3 9 4) (12 4) (8 5) (7 6) (6 7) (5 8) (5 9) (7 9) (7 6) (7 4) (3 2 3) (2 4 3) (3 3 3) (1 6) (2 6) (1 6) (2 1 6) (2 1 8) (1 11) (13))) (quote ((25) (3 14 1 2 1) (2 11 1 2) (1 9 3) (2 10 2) (3 6 3 3) (9 4 4) (8 2 3) (7 2 5) (7 9) (7 9) (7 7) (6 7) (5 5) (4 4) (3 3) (2 6) (2 6) (1 6) (1 7) (7) (9) (10) (13) (13))) (quote ("xxxxxxxxxxxxxxxxxxxxxxxxx" "xxx xxxxxxxxxxxxxx x xx x" "xx xxxxxxxxxxx x xx" "x xxxxxxxxx xxx" "xx xxxxxxxxxx xx" "xxx xxxxxx xxx xxx" "xxxxxxxxx xxxx xxxx" "xxxxxxxx xx xxx" "xxxxxxx xx xxxxx" "xxxxxxx xxxxxxxxx" "xxxxxxx xxxxxxxxx" "xxxxxxx xxxxxxx" "xxxxxx xxxxxxx" "xxxxx xxxxx " "xxxx xxxx " "xxx xxx " "xx xxxxxx " "xx xxxxxx " "x xxxxxx " "x xxxxxxx " " xxxxxxx " " xxxxxxxxx " " xxxxxxxxxx " "xxxxxxxxxxxxx " "xxxxxxxxxxxxx "))))))
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 25x25") (define problems (list (make-problem "19980522-SDN (1)" (quote ((1 1) (1 1 1) (1 1 3) (3 3) (1 1 3) (1 1 5) (5) (7) (7) (9) (11) (15) (17) (19) (19) (19) (17) (15) (11) (7 1) (1 1 1) (3 1 1) (5 3) (9 1 1) (9 1 1))) (quote (() (5) (1 1) (5 3) (5) (7) (7) (9) (10 2) (13 2) (15 3) (18 4) (25) (18 4) (15 3) (13 2) (10 2) (9) (7) (7) (5) (3) (5) (1 1) (5))) (quote (" " " xxxxx " "x x " " xxxxx xxx " " xxxxx " " xxxxxxx " " xxxxxxx " " xxxxxxxxx " " xxxxxxxxxx xx" " xxxxxxxxxxxxx xx" " xxxxxxxxxxxxxxx xxx" " xxxxxxxxxxxxxxxxxx xxxx" "xxxxxxxxxxxxxxxxxxxxxxxxx" " xxxxxxxxxxxxxxxxxx xxxx" " xxxxxxxxxxxxxxx xxx" " xxxxxxxxxxxxx xx" " xxxxxxxxxx xx" " xxxxxxxxx " " xxxxxxx " " xxxxxxx " " xxxxx " " xxx " " xxxxx" " x x " " xxxxx"))) (make-problem "19980909-YEN (2)" (quote ((10 10) (8 5 8) (5 9 5) (4 7 4 4) (3 7 4 3) (2 7 3 2) (2 8 4 2) (2 9 5 2) (1 16 1) (1 15 1) (14) (12) (11) (9) (7) (1 5 1) (1 4 1) (2 3 1 2) (2 3 3 2) (2 3 5 2) (3 2 3 3) (4 2 1 4) (5 5) (8 8) (10 10))) (quote ((10 10) (8 5 8) (5 9 5) (4 15 4) (3 17 3) (2 19 2) (2 13 1 2) (2 12 2) (1 12 1) (1 12 1) (4 7 1) (3 6 3) (2 4 5) (3 4 3) (4 5 1) (1 8 1) (1 8 1) (2 5 2) (2 2) (2 2) (3 3) (4 4) (5 5) (8 8) (10 10))) (quote ("xxxxxxxxxx xxxxxxxxxx" "xxxxxxxx xxxxx xxxxxxxx" "xxxxx xxxxxxxxx xxxxx" "xxxx xxxxxxxxxxxxxxx xxxx" "xxx xxxxxxxxxxxxxxxxx xxx" "xx xxxxxxxxxxxxxxxxxxx xx" "xx xxxxxxxxxxxxx x xx" "xx xxxxxxxxxxxx xx" "x xxxxxxxxxxxx x" "x xxxxxxxxxxxx x" " xxxx xxxxxxx x " " xxx xxxxxx xxx " " xx xxxx xxxxx " " xxx xxxx xxx " " xxxx xxxxx x " "x xxxxxxxx x" "x xxxxxxxx x" "xx xxxxx xx" "xx xx" "xx xx" "xxx xxx" "xxxx xxxx" "xxxxx xxxxx" "xxxxxxxx xxxxxxxx" "xxxxxxxxxx xxxxxxxxxx"))) (make-problem "19990924-VAL (3)" (quote (() () (1) (1) (1) (10) (12) (6 3 3) (3 2 1 1 1 2) (2 1 1 1 1 2 1) (1 3 3 4) (6 7) (7 2 4) (2 7 2 1) (2 10 1) (6 8) (5 7) (2 7 2) (1 7 1) (11) (4 4) (4 4) (2 6) (1 5) (5))) (quote (() () () () () (3 4) (3 7) (3 3 5) (3 8 4) (4 14) (5 11 1) (3 5 8) (4 3 7 3) (1 3 15) (5 14) (3 2 10) (2 9 4) (3 11) (3 3 3) (3 5) () () () () ())) (quote (" " " " " " " " " " " xxx xxxx " " xxx xxxxxxx " " xxx xxx xxxxx " " xxx xxxxxxxx xxxx " " xxxx xxxxxxxxxxxxxx " " xxxxx xxxxxxxxxxx x" " xxx xxxxx xxxxxxxx" " xxxx xxx xxxxxxx xxx" " x xxx xxxxxxxxxxxxxxx" " xxxxx xxxxxxxxxxxxxx" " xxx xx xxxxxxxxxx " " xx xxxxxxxxx xxxx " " xxx xxxxxxxxxxx " " xxx xxx xxx " " xxx xxxxx " " " " " " " " " " "))) (make-problem "19991020aSHE (4)" (quote ((20 2) (3 14 2) (2 11 2) (1 9 3) (2 9 3) (3 9 4) (12 4) (8 5) (7 6) (6 7) (5 8) (5 9) (7 9) (7 6) (7 4) (3 2 3) (2 4 3) (3 3 3) (1 6) (2 6) (1 6) (2 1 6) (2 1 8) (1 11) (13))) (quote ((25) (3 14 1 2 1) (2 11 1 2) (1 9 3) (2 10 2) (3 6 3 3) (9 4 4) (8 2 3) (7 2 5) (7 9) (7 9) (7 7) (6 7) (5 5) (4 4) (3 3) (2 6) (2 6) (1 6) (1 7) (7) (9) (10) (13) (13))) (quote ("xxxxxxxxxxxxxxxxxxxxxxxxx" "xxx xxxxxxxxxxxxxx x xx x" "xx xxxxxxxxxxx x xx" "x xxxxxxxxx xxx" "xx xxxxxxxxxx xx" "xxx xxxxxx xxx xxx" "xxxxxxxxx xxxx xxxx" "xxxxxxxx xx xxx" "xxxxxxx xx xxxxx" "xxxxxxx xxxxxxxxx" "xxxxxxx xxxxxxxxx" "xxxxxxx xxxxxxx" "xxxxxx xxxxxxx" "xxxxx xxxxx " "xxxx xxxx " "xxx xxx " "xx xxxxxx " "xx xxxxxx " "x xxxxxx " "x xxxxxxx " " xxxxxxx " " xxxxxxxxx " " xxxxxxxxxx " "xxxxxxxxxxxxx " "xxxxxxxxxxxxx "))))))
|
||||
|
|
|
|||
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
|
|
@ -1 +1 @@
|
|||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 30x20") (define problems (list (make-problem "19981106-KVL (1)" (quote (() (1 1) (2 2) (8) (8) (2 2 2) (10 8) (15 6) (19 4) (21 2 1) (22 3) (28) (17 10) (3 10 3 4 2) (3 6 2 2 3 3) (3 5 3 4) (12 3 6) (9 2 4) () ())) (quote (() (3) (6) (8) (5 3) (7 2) (8 2) (8 2) (9 2) (9 2) (9 2) (9 2) (8 3) (8 3) (8 3) (7 3) (7 2) (7 1) (5 5) (11) (6 1) (4 5 1 2) (7 6 2) (3 3 5 2) (7 3 3) (7 3 2) (3 3 3 3) (7 7) (4 5) ())) (quote (" " " xxx " " xxxxxx " " xxxxxxxx " " xxxxx xxx " " xxxxxxx xx " " xxxxxxxx xx " " xxxxxxxx xx " " xxxxxxxxx xx " " xxxxxxxxx xx " " xxxxxxxxx xx " " xxxxxxxxx xx " " xxxxxxxx xxx " " xxxxxxxx xxx " " xxxxxxxx xxx " " xxxxxxx xxx " " xxxxxxx xx " " xxxxxxx x " " xxxxx xxxxx " " xxxxxxxxxxx " " xxxxxx x " " xxxx xxxxx x xx " " xxxxxxx xxxxxx xx " " xxx xxx xxxxx xx " " xxxxxxx xxx xxx " " xxxxxxx xxx xx " " xxx xxx xxx xxx " " xxxxxxx xxxxxxx " " xxxx xxxxx " " "))) (make-problem "19990311-FRA (2)" (quote (() (2) (2) (2) (3) (4) (27) (27) (27) (4) (4 1) (4 1) (6 1 3) (3 1 1) (3 1 1 3 1 1 1) (1 3 1 1 2 1 3 1) (1 3 1 2 1 1 1) (1 1 1 3) (1 1 1) (1 3))) (quote (() (1) (8 1) (9 6) (10 1) (11) (2 3 1) (1 3) (3) (3) (3 6) (3 1 1) (3 3) (3) (3 1 3) (3 1 1 1) (3 5) (3) (3 4) (3 1) (3 1) (3 4) (3) (3 3 1) (3 1 1 1) (3 5) (3) (3 4 1) (3) ())) (quote (" " " x " " xxxxxxxx x " " xxxxxxxxx xxxxxx" " xxxxxxxxxx x " " xxxxxxxxxxx " " xx xxx x " " x xxx " " xxx " " xxx " " xxx xxxxxx " " xxx x x " " xxx xxx " " xxx " " xxx x xxx " " xxx x x x " " xxx xxxxx " " xxx " " xxx xxxx " " xxx x " " xxx x " " xxx xxxx " " xxx " " xxx xxx x" " xxx x x x" " xxx xxxxx" " xxx " " xxx xxxx x " " xxx " " "))) (make-problem "19990601cDRA (3)" (quote (() (3 1 3 1) (1 1 1 1) (2 1 2 3 1 2 1 1 2 3) (1 1 1 2 1 1 1 1 1 2) (1 1 1 3 1 1 2 2 1 1) () () (26) (2 2 7) (2 6 2 1) (9 1 1 1 2 1) (1 1 1 1 1 2 1) (1 2 2 1) (1 2 2 1) (1 1 1 1 1 1) (2 2 11 2 7) (2 2) () ())) (quote ((5) (1 1 1 6) (1 1 1 1) (1 1 1) (1 3 4 1 2) (4 1 2) (3 1 1 1) (1 1 1 1) (1 1 1) (3 1 2 1) (3 1 1 1) (1 1 1 4 1) (1 1 1) (3 1) (1 3 1) (5 1 1 1) (1 1 4 1) (3 1 1 1) (1 1 3 1) (3 1 2) (2 2 1 2) (1 2 1) (3 2 2 1) (2 2 1) (3 2 1) (1 1 3 1) (1 2 1) (5 4) (2 1) (2 1))) (quote (" xxxxx " " x x x xxxxxx " " x x x x " " x x x " " x xxx xxxx x xx " " xxxx x xx " " xxx x x x " " x x x x " " x x x " " xxx x xx x " " xxx x x x " " x x x xxxx x " " x x x " " xxx x " " x xxx x " " xxxxx x x x " " x x xxxx x " " xxx x x x " " x x xxx x " " xxx x xx " " xx xx x xx " " x xx x " " xxx xx xx x " " xx xx x " " xxx xx x " " x x xxx x " " x xx x " " xxxxx xxxx " " xx x " " xx x "))) (make-problem "19991106-BDH (4)" (quote ((7) (9) (6 3) (6 3) (13) (16) (1 13) (2 10) (3 7) (5 5 7) (23) (7 10 5) (7 8 6) (8 7) (25) (25) (25) (24) (22) (20))) (quote ((8) (12) (12) (12) (11) (10) (10) (1 7) (2 6) (4 6) (4 6) (4 6) (4 6) (4 6) (4 3 6) (7 4 6) (13 6) (12 6) (11 7) (20) (2 16) (2 16) (9 10) (7 8) (6 6) (3) (3) (2) (1) (1))) (quote (" xxxxxxxx " " xxxxxxxxxxxx " " xxxxxxxxxxxx " " xxxxxxxxxxxx" " xxxxxxxxxxx" " xxxxxxxxxx" " xxxxxxxxxx" " x xxxxxxx" " xx xxxxxx" " xxxx xxxxxx" " xxxx xxxxxx" " xxxx xxxxxx" " xxxx xxxxxx" " xxxx xxxxxx" " xxxx xxx xxxxxx" " xxxxxxx xxxx xxxxxx" "xxxxxxxxxxxxx xxxxxx" "xxxxxxxxxxxx xxxxxx" "xxxxxxxxxxx xxxxxxx" "xxxxxxxxxxxxxxxxxxxx" "xx xxxxxxxxxxxxxxxx" "xx xxxxxxxxxxxxxxxx" "xxxxxxxxx xxxxxxxxxx" " xxxxxxx xxxxxxxx " " xxxxxx xxxxxx " " xxx " " xxx " " xx " " x " " x "))))))
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 30x20") (define problems (list (make-problem "19981106-KVL (1)" (quote (() (1 1) (2 2) (8) (8) (2 2 2) (10 8) (15 6) (19 4) (21 2 1) (22 3) (28) (17 10) (3 10 3 4 2) (3 6 2 2 3 3) (3 5 3 4) (12 3 6) (9 2 4) () ())) (quote (() (3) (6) (8) (5 3) (7 2) (8 2) (8 2) (9 2) (9 2) (9 2) (9 2) (8 3) (8 3) (8 3) (7 3) (7 2) (7 1) (5 5) (11) (6 1) (4 5 1 2) (7 6 2) (3 3 5 2) (7 3 3) (7 3 2) (3 3 3 3) (7 7) (4 5) ())) (quote (" " " xxx " " xxxxxx " " xxxxxxxx " " xxxxx xxx " " xxxxxxx xx " " xxxxxxxx xx " " xxxxxxxx xx " " xxxxxxxxx xx " " xxxxxxxxx xx " " xxxxxxxxx xx " " xxxxxxxxx xx " " xxxxxxxx xxx " " xxxxxxxx xxx " " xxxxxxxx xxx " " xxxxxxx xxx " " xxxxxxx xx " " xxxxxxx x " " xxxxx xxxxx " " xxxxxxxxxxx " " xxxxxx x " " xxxx xxxxx x xx " " xxxxxxx xxxxxx xx " " xxx xxx xxxxx xx " " xxxxxxx xxx xxx " " xxxxxxx xxx xx " " xxx xxx xxx xxx " " xxxxxxx xxxxxxx " " xxxx xxxxx " " "))) (make-problem "19990311-FRA (2)" (quote (() (2) (2) (2) (3) (4) (27) (27) (27) (4) (4 1) (4 1) (6 1 3) (3 1 1) (3 1 1 3 1 1 1) (1 3 1 1 2 1 3 1) (1 3 1 2 1 1 1) (1 1 1 3) (1 1 1) (1 3))) (quote (() (1) (8 1) (9 6) (10 1) (11) (2 3 1) (1 3) (3) (3) (3 6) (3 1 1) (3 3) (3) (3 1 3) (3 1 1 1) (3 5) (3) (3 4) (3 1) (3 1) (3 4) (3) (3 3 1) (3 1 1 1) (3 5) (3) (3 4 1) (3) ())) (quote (" " " x " " xxxxxxxx x " " xxxxxxxxx xxxxxx" " xxxxxxxxxx x " " xxxxxxxxxxx " " xx xxx x " " x xxx " " xxx " " xxx " " xxx xxxxxx " " xxx x x " " xxx xxx " " xxx " " xxx x xxx " " xxx x x x " " xxx xxxxx " " xxx " " xxx xxxx " " xxx x " " xxx x " " xxx xxxx " " xxx " " xxx xxx x" " xxx x x x" " xxx xxxxx" " xxx " " xxx xxxx x " " xxx " " "))) (make-problem "19990601cDRA (3)" (quote (() (3 1 3 1) (1 1 1 1) (2 1 2 3 1 2 1 1 2 3) (1 1 1 2 1 1 1 1 1 2) (1 1 1 3 1 1 2 2 1 1) () () (26) (2 2 7) (2 6 2 1) (9 1 1 1 2 1) (1 1 1 1 1 2 1) (1 2 2 1) (1 2 2 1) (1 1 1 1 1 1) (2 2 11 2 7) (2 2) () ())) (quote ((5) (1 1 1 6) (1 1 1 1) (1 1 1) (1 3 4 1 2) (4 1 2) (3 1 1 1) (1 1 1 1) (1 1 1) (3 1 2 1) (3 1 1 1) (1 1 1 4 1) (1 1 1) (3 1) (1 3 1) (5 1 1 1) (1 1 4 1) (3 1 1 1) (1 1 3 1) (3 1 2) (2 2 1 2) (1 2 1) (3 2 2 1) (2 2 1) (3 2 1) (1 1 3 1) (1 2 1) (5 4) (2 1) (2 1))) (quote (" xxxxx " " x x x xxxxxx " " x x x x " " x x x " " x xxx xxxx x xx " " xxxx x xx " " xxx x x x " " x x x x " " x x x " " xxx x xx x " " xxx x x x " " x x x xxxx x " " x x x " " xxx x " " x xxx x " " xxxxx x x x " " x x xxxx x " " xxx x x x " " x x xxx x " " xxx x xx " " xx xx x xx " " x xx x " " xxx xx xx x " " xx xx x " " xxx xx x " " x x xxx x " " x xx x " " xxxxx xxxx " " xx x " " xx x "))) (make-problem "19991106-BDH (4)" (quote ((7) (9) (6 3) (6 3) (13) (16) (1 13) (2 10) (3 7) (5 5 7) (23) (7 10 5) (7 8 6) (8 7) (25) (25) (25) (24) (22) (20))) (quote ((8) (12) (12) (12) (11) (10) (10) (1 7) (2 6) (4 6) (4 6) (4 6) (4 6) (4 6) (4 3 6) (7 4 6) (13 6) (12 6) (11 7) (20) (2 16) (2 16) (9 10) (7 8) (6 6) (3) (3) (2) (1) (1))) (quote (" xxxxxxxx " " xxxxxxxxxxxx " " xxxxxxxxxxxx " " xxxxxxxxxxxx" " xxxxxxxxxxx" " xxxxxxxxxx" " xxxxxxxxxx" " x xxxxxxx" " xx xxxxxx" " xxxx xxxxxx" " xxxx xxxxxx" " xxxx xxxxxx" " xxxx xxxxxx" " xxxx xxxxxx" " xxxx xxx xxxxxx" " xxxxxxx xxxx xxxxxx" "xxxxxxxxxxxxx xxxxxx" "xxxxxxxxxxxx xxxxxx" "xxxxxxxxxxx xxxxxxx" "xxxxxxxxxxxxxxxxxxxx" "xx xxxxxxxxxxxxxxxx" "xx xxxxxxxxxxxxxxxx" "xxxxxxxxx xxxxxxxxxx" " xxxxxxx xxxxxxxx " " xxxxxx xxxxxx " " xxx " " xxx " " xx " " x " " x "))))))
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 30x25") (define problems (list (make-problem "19980715-GAS (1)" (quote ((30) (30) (30) (13 15) (12 14) (12 14) (12 14) (12 14) (12 14) (13 15) (13 12) (7 6) (4 3) (1 1) (1 2) (3 1 3 4) (3 3 4 3) (2 4 4 3) (2 3 3 2) (1 2 2 1 2) (1 1 1 1 3 1) (3 4 1) (4 5) () ())) (quote ((11 7) (11 4) (11 2) (12) (13) (14) (13 2) (13 3) (12 2) (12 1 1) (11 3) (11 4) (4 2 6) (3) (3) (4 2) (11 6) (11 5) (11 4) (11 2 1) (12 2) (12 3) (13 4) (13 3) (13) (12) (11 1) (10 3) (10 6) (10 9))) (quote ("xxxxxxxxxxx xxxxxxx " "xxxxxxxxxxx xxxx " "xxxxxxxxxxx xx " "xxxxxxxxxxxx " "xxxxxxxxxxxxx " "xxxxxxxxxxxxxx " "xxxxxxxxxxxxx xx " "xxxxxxxxxxxxx xxx " "xxxxxxxxxxxx xx " "xxxxxxxxxxxx x x " "xxxxxxxxxxx xxx " "xxxxxxxxxxx xxxx " "xxxx xx xxxxxx " "xxx " "xxx " "xxxx xx " "xxxxxxxxxxx xxxxxx " "xxxxxxxxxxx xxxxx " "xxxxxxxxxxx xxxx " "xxxxxxxxxxx xx x " "xxxxxxxxxxxx xx " "xxxxxxxxxxxx xxx " "xxxxxxxxxxxxx xxxx " "xxxxxxxxxxxxx xxx " "xxxxxxxxxxxxx " "xxxxxxxxxxxx " "xxxxxxxxxxx x " "xxxxxxxxxx xxx " "xxxxxxxxxx xxxxxx " "xxxxxxxxxx xxxxxxxxx "))))))
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 30x25") (define problems (list (make-problem "19980715-GAS (1)" (quote ((30) (30) (30) (13 15) (12 14) (12 14) (12 14) (12 14) (12 14) (13 15) (13 12) (7 6) (4 3) (1 1) (1 2) (3 1 3 4) (3 3 4 3) (2 4 4 3) (2 3 3 2) (1 2 2 1 2) (1 1 1 1 3 1) (3 4 1) (4 5) () ())) (quote ((11 7) (11 4) (11 2) (12) (13) (14) (13 2) (13 3) (12 2) (12 1 1) (11 3) (11 4) (4 2 6) (3) (3) (4 2) (11 6) (11 5) (11 4) (11 2 1) (12 2) (12 3) (13 4) (13 3) (13) (12) (11 1) (10 3) (10 6) (10 9))) (quote ("xxxxxxxxxxx xxxxxxx " "xxxxxxxxxxx xxxx " "xxxxxxxxxxx xx " "xxxxxxxxxxxx " "xxxxxxxxxxxxx " "xxxxxxxxxxxxxx " "xxxxxxxxxxxxx xx " "xxxxxxxxxxxxx xxx " "xxxxxxxxxxxx xx " "xxxxxxxxxxxx x x " "xxxxxxxxxxx xxx " "xxxxxxxxxxx xxxx " "xxxx xx xxxxxx " "xxx " "xxx " "xxxx xx " "xxxxxxxxxxx xxxxxx " "xxxxxxxxxxx xxxxx " "xxxxxxxxxxx xxxx " "xxxxxxxxxxx xx x " "xxxxxxxxxxxx xx " "xxxxxxxxxxxx xxx " "xxxxxxxxxxxxx xxxx " "xxxxxxxxxxxxx xxx " "xxxxxxxxxxxxx " "xxxxxxxxxxxx " "xxxxxxxxxxx x " "xxxxxxxxxx xxx " "xxxxxxxxxx xxxxxx " "xxxxxxxxxx xxxxxxxxx "))))))
|
||||
|
|
|
|||
File diff suppressed because one or more lines are too long
|
|
@ -1 +1 @@
|
|||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 30x35") (define problems (list (make-problem "19990507aJOJ (1)" (quote ((6 2 1 3 1 2 1 1 4) (5 1 1 1 4 1 1 1 1 3) (5 1 1 1 1 1 1 1 1 1) (4 1 1 1 1 1 2 1 1 1 3) (2 1 1 3 2 2 3 3 1) (1 2 18 2) (1 23) (2 21 2) (1 25) (3 22 2) (3 11 8 3) (2 10 7 2) (2 5 6 1) (1 5 2 2 5) (3 1 1 1 1 2) (2 1 1 1 1 1 1 1 1 1) (2 1 1 1 2 1 1 1 1) (2 1 2 4 2 1 1) (2 1 6 1 2) (1 3 6 3) (2 2 6 2 1) (3 2 2 4 2 2 1) (3 2 3 3 2 1) (4 2 5 5 2 2) (4 2 12 2 3) (3 4 6 3 3) (1 7 5 2) (3 4 3 2 1) (29) (1 8 2) (12 10) () (30) () (30))) (quote ((7 6 3 8 3 1 1) (5 1 4 5 6 2 1 1 1) (4 1 1 2 2 2 5 2 1 1 1) (4 1 1 4 2 2 3 1 1 1) (3 1 1 6 3 4 2 1 1 1 1) (1 1 8 1 6 1 1 1 1) (1 1 8 4 1 1 1 1) (1 1 8 1 2 1 1 1 1) (2 1 7 2 3 1 1 1) (1 8 2 3 1 1 1) (2 9 2 3 2 1 1 1) (1 8 1 1 2 2 1 1 1) (2 1 7 1 1 1 2 2 1 1) (2 7 1 1 3 3 2 1 1) (2 8 2 5 2 2 1 1) (2 5 6 2 2 1 1) (1 7 6 2 2 1 1) (9 2 5 2 2 1 1) (1 6 1 1 3 3 2 1 1) (1 8 1 1 1 2 2 1 1) (2 8 1 1 2 2 1 1 1) (1 9 2 3 2 1 1 1) (1 8 2 3 1 1 1) (1 10 2 2 1 1 1 1) (1 1 10 1 3 1 1 1 1) (1 1 8 1 4 1 1 1 1) (1 1 1 1 3 3 5 3 1 1 1) (2 1 1 1 1 3 4 2 2 1 1 1) (2 1 1 1 3 2 2 4 3 1 1) (3 1 1 4 4 8 2 1 1))) (quote ("xxxxxxx xxxxxx xxx xxxxxxxx xxx x x" "xxxxx x xxxx xxxxx xxxxxx xx x x x" "xxxx x x xx xx xx xxxxx xx x x x" "xxxx x x xxxx xx xx xxx x x x" "xxx x x xxxxxx xxx xxxx xx x x x x" "x x xxxxxxxx x xxxxxx x x x x" " x x xxxxxxxx xxxx x x x x" "x x xxxxxxxx x xx x x x x" "xx x xxxxxxx xx xxx x x x" " x xxxxxxxx xx xxx x x x" "xx xxxxxxxxx xx xxx xx x x x" " x xxxxxxxx x x xx xx x x x" "xx x xxxxxxx x x x xx xx x x" "xx xxxxxxx x x xxx xxx xx x x" "xx xxxxxxxx xx xxxxx xx xx x x" " xx xxxxx xxxxxx xx xx x x" "x xxxxxxx xxxxxx xx xx x x" " xxxxxxxxx xx xxxxx xx xx x x" "x xxxxxx x x xxx xxx xx x x" "x xxxxxxxx x x x xx xx x x" " xx xxxxxxxx x x xx xx x x x" "x xxxxxxxxx xx xxx xx x x x" " x xxxxxxxx xx xxx x x x" " x xxxxxxxxxx xx xx x x x x" "x x xxxxxxxxxx x xxx x x x x" " x x xxxxxxxx x xxxx x x x x" "x x x x xxx xxx xxxxx xxx x x x" "xx x x x x xxx xxxx xx xx x x x" "xx x x x xxx xx xx xxxx xxx x x" "xxx x x xxxx xxxx xxxxxxxx xx x x"))))))
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 30x35") (define problems (list (make-problem "19990507aJOJ (1)" (quote ((6 2 1 3 1 2 1 1 4) (5 1 1 1 4 1 1 1 1 3) (5 1 1 1 1 1 1 1 1 1) (4 1 1 1 1 1 2 1 1 1 3) (2 1 1 3 2 2 3 3 1) (1 2 18 2) (1 23) (2 21 2) (1 25) (3 22 2) (3 11 8 3) (2 10 7 2) (2 5 6 1) (1 5 2 2 5) (3 1 1 1 1 2) (2 1 1 1 1 1 1 1 1 1) (2 1 1 1 2 1 1 1 1) (2 1 2 4 2 1 1) (2 1 6 1 2) (1 3 6 3) (2 2 6 2 1) (3 2 2 4 2 2 1) (3 2 3 3 2 1) (4 2 5 5 2 2) (4 2 12 2 3) (3 4 6 3 3) (1 7 5 2) (3 4 3 2 1) (29) (1 8 2) (12 10) () (30) () (30))) (quote ((7 6 3 8 3 1 1) (5 1 4 5 6 2 1 1 1) (4 1 1 2 2 2 5 2 1 1 1) (4 1 1 4 2 2 3 1 1 1) (3 1 1 6 3 4 2 1 1 1 1) (1 1 8 1 6 1 1 1 1) (1 1 8 4 1 1 1 1) (1 1 8 1 2 1 1 1 1) (2 1 7 2 3 1 1 1) (1 8 2 3 1 1 1) (2 9 2 3 2 1 1 1) (1 8 1 1 2 2 1 1 1) (2 1 7 1 1 1 2 2 1 1) (2 7 1 1 3 3 2 1 1) (2 8 2 5 2 2 1 1) (2 5 6 2 2 1 1) (1 7 6 2 2 1 1) (9 2 5 2 2 1 1) (1 6 1 1 3 3 2 1 1) (1 8 1 1 1 2 2 1 1) (2 8 1 1 2 2 1 1 1) (1 9 2 3 2 1 1 1) (1 8 2 3 1 1 1) (1 10 2 2 1 1 1 1) (1 1 10 1 3 1 1 1 1) (1 1 8 1 4 1 1 1 1) (1 1 1 1 3 3 5 3 1 1 1) (2 1 1 1 1 3 4 2 2 1 1 1) (2 1 1 1 3 2 2 4 3 1 1) (3 1 1 4 4 8 2 1 1))) (quote ("xxxxxxx xxxxxx xxx xxxxxxxx xxx x x" "xxxxx x xxxx xxxxx xxxxxx xx x x x" "xxxx x x xx xx xx xxxxx xx x x x" "xxxx x x xxxx xx xx xxx x x x" "xxx x x xxxxxx xxx xxxx xx x x x x" "x x xxxxxxxx x xxxxxx x x x x" " x x xxxxxxxx xxxx x x x x" "x x xxxxxxxx x xx x x x x" "xx x xxxxxxx xx xxx x x x" " x xxxxxxxx xx xxx x x x" "xx xxxxxxxxx xx xxx xx x x x" " x xxxxxxxx x x xx xx x x x" "xx x xxxxxxx x x x xx xx x x" "xx xxxxxxx x x xxx xxx xx x x" "xx xxxxxxxx xx xxxxx xx xx x x" " xx xxxxx xxxxxx xx xx x x" "x xxxxxxx xxxxxx xx xx x x" " xxxxxxxxx xx xxxxx xx xx x x" "x xxxxxx x x xxx xxx xx x x" "x xxxxxxxx x x x xx xx x x" " xx xxxxxxxx x x xx xx x x x" "x xxxxxxxxx xx xxx xx x x x" " x xxxxxxxx xx xxx x x x" " x xxxxxxxxxx xx xx x x x x" "x x xxxxxxxxxx x xxx x x x x" " x x xxxxxxxx x xxxx x x x x" "x x x x xxx xxx xxxxx xxx x x x" "xx x x x x xxx xxxx xx xx x x x" "xx x x x xxx xx xx xxxx xxx x x" "xxx x x xxxx xxxx xxxxxxxx xx x x"))))))
|
||||
|
|
|
|||
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
|
|
@ -1 +1 @@
|
|||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Misc") (define problems (list (make-problem "Happy Happy Joy Joy" (quote ((5) (9) (2 7) (4 8) (4 7) (6 7) (7 7) (7 6) (7 5) (5 1 4) (4 2 3) (2 4 1) (9) (5))) (quote ((4) (8) (10) (12) (1 8 1) (2 5 2) (4 3 3) (5 4) (7 5) (8 3) (9 1) (10 1) (10) (8) (4))) (quote (" xxxx " " xxxxxxxx " " xxxxxxxxxx " " xxxxxxxxxxxx " " x xxxxxxxx x " "xx xxxxx xx" "xxxx xxx xxx" "xxxxx xxxx" "xxxxxxx xxxxx" "xxxxxxxx xxx" " xxxxxxxxx x " " xxxxxxxxxx x " " xxxxxxxxxx " " xxxxxxxx " " xxxx "))) (make-problem "Solver Breaker" (quote ((1) (2 2) (1) (2) (2 2) (1))) (quote ((1) (2 2) (1 1) (1) (2 2) (1))) (quote ("UUUUUU" "UUUUUU" "UUUUUU" "UUUUUU" "UUUUUU" "UUUUUU"))))))
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Misc") (define problems (list (make-problem "Happy Happy Joy Joy" (quote ((5) (9) (2 7) (4 8) (4 7) (6 7) (7 7) (7 6) (7 5) (5 1 4) (4 2 3) (2 4 1) (9) (5))) (quote ((4) (8) (10) (12) (1 8 1) (2 5 2) (4 3 3) (5 4) (7 5) (8 3) (9 1) (10 1) (10) (8) (4))) (quote (" xxxx " " xxxxxxxx " " xxxxxxxxxx " " xxxxxxxxxxxx " " x xxxxxxxx x " "xx xxxxx xx" "xxxx xxx xxx" "xxxxx xxxx" "xxxxxxx xxxxx" "xxxxxxxx xxx" " xxxxxxxxx x " " xxxxxxxxxx x " " xxxxxxxxxx " " xxxxxxxx " " xxxx "))) (make-problem "Solver Breaker" (quote ((1) (2 2) (1) (2) (2 2) (1))) (quote ((1) (2 2) (1 1) (1) (2 2) (1))) (quote ("UUUUUU" "UUUUUU" "UUUUUU" "UUUUUU" "UUUUUU" "UUUUUU"))))))
|
||||
|
|
|
|||
|
|
@ -8,7 +8,7 @@ reading in each file in the solutions directory (based on the
|
|||
directory file) and rewriting it into the format described
|
||||
in ...
|
||||
|
||||
|#
|
||||
|#
|
||||
|
||||
(require mzlib/match)
|
||||
|
||||
|
|
@ -19,7 +19,8 @@ in ...
|
|||
(let ([shrunk (shrink-set (call-with-input-file (build-path 'up "solution-sets" filename) read))])
|
||||
(call-with-output-file (build-path 'up "problems" filename)
|
||||
(lambda (port)
|
||||
(write shrunk port))))
|
||||
(write shrunk port)
|
||||
(newline port))))
|
||||
(printf "done\n"))
|
||||
|
||||
;; shrink-set sexp[set] -> sexp[set]
|
||||
|
|
|
|||
|
|
@ -34,4 +34,4 @@ Solving "Hattori 99"; memory limit 400 megs (419430400 bytes)
|
|||
................................................................
|
||||
|
||||
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Hattori 91 - 99") (define problems (list (make-problem "Hattori 91" (quote ((5 5) (1 1 1 1) (1 1) (7) (4 1 2 2 3) (6 1 1 1 5) (4 3 1 3 3) (3 7 2) (2 1 1 1) (1 1 3 1 1) (1 1 1) (2 1 3 1 2) (18) (2 3 2) (2 1 4 1 1) (1 6 1) (2 5 2 2) (2 2 4 2 2) (4 3 3) (1 2 1))) (quote ((7) (5 2 3) (4 3 2) (3 2 2) (2 1 2 1 2) (2 2 1 1) (1 1 1 2) (1 5 1 2) (1 1 1 1 2) (5 3 7) (5 10) (4 3 9) (1 2 1 1 2 3) (1 5 1 2) (1 1 1 2) (2 2 1 2) (2 1 2 1 2) (3 1 2) (4 3 2) (7 4))) (quote #f)) (make-problem "Hattori 92" (quote ((5) (5 2) (7 4) (8 5) (9 6) (9 6) (9 8) (1 7 8) (1 4 8) (4 2 7) (1 2 3 6) (2 2 1 5 5) (2 1 1 2 2 5) (1 2 1 5 5) (1 2 2 3 6) (3 2 6) (1 2 7) (4 1 6) (1 1 4) (1 1 3))) (quote ((4) (2 2 1) (9 5) (5 1 1) (6 1 1 2 1) (7 1 4 1) (7) (8 5) (10 2) (10 3 2) (1 3 5 4) (1 2 2) (1 3 5 4) (10 3 5) (10 6) (17) (16) (15) (13) (9))) (quote #f)) (make-problem "Hattori 93" (quote ((8 3) (3 1 3 1) (2 3 1) (1 2 2 4) (1 3 1 5) (2 1 1 2 1) (1 2 1 3) (1 2 2) (2 3 1) (3 1 3 2) (8 3) (5 9) (2 4 1) (2 9) (2 6 2) (2 1 4 1 1) (2 9 1) (2 1 1 1) (13 1) (15 3))) (quote ((9) (3 1 3 1) (2 3 2) (1 2 2) (1 2 10) (2 1 1 11) (1 3 2 2) (2 2 2 2 2) (3 3 3 1 2) (3 1 3 9) (7 6 2) (6 2) (1 4 2) (4 4) (1 1 1 2) (1 1 1 2 1) (7 1 2) (5 2 3 6) (1 2 1 1 1) (1 2 1 1))) (quote #f)) (make-problem "Hattori 94" (quote ((3 5) (2 1 2 1) (2 3 2 1) (2 2 3 1) (2 2 4 1) (2 2 3 1 3) (1 2 4 2 1 2) (1 3 2 5 1) (1 2 3 2 1) (2 4 2 1) (1 1) (2 3 2 1) (1 1 1 2 1) (1 3 2 1) (1 2 1) (1 2 1) (1 1 2 2 1) (3 3 6 2) (5 3 3) (6 10))) (quote ((7) (3 2) (6 3) (4 2) (3 2 3 2) (2 3 1 1 3) (1 4 3 1 1) (6 1 2 1) (2 2 1 1 2) (2 4 1 2) (2 4 2 3) (1 5 1 3 1 1) (1 3 2 6 1) (1 2 2 2 1) (8 1 1 1) (2 1) (5 1) (1 1 2) (2 3) (14))) (quote #f)) (make-problem "Hattori 95" (quote ((3 9) (1 2 1 1 1 2) (1 1 1 2) (5 1 3 1) (4 1 1) (13) (13) (2 3) (8 3) (11 2) (2 5) (11 1) (1 1 1 1 5) (2 1 1 1 2) (2 2 3) (5 2 2) (2 1 4 1 2) (3 4 2 2 2) (6 1 2 5) (3 2 5 2 2))) (quote ((4 3) (1 1 4) (2 2 5) (5 1 1) (4 2 3 3) (4 7 3) (1 5 1 3) (4 2 2 3 2) (1 3 2 1 1 1) (2 1 2 2 4 2 1) (1 1 2 2 1 1 2 1) (2 1 2 2 1 1 1) (1 3 2 3 2) (4 2 2 1 2) (3 3 4 3) (4 6 2) (5 3 2) (3 1 2 1) (3 5) (4))) (quote #f)) (make-problem "Hattori 96" (quote ((4 4) (2 3) (5 8) (3 10) (3 3 1 4) (3 2 2 2 1 1) (3 2 1 1 1) (3 2 1 1 2) (4 2 1 3) (4 1 3) (9 5) (4 6) (14) (1 1 1 2 4) (3 2 3) (6 3 3) (13 3) (4 1 4 4) (3 2 4 1 1) (4 2 5 4))) (quote ((2) (9 1) (1 8 4) (1 9 5) (3 4 5) (1 4 4 4) (2 6 3 3 1) (1 3 9 2) (1 2 1 1 1 4) (1 2 3 1 2 1 1) (3 1 1 1 1 2) (2 3 1 2 4) (2 1 1 5) (3 11) (4 10) (2 6) (5 4 3) (8 1) (7 1) (7))) (quote #f)) (make-problem "Hattori 97" (quote ((7 3 2) (2 6 3) (12 2 4) (3 6 1) (2 4 3 3) (2 1 1 1 1) (3 1 3) (1 1 1 1) (1 2 3 2) (2 1 4 2) (1 1 1 1) (2 2 3 2) (1 2 1 2) (2 2 2 2) (1 2 2 1 1) (1 2 4 2) (1 2 3 4) (1 5 2 3) (2 1 1 1) (16 1))) (quote ((8 5) (6 3 1 2) (3 3 4 1) (1 1 2 1 1) (1 1 2 1 1) (1 1 2 2 1) (1 1 1 1 2 2 1) (1 1 2 2 2 1 1) (1 1 1 5 1 1 1) (10 1 1 1 1) (3 2 1 1 1) (5 2 2 1) (2 2 4 1) (5 4) (3 1 1) (1 1) (1 4) (8 3) (3 1 1 4 7) (3 3 1 1 1))) (quote #f)) (make-problem "Hattori 98" (quote ((3) (7) (2 3 3) (8 1 4) (2 3 5) (10) (9) (3 4) (4 10) (3 10) (3 9) (2 4 4) (2 15) (2 15) (3 13) (4 5 5) (7 7) (18) (17) (13))) (quote ((1 1 8) (3 11) (1 3 5) (1 2 5) (1 2 3 4) (1 1 4 4) (3 5 4) (5 7 3) (6 3 4 3) (2 2 3 4 3) (2 1 2 3 4 3) (2 2 3 4 3) (6 3 4 3) (9 3 4) (8 4 4) (7 9) (5 8) (8) (6) (4))) (quote #f)) (make-problem "Hattori 99" (quote ((8) (14) (14) (14) (8 1) (1 1) (1 1) (1 1) (1 1) (1 1) (1 1) (1 1) (1 1) (1 4) (4 6) (6 7) (7 7) (7 6) (6 4) (4))) (quote ((3) (5) (5) (6) (6) (5) (17) (4) (4) (4) (4) (4) (5) (5 3) (4 5) (4 5) (4 6) (4 6) (4 5) (17))) (quote #f)))))
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Hattori 91 - 99") (define problems (list (make-problem "Hattori 91" (quote ((5 5) (1 1 1 1) (1 1) (7) (4 1 2 2 3) (6 1 1 1 5) (4 3 1 3 3) (3 7 2) (2 1 1 1) (1 1 3 1 1) (1 1 1) (2 1 3 1 2) (18) (2 3 2) (2 1 4 1 1) (1 6 1) (2 5 2 2) (2 2 4 2 2) (4 3 3) (1 2 1))) (quote ((7) (5 2 3) (4 3 2) (3 2 2) (2 1 2 1 2) (2 2 1 1) (1 1 1 2) (1 5 1 2) (1 1 1 1 2) (5 3 7) (5 10) (4 3 9) (1 2 1 1 2 3) (1 5 1 2) (1 1 1 2) (2 2 1 2) (2 1 2 1 2) (3 1 2) (4 3 2) (7 4))) (quote #f)) (make-problem "Hattori 92" (quote ((5) (5 2) (7 4) (8 5) (9 6) (9 6) (9 8) (1 7 8) (1 4 8) (4 2 7) (1 2 3 6) (2 2 1 5 5) (2 1 1 2 2 5) (1 2 1 5 5) (1 2 2 3 6) (3 2 6) (1 2 7) (4 1 6) (1 1 4) (1 1 3))) (quote ((4) (2 2 1) (9 5) (5 1 1) (6 1 1 2 1) (7 1 4 1) (7) (8 5) (10 2) (10 3 2) (1 3 5 4) (1 2 2) (1 3 5 4) (10 3 5) (10 6) (17) (16) (15) (13) (9))) (quote #f)) (make-problem "Hattori 93" (quote ((8 3) (3 1 3 1) (2 3 1) (1 2 2 4) (1 3 1 5) (2 1 1 2 1) (1 2 1 3) (1 2 2) (2 3 1) (3 1 3 2) (8 3) (5 9) (2 4 1) (2 9) (2 6 2) (2 1 4 1 1) (2 9 1) (2 1 1 1) (13 1) (15 3))) (quote ((9) (3 1 3 1) (2 3 2) (1 2 2) (1 2 10) (2 1 1 11) (1 3 2 2) (2 2 2 2 2) (3 3 3 1 2) (3 1 3 9) (7 6 2) (6 2) (1 4 2) (4 4) (1 1 1 2) (1 1 1 2 1) (7 1 2) (5 2 3 6) (1 2 1 1 1) (1 2 1 1))) (quote #f)) (make-problem "Hattori 94" (quote ((3 5) (2 1 2 1) (2 3 2 1) (2 2 3 1) (2 2 4 1) (2 2 3 1 3) (1 2 4 2 1 2) (1 3 2 5 1) (1 2 3 2 1) (2 4 2 1) (1 1) (2 3 2 1) (1 1 1 2 1) (1 3 2 1) (1 2 1) (1 2 1) (1 1 2 2 1) (3 3 6 2) (5 3 3) (6 10))) (quote ((7) (3 2) (6 3) (4 2) (3 2 3 2) (2 3 1 1 3) (1 4 3 1 1) (6 1 2 1) (2 2 1 1 2) (2 4 1 2) (2 4 2 3) (1 5 1 3 1 1) (1 3 2 6 1) (1 2 2 2 1) (8 1 1 1) (2 1) (5 1) (1 1 2) (2 3) (14))) (quote #f)) (make-problem "Hattori 95" (quote ((3 9) (1 2 1 1 1 2) (1 1 1 2) (5 1 3 1) (4 1 1) (13) (13) (2 3) (8 3) (11 2) (2 5) (11 1) (1 1 1 1 5) (2 1 1 1 2) (2 2 3) (5 2 2) (2 1 4 1 2) (3 4 2 2 2) (6 1 2 5) (3 2 5 2 2))) (quote ((4 3) (1 1 4) (2 2 5) (5 1 1) (4 2 3 3) (4 7 3) (1 5 1 3) (4 2 2 3 2) (1 3 2 1 1 1) (2 1 2 2 4 2 1) (1 1 2 2 1 1 2 1) (2 1 2 2 1 1 1) (1 3 2 3 2) (4 2 2 1 2) (3 3 4 3) (4 6 2) (5 3 2) (3 1 2 1) (3 5) (4))) (quote #f)) (make-problem "Hattori 96" (quote ((4 4) (2 3) (5 8) (3 10) (3 3 1 4) (3 2 2 2 1 1) (3 2 1 1 1) (3 2 1 1 2) (4 2 1 3) (4 1 3) (9 5) (4 6) (14) (1 1 1 2 4) (3 2 3) (6 3 3) (13 3) (4 1 4 4) (3 2 4 1 1) (4 2 5 4))) (quote ((2) (9 1) (1 8 4) (1 9 5) (3 4 5) (1 4 4 4) (2 6 3 3 1) (1 3 9 2) (1 2 1 1 1 4) (1 2 3 1 2 1 1) (3 1 1 1 1 2) (2 3 1 2 4) (2 1 1 5) (3 11) (4 10) (2 6) (5 4 3) (8 1) (7 1) (7))) (quote #f)) (make-problem "Hattori 97" (quote ((7 3 2) (2 6 3) (12 2 4) (3 6 1) (2 4 3 3) (2 1 1 1 1) (3 1 3) (1 1 1 1) (1 2 3 2) (2 1 4 2) (1 1 1 1) (2 2 3 2) (1 2 1 2) (2 2 2 2) (1 2 2 1 1) (1 2 4 2) (1 2 3 4) (1 5 2 3) (2 1 1 1) (16 1))) (quote ((8 5) (6 3 1 2) (3 3 4 1) (1 1 2 1 1) (1 1 2 1 1) (1 1 2 2 1) (1 1 1 1 2 2 1) (1 1 2 2 2 1 1) (1 1 1 5 1 1 1) (10 1 1 1 1) (3 2 1 1 1) (5 2 2 1) (2 2 4 1) (5 4) (3 1 1) (1 1) (1 4) (8 3) (3 1 1 4 7) (3 3 1 1 1))) (quote #f)) (make-problem "Hattori 98" (quote ((3) (7) (2 3 3) (8 1 4) (2 3 5) (10) (9) (3 4) (4 10) (3 10) (3 9) (2 4 4) (2 15) (2 15) (3 13) (4 5 5) (7 7) (18) (17) (13))) (quote ((1 1 8) (3 11) (1 3 5) (1 2 5) (1 2 3 4) (1 1 4 4) (3 5 4) (5 7 3) (6 3 4 3) (2 2 3 4 3) (2 1 2 3 4 3) (2 2 3 4 3) (6 3 4 3) (9 3 4) (8 4 4) (7 9) (5 8) (8) (6) (4))) (quote #f)) (make-problem "Hattori 99" (quote ((8) (14) (14) (14) (8 1) (1 1) (1 1) (1 1) (1 1) (1 1) (1 1) (1 1) (1 1) (1 4) (4 6) (6 7) (7 7) (7 6) (6 4) (4))) (quote ((3) (5) (5) (6) (6) (5) (17) (4) (4) (4) (4) (4) (5) (5 3) (4 5) (4 5) (4 6) (4 6) (4 5) (17))) (quote #f)))))
|
||||
|
|
|
|||
File diff suppressed because one or more lines are too long
|
|
@ -1 +1 @@
|
|||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 15x20") (define problems (list (make-problem "19990127aLLO (1)" (quote ((6 2) (1 1 6) (1 1 2 2) (2 2 1 1) (1 2 1) (6 1 4 1) (1 1 1 1 1) (1 1 1 1) (3 1 1 1 1 1) (1 1 1 1) (5 1 1 1 1) (1 1 1 1 1 1) (3 1 1 1 1) (1 1 1 1) (1 1 1 1 1 1) (6 1 1 1) (1 1 1 1 1) (1 2 2 1) (5 4 1) (1 1 2 1))) (quote ((4 2 1 1 3 2) (1 1 1 1 1 1 1) (1 1 1 3 1 1) (1 1 1 1 1 3) (1 1 1 1 3 1 1) (4 1 3) () (16) (2 2) (1 10 2) (2 2 2) (2 2 2) (1 13) (2) (18))) (quote #15(#20(on on on on off on on off on off on off off off on on on off on) #20(on off off on off on off off on off on off off off off on off off on off) #20(on off off off off on off off on off on on on off off on off off on off) #20(on off off off off on off off off off on off on off off on off on) #20(on off off on off on off off on off on on on off off on off off on off) #20(on on on on off on off off off off off off off off on on on off) #20(off) #20(off off on on on on on on on on on on on on on on on on off) #20(off on on off off off off off off off off off off off off off off on on off) #20(off on off off off on on on on on on on on on on off off off on) #20(on on off off on on off off off off off off off off off off off off on) #20(on on off off on on off off off off off off off off off off off on on off) #20(off on off off off on on on on on on on on on on on on on off) #20(off on on off) #20(off off on)))) (make-problem "19990127bLLO (2)" (quote ((3) (5) (7) (1 7) (2 4) (7) (5) (5) (5) (8) (6 2) (2 3 1 1) (2 2 2) (8) (5) (5) (5) (7) (7) (5))) (quote ((1) (3) (2 2) (2 3 1) (1 2 3 1 2) (3 15) (4 6 8) (4 5 1 7) (11 8) (19) (4 2) (2) () () ())) (quote #15(#20(off off off off off off off off off off off on off) #20(off off off off off off off off off off on on on off) #20(off off off off off off off off off on on off on on off) #20(off off off on on off off off off on on on off on off) #20(off off on off on on off off off on on on off on off off off on on off) #20(off on on on off on) #20(on on on on off on on on on on on off on) #20(on on on on off on on on on on off on off on) #20(on on on on on on on on on on on off on) #20(off on) #20(off off on on on on off off off off off off off off off off off on on off) #20(off off off on on off) #20(off) #20(off) #20(off)))) (make-problem "19990421bMIJ (3)" (quote (() (1 1 1) (2 2) (1 1 1) (2 1) (1 1) (1 1) (1) (1) (1 1 1 1) (3 1 3) (3 4) (1 3) (1 2) (1 1 1) (2 1 1) (2 1) (1 1) (15) (15))) (quote ((2) (1 2) (3 1 2) (10) (3 1 2) (5 1 2) (1 1 1 2) (1 1 13) (1 1 3 2) (5 3 2) (2 2) (2 2) (2) (2) (2))) (quote #15(#20(off off off off off off off off off off off off off off off off off off on) #20(off off off off off off off off off off off off off off on off off off on) #20(off off off off off off off off off on on on off off off on off off on) #20(off off off off off off off off off off on) #20(off off off off off off off off off on on on off off off off on off on) #20(off on on on on on off off off off off off off off off on off off on) #20(off off on off on off on off off off off off off off off off off off on) #20(off on off on off off off on) #20(off off on off off off on off off off off on on on off off off off on) #20(off on on on on on off off off off on on on off off off off off on) #20(off off off off off off off off off off on on off off off off off off on) #20(off off off off off off off off off on on off off off off off off off on) #20(off off off off off off off off off off off off off off off off off off on) #20(off off off off off off off off off off off off off off off off off off on) #20(off off off off off off off off off off off off off off off off off off on)))))))
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 15x20") (define problems (list (make-problem "19990127aLLO (1)" (quote ((6 2) (1 1 6) (1 1 2 2) (2 2 1 1) (1 2 1) (6 1 4 1) (1 1 1 1 1) (1 1 1 1) (3 1 1 1 1 1) (1 1 1 1) (5 1 1 1 1) (1 1 1 1 1 1) (3 1 1 1 1) (1 1 1 1) (1 1 1 1 1 1) (6 1 1 1) (1 1 1 1 1) (1 2 2 1) (5 4 1) (1 1 2 1))) (quote ((4 2 1 1 3 2) (1 1 1 1 1 1 1) (1 1 1 3 1 1) (1 1 1 1 1 3) (1 1 1 1 3 1 1) (4 1 3) () (16) (2 2) (1 10 2) (2 2 2) (2 2 2) (1 13) (2) (18))) (quote #15(#20(on on on on off on on off on off on off off off on on on off on) #20(on off off on off on off off on off on off off off off on off off on off) #20(on off off off off on off off on off on on on off off on off off on off) #20(on off off off off on off off off off on off on off off on off on) #20(on off off on off on off off on off on on on off off on off off on off) #20(on on on on off on off off off off off off off off on on on off) #20(off) #20(off off on on on on on on on on on on on on on on on on off) #20(off on on off off off off off off off off off off off off off off on on off) #20(off on off off off on on on on on on on on on on off off off on) #20(on on off off on on off off off off off off off off off off off off on) #20(on on off off on on off off off off off off off off off off off on on off) #20(off on off off off on on on on on on on on on on on on on off) #20(off on on off) #20(off off on)))) (make-problem "19990127bLLO (2)" (quote ((3) (5) (7) (1 7) (2 4) (7) (5) (5) (5) (8) (6 2) (2 3 1 1) (2 2 2) (8) (5) (5) (5) (7) (7) (5))) (quote ((1) (3) (2 2) (2 3 1) (1 2 3 1 2) (3 15) (4 6 8) (4 5 1 7) (11 8) (19) (4 2) (2) () () ())) (quote #15(#20(off off off off off off off off off off off on off) #20(off off off off off off off off off off on on on off) #20(off off off off off off off off off on on off on on off) #20(off off off on on off off off off on on on off on off) #20(off off on off on on off off off on on on off on off off off on on off) #20(off on on on off on) #20(on on on on off on on on on on on off on) #20(on on on on off on on on on on off on off on) #20(on on on on on on on on on on on off on) #20(off on) #20(off off on on on on off off off off off off off off off off off on on off) #20(off off off on on off) #20(off) #20(off) #20(off)))) (make-problem "19990421bMIJ (3)" (quote (() (1 1 1) (2 2) (1 1 1) (2 1) (1 1) (1 1) (1) (1) (1 1 1 1) (3 1 3) (3 4) (1 3) (1 2) (1 1 1) (2 1 1) (2 1) (1 1) (15) (15))) (quote ((2) (1 2) (3 1 2) (10) (3 1 2) (5 1 2) (1 1 1 2) (1 1 13) (1 1 3 2) (5 3 2) (2 2) (2 2) (2) (2) (2))) (quote #15(#20(off off off off off off off off off off off off off off off off off off on) #20(off off off off off off off off off off off off off off on off off off on) #20(off off off off off off off off off on on on off off off on off off on) #20(off off off off off off off off off off on) #20(off off off off off off off off off on on on off off off off on off on) #20(off on on on on on off off off off off off off off off on off off on) #20(off off on off on off on off off off off off off off off off off off on) #20(off on off on off off off on) #20(off off on off off off on off off off off on on on off off off off on) #20(off on on on on on off off off off on on on off off off off off on) #20(off off off off off off off off off off on on off off off off off off on) #20(off off off off off off off off off on on off off off off off off off on) #20(off off off off off off off off off off off off off off off off off off on) #20(off off off off off off off off off off off off off off off off off off on) #20(off off off off off off off off off off off off off off off off off off on)))))))
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 15x25") (define problems (list (make-problem "19990804aVAC (1)" (quote ((3) (4) (4 4) (7 3) (7 3) (2 2 2) (1 2) (4 2) (7) (8) (2 1 3) (1 2) (2 2) (2 2) (1 1 1 2) (1 1 1 2) (1 1 1 1 2) (6 2 1) (1 1 1 4) (1 3 1 4) (1 1 3 1) (1 6 2) (1 4 2) (1 2 2) (1 2))) (quote ((2 5) (3 1 1) (4 6 1 1) (3 4 3 1 1) (3 2 1 1 2 1) (4 2 6 3) (7 3) (4 3 1) (3 3 3 1) (2 3 1 1) (3 3 2) (5 14 2) (7 10 1) (4 3) (3))) (quote #15(#25(off off off on on off off off off off off off off off off off on on on on on off) #25(off off off on on on off off off off off off off off off off off on off off off on off) #25(off off on on on on off off off off off off on on on on on on off off on off on off) #25(off off on on on off off off off off on on on on off off off on on on off on off on off) #25(off off on on on off off off off on on off off off off off off on off on off on on off on) #25(off off on on on on off off on on off off off off on on on on on on off on on on off) #25(off off off on on on on on on on off off off off off off off off off off off on on on off) #25(off off off off off off off on on on on off off off off off off off off off on on on off on) #25(off off off off off off off on on on off off off off on on on off off on on on off off on) #25(on on off off off off off on on on off off off off off off off off off off on off off on off) #25(on on on off off off off off on on on off off off off off off off off off off off on on off) #25(on on on on on off on on on on on on on on on on on on on on off on on off) #25(off on on on on on on on off off on on on on on on on on on on off on off) #25(off off on on on on off off off off off off off off off off off off on on on off) #25(off off off off off off off off off off off off off off off off off on on on off)))))))
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 15x25") (define problems (list (make-problem "19990804aVAC (1)" (quote ((3) (4) (4 4) (7 3) (7 3) (2 2 2) (1 2) (4 2) (7) (8) (2 1 3) (1 2) (2 2) (2 2) (1 1 1 2) (1 1 1 2) (1 1 1 1 2) (6 2 1) (1 1 1 4) (1 3 1 4) (1 1 3 1) (1 6 2) (1 4 2) (1 2 2) (1 2))) (quote ((2 5) (3 1 1) (4 6 1 1) (3 4 3 1 1) (3 2 1 1 2 1) (4 2 6 3) (7 3) (4 3 1) (3 3 3 1) (2 3 1 1) (3 3 2) (5 14 2) (7 10 1) (4 3) (3))) (quote #15(#25(off off off on on off off off off off off off off off off off on on on on on off) #25(off off off on on on off off off off off off off off off off off on off off off on off) #25(off off on on on on off off off off off off on on on on on on off off on off on off) #25(off off on on on off off off off off on on on on off off off on on on off on off on off) #25(off off on on on off off off off on on off off off off off off on off on off on on off on) #25(off off on on on on off off on on off off off off on on on on on on off on on on off) #25(off off off on on on on on on on off off off off off off off off off off off on on on off) #25(off off off off off off off on on on on off off off off off off off off off on on on off on) #25(off off off off off off off on on on off off off off on on on off off on on on off off on) #25(on on off off off off off on on on off off off off off off off off off off on off off on off) #25(on on on off off off off off on on on off off off off off off off off off off off on on off) #25(on on on on on off on on on on on on on on on on on on on on off on on off) #25(off on on on on on on on off off on on on on on on on on on on off on off) #25(off off on on on on off off off off off off off off off off off off on on on off) #25(off off off off off off off off off off off off off off off off off on on on off)))))))
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 20x15") (define problems (list (make-problem "19990524-KHO (1)" (quote ((1) (2 2 1) (1 1 2) (3 1) (5 2) (3 3 1) (8 1) (19) (1 14) (1 13) (13) (2 1 1 3 3) (4 1 1 2 2) (4 1 1 1 1) (2 1 1 2 2))) (quote ((2) (3 1 4) (1 4 4) (1 4 2) (3 2) (6 1) (12) (1 7 1) (1 8) (4) (4) (4) (5) (6 1) (8) (4) (6 1) (3 8) (3 5) (4))) (quote #20(#15(off off off off off off off off off off off off on on off) #15(off off off off off on on on off on off on) #15(off on off off off on on on on off off on) #15(off on off off on on on on off off off off on on off) #15(off off on on on off on on off) #15(off off off on on on on on on off off off off off on) #15(off off on on on on on on on on on on on on off) #15(off on off off on on on on on on on off off off on) #15(off on off off off off on on on on on on on on off) #15(off off off off off off off on on on on off) #15(off off off off off off off on on on on off) #15(off off off off off off off on on on on off) #15(off off off off off off off on on on on on off) #15(off off off off off off off on on on on on on off on) #15(off off off off off off off on) #15(off off off off off off off on on on on off) #15(off off off off off off off on on on on on on off on) #15(on on on off off off off on) #15(off off on on on off off on on on on on off) #15(off off off off on on on on off)))))))
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 20x15") (define problems (list (make-problem "19990524-KHO (1)" (quote ((1) (2 2 1) (1 1 2) (3 1) (5 2) (3 3 1) (8 1) (19) (1 14) (1 13) (13) (2 1 1 3 3) (4 1 1 2 2) (4 1 1 1 1) (2 1 1 2 2))) (quote ((2) (3 1 4) (1 4 4) (1 4 2) (3 2) (6 1) (12) (1 7 1) (1 8) (4) (4) (4) (5) (6 1) (8) (4) (6 1) (3 8) (3 5) (4))) (quote #20(#15(off off off off off off off off off off off off on on off) #15(off off off off off on on on off on off on) #15(off on off off off on on on on off off on) #15(off on off off on on on on off off off off on on off) #15(off off on on on off on on off) #15(off off off on on on on on on off off off off off on) #15(off off on on on on on on on on on on on on off) #15(off on off off on on on on on on on off off off on) #15(off on off off off off on on on on on on on on off) #15(off off off off off off off on on on on off) #15(off off off off off off off on on on on off) #15(off off off off off off off on on on on off) #15(off off off off off off off on on on on on off) #15(off off off off off off off on on on on on on off on) #15(off off off off off off off on) #15(off off off off off off off on on on on off) #15(off off off off off off off on on on on on on off on) #15(on on on off off off off on) #15(off off on on on off off on on on on on off) #15(off off off off on on on on off)))))))
|
||||
|
|
|
|||
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
|
|
@ -1 +1 @@
|
|||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 25x15") (define problems (list (make-problem "19990709-DAH (1)" (quote ((25) (1 1) (1 3 1) (1 3 1 3 1) (1 3 1 1 1 1) (1 1 1 1 1 1) (1 1 1 1 1 1) (1 1 1 3 1 1) (1 1 3 4 3 1) (1 3 4 4 4 1) (1 4 4 2 4 1) (1 4 2 2 1) (1 2 1) (1 1) (25))) (quote ((15) (1 1) (1 2 1) (1 4 1) (1 4 1) (1 8 1) (1 1 1) (1 1 2 1) (1 1 4 1) (1 1 4 1) (1 8 1) (1 1) (1 1) (1 2 1) (1 4 1) (1 4 1) (1 8 1) (1 1 1) (1 1 2 1) (1 1 4 1) (1 1 4 1) (1 8 1) (1 1) (1 1) (15))) (quote #25(#15(on) #15(on off off off off off off off off off off off off off on) #15(on off off off off off off off off off on on off off on) #15(on off off off off off off off off on on on on off on) #15(on off off off off off off off off on on on on off on) #15(on off off off on on on on on on on on off off on) #15(on off off off on off off off off off off off off off on) #15(on off off off on off off off off on on off off off on) #15(on off off on off off off off on on on on off off on) #15(on off off on off off off off on on on on off off on) #15(on off off on on on on on on on on off off off on) #15(on off off off off off off off off off off off off off on) #15(on off off off off off off off off off off off off off on) #15(on off off off off off off off on on off off off off on) #15(on off off off off off off on on on on off off off on) #15(on off off off off off off on on on on off off off on) #15(on off on on on on on on on on off off off off on) #15(on off on off off off off off off off off off off off on) #15(on off on off off off off off off on on off off off on) #15(on off off on off off off off on on on on off off on) #15(on off off on off off off off on on on on off off on) #15(on off off on on on on on on on on off off off on) #15(on off off off off off off off off off off off off off on) #15(on off off off off off off off off off off off off off on) #15(on)))))))
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 25x15") (define problems (list (make-problem "19990709-DAH (1)" (quote ((25) (1 1) (1 3 1) (1 3 1 3 1) (1 3 1 1 1 1) (1 1 1 1 1 1) (1 1 1 1 1 1) (1 1 1 3 1 1) (1 1 3 4 3 1) (1 3 4 4 4 1) (1 4 4 2 4 1) (1 4 2 2 1) (1 2 1) (1 1) (25))) (quote ((15) (1 1) (1 2 1) (1 4 1) (1 4 1) (1 8 1) (1 1 1) (1 1 2 1) (1 1 4 1) (1 1 4 1) (1 8 1) (1 1) (1 1) (1 2 1) (1 4 1) (1 4 1) (1 8 1) (1 1 1) (1 1 2 1) (1 1 4 1) (1 1 4 1) (1 8 1) (1 1) (1 1) (15))) (quote #25(#15(on) #15(on off off off off off off off off off off off off off on) #15(on off off off off off off off off off on on off off on) #15(on off off off off off off off off on on on on off on) #15(on off off off off off off off off on on on on off on) #15(on off off off on on on on on on on on off off on) #15(on off off off on off off off off off off off off off on) #15(on off off off on off off off off on on off off off on) #15(on off off on off off off off on on on on off off on) #15(on off off on off off off off on on on on off off on) #15(on off off on on on on on on on on off off off on) #15(on off off off off off off off off off off off off off on) #15(on off off off off off off off off off off off off off on) #15(on off off off off off off off on on off off off off on) #15(on off off off off off off on on on on off off off on) #15(on off off off off off off on on on on off off off on) #15(on off on on on on on on on on off off off off on) #15(on off on off off off off off off off off off off off on) #15(on off on off off off off off off on on off off off on) #15(on off off on off off off off on on on on off off on) #15(on off off on off off off off on on on on off off on) #15(on off off on on on on on on on on off off off on) #15(on off off off off off off off off off off off off off on) #15(on off off off off off off off off off off off off off on) #15(on)))))))
|
||||
|
|
|
|||
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
|
|
@ -1 +1 @@
|
|||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 30x25") (define problems (list (make-problem "19980715-GAS (1)" (quote ((30) (30) (30) (13 15) (12 14) (12 14) (12 14) (12 14) (12 14) (13 15) (13 12) (7 6) (4 3) (1 1) (1 2) (3 1 3 4) (3 3 4 3) (2 4 4 3) (2 3 3 2) (1 2 2 1 2) (1 1 1 1 3 1) (3 4 1) (4 5) () ())) (quote ((11 7) (11 4) (11 2) (12) (13) (14) (13 2) (13 3) (12 2) (12 1 1) (11 3) (11 4) (4 2 6) (3) (3) (4 2) (11 6) (11 5) (11 4) (11 2 1) (12 2) (12 3) (13 4) (13 3) (13) (12) (11 1) (10 3) (10 6) (10 9))) (quote #30(#25(on on on on on on on on on on on off off off on on on on on on on off) #25(on on on on on on on on on on on off off off off on on on on off) #25(on on on on on on on on on on on off off off off on on off) #25(on on on on on on on on on on on on off) #25(on on on on on on on on on on on on on off) #25(on on on on on on on on on on on on on on off) #25(on on on on on on on on on on on on on off off off off off off off off on on off) #25(on on on on on on on on on on on on on off off off off off off off on on on off) #25(on on on on on on on on on on on on off off off off off off off off off on on off) #25(on on on on on on on on on on on on off off off off off on off off off off on off) #25(on on on on on on on on on on on off off off off off on on on off) #25(on on on on on on on on on on on off off off off off on on on on off) #25(on on on on off off off off off on on off off off off on on on on on on off) #25(on on on off) #25(on on on off) #25(on on on on off off off off off on on off) #25(on on on on on on on on on on on off off off off on on on on on on off) #25(on on on on on on on on on on on off off off off on on on on on off) #25(on on on on on on on on on on on off off off off on on on on off) #25(on on on on on on on on on on on off off off off off on on off off off off on off) #25(on on on on on on on on on on on on off off off off off off off off off on on off) #25(on on on on on on on on on on on on off off off off off off off off on on on off) #25(on on on on on on on on on on on on on off off off off off off on on on on off) #25(on on on on on on on on on on on on on off off off off off off off on on on off) #25(on on on on on on on on on on on on on off) #25(on on on on on on on on on on on on off) #25(on on on on on on on on on on on off off off off on off) #25(on on on on on on on on on on off off off off off on on on off) #25(on on on on on on on on on on off off off off on on on on on on off) #25(on on on on on on on on on on off off off on on on on on on on on on off)))))))
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 30x25") (define problems (list (make-problem "19980715-GAS (1)" (quote ((30) (30) (30) (13 15) (12 14) (12 14) (12 14) (12 14) (12 14) (13 15) (13 12) (7 6) (4 3) (1 1) (1 2) (3 1 3 4) (3 3 4 3) (2 4 4 3) (2 3 3 2) (1 2 2 1 2) (1 1 1 1 3 1) (3 4 1) (4 5) () ())) (quote ((11 7) (11 4) (11 2) (12) (13) (14) (13 2) (13 3) (12 2) (12 1 1) (11 3) (11 4) (4 2 6) (3) (3) (4 2) (11 6) (11 5) (11 4) (11 2 1) (12 2) (12 3) (13 4) (13 3) (13) (12) (11 1) (10 3) (10 6) (10 9))) (quote #30(#25(on on on on on on on on on on on off off off on on on on on on on off) #25(on on on on on on on on on on on off off off off on on on on off) #25(on on on on on on on on on on on off off off off on on off) #25(on on on on on on on on on on on on off) #25(on on on on on on on on on on on on on off) #25(on on on on on on on on on on on on on on off) #25(on on on on on on on on on on on on on off off off off off off off off on on off) #25(on on on on on on on on on on on on on off off off off off off off on on on off) #25(on on on on on on on on on on on on off off off off off off off off off on on off) #25(on on on on on on on on on on on on off off off off off on off off off off on off) #25(on on on on on on on on on on on off off off off off on on on off) #25(on on on on on on on on on on on off off off off off on on on on off) #25(on on on on off off off off off on on off off off off on on on on on on off) #25(on on on off) #25(on on on off) #25(on on on on off off off off off on on off) #25(on on on on on on on on on on on off off off off on on on on on on off) #25(on on on on on on on on on on on off off off off on on on on on off) #25(on on on on on on on on on on on off off off off on on on on off) #25(on on on on on on on on on on on off off off off off on on off off off off on off) #25(on on on on on on on on on on on on off off off off off off off off off on on off) #25(on on on on on on on on on on on on off off off off off off off off on on on off) #25(on on on on on on on on on on on on on off off off off off off on on on on off) #25(on on on on on on on on on on on on on off off off off off off off on on on off) #25(on on on on on on on on on on on on on off) #25(on on on on on on on on on on on on off) #25(on on on on on on on on on on on off off off off on off) #25(on on on on on on on on on on off off off off off on on on off) #25(on on on on on on on on on on off off off off on on on on on on off) #25(on on on on on on on on on on off off off on on on on on on on on on off)))))))
|
||||
|
|
|
|||
File diff suppressed because one or more lines are too long
|
|
@ -1 +1 @@
|
|||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 30x35") (define problems (list (make-problem "19990507aJOJ (1)" (quote ((6 2 1 3 1 2 1 1 4) (5 1 1 1 4 1 1 1 1 3) (5 1 1 1 1 1 1 1 1 1) (4 1 1 1 1 1 2 1 1 1 3) (2 1 1 3 2 2 3 3 1) (1 2 18 2) (1 23) (2 21 2) (1 25) (3 22 2) (3 11 8 3) (2 10 7 2) (2 5 6 1) (1 5 2 2 5) (3 1 1 1 1 2) (2 1 1 1 1 1 1 1 1 1) (2 1 1 1 2 1 1 1 1) (2 1 2 4 2 1 1) (2 1 6 1 2) (1 3 6 3) (2 2 6 2 1) (3 2 2 4 2 2 1) (3 2 3 3 2 1) (4 2 5 5 2 2) (4 2 12 2 3) (3 4 6 3 3) (1 7 5 2) (3 4 3 2 1) (29) (1 8 2) (12 10) () (30) () (30))) (quote ((7 6 3 8 3 1 1) (5 1 4 5 6 2 1 1 1) (4 1 1 2 2 2 5 2 1 1 1) (4 1 1 4 2 2 3 1 1 1) (3 1 1 6 3 4 2 1 1 1 1) (1 1 8 1 6 1 1 1 1) (1 1 8 4 1 1 1 1) (1 1 8 1 2 1 1 1 1) (2 1 7 2 3 1 1 1) (1 8 2 3 1 1 1) (2 9 2 3 2 1 1 1) (1 8 1 1 2 2 1 1 1) (2 1 7 1 1 1 2 2 1 1) (2 7 1 1 3 3 2 1 1) (2 8 2 5 2 2 1 1) (2 5 6 2 2 1 1) (1 7 6 2 2 1 1) (9 2 5 2 2 1 1) (1 6 1 1 3 3 2 1 1) (1 8 1 1 1 2 2 1 1) (2 8 1 1 2 2 1 1 1) (1 9 2 3 2 1 1 1) (1 8 2 3 1 1 1) (1 10 2 2 1 1 1 1) (1 1 10 1 3 1 1 1 1) (1 1 8 1 4 1 1 1 1) (1 1 1 1 3 3 5 3 1 1 1) (2 1 1 1 1 3 4 2 2 1 1 1) (2 1 1 1 3 2 2 4 3 1 1) (3 1 1 4 4 8 2 1 1))) (quote #30(#35(on on on on on on on off on on on on on on off on on on off on on on on on on on on off on on on off on off on) #35(on on on on on off off on off on on on on off on on on on on off on on on on on on off on on off on off on off on) #35(on on on on off on off on off on on off off on on off off off on on off on on on on on off on on off on off on off on) #35(on on on on off on off off on off off on on on on off off off off on on off off on on off on on on off on off on off on) #35(on on on off on off on off on on on on on on off on on on off on on on on off off on on off on off on off on off on) #35(on off off on off off on on on on on on on on off off off off on off off on on on on on on off on off on off on off on) #35(off on off off on off on on on on on on on on off off off off off off off off off on on on on off on off on off on off on) #35(on off on off off on on on on on on on on off off off off off off off off on off off off on on off on off on off on off on) #35(on on off on off on on on on on on on off off off off off off off off off on on off off off on on on off on off on off on) #35(off off on off on on on on on on on on off off off off off off off off off off on on off off on on on off on off on off on) #35(on on off on on on on on on on on on off off off on on off off off off off on on on off off on on off on off on off on) #35(off off on off on on on on on on on on off off on off off on off off off off off on on off off on on off on off on off on) #35(on on off on off on on on on on on on off on off on off on off off off off off on on off off off on on off off on off on) #35(on on off off on on on on on on on off off on off off on off on on on off off on on on off off on on off off on off on) #35(on on off on on on on on on on on off off off on on off on on on on on off off on on off off on on off off on off on) #35(off on on off off on on on on on off off off off off off on on on on on on off off on on off off on on off off on off on) #35(on off off on on on on on on on off off off off off off on on on on on on off off on on off off on on off off on off on) #35(off on on on on on on on on on off off off off on on off on on on on on off off on on off off on on off off on off on) #35(on off off off off on on on on on on off off on off off on off on on on off off on on on off off on on off off on off on) #35(on off off on on on on on on on on off off on off on off on off off off off off on on off off off on on off off on off on) #35(off on on off on on on on on on on on off off on off off on off off off off off on on off off on on off on off on off on) #35(on off off on on on on on on on on on off off off on on off off off off off on on on off off on on off on off on off on) #35(off off on off off on on on on on on on on off off off off off off off off off on on off off on on on off on off on off on) #35(off on off on on on on on on on on on on off off off off off off off off on on off off on on off on off on off on off on) #35(on off on off on on on on on on on on on on off off off off off off off on off off on on on off on off on off on off on) #35(off on off off on off on on on on on on on on off off off off on off off off off on on on on off on off on off on off on) #35(on off off on off off on off on off off on on on off on on on off on on on on on off off on on on off on off on off on) #35(on on off on off on off off on off on off on on on off off off off on on on on off on on off on on off on off on off on) #35(on on off on off on off on off on on on off on on off off off on on off off off on on on on off on on on off on off on) #35(on on on off on off off on off on on on on off off on on on on off on on on on on on on on off on on off on off on)))))))
|
||||
(unit/sig paint-by-numbers:problem-set^ (import paint-by-numbers:problem^) (define set-name "Kajitani 30x35") (define problems (list (make-problem "19990507aJOJ (1)" (quote ((6 2 1 3 1 2 1 1 4) (5 1 1 1 4 1 1 1 1 3) (5 1 1 1 1 1 1 1 1 1) (4 1 1 1 1 1 2 1 1 1 3) (2 1 1 3 2 2 3 3 1) (1 2 18 2) (1 23) (2 21 2) (1 25) (3 22 2) (3 11 8 3) (2 10 7 2) (2 5 6 1) (1 5 2 2 5) (3 1 1 1 1 2) (2 1 1 1 1 1 1 1 1 1) (2 1 1 1 2 1 1 1 1) (2 1 2 4 2 1 1) (2 1 6 1 2) (1 3 6 3) (2 2 6 2 1) (3 2 2 4 2 2 1) (3 2 3 3 2 1) (4 2 5 5 2 2) (4 2 12 2 3) (3 4 6 3 3) (1 7 5 2) (3 4 3 2 1) (29) (1 8 2) (12 10) () (30) () (30))) (quote ((7 6 3 8 3 1 1) (5 1 4 5 6 2 1 1 1) (4 1 1 2 2 2 5 2 1 1 1) (4 1 1 4 2 2 3 1 1 1) (3 1 1 6 3 4 2 1 1 1 1) (1 1 8 1 6 1 1 1 1) (1 1 8 4 1 1 1 1) (1 1 8 1 2 1 1 1 1) (2 1 7 2 3 1 1 1) (1 8 2 3 1 1 1) (2 9 2 3 2 1 1 1) (1 8 1 1 2 2 1 1 1) (2 1 7 1 1 1 2 2 1 1) (2 7 1 1 3 3 2 1 1) (2 8 2 5 2 2 1 1) (2 5 6 2 2 1 1) (1 7 6 2 2 1 1) (9 2 5 2 2 1 1) (1 6 1 1 3 3 2 1 1) (1 8 1 1 1 2 2 1 1) (2 8 1 1 2 2 1 1 1) (1 9 2 3 2 1 1 1) (1 8 2 3 1 1 1) (1 10 2 2 1 1 1 1) (1 1 10 1 3 1 1 1 1) (1 1 8 1 4 1 1 1 1) (1 1 1 1 3 3 5 3 1 1 1) (2 1 1 1 1 3 4 2 2 1 1 1) (2 1 1 1 3 2 2 4 3 1 1) (3 1 1 4 4 8 2 1 1))) (quote #30(#35(on on on on on on on off on on on on on on off on on on off on on on on on on on on off on on on off on off on) #35(on on on on on off off on off on on on on off on on on on on off on on on on on on off on on off on off on off on) #35(on on on on off on off on off on on off off on on off off off on on off on on on on on off on on off on off on off on) #35(on on on on off on off off on off off on on on on off off off off on on off off on on off on on on off on off on off on) #35(on on on off on off on off on on on on on on off on on on off on on on on off off on on off on off on off on off on) #35(on off off on off off on on on on on on on on off off off off on off off on on on on on on off on off on off on off on) #35(off on off off on off on on on on on on on on off off off off off off off off off on on on on off on off on off on off on) #35(on off on off off on on on on on on on on off off off off off off off off on off off off on on off on off on off on off on) #35(on on off on off on on on on on on on off off off off off off off off off on on off off off on on on off on off on off on) #35(off off on off on on on on on on on on off off off off off off off off off off on on off off on on on off on off on off on) #35(on on off on on on on on on on on on off off off on on off off off off off on on on off off on on off on off on off on) #35(off off on off on on on on on on on on off off on off off on off off off off off on on off off on on off on off on off on) #35(on on off on off on on on on on on on off on off on off on off off off off off on on off off off on on off off on off on) #35(on on off off on on on on on on on off off on off off on off on on on off off on on on off off on on off off on off on) #35(on on off on on on on on on on on off off off on on off on on on on on off off on on off off on on off off on off on) #35(off on on off off on on on on on off off off off off off on on on on on on off off on on off off on on off off on off on) #35(on off off on on on on on on on off off off off off off on on on on on on off off on on off off on on off off on off on) #35(off on on on on on on on on on off off off off on on off on on on on on off off on on off off on on off off on off on) #35(on off off off off on on on on on on off off on off off on off on on on off off on on on off off on on off off on off on) #35(on off off on on on on on on on on off off on off on off on off off off off off on on off off off on on off off on off on) #35(off on on off on on on on on on on on off off on off off on off off off off off on on off off on on off on off on off on) #35(on off off on on on on on on on on on off off off on on off off off off off on on on off off on on off on off on off on) #35(off off on off off on on on on on on on on off off off off off off off off off on on off off on on on off on off on off on) #35(off on off on on on on on on on on on on off off off off off off off off on on off off on on off on off on off on off on) #35(on off on off on on on on on on on on on on off off off off off off off on off off on on on off on off on off on off on) #35(off on off off on off on on on on on on on on off off off off on off off off off on on on on off on off on off on off on) #35(on off off on off off on off on off off on on on off on on on off on on on on on off off on on on off on off on off on) #35(on on off on off on off off on off on off on on on off off off off on on on on off on on off on on off on off on off on) #35(on on off on off on off on off on on on off on on off off off on on off off off on on on on off on on on off on off on) #35(on on on off on off off on off on on on on off off on on on on off on on on on on on on on off on on off on off on)))))))
|
||||
|
|
|
|||
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
|
|
@ -13,4 +13,4 @@
|
|||
;; name `make-posn':
|
||||
(define (make-posn x y) (posn x y))
|
||||
|
||||
(define posn-signature (signature (predicate posn?)))
|
||||
(define posn-signature (signature (predicate posn?)))
|
||||
|
|
|
|||
|
|
@ -97,4 +97,4 @@
|
|||
(unless (equal? (intermediate-filter odd? '()) '()) (error 'x "6"))
|
||||
(unless (equal? (intermediate-sort '(1 0 2) <) '(0 1 2)) (error 'x "7"))
|
||||
(unless (equal? (intermediate-quicksort '(1 0 2) <) '(0 1 2)) (error 'x "8"))
|
||||
|#
|
||||
|#
|
||||
|
|
|
|||
Some files were not shown because too many files have changed in this diff Show More
Loading…
Reference in New Issue
Block a user