support/js/runtime/jshashtable.js @@ -22,3 +22,7 @@ canvas-text: http://code.google.com/p/canvas-text/ support/js/compat/canvas-text xmlhttprequest: cross browser XMLHttpRequest: http://code.google.com/p/xmlhttprequest/ + + +jshahstable: http://www.timdown.co.uk/jshashtable/ +support/js/jshashtable.js doc/acknowledgements.txt @@ -321,17 +321,16 @@ ))) - ;; These are identifiers we'll need to do the bootstrapping. (define top-env-3 (foldl (lambda (id+arity+name env) (r* env (first id+arity+name) (second id+arity+name) (third id+arity+name))) top-env-2 - (append '(#;(hash-set 3 "plt.Kernel._kernelHashSet") - #;(hash-ref 3 "plt.Kernel._kernelHashRef") - #;(hash-remove 2 "plt.Kernel._kernelHashRemove") - #;(make-immutable-hasheq 1 "plt.Kernel._kernelMakeImmutableHashEq") - #;(hash-map 2 "plt.Kernel._kernelHashMap") - #;(hash? 1 "plt.Kernel._isHash") + (append '((make-hasheq 0 "plt.Kernel.makeHashEq") + (hash-set! 3 "plt.Kernel.hashSetBang") + (hash-ref 3 "plt.Kernel.hashRef") + (hash-remove! 2 "plt.Kernel.hashRemoveBang") + (hash-map 2 "plt.Kernel.hashMap") + (hash? 1 "plt.Kernel.isHash") (open-input-stx 1 "plt.Kernel.openInputStx")) src/compiler/toplevel.ss @@ -25,26 +25,27 @@  <script type="text/javascript" charset="utf-8" src="runtime/phonegap.js"></script> - + <script type="text/javascript" charset="utf-8" src="runtime/compressed-runtime.js"></script>   -<script type="text/javascript" charset="utf-8" src="runtime/gears_init.js"></script> - <script type="text/javascript" charset="utf-8" src="runtime/types.js"></script> - <script type="text/javascript" charset="utf-8" src="runtime/kernel.js"></script> - <script type="text/javascript" charset="utf-8" src="runtime/read.js"></script> - <script type="text/javascript" charset="utf-8" src="runtime/stx.js"></script> - <script type="text/javascript" charset="utf-8" src="runtime/world-config.js"></script> - <script type="text/javascript" charset="utf-8" src="runtime/platform.js"></script> - <script type="text/javascript" charset="utf-8" src="runtime/lib.js"></script> - <script type="text/javascript" charset="utf-8" src="runtime/effect-struct.js"></script> - <script type="text/javascript" charset="utf-8" src="runtime/world.js"></script> - <script type="text/javascript" charset="utf-8" src="runtime/jsworld/jsworld.js"></script> - <script type="text/javascript" charset="utf-8" src="runtime/jsworld.js"></script> - <script type="text/javascript" charset="utf-8" src="runtime/world-stimuli.js"></script> - <script type="text/javascript" charset="utf-8" src="runtime/permission-struct.js"></script> - <script type="text/javascript" charset="utf-8" src="runtime/permission.js"></script> + + + + + + + + + + + + + + + + <script type="text/javascript" charset="utf-8" src="main.js"></script> support/js/index.html @@ -1,5 +1,6 @@ gears_init.js types.js +jshashtable.js kernel.js read.js stx.js support/js/runtime/MANIFEST @@ -840,22 +840,22 @@ var env = args27[1]; result.toDisplayedString = result.toWrittenString; return result; })()),top_dash_env_dash_1, [(plt.Kernel.list([(plt.Kernel.list([(plt.types.Symbol.makeInstance("<")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("<=")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("=")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance(">")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance(">=")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("=~")),(plt.types.Rational.makeInstance(3, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("number->string")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("even?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("odd?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("positive?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("negative?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("number?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("rational?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("quotient")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("remainder")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("numerator")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("denominator")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("integer?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("real?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("abs")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("acos")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("add1")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("angle")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("asin")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("atan")),(plt.types.Rational.makeInstance(1, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("ceiling")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("complex?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("conjugate")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("cos")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("cosh")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("denominator")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("even?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("exact->inexact")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("exact?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("exp")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("expt")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("floor")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("gcd")),(plt.types.Rational.makeInstance(1, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("imag-part")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("inexact->exact")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("inexact?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("integer->char")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("integer-sqrt")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("integer?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("lcm")),(plt.types.Rational.makeInstance(1, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("log")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("magnitude")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("make-polar")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("make-rectangular")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("max")),(plt.types.Rational.makeInstance(1, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("min")),(plt.types.Rational.makeInstance(1, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("modulo")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("negative?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("number?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("numerator")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("odd?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("positive?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("random")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("rational?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("real-part")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("real?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("round")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("sgn")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("sin")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("sinh")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("sqr")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("sqrt")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("sub1")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("tan")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("zero?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("+")),(plt.types.Rational.makeInstance(0, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("-")),(plt.types.Rational.makeInstance(1, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("*")),(plt.types.Rational.makeInstance(0, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("/")),(plt.types.Rational.makeInstance(1, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("not")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("false?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("boolean?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("boolean=?")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("symbol->string")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("symbol=?")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("symbol?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("append")),(plt.types.Rational.makeInstance(1, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("assq")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("caaar")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("caadr")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("caar")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("cadar")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("cadddr")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("caddr")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("cadr")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("car")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("cddar")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("cdddr")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("cddr")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("cdr")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("cdaar")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("cdadr")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("cdar")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("cons?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("cons")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("empty?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("length")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("list")),(plt.types.Rational.makeInstance(0, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("list*")),(plt.types.Rational.makeInstance(1, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("list-ref")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("remove")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("member")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("memq")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("memv")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("null?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("pair?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("rest")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("reverse")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("first")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("second")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("third")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("fourth")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("fifth")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("sixth")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("seventh")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("eighth")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("box")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("unbox")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("set-box!")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("box?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("make-posn")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("posn-x")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("posn-y")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("posn?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("char->integer")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("char-alphabetic?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("char-ci<=?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("char-ci<?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("char-ci=?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("char-ci>=?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("char-ci>?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("char-downcase")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("char-lower-case?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("char-numeric?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("char-upcase")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("char-upper-case?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("char-whitespace?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("char<=?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("char<?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("char=?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("char>=?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("char>?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("char?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("format")),(plt.types.Rational.makeInstance(1, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("list->string")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("make-string")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("replicate")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string")),(plt.types.Rational.makeInstance(0, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string->list")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string->number")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string->symbol")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string-alphabetic?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string-append")),(plt.types.Rational.makeInstance(0, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string-ci<=?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string-ci<?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string-ci=?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string-ci>=?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string-ci>?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string-copy")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string-length")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string-lower-case?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string-numeric?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string-ref")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string-upper-case?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string-whitespace?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string<=?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string<?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string=?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string>=?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string>?")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("substring")),(plt.types.Rational.makeInstance(3, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string-ith")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("int->string")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("string->int")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("explode")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("implode")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("eof-object?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("=~")),(plt.types.Rational.makeInstance(3, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("eq?")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("equal?")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("equal~?")),(plt.types.Rational.makeInstance(3, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("eqv?")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("error")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("syntax-error")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("identity")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("struct?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("current-seconds")),(plt.types.Rational.makeInstance(0, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("andmap")),(plt.types.Rational.makeInstance(1, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("apply")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("argmax")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("argmin")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("build-list")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("build-string")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("compose")),(plt.types.Rational.makeInstance(0, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("filter")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("foldl")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("foldr")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("map")),(plt.types.Rational.makeInstance(1, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("for-each")),(plt.types.Rational.makeInstance(1, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("memf")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("ormap")),(plt.types.Rational.makeInstance(1, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("procedure?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("quicksort")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("sort")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("void")),(plt.types.Rational.makeInstance(0, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("xml->s-exp")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("build-vector")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("make-vector")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("vector")),(plt.types.Rational.makeInstance(0, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("vector-length")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("vector-ref")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("vector-set!")),(plt.types.Rational.makeInstance(3, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("vector?")),(plt.types.Rational.makeInstance(1, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("printf")),(plt.types.Rational.makeInstance(1, 1)),(plt.types.Symbol.makeInstance("true"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("check-expect")),(plt.types.Rational.makeInstance(2, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("check-within")),(plt.types.Rational.makeInstance(3, 1))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("check-error")),(plt.types.Rational.makeInstance(2, 1))]))]))])); -top_dash_env_dash_3 = (plt.Kernel.setLastLoc("offset=11677 line=326 span=1573 id=\"toplevel.ss\"") && plt.Kernel.foldl(((function() { - plt.Kernel.setLastLoc("offset=11684 line=326 span=125 id=\"toplevel.ss\""); +top_dash_env_dash_3 = (plt.Kernel.setLastLoc("offset=11606 line=325 span=1516 id=\"toplevel.ss\"") && plt.Kernel.foldl(((function() { + plt.Kernel.setLastLoc("offset=11613 line=325 span=125 id=\"toplevel.ss\""); var result = (function(args28) { var id_plus_arity_plus_name = args28[0]; var env = args28[1]; - return (plt.Kernel.setLastLoc("offset=11733 line=327 span=75 id=\"toplevel.ss\"") && r_star_(env,(plt.Kernel.setLastLoc("offset=11741 line=327 span=21 id=\"toplevel.ss\"") && plt.Kernel.first(id_plus_arity_plus_name)),(plt.Kernel.setLastLoc("offset=11763 line=327 span=22 id=\"toplevel.ss\"") && plt.Kernel.second(id_plus_arity_plus_name)),(plt.Kernel.setLastLoc("offset=11786 line=327 span=21 id=\"toplevel.ss\"") && plt.Kernel.third(id_plus_arity_plus_name)))); }); + return (plt.Kernel.setLastLoc("offset=11662 line=326 span=75 id=\"toplevel.ss\"") && r_star_(env,(plt.Kernel.setLastLoc("offset=11670 line=326 span=21 id=\"toplevel.ss\"") && plt.Kernel.first(id_plus_arity_plus_name)),(plt.Kernel.setLastLoc("offset=11692 line=326 span=22 id=\"toplevel.ss\"") && plt.Kernel.second(id_plus_arity_plus_name)),(plt.Kernel.setLastLoc("offset=11715 line=326 span=21 id=\"toplevel.ss\"") && plt.Kernel.third(id_plus_arity_plus_name)))); }); result.toWrittenString = function () { return '<function:lambda>'; }; result.toDisplayedString = result.toWrittenString; return result; - })()),top_dash_env_dash_2, [(plt.Kernel.setLastLoc("offset=11858 line=329 span=1391 id=\"toplevel.ss\"") && plt.Kernel.append((plt.Kernel.list([(plt.Kernel.list([(plt.types.Symbol.makeInstance("open-input-stx")),(plt.types.Rational.makeInstance(1, 1)),(plt.types.String.makeInstance("plt.Kernel.openInputStx"))]))])), [(plt.Kernel.setLastLoc("offset=12474 line=339 span=774 id=\"toplevel.ss\"") && plt.Kernel.map(((function() { - plt.Kernel.setLastLoc("offset=12479 line=339 span=280 id=\"toplevel.ss\""); + })()),top_dash_env_dash_2, [(plt.Kernel.setLastLoc("offset=11787 line=328 span=1334 id=\"toplevel.ss\"") && plt.Kernel.append((plt.Kernel.list([(plt.Kernel.list([(plt.types.Symbol.makeInstance("make-hasheq")),(plt.types.Rational.makeInstance(0, 1)),(plt.types.String.makeInstance("plt.Kernel.makeHashEq"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("hash-set!")),(plt.types.Rational.makeInstance(3, 1)),(plt.types.String.makeInstance("plt.Kernel.hashSetBang"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("hash-ref")),(plt.types.Rational.makeInstance(3, 1)),(plt.types.String.makeInstance("plt.Kernel.hashRef"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("hash-remove!")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.String.makeInstance("plt.Kernel.hashRemoveBang"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("hash-map")),(plt.types.Rational.makeInstance(2, 1)),(plt.types.String.makeInstance("plt.Kernel.hashMap"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("hash?")),(plt.types.Rational.makeInstance(1, 1)),(plt.types.String.makeInstance("plt.Kernel.isHash"))])),(plt.Kernel.list([(plt.types.Symbol.makeInstance("open-input-stx")),(plt.types.Rational.makeInstance(1, 1)),(plt.types.String.makeInstance("plt.Kernel.openInputStx"))]))])), [(plt.Kernel.setLastLoc("offset=12346 line=338 span=774 id=\"toplevel.ss\"") && plt.Kernel.map(((function() { + plt.Kernel.setLastLoc("offset=12351 line=338 span=280 id=\"toplevel.ss\""); var result = (function(args29) { var id_plus_arity = args29[0]; - return (plt.Kernel.setLastLoc("offset=12532 line=340 span=226 id=\"toplevel.ss\"") && plt.Kernel.append(id_plus_arity, [(plt.Kernel.setLastLoc("offset=12592 line=341 span=165 id=\"toplevel.ss\"") && plt.Kernel.list([(plt.Kernel.setLastLoc("offset=12642 line=342 span=114 id=\"toplevel.ss\"") && plt.Kernel.symbol_dash__greaterthan_string((plt.Kernel.setLastLoc("offset=12702 line=343 span=53 id=\"toplevel.ss\"") && identifier_dash__greaterthan_munged_dash_java_dash_identifier((plt.Kernel.setLastLoc("offset=12738 line=343 span=16 id=\"toplevel.ss\"") && plt.Kernel.first(id_plus_arity))))))]))])); }); + return (plt.Kernel.setLastLoc("offset=12404 line=339 span=226 id=\"toplevel.ss\"") && plt.Kernel.append(id_plus_arity, [(plt.Kernel.setLastLoc("offset=12464 line=340 span=165 id=\"toplevel.ss\"") && plt.Kernel.list([(plt.Kernel.setLastLoc("offset=12514 line=341 span=114 id=\"toplevel.ss\"") && plt.Kernel.symbol_dash__greaterthan_string((plt.Kernel.setLastLoc("offset=12574 line=342 span=53 id=\"toplevel.ss\"") && identifier_dash__greaterthan_munged_dash_java_dash_identifier((plt.Kernel.setLastLoc("offset=12610 line=342 span=16 id=\"toplevel.ss\"") && plt.Kernel.first(id_plus_arity))))))]))])); }); result.toWrittenString = function () { return '<function:lambda>'; }; support/js/runtime/compiler.js @@ -1 +1 @@ -(function(){if(window.google&&google.gears){return}var b=null;if(typeof GearsFactory!="undefined"){b=new GearsFactory()}else{try{b=new ActiveXObject("Gears.Factory");if(b.getBuildInfo().indexOf("ie_mobile")!=-1){b.privateSetGlobalObject(this)}}catch(c){if((typeof navigator.mimeTypes!="undefined")&&navigator.mimeTypes["application/x-googlegears"]){b=document.createElement("object");b.style.display="none";b.width=0;b.height=0;b.type="application/x-googlegears";document.documentElement.appendChild(b)}}}if(!b){return}if(!window.google){google={}}if(!google.gears){google.gears={factory:b}}})();var plt=plt||{};(function(){plt.types=plt.types||{};plt.types.Logic={TRUE:true,FALSE:false};Boolean.prototype.toWrittenString=function(){if(this.valueOf()){return"true"}return"false"};Boolean.prototype.toDisplayedString=Boolean.prototype.toWrittenString;Boolean.prototype.isEqual=function(l){return this==l};plt.types.Char=function(l){this.val=l};plt.types.Char.makeInstance=function(l){return new plt.types.Char(l)};plt.types.Char.prototype.toWrittenString=function(){return"#\\"+this.val};plt.types.Char.prototype.toDisplayedString=function(){return this.val};plt.types.Char.prototype.getValue=function(){return this.val};plt.types.Char.prototype.isEqual=function(l){return l instanceof plt.types.Char&&this.val==l.val};plt.types.Symbol=function(l){this.val=l};var e={};plt.types.Symbol.makeInstance=function(l){if(!(l in e)){e[l]=new plt.types.Symbol(l)}else{}return e[l]};plt.types.Symbol.prototype.isEqual=function(l){return l instanceof plt.types.Symbol&&this.val==l.val};plt.types.Symbol.prototype.toString=function(){return this.val};plt.types.Symbol.prototype.toWrittenString=function(){return this.val};plt.types.Symbol.prototype.toDisplayedString=function(){return this.val};plt.types.Empty=function(){};plt.types.Empty.EMPTY=new plt.types.Empty();plt.types.Empty.prototype.isEqual=function(l){return l instanceof plt.types.Empty};plt.types.Empty.prototype.first=function(){throw new plt.Kernel.MobyRuntimeError("first can't be applied on empty.")};plt.types.Empty.prototype.rest=function(){throw new plt.Kernel.MobyRuntimeError("rest can't be applied on empty.")};plt.types.Empty.prototype.isEmpty=function(){return true};plt.types.Empty.prototype.toWrittenString=function(){return"empty"};plt.types.Empty.prototype.toDisplayedString=function(){return"empty"};plt.types.Empty.prototype.append=function(l){return l};plt.types.Cons=function(m,l){this.f=m;this.r=l};plt.types.Cons.makeInstance=function(m,l){return new plt.types.Cons(m,l)};plt.types.Cons.prototype.isEqual=function(l){if(!(l instanceof plt.types.Cons)){return plt.types.Logic.FALSE}return(plt.Kernel.equal_question_(this.first(),l.first())&&plt.Kernel.equal_question_(this.rest(),l.rest()))};plt.types.Cons.prototype.first=function(){return this.f};plt.types.Cons.prototype.rest=function(){return this.r};plt.types.Cons.prototype.isEmpty=function(){return false};plt.types.Cons.prototype.append=function(m){if(m.isEmpty()){return this}var n=m;var l=plt.Kernel.reverse(this);while(!l.isEmpty()){n=plt.types.Cons.makeInstance(l.first(),n);l=l.rest()}return n};plt.types.Cons.prototype.toWrittenString=function(){var l=[];var m=this;while(!m.isEmpty()){l.push(plt.Kernel.toWrittenString(m.first()));m=m.rest()}return"("+l.join(" ")+")"};plt.types.Cons.prototype.toDisplayedString=function(){var l=[];var m=this;while(!m.isEmpty()){l.push(m.first().toDisplayedString());m=m.rest()}return"("+l.join(" ")+")"};var g=function(l,m){l.appendChild(m)};plt.types.Cons.prototype.toDomNode=function(){var l=document.createElement("div");l.appendChild(document.createTextNode("("));var m=this;while(!m.isEmpty()){g(l,plt.Kernel.toDomNode(m.first()));m=m.rest();if(!m.isEmpty()){g(l,document.createTextNode(" "))}}l.appendChild(document.createTextNode(")"));return l};plt.types.Vector=function(o,m){this.elts=new Array(o);if(m){for(var l=0;l<o;l++){this.elts[l]=m[l]}}else{for(var l=0;l<o;l++){this.elts[l]=undefined}}};plt.types.Vector.makeInstance=function(m,l){return new plt.types.Vector(m,l)};plt.types.Vector.prototype.length=function(){return this.elts.length};plt.types.Vector.prototype.ref=function(l){return this.elts[l]};plt.types.Vector.prototype.set=function(m,l){this.elts[m]=l};plt.types.Vector.prototype.toWrittenString=function(){var m=[];for(var l=0;l<this.length();l++){m.push(plt.Kernel.toWrittenString(this.ref(l)))}return"#("+m.join(" ")+")"};plt.types.Vector.prototype.toDisplayedString=function(){var m=[];for(var l=0;l<this.length();l++){m.push(plt.Kernel.toDisplayedStringString(this.ref(l)))}return"#("+m.join(" ")+")"};plt.types.Vector.prototype.toDomNode=function(){var m=document.createElement("div");m.appendChild(document.createTextNode("#("));for(var l=0;l<this.length();l++){g(m,plt.Kernel.toDomNode(this.ref(l)))}m.appendChild(document.createTextNode(")"));return m};var i=function(m,l){var n;if(isNaN(m)||!isFinite(m)){throw new plt.Kernel.MobyRuntimeError("not a number: "+m)}if(isNaN(l)||!isFinite(l)){throw new plt.Kernel.MobyRuntimeError("not a number: "+l)}while(l!=0){n=m;m=l;l=n%l}return m};plt.types.Rational=function(o,l){if(l==undefined){l=1}if(l==0){throw new plt.Kernel.MobyRuntimeError("cannot have zero denominator.")}var m=i(Math.abs(o),Math.abs(l));this.n=o/m;this.d=l/m};plt.types.Rational.prototype.toWrittenString=function(){if(this.d==1){return this.n+""}else{return this.n+"/"+this.d}};plt.types.Rational.prototype.toDisplayedString=plt.types.Rational.prototype.toWrittenString;plt.types.Rational.prototype.level=function(){return 0};plt.types.Rational.prototype.lift=function(l){if(l.level()==1){return plt.types.FloatPoint.makeInstance(this.n/this.d)}if(l.level()==2){return plt.types.Complex.makeInstance(this,plt.types.Rational.ZERO)}throw new plt.Kernel.MobyRuntimeError("invalid level of Number")};plt.types.Rational.prototype.isFinite=function(){return true};plt.types.Rational.prototype.isEqual=function(l){return l instanceof plt.types.Rational&&this.n==l.n&&this.d==l.d};plt.types.Rational.prototype.isInteger=function(){return this.d==1};plt.types.Rational.prototype.isRational=function(){return true};plt.types.Rational.prototype.isReal=function(){return true};plt.types.Rational.prototype.add=function(l){return plt.types.Rational.makeInstance(this.n*l.d+this.d*l.n,this.d*l.d)};plt.types.Rational.prototype.subtract=function(l){return plt.types.Rational.makeInstance((this.n*l.d)-(this.d*l.n),(this.d*l.d))};plt.types.Rational.prototype.multiply=function(l){return plt.types.Rational.makeInstance(this.n*l.n,this.d*l.d)};plt.types.Rational.prototype.divide=function(l){if(this.d*l.n==0){throw new plt.Kernel.MobyRuntimeError("division by zero")}return plt.types.Rational.makeInstance(this.n*l.d,this.d*l.n)};plt.types.Rational.prototype.toExact=function(){return this};plt.types.Rational.prototype.isExact=function(){return true};plt.types.Rational.prototype.toInteger=function(){return Math.floor(this.n/this.d)};plt.types.Rational.prototype.numerator=function(){return plt.types.Rational.makeInstance(this.n)};plt.types.Rational.prototype.denominator=function(){return plt.types.Rational.makeInstance(this.d)};plt.types.Rational.prototype.toFloat=function(){return this.n/this.d};plt.types.Rational.prototype.toComplex=function(){return plt.types.Complex.makeInstance(this,plt.types.Rational.ZERO)};plt.types.Rational.prototype.greaterThan=function(l){return this.n*l.d>this.d*l.n};plt.types.Rational.prototype.greaterThanOrEqual=function(l){return this.n*l.d>=this.d*l.n};plt.types.Rational.prototype.lessThan=function(l){return this.n*l.d<this.d*l.n};plt.types.Rational.prototype.lessThanOrEqual=function(l){return this.n*l.d<=this.d*l.n};plt.types.Rational.prototype.sqrt=function(){if(this.n>=0){var m=Math.sqrt(this.n);var l=Math.sqrt(this.d);if(Math.floor(m)==m&&Math.floor(l)==l){return plt.types.Rational.makeInstance(m,l)}else{return plt.types.FloatPoint.makeInstance(m/l)}}else{var m=Math.sqrt(-this.n);var l=Math.sqrt(this.d);if(Math.floor(m)==m&&Math.floor(l)==l){return plt.types.Complex.makeInstance(plt.types.Rational.ZERO,plt.types.Rational.makeInstance(m,l))}else{return plt.types.Complex.makeInstance(plt.types.Rational.ZERO,plt.types.FloatPoint.makeInstance(m/l))}}};plt.types.Rational.prototype.abs=function(){return plt.types.Rational.makeInstance(Math.abs(this.n),this.d)};plt.types.Rational.prototype.floor=function(){return plt.types.Rational.makeInstance(Math.floor(this.n/this.d),1)};plt.types.Rational.prototype.ceiling=function(){return plt.types.Rational.makeInstance(Math.ceil(this.n/this.d),1)};plt.types.Rational.prototype.conjugate=plt.types.Rational.prototype.abs;plt.types.Rational.prototype.magnitude=plt.types.Rational.prototype.abs;plt.types.Rational.prototype.log=function(){return plt.types.FloatPoint.makeInstance(Math.log(this.n/this.d))};plt.types.Rational.prototype.angle=function(){if(0==this.n){return plt.types.Rational.ZERO}if(this.n>0){return plt.types.Rational.ZERO}else{return plt.Kernel.pi}};plt.types.Rational.prototype.atan=function(){return plt.types.FloatPoint.makeInstance(Math.atan(this.n/this.d))};plt.types.Rational.prototype.cos=function(){return plt.types.FloatPoint.makeInstance(Math.cos(this.n/this.d))};plt.types.Rational.prototype.sin=function(){return plt.types.FloatPoint.makeInstance(Math.sin(this.n/this.d))};plt.types.Rational.prototype.expt=function(l){return plt.types.FloatPoint.makeInstance(Math.pow(this.n/this.d,l.n/l.d))};plt.types.Rational.prototype.exp=function(){return plt.types.FloatPoint.makeInstance(Math.exp(this.n/this.d))};plt.types.Rational.prototype.acos=function(){return plt.types.FloatPoint.makeInstance(Math.acos(this.n/this.d))};plt.types.Rational.prototype.asin=function(){return plt.types.FloatPoint.makeInstance(Math.asin(this.n/this.d))};plt.types.Rational.prototype.imag_dash_part=function(){return plt.types.Rational.ZERO};plt.types.Rational.prototype.real_dash_part=function(){return this};plt.types.Rational.prototype.timesI=function(){return plt.types.Complex.makeInstance(plt.types.Rational.ZERO,this)};plt.types.Rational.prototype.round=function(){if(this.d==2){var l=this.n/this.d;var m=Math.floor(l);var n=Math.ceil(l);if(m%2==0){return plt.types.Rational.makeInstance(m)}else{return plt.types.Rational.makeInstance(n)}}else{return plt.types.Rational.makeInstance(Math.round(this.n/this.d))}};plt.types.Rational.prototype.half=function(){return plt.types.Rational.makeInstance(this.n,this.d*2)};plt.types.Rational.prototype.minus=function(){return plt.types.Rational.makeInstance(0-this.n,this.d)};var h={};plt.types.Rational.makeInstance=function(m,l){if(m==undefined){throw new plt.Kernel.MobyRuntimeError("n undefined")}if(l==undefined){l=1}if(l<0){m=-m;l=-l}if(l==1&&m in h){return h[m]}else{return new plt.types.Rational(m,l)}};h={};(function(){var l;for(l=-500;l<500;l++){h[l]=new plt.types.Rational(l,1)}})();plt.types.Rational.NEGATIVE_ONE=h[-1];plt.types.Rational.ZERO=h[0];plt.types.Rational.ONE=h[1];plt.types.Rational.TWO=h[2];plt.types.FloatPoint=function(l){this.n=l};plt.types.FloatPoint.makeInstance=function(l){return new plt.types.FloatPoint(l)};var j=plt.types.FloatPoint.makeInstance(Number.NaN);var b=plt.types.FloatPoint.makeInstance(Number.POSITIVE_INFINITY);var c=plt.types.FloatPoint.makeInstance(Number.NEGATIVE_INFINITY);plt.types.FloatPoint.prototype.isFinite=function(){return isFinite(this.n)};plt.types.FloatPoint.prototype.toExact=function(){return plt.types.Rational.makeInstance(Math.floor(this.n),1)};plt.types.FloatPoint.prototype.isExact=function(){return false};plt.types.FloatPoint.prototype.level=function(){return 1};plt.types.FloatPoint.prototype.lift=function(l){return plt.types.Complex.makeInstance(this,plt.types.Rational.ZERO)};plt.types.FloatPoint.prototype.toWrittenString=function(){if(this.n==Number.POSITIVE_INFINITY){return"+inf.0"}else{if(this.n==Number.NEGATIVE_INFINITY){return"-inf.0"}else{if(this.n==Number.NaN){return"+nan.0"}else{return this.n.toString()}}}};plt.types.FloatPoint.prototype.toDisplayedString=plt.types.FloatPoint.prototype.toWrittenString;plt.types.FloatPoint.prototype.isEqual=function(l){return((l instanceof plt.types.FloatPoint)&&((this.n==l.n)||(isNaN(this.n)&&isNaN(l.n))))};plt.types.FloatPoint.prototype.isRational=function(){return this.isFinite()&&this.n==Math.floor(this.n)};plt.types.FloatPoint.prototype.isInteger=function(){return this.isFinite()&&this.n==Math.floor(this.n)};plt.types.FloatPoint.prototype.isReal=function(){return true};var d=function(l){if(plt.types.NumberTower.lessThan(l,plt.types.Rational.ZERO)){return -1}else{if(plt.types.NumberTower.greaterThan(l,plt.types.Rational.ZERO)){return 1}else{return 0}}};plt.types.FloatPoint.prototype.add=function(l){if(this.isFinite()&&l.isFinite()){return plt.types.FloatPoint.makeInstance(this.n+l.n)}else{if(isNaN(this.n)||isNaN(l.n)){return j}else{if(this.isFinite()&&!l.isFinite()){return l}else{if(!this.isFinite()&&l.isFinite()){return this}else{return((d(this)*d(l)==1)?this:j)}}}}};plt.types.FloatPoint.prototype.subtract=function(l){if(this.isFinite()&&l.isFinite()){return plt.types.FloatPoint.makeInstance(this.n-l.n)}else{if(isNaN(this.n)||isNaN(l.n)){return j}else{if(!this.isFinite()&&!l.isFinite()){if(d(this)==d(l)){return j}else{return this}}else{if(this.isFinite()){return plt.types.NumberTower.multiply(l,plt.types.Rational.NEGATIVE_ONE)}else{return this}}}}};plt.types.FloatPoint.prototype.multiply=function(l){if(this.n==0||l.n==0){return plt.types.Rational.ZERO}if(this.isFinite()&&l.isFinite()){return plt.types.FloatPoint.makeInstance(this.n*l.n)}else{if(isNaN(this.n)||isNaN(l.n)){return j}else{return((d(this)*d(l)==1)?b:c)}}};plt.types.FloatPoint.prototype.divide=function(l){if(this.isFinite()&&l.isFinite()){if(l.n==0){throw new plt.Kernel.MobyRuntimeError("division by zero")}return plt.types.FloatPoint.makeInstance(this.n/l.n)}else{if(isNaN(this.n)||isNaN(l.n)){return j}else{if(!this.isFinite()&&!l.isFinite()){return j}else{if(this.isFinite()&&!l.isFinite()){return plt.types.FloatPoint.makeInstance(0)}else{if(!this.isFinite()&&l.isFinite()){return((d(this)*d(l)==1)?b:c)}}}}}};plt.types.FloatPoint.prototype.toInteger=function(){return Math.floor(this.n)};plt.types.FloatPoint.prototype.numerator=function(){var m=this.n.toString();var l=m.match(/^(.*)\.(.*)$/);if(l){return plt.types.FloatPoint.makeInstance(parseFloat(l[1]+l[2]))}else{return this}};plt.types.FloatPoint.prototype.denominator=function(){var m=this.n.toString();var l=m.match(/^(.*)\.(.*)$/);if(l){return plt.types.FloatPoint.makeInstance(Math.pow(10,l[2].length))}else{return plt.types.FloatPoint.makeInstance(1)}};plt.types.FloatPoint.prototype.toFloat=function(){return this.n};plt.types.FloatPoint.prototype.toComplex=function(){return plt.types.Complex.makeInstance(this,plt.types.Rational.ZERO)};plt.types.FloatPoint.prototype.floor=function(){if(!isFinite(this.n)){return this}return plt.types.Rational.makeInstance(Math.floor(this.n),1)};plt.types.FloatPoint.prototype.ceiling=function(){if(!isFinite(this.n)){return this}return plt.types.Rational.makeInstance(Math.ceil(this.n),1)};plt.types.FloatPoint.prototype.greaterThan=function(l){return this.n>l.n};plt.types.FloatPoint.prototype.greaterThanOrEqual=function(l){return this.n>=l.n};plt.types.FloatPoint.prototype.lessThan=function(l){return this.n<l.n};plt.types.FloatPoint.prototype.lessThanOrEqual=function(l){return this.n<=l.n};plt.types.FloatPoint.prototype.sqrt=function(){if(this.n<0){var l=plt.types.Complex.makeInstance(plt.types.Rational.ZERO,plt.types.FloatPoint.makeInstance(Math.sqrt(-this.n)));return l}else{return plt.types.FloatPoint.makeInstance(Math.sqrt(this.n))}};plt.types.FloatPoint.prototype.abs=function(){return plt.types.FloatPoint.makeInstance(Math.abs(this.n))};plt.types.FloatPoint.prototype.log=function(){if(this.n<0){return this.toComplex().log()}else{return plt.types.FloatPoint.makeInstance(Math.log(this.n))}};plt.types.FloatPoint.prototype.angle=function(){if(0==this.n){return plt.types.Rational.ZERO}if(this.n>0){return plt.types.Rational.ZERO}else{return plt.Kernel.pi}};plt.types.FloatPoint.prototype.atan=function(){return plt.types.FloatPoint.makeInstance(Math.atan(this.n))};plt.types.FloatPoint.prototype.cos=function(){return plt.types.FloatPoint.makeInstance(Math.cos(this.n))};plt.types.FloatPoint.prototype.sin=function(){return plt.types.FloatPoint.makeInstance(Math.sin(this.n))};plt.types.FloatPoint.prototype.expt=function(l){if(this.n==1){if(l.isFinite()){return this}else{if(isNaN(l.n)){return this}else{return this}}}else{return plt.types.FloatPoint.makeInstance(Math.pow(this.n,l.n))}};plt.types.FloatPoint.prototype.exp=function(){return plt.types.FloatPoint.makeInstance(Math.exp(this.n))};plt.types.FloatPoint.prototype.acos=function(){return plt.types.FloatPoint.makeInstance(Math.acos(this.n))};plt.types.FloatPoint.prototype.asin=function(){return plt.types.FloatPoint.makeInstance(Math.asin(this.n))};plt.types.FloatPoint.prototype.imag_dash_part=function(){return plt.types.Rational.ZERO};plt.types.FloatPoint.prototype.real_dash_part=function(){return this};plt.types.FloatPoint.prototype.round=function(){if(isFinite(this.n)){if(Math.abs(Math.floor(this.n)-this.n)==0.5){if(Math.floor(this.n)%2==0){return plt.types.Rational.makeInstance(Math.floor(this.n))}return plt.types.Rational.makeInstance(Math.ceil(this.n))}else{return plt.types.Rational.makeInstance(Math.round(this.n))}}else{return this}};plt.types.FloatPoint.prototype.conjugate=plt.types.FloatPoint.prototype.abs;plt.types.FloatPoint.prototype.magnitude=plt.types.FloatPoint.prototype.abs;plt.types.FloatPoint.prototype.minus=function(){return plt.types.FloatPoint.makeInstance(0-this.n)};plt.types.FloatPoint.prototype.half=function(){return plt.types.FloatPoint.makeInstance(this.n/2)};plt.types.FloatPoint.prototype.timesI=function(){return plt.types.Complex.makeInstance(plt.types.Rational.ZERO,this)};plt.types.Complex=function(m,l){this.r=m;this.i=l};plt.types.Complex.makeInstance=function(n,m){if(typeof(n)=="number"){n=(n==Math.floor(n)?plt.types.Rational.makeInstance(n):plt.types.FloatPoint.makeInstance(n))}if(typeof(m)=="number"){m=(m==Math.floor(m)?plt.types.Rational.makeInstance(m):plt.types.FloatPoint.makeInstance(m))}var l=new plt.types.Complex(n,m);return l};plt.types.Complex.prototype.toWrittenString=function(){if(plt.types.NumberTower.greaterThanOrEqual(this.i,plt.types.Rational.ZERO)){return plt.Kernel.toWrittenString(this.r)+"+"+plt.Kernel.toWrittenString(this.i)+"i"}else{return plt.Kernel.toWrittenString(this.r)+plt.Kernel.toWrittenString(this.i)+"i"}};plt.types.Complex.prototype.toDisplayedString=plt.types.Complex.prototype.toWrittenString;plt.types.Complex.prototype.isFinite=function(){return this.r.isFinite()&&this.i.isFinite()};plt.types.Complex.prototype.isRational=function(){return this.r.isRational()&&plt.types.NumberTower.equal(this.i,plt.types.Rational.ZERO)};plt.types.Complex.prototype.isInteger=function(){return this.r.isInteger()&&plt.types.NumberTower.equal(this.i,plt.types.Rational.ZERO)};plt.types.Complex.prototype.toExact=function(){if(!this.isReal()){throw new plt.Kernel.MobyRuntimeError("inexact->exact: expects argument of type real number")}return this.r.toExact()};plt.types.Complex.prototype.isExact=function(){return this.r.isExact()&&this.i.isExact()};plt.types.Complex.prototype.level=function(){return 2};plt.types.Complex.prototype.lift=function(l){throw new plt.Kernel.MobyRuntimeError("Don't know how to lift Complex number")};plt.types.Complex.prototype.isEqual=function(m){var l=((m instanceof plt.types.Complex)&&(plt.types.NumberTower.equal(this.r,m.r))&&(plt.types.NumberTower.equal(this.i,m.i)));return l};plt.types.Complex.prototype.greaterThan=function(l){if(!this.isReal()||!l.isReal()){throw new plt.Kernel.MobyRuntimeError(">: expects argument of type real number")}return plt.types.NumberTower.greaterThan(this.r,l.r)};plt.types.Complex.prototype.greaterThanOrEqual=function(l){if(!this.isReal()||!l.isReal()){throw new plt.Kernel.MobyRuntimeError(">: expects argument of type real number")}return plt.types.NumberTower.greaterThanOrEqual(this.r,l.r)};plt.types.Complex.prototype.lessThan=function(l){if(!this.isReal()||!l.isReal()){throw new plt.Kernel.MobyRuntimeError(">: expects argument of type real number")}return plt.types.NumberTower.lessThan(this.r,l.r)};plt.types.Complex.prototype.lessThanOrEqual=function(l){if(!this.isReal()||!l.isReal()){throw new plt.Kernel.MobyRuntimeError(">: expects argument of type real number")}return plt.types.NumberTower.lessThanOrEqual(this.r,l.r)};plt.types.Complex.prototype.abs=function(){if(!plt.types.NumberTower.equal(this.i,plt.types.Rational.ZERO).valueOf()){throw new plt.Kernel.MobyRuntimeError("abs: expects argument of type real number")}return this.r.abs()};plt.types.Complex.prototype.toInteger=function(){if(!plt.types.NumberTower.equal(this.i,plt.types.Rational.ZERO).valueOf()){throw new plt.Kernel.MobyRuntimeError("toInteger: expects argument of type real number")}return this.r.toInteger()};plt.types.Complex.prototype.numerator=function(){if(!this.isReal()){throw new plt.Kernel.MobyRuntimeError("numerator: can only be applied to real number")}return this.n.numerator()};plt.types.Complex.prototype.denominator=function(){if(!this.isReal()){throw new plt.Kernel.MobyRuntimeError("floor: can only be applied to real number")}return this.n.denominator()};plt.types.Complex.prototype.toFloat=function(){if(!plt.types.NumberTower.equal(this.i,plt.types.Rational.ZERO).valueOf()){throw new plt.Kernel.MobyRuntimeError("toFloat: expects argument of type real number")}return this.r.toFloat()};plt.types.Complex.prototype.toComplex=function(){return this};plt.types.Complex.prototype.add=function(l){return plt.types.Complex.makeInstance(plt.types.NumberTower.add(this.r,l.r),plt.types.NumberTower.add(this.i,l.i))};plt.types.Complex.prototype.subtract=function(l){return plt.types.Complex.makeInstance(plt.types.NumberTower.subtract(this.r,l.r),plt.types.NumberTower.subtract(this.i,l.i))};plt.types.Complex.prototype.multiply=function(l){if(l.isReal()){return plt.types.Complex.makeInstance(plt.types.NumberTower.multiply(this.r,l.r),plt.types.NumberTower.multiply(this.i,l.r))}var n=plt.types.NumberTower.subtract(plt.types.NumberTower.multiply(this.r,l.r),plt.types.NumberTower.multiply(this.i,l.i));var m=plt.types.NumberTower.add(plt.types.NumberTower.multiply(this.r,l.i),plt.types.NumberTower.multiply(this.i,l.r));if(plt.types.NumberTower.equal(m,plt.types.Rational.ZERO)){return n}return plt.types.Complex.makeInstance(n,m)};plt.types.Complex.prototype.divide=function(n){if(n.isReal()){return plt.types.Complex.makeInstance(plt.types.NumberTower.divide(this.r,n.r),plt.types.NumberTower.divide(this.i,n.r))}var o=n.conjugate();var m=plt.types.NumberTower.multiply(this,o).toComplex();var p=plt.types.NumberTower.multiply(n,o);var l=plt.types.Complex.makeInstance(plt.types.NumberTower.divide(m.r,p),plt.types.NumberTower.divide(m.i,p));return l};plt.types.Complex.prototype.conjugate=function(){var l=plt.types.Complex.makeInstance(this.r,plt.types.NumberTower.subtract(plt.types.Rational.ZERO,this.i));return l};plt.types.Complex.prototype.magnitude=function(){var l=plt.types.NumberTower.add(plt.types.NumberTower.multiply(this.r,this.r),plt.types.NumberTower.multiply(this.i,this.i));return l.sqrt()};plt.types.Complex.prototype.isReal=function(){return plt.types.NumberTower.equal(this.i,plt.types.Rational.ZERO)};plt.types.Complex.prototype.sqrt=function(){if(this.isReal()){return this.r.sqrt()}var l=plt.types.NumberTower.add(this.magnitude(),this.r);var n=l.half().sqrt();var m=plt.types.NumberTower.divide(this.i,plt.types.NumberTower.multiply(l,plt.types.FloatPoint.makeInstance(2)).sqrt());return plt.types.Complex.makeInstance(n,m)};plt.types.Complex.prototype.log=function(){var n=this.magnitude();var o=this.angle();var l=plt.types.NumberTower.add(n.log(),o.timesI());return l};plt.types.Complex.prototype.angle=function(){if(this.isReal()){return this.r.angle()}if(plt.types.NumberTower.equal(plt.types.Rational.ZERO,this.r)){var l=plt.Kernel.pi.half();return plt.types.NumberTower.greaterThan(this.i,plt.types.Rational.ZERO)?l:l.minus()}else{var l=plt.types.NumberTower.divide(this.i.abs(),this.r.abs()).atan();if(plt.types.NumberTower.greaterThan(this.r,plt.types.Rational.ZERO)){return plt.types.NumberTower.greaterThan(this.i,plt.types.Rational.ZERO)?l:l.minus()}else{return plt.types.NumberTower.greaterThan(this.i,plt.types.Rational.ZERO)?plt.Kernel.pi.subtract(l):l.subtract(plt.Kernel.pi)}}};var f=plt.types.Complex.makeInstance(plt.types.Rational.ZERO,plt.types.Rational.ONE);var k=plt.types.Complex.makeInstance(plt.types.Rational.ZERO,plt.types.Rational.NEGATIVE_ONE);plt.types.Complex.prototype.atan=function(){if(plt.types.NumberTower.equal(this,f)||plt.types.NumberTower.equal(this,k)){return plt.types.FloatPoint.makeInstance(Number.NEGATIVE_INFINITY)}return plt.types.NumberTower.multiply(f,plt.types.NumberTower.multiply(plt.types.FloatPoint.makeInstance(0.5),(plt.types.NumberTower.divide(plt.types.NumberTower.add(f,this),plt.types.NumberTower.add(f,plt.types.NumberTower.subtract(plt.types.Rational.ZERO,this)))).log()))};plt.types.Complex.prototype.cos=function(){if(this.isReal()){return this.r.cos()}var m=this.timesI();var l=m.minus();return plt.types.NumberTower.add(m.exp(),l.exp()).half()};plt.types.Complex.prototype.sin=function(){if(this.isReal()){return this.r.sin()}var p=this.timesI();var o=p.minus();var n=plt.types.Complex.makeInstance(plt.types.Rational.ZERO,plt.types.Rational.TWO);var m=plt.types.NumberTower.subtract(p.exp(),o.exp());var l=plt.types.NumberTower.divide(m,n);return l};plt.types.Complex.prototype.expt=function(m){var l=plt.types.NumberTower.multiply(m,this.log());return l.exp()};plt.types.Complex.prototype.exp=function(){var n=this.r.exp();var l=this.i.cos();var m=this.i.sin();return plt.types.NumberTower.multiply(n,plt.types.NumberTower.add(l,m.timesI()))};plt.types.Complex.prototype.acos=function(){if(this.isReal()){return this.r.acos()}var o=plt.Kernel.pi.half();var p=this.timesI();var n=plt.types.NumberTower.subtract(plt.types.Rational.ONE,this.multiply(this)).sqrt();var m=plt.types.NumberTower.add(p,n).log().timesI();return plt.types.NumberTower.add(o,m)};plt.types.Complex.prototype.asin=function(){if(this.isReal()){return this.r.asin()}var n=this.timesI();var l=plt.types.NumberTower.subtract(plt.types.Rational.ONE,this.multiply(this)).sqrt();var m=plt.types.NumberTower.add(n,l).log().timesI().minus();throw new plt.Kernel.MobyRuntimeError("")};plt.types.Complex.prototype.ceiling=function(){if(!this.isReal()){throw new plt.Kernel.MobyRuntimeError("ceiling: can only be applied to real number")}return this.r.ceiling()};plt.types.Complex.prototype.floor=function(){if(!this.isReal()){throw new plt.Kernel.MobyRuntimeError("floor: can only be applied to real number")}return this.r.floor()};plt.types.Complex.prototype.imag_dash_part=function(){return this.i};plt.types.Complex.prototype.real_dash_part=function(){return this.r};plt.types.Complex.prototype.round=function(){return this.r.round()};plt.types.Complex.prototype.timesI=function(){return this.multiply(plt.types.Complex.makeInstance(plt.types.Rational.ZERO,plt.types.Rational.ONE))};plt.types.Complex.prototype.minus=function(){return plt.types.Complex.makeInstance(plt.types.NumberTower.subtract(plt.types.Rational.ZERO,this.r),plt.types.NumberTower.subtract(plt.types.Rational.ZERO,this.i))};plt.types.Complex.prototype.half=function(){return plt.types.Complex.makeInstance(this.r.half(),this.i.half())};plt.types.NumberTower={};plt.types.NumberTower.toInteger=function(l){return l.toInteger()};plt.types.NumberTower.toFloat=function(l){return l.toFloat()};plt.types.NumberTower.abs=function(l){return l.abs()};plt.types.NumberTower.isFinite=function(l){return l.isFinite()};plt.types.NumberTower.toExact=function(l){return l.toExact()};plt.types.NumberTower.add=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}return l.add(m)};plt.types.NumberTower.subtract=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}return l.subtract(m)};plt.types.NumberTower.multiply=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}return l.multiply(m)};plt.types.NumberTower.divide=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}return l.divide(m)};plt.types.NumberTower.equal=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}return l.isEqual(m)};plt.types.NumberTower.approxEqual=function(l,n,m){return plt.types.NumberTower.lessThan(plt.types.NumberTower.abs(plt.types.NumberTower.subtract(l,n)),m)};plt.types.NumberTower.greaterThanOrEqual=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}if(!(l.isReal()&&m.isReal())){throw new plt.Kernel.MobyRuntimeError("greaterThanOrEqual: couldn't be applied to complex number")}return l.greaterThanOrEqual(m)};plt.types.NumberTower.lessThanOrEqual=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}if(!(l.isReal()&&m.isReal())){throw new plt.Kernel.MobyRuntimeError("lessThanOrEqual: couldn't be applied to complex number")}return l.lessThanOrEqual(m)};plt.types.NumberTower.greaterThan=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}if(!(l.isReal()&&m.isReal())){throw new plt.Kernel.MobyRuntimeError("greaterThan: couldn't be applied to complex number")}return l.greaterThan(m)};plt.types.NumberTower.lessThan=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}if(!(l.isReal()&&m.isReal())){throw new plt.Kernel.MobyRuntimeError("lessThan: couldn't be applied to complex number")}return l.lessThan(m)};plt.types.NumberTower.modulo=function(o,p){var l=plt.types.Rational.makeInstance(o.toInteger()%p.toInteger(),1);if(plt.types.NumberTower.lessThan(p,plt.types.Rational.ZERO)){if(plt.types.NumberTower.lessThanOrEqual(l,plt.types.Rational.ZERO)){return l}return plt.types.NumberTower.add(l,p)}else{if(plt.types.NumberTower.lessThan(l,plt.types.Rational.ZERO)){return plt.types.NumberTower.add(l,p)}return l}};plt.types.NumberTower.sqr=function(l){return plt.types.NumberTower.multiply(l,l)};plt.types.NumberTower.expt=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}return l.expt(m)};plt.types.String=String;plt.types.String.makeInstance=function(l){return l.valueOf()};plt.types.String.prototype.isEqual=function(l){return this==l};plt.types.String.prototype.toWrittenString=function(){return'"'+this.replace(/["\\]/g,function(m,n,l){return"\\"+m})+'"'};plt.types.String.prototype.toDisplayedString=function(){return this}})();var plt=plt||{};(function(){if(!Array.indexOf){Array.prototype.indexOf=function(Y){for(var X=0;X<this.length;X++){if(this[X]==Y){return X}}return -1}}var f=function(Z,X,Y){if(Z.addEventListener){Z.addEventListener(X,Y,false)}else{Z.attachEvent("on"+X,Y,false)}};var p=function(Z,X,Y){if(Z.addEventListener){Z.removeEventListener(X,Y,false)}else{Z.detachEvent("on"+X,Y,false)}};var y=function(Y){var X=function(){};X.prototype=Y;return new X()};var w=function(X){this.msg=X};w.prototype.name="MobyError";w.prototype.toString=function(){return this.name+": "+this.msg};var V=function(Y,X){w.call(this,Y);this.loc=X};V.prototype=y(w.prototype);V.prototype.name="MobyParserError";var L=function(Y,X){w.call(this,Y);this.stx=X};L.prototype=y(w.prototype);L.prototype.name="MobySyntaxError";var F=function(X){w.call(this,X)};F.prototype=y(w.prototype);F.prototype.name="MobyTypeError";var B=function(X){w.call(this,X)};B.prototype=y(w.prototype);B.prototype.name="MobyRuntimeError";var P=function(X){w.call(this,X)};P.prototype=y(B.prototype);P.prototype.name="MobyTestingError";var I=function(Y,X){while(X!=0){var Z=Y;Y=X;X=Z%X}return Math.abs(Y)};var e=function(Y,X){return Math.abs(Y*X/I(Y,X))};var U=function(X){return(X!=null&&X!=undefined&&(X instanceof plt.types.Rational||X instanceof plt.types.FloatPoint||X instanceof plt.types.Complex))};var i=function(X){return(X!=null&&X!=undefined&&X instanceof plt.types.Symbol)};var o=function(X){return X!=null&&X!=undefined&&X instanceof plt.types.Char};var M=function(X){return stx_question_(X)};var h=function(X){return typeof(X)=="string"};var E=function(X){return(X==plt.types.Logic.TRUE||X==plt.types.Logic.FALSE)};var R=function(X){return X!=null&&X!=undefined&&X instanceof plt.types.Cons};var r=function(X){return X!=null&&X!=undefined&&X instanceof plt.types.Empty};var T=function(X){return(U(X)&&X.isReal())};var C=function(X){return U(X)&&X.isRational()};var D=function(X){return U(X)};var q=function(X){return typeof(X)=="function"};var m=function(X){return(U(X)&&X.isInteger())};var k=function(X){return U(X)&&X.isInteger()&&X.toInteger()>=0};var s=function(Y){for(var X=0;X<Y.length;X++){if(!((Y[X]>="a"&&Y[X]<="z")||(Y[X]>="A"&&Y[X]<="Z"))){return false}}return true};var J=(function(){var X=new RegExp("^\\s*$");return function(Y){return(Y.match(X)?true:false)}}());var c=function(X){return X!=null&&X!=undefined&&(X instanceof plt.types.Vector)};var g=function(X,Z){for(var Y=0;Y<X.length;Y++){Z.apply(X[Y],[X[Y],Y])}};var H=function(ab,aa,X,Z){if(!ab(aa,X).valueOf()){return false}if(Z.length==0){return true}if(!ab(X,Z[0]).valueOf()){return false}for(var Y=0;Y<Z.length-1;Y++){if(!ab(Z[Y],Z[Y+1]).valueOf()){return false}}return true};var j=function(X,ab,Z){var Y;var aa=ab;for(Y=0;Y<Z.length;Y++){if(!(X(aa,Z[Y])).valueOf()){aa=Z[Y]}}return aa};var b=function(X){return X!=null&&X!=undefined&&((X instanceof plt.types.Cons)||(X instanceof plt.types.Empty))};var z=function(ab,Y,X,aa){var Z=["th","st","nd","rd","th","th","th","th"];return plt.Kernel.format("~a: expects type <~a> as ~a argument, given: ~s",[ab,Y,X+Z[Math.min(Z.length-1,X)],aa])};var v=function(Y,ab,aa,Z,X){if(!ab(Y)){throw new F(z(aa,Z,X,Y))}};var G=function(Y,Z,X){if(!b(Y)){throw new F(z(Z,"list",X,Y))}};var Q=function(Y,ab,aa,Z,X){if(!b(Y)){throw new F(z(aa,"listof "+Z,X,Y))}while(!Y.isEmpty()){if(!ab(Y.first())){throw new F(z(aa,"listof "+Z,X,Y))}Y=Y.rest()}};var x=function(aa,Y,Z,X){return function(ad,ab,ac){v(ad,aa,X,Y,1);v(ab,aa,X,Y,2);g(ac,function(ae,af){v(ae,aa,X,Y,af+3)});return Z(ad,ab,ac)}};var l=function(Y,X){return x(U,"number",function(ab,Z,aa){return H(Y,ab,Z,aa)},X)};var W=function(Y,X){return x(o,"char",function(ab,Z,aa){return H(Y,ab,Z,aa)},X)};var n=function(Y,X){return x(h,"string",function(ab,Z,aa){return H(Y,ab,Z,aa)},X)};plt.Kernel={_heir:y,pi:plt.types.FloatPoint.makeInstance(Math.PI),e:plt.types.FloatPoint.makeInstance(Math.E),Struct:function(Y,X){this._constructorName=Y;this._fields=X},struct_question_:function(X){return(X!=null&&X!=undefined&&X instanceof plt.Kernel.Struct)},number_question_:function(X){return U(X)},equal_question_:function(X,Y){if(plt.Kernel.number_question_(X)&&plt.Kernel.number_question_(Y)){if("isEqual" in X){return plt.types.NumberTower.equal(X,Y)}else{if("isEqual" in Y){return plt.types.NumberTower.equal(Y,X)}else{return(X==Y)}}}else{return X.isEqual(Y)}},equal_tilde__question_:function(X,Z,Y){v(Y,U,"equal~?","number",3);if(plt.Kernel.number_question_(X).valueOf()&&plt.Kernel.number_question_(Z).valueOf()){if("isEqual" in X){return plt.types.NumberTower.approxEqual(X,Z,Y)}else{if("isEqual" in Z){return plt.types.NumberTower.approxEqual(Z,X,Y)}else{return(X==Z)}}}else{return X.isEqual(Z)}},eq_question_:function(X,Y){return(X==Y)},eqv_question_:function(X,Y){if(U(X)&&U(Y)&&X.level()==Y.level()){return plt.types.NumberTower.equal(X,Y)}else{if(o(X)&&o(Y)){return X.getValue()==Y.getValue()}}return X===Y},identity:function(X){return X},cons:function(X,Y){G(Y,"cons",2);return plt.types.Cons.makeInstance(X,Y)},first:function(X){G(X,"first",1);return X.first()},rest:function(X){G(X,"rest",1);return X.rest()},second:function(X){G(X,"second",1);return X.rest().first()},third:function(X){G(X,"third",1);return X.rest().rest().first()},fourth:function(X){G(X,"fourth",1);return X.rest().rest().rest().first()},fifth:function(X){G(X,"fifth",1);return X.rest().rest().rest().rest().first()},random:function(X){v(X,m,"random","integer",1);return plt.types.Rational.makeInstance(Math.floor(plt.types.NumberTower.toInteger(X)*Math.random()),1)},current_dash_seconds:function(){return plt.types.Rational.makeInstance(new Date().getMilliseconds()/1000)},floor:function(X){v(X,U,"floor","number",1);return X.floor()},ceiling:function(X){v(X,U,"ceiling","number",1);return X.ceiling()},sqrt:function(X){v(X,U,"sqrt","number",1);return X.sqrt()},integer_dash_sqrt:function(Y){v(Y,m,"integer-sqrt","integer",1);var X=Y.sqrt();if(C(X)){return plt.types.Rational.makeInstance(X.toInteger())}else{if(T(X)){return plt.types.Rational.makeInstance(X.toInteger())}else{return plt.types.Complex.makeInstance(plt.types.Rational.makeInstance(plt.Kernel.real_dash_part(X).toInteger()),plt.types.Rational.makeInstance(plt.Kernel.imag_dash_part(X).toInteger()))}}},sqr:function(X){v(X,U,"sqr","number",1);return plt.types.NumberTower.sqr(X)},sin:function(X){v(X,U,"sin","number",1);return X.sin()},cos:function(X){v(X,U,"cos","number",1);return X.cos()},modulo:function(X,Y){v(X,U,"modulo","number",1);v(Y,U,"modulo","number",2);return plt.types.NumberTower.modulo(X,Y)},zero_question_:function(X){v(X,U,"zero?","number",1);return plt.types.NumberTower.equal(X,plt.types.Rational.ZERO)},_equal__tilde_:function(X,Z,Y){v(X,U,"=~","number",1);v(Z,U,"=~","number",2);v(Y,U,"=~","number",3);return plt.types.NumberTower.approxEqual(X,Z,Y)},abs:function(X){v(X,U,"abs","number",1);return plt.types.NumberTower.abs(X)},add1:function(X){v(X,U,"add1","number",1);return plt.types.NumberTower.add(X,plt.types.Rational.ONE)},sub1:function(X){v(X,U,"sub1","number",1);return plt.types.NumberTower.subtract(X,plt.types.Rational.ONE)},_plus_:function(X){g(X,function(aa,ab){v(aa,U,"+","number",ab+1)});var Y,Z=plt.types.Rational.ZERO;for(Y=0;Y<X.length;Y++){Z=plt.types.NumberTower.add(Z,X[Y])}return Z},_dash_:function(aa,X){v(aa,U,"-","number",1);g(X,function(ab,ac){v(ab,U,"-","number",ac+2)});if(X.length==0){return plt.types.NumberTower.subtract(plt.types.Rational.ZERO,aa)}var Y,Z=aa;for(Y=0;Y<X.length;Y++){Z=plt.types.NumberTower.subtract(Z,X[Y])}return Z},_star_:function(Y){g(Y,function(aa,ab){v(aa,U,"*","number",ab+1)});var Z,X=plt.types.Rational.ONE;for(Z=0;Z<Y.length;Z++){X=plt.types.NumberTower.multiply(X,Y[Z])}return X},_slash_:function(Z,X){v(Z,U,"/","number",1);g(X,function(ab,ac){v(ab,U,"/","number",ac+2)});var Y,aa=Z;if(X.length==0){return plt.types.NumberTower.divide(plt.types.Rational.ONE,aa)}else{for(Y=0;Y<X.length;Y++){aa=plt.types.NumberTower.divide(aa,X[Y])}return aa}},_equal_:l(plt.types.NumberTower.equal,"="),_greaterthan__equal_:l(plt.types.NumberTower.greaterThanOrEqual,">="),_lessthan__equal_:l(plt.types.NumberTower.lessThanOrEqual,"<="),_greaterthan_:l(plt.types.NumberTower.greaterThan,">"),_lessthan_:l(plt.types.NumberTower.lessThan,"<"),min:function(Y,X){v(Y,U,"min","number",1);g(X,function(Z,aa){v(this,U,"min","number",aa+2)});return j(plt.types.NumberTower.lessThanOrEqual,Y,X)},max:function(Y,X){v(Y,U,"max","number",1);g(X,function(Z,aa){v(this,U,"max","number",aa+2)});return j(plt.types.NumberTower.greaterThanOrEqual,Y,X)},lcm:function(aa,Z){v(aa,m,"lcm","number",1);g(Z,function(ab,ac){v(this,m,"lcm","number",ac+2)});var X=Math.abs(aa.toInteger());if(X==0){return plt.types.Rational.ZERO}for(var Y=0;Y<Z.length;Y++){if(Z[Y].toInteger()==0){return plt.types.Rational.ZERO}X=e(X,Z[Y].toInteger())}return plt.types.Rational.makeInstance(X)},gcd:function(aa,Z){v(aa,m,"gcd","number",1);g(Z,function(ab,ac){v(this,m,"gcd","number",ac+2)});var X=Math.abs(aa.toInteger());for(var Y=0;Y<Z.length;Y++){X=I(X,Z[Y].toInteger())}return plt.types.Rational.makeInstance(X)},exact_dash__greaterthan_inexact:function(X){v(X,U,"exact->inexact","number",1);return plt.types.FloatPoint.makeInstance(X.toFloat())},inexact_dash__greaterthan_exact:function(X){v(X,U,"inexact->exact","number",1);return plt.types.NumberTower.toExact(X)},exact_question_:function(X){v(X,U,"exact?","number",1);return X.isExact()},inexact_question_:function(X){v(X,U,"inexact?","number",1);return !X.isExact()},rational_question_:function(X){return(plt.Kernel.number_question_(X)&&X.isRational())},number_dash__greaterthan_string:function(X){v(X,U,"number->string","number",1);return plt.types.String.makeInstance(plt.Kernel.toWrittenString(X))},conjugate:function(X){v(X,U,"conjugate","number",1);return X.conjugate()},magnitude:function(X){v(X,U,"magnitude","number",1);return X.magnitude()},log:function(X){v(X,U,"log","number",1);return X.log()},angle:function(X){v(X,U,"angle","number",1);return X.angle()},atan:function(X,Y){if(Y.length==0){v(X,U,"atan","number",1);return X.atan()}else{if(Y.length==1){v(X,T,"atan","number",1);v(Y[0],T,"atan","number",2);return plt.types.FloatPoint.makeInstance(Math.atan2(plt.types.NumberTower.toFloat(X),plt.types.NumberTower.toFloat(Y[0])))}else{throw new B(plt.Kernel.format("atan: expects 1 to 2 arguments, given ~a.",[plt.types.Rational.makeInstance(Y.length)]))}}},expt:function(X,Y){v(X,U,"expt","number",1);v(Y,U,"expt","number",2);return plt.types.NumberTower.expt(X,Y)},exp:function(X){v(X,U,"exp","number",1);return X.exp()},acos:function(X){v(X,U,"acos","number",1);return X.acos()},asin:function(X){v(X,U,"asin","number",1);return X.asin()},tan:function(X){v(X,U,"tan","number",1);return plt.types.NumberTower.divide(X.sin(),X.cos())},complex_question_:function(X){return D(X)},cosh:function(X){v(X,U,"cosh","number",1);return this._plus_([this.exp(X),this.exp(X.minus())]).half()},sinh:function(X){v(X,U,"sinh","number",1);return plt.types.NumberTower.subtract(this.exp(X),this.exp(X.minus())).half()},denominator:function(X){v(X,C,"denominator","rational",1);return X.denominator()},numerator:function(X){v(X,C,"numerator","rational",1);return X.numerator()},odd_question_:function(X){v(X,U,"odd?","number",1);return(Math.abs((X.toInteger()%2))==1)},even_question_:function(X){v(X,U,"even?","number",1);return(Math.abs((X.toInteger()%2))==0)},positive_question_:function(X){v(X,U,"positive?","number",1);return this._greaterthan_(X,plt.types.Rational.ZERO,[])},negative_question_:function(X){v(X,U,"negative?","number",1);return this._lessthan_(X,plt.types.Rational.ZERO,[])},imag_dash_part:function(X){v(X,U,"imag-part","number",1);return X.imag_dash_part()},real_dash_part:function(X){v(X,U,"real-part","number",1);return X.real_dash_part()},make_dash_polar:function(Z,Y){if(plt.types.NumberTower.equal(Y,plt.types.Rational.ZERO)){return Z}var X=plt.types.NumberTower.multiply(Z,Y.cos());var aa=plt.types.NumberTower.multiply(Z,Y.sin());return plt.types.Complex.makeInstance(X,aa)},integer_question_:function(X){return(m(X))},make_dash_rectangular:function(X,Y){return plt.types.Complex.makeInstance(X,Y)},quotient:function(X,Z){v(X,m,"quotient","integer",1);v(Z,m,"quotient","integer",2);var Y=plt.types.NumberTower.divide(X,Z);if(plt.Kernel.positive_question_(Y)){return plt.types.Rational.makeInstance(Y.floor().toInteger(),1)}else{return plt.types.Rational.makeInstance(Y.ceiling().toInteger(),1)}},remainder:function(X,Y){v(X,U,"remainder","number",1);v(Y,U,"remainder","number",2);return plt.types.Rational.makeInstance(X.toInteger()%Y.toInteger(),1)},real_question_:function(X){return T(X)},round:function(X){v(X,U,"round","number",1);return X.round()},sgn:function(X){v(X,U,"sgn","number",1);if(this.positive_question_(X).valueOf()){return plt.types.Rational.ONE}if(this.negative_question_(X).valueOf()){return plt.types.Rational.NEGATIVE_ONE}else{return plt.types.Rational.ZERO}},boolean_equal__question_:function(X,Y){v(X,E,"boolean=?","boolean",1);v(Y,E,"boolean=?","boolean",2);return X==Y},boolean_question_:function(X){return E(X)},false_question_:function(X){return(X==plt.types.Logic.FALSE)},not:function(X){if(!X||X===plt.types.Logic.FALSE){return plt.types.Logic.TRUE}return plt.types.Logic.FALSE},symbol_dash__greaterthan_string:function(X){v(X,i,"symbol->string","symbol",1);return plt.types.String.makeInstance(X.val)},symbol_equal__question_:function(X,Y){v(X,i,"symbol=?","symbol",1);v(Y,i,"symbol=?","symbol",2);return(X.val==Y.val)},symbol_question_:function(X){return i(X)},append:function(aa,Z){G(aa,"append",1);var X=aa;var Y;for(Y=0;Y<Z.length;Y++){G(Z[Y],"append",Y+2);X=X.append(Z[Y])}return X},reverse:function(X){G(X,"reverse",1);var Y=plt.types.Empty.EMPTY;while(!X.isEmpty()){Y=plt.types.Cons.makeInstance(X.first(),Y);X=X.rest()}return Y},assq:function(Y,X){G(X,"assq",2);while(!X.isEmpty()&&!plt.Kernel.eq_question_(Y,X.first().first())){X=X.rest()}if(X.isEmpty()){return plt.types.Logic.FALSE}else{return X.first()}},caaar:function(X){G(X,"caaar",1);return X.first().first().first()},caadr:function(X){G(X,"caadr",1);return X.first().first().rest()},caar:function(X){G(X,"caar",1);return X.first().first()},cadar:function(X){G(X,"cadar",1);return X.first().rest().first()},cadddr:function(X){G(X,"cadddr",1);return X.rest().rest().rest().first()},caddr:function(X){G(X,"caddr",1);return X.rest().rest().first()},cadr:function(X){G(X,"cadr",1);return X.rest().first()},car:function(X){G(X,"car",1);return X.first()},cdaar:function(X){G(X,"cdaar",1);return X.first().first().rest()},cdadr:function(X){G(X,"cdadr",1);return X.rest().first().rest()},cdar:function(X){G(X,"cdar",1);return X.first().rest()},cddar:function(X){G(X,"cddar",1);return X.first().rest().rest()},cdddr:function(X){G(X,"cdddr",1);return X.rest().rest().rest()},cddr:function(X){G(X,"cddr",1);return X.rest().rest()},cdr:function(X){G(X,"cdr",1);return X.rest()},null_question_:function(X){return r(X)},empty_question_:function(X){return r(X)},pair_question_:function(X){return R(X)},cons_question_:function(X){return R(X)},sixth:function(X){G(X,"sixth",1);return X.rest().rest().rest().rest().rest().first()},seventh:function(X){G(X,"seventh",1);return X.rest().rest().rest().rest().rest().rest().first()},eighth:function(X){G(X,"eighth",1);return X.rest().rest().rest().rest().rest().rest().rest().first()},set_dash_car_bang_:function(X,Y){G(X,"set-car!",1);X.f=Y;return undefined},set_dash_cdr_bang_:function(X,Y){G(X,"set-cdr!",1);G(Y,"set-cdr!",2);X.r=Y;return undefined},length:function(X){G(X,"length",1);var Y=plt.types.Rational.ZERO;for(;!X.isEmpty();X=X.rest()){Y=plt.Kernel.add1(Y)}return Y},list:function(X){var Y=plt.types.Empty.EMPTY;for(var Z=X.length-1;Z>=0;Z--){Y=plt.types.Cons.makeInstance(X[Z],Y)}return Y},list_star_:function(X,Z){var Y=Z.pop();if(Y==undefined||!Y instanceof plt.types.Cons){throw new F("list*: "+Y+" not a list")}Z.unshift(X);return plt.Kernel.append(plt.Kernel.list(Z),[Y])},list_dash_ref:function(Y,X){G(Y,"list-ref",1);v(X,k,"list-ref","natural",2);var Z=plt.types.Rational.ZERO;for(;plt.Kernel._lessthan_(Z,X,[]);Z=plt.Kernel.add1(Z)){if(Y.isEmpty()){throw new B("list-ref: index too small")}else{Y=Y.rest()}}return Y.first()},remove:function(aa,Y){G(Y,"member",2);var Z=Y;var X=plt.types.Empty.EMPTY;while(!Y.isEmpty()){if(plt.Kernel.equal_question_(aa,Y.first()).valueOf()){return plt.Kernel.append(plt.Kernel.reverse(X),[Y.rest()])}else{X=plt.types.Cons.makeInstance(Y.first(),X);Y=Y.rest()}}return Z},member:function(Y,X){G(X,"member",2);while(!X.isEmpty()){if(plt.Kernel.equal_question_(Y,X.first()).valueOf()){return plt.types.Logic.TRUE}X=X.rest()}return plt.types.Logic.FALSE},memq:function(Y,X){G(X,"memq",2);while(!X.isEmpty()){if(plt.Kernel.eq_question_(Y,X.first()).valueOf()){return X}X=X.rest()}return plt.types.Logic.FALSE},memv:function(Y,X){G(X,"memv",2);while(!X.isEmpty()){if(plt.Kernel.eqv_question_(Y,X.first()).valueOf()){return X}X=X.rest()}return plt.types.Logic.FALSE},memf:function(Y,X){v(Y,q,"memf","function",1);G(X,"memf",2);while(!X.isEmpty()){if(Y([X.first()])){return X}X=X.rest()}return plt.types.Logic.FALSE},compose:function(X){return function(Y){var aa=Y;for(var Z=X.length-1;Z>=0;Z--){aa=[X[Z](aa)]}return aa[0]}},string_dash__greaterthan_number:function(aa){v(aa,h,"string->number","string",1);try{var Y=plt.reader.readSchemeExpressions(aa,"");if(plt.types.NumberTower.equal(plt.Kernel.length(Y),plt.types.Rational.ONE)){var X=stx_dash_e(Y.first());if(U(X)){return X}else{return plt.types.Logic.FALSE}}else{return plt.types.Logic.FALSE}}catch(Z){return plt.types.Logic.FALSE}},string_dash__greaterthan_symbol:function(X){v(X,h,"string->symbol","string",1);return plt.types.Symbol.makeInstance(X)},string_dash__greaterthan_int:function(X){v(X,h,"string->int","string",1);return plt.types.Rational.makeInstance(X.toString().charCodeAt(0),1)},string_dash_append:function(X){g(X,function(Y,Z){v(Y,h,"string-append","string",Z+1)});return plt.types.String.makeInstance(X.join(""))},replicate:function(aa,Z){v(aa,k,"replicate","natural",1);v(Z,h,"replicate","string",2);var X=[];for(var Y=0;Y<aa.toInteger();Y++){X.push(Z)}return plt.types.String.makeInstance(X.join(""))},string_equal__question_:n(function(X,Y){return X==Y},"string=?"),string_lessthan__equal__question_:n(function(X,Y){return X<=Y},"string<=?"),string_lessthan__question_:n(function(X,Y){return X<Y},"string<?"),string_greaterthan__equal__question_:n(function(X,Y){return X>=Y},"string>=?"),string_greaterthan__question_:n(function(X,Y){return X>Y},"string>?"),string_dash_ci_equal__question_:n(function(X,Y){return X.toUpperCase()==Y.toUpperCase()},"string-ci=?"),string_dash_ci_lessthan__equal__question_:n(function(X,Y){return X.toUpperCase()<=Y.toUpperCase()},"string-ci<=?"),string_dash_ci_lessthan__question_:n(function(X,Y){return X.toUpperCase()<Y.toUpperCase()},"string-ci<?"),string_dash_ci_greaterthan__question_:n(function(X,Y){return X.toUpperCase()>Y.toUpperCase()},"string-ci>?"),string_dash_ci_greaterthan__equal__question_:n(function(X,Y){return X.toUpperCase()>=Y.toUpperCase()},"string-ci>=?"),string_dash_copy:function(X){v(X,h,"string-copy","string",1);return X.substring(0,X.length)},string_dash_length:function(X){v(X,h,"string-length","string",1);return plt.types.Rational.makeInstance(X.length,1)},string_dash_ref:function(Y,X){v(Y,h,"string-ref","string",1);v(X,k,"string-ref","natural",2);if(X.toInteger()>=Y.length){throw new B("string-ref: index >= length")}return plt.types.String.makeInstance(Y.charAt(X.toInteger()))},string_dash_ith:function(Y,X){v(Y,h,"string-ith","string",1);v(X,k,"string-ith","natural",2);if(X.toInteger()>=Y.length){throw new B("string-ith: index >= string length")}return plt.types.String.makeInstance(Y.substring(X.toInteger(),X.toInteger()+1))},int_dash__greaterthan_string:function(X){v(X,m,"int->string","integer",1);return plt.types.String.makeInstance(String.fromCharCode(X.toInteger()))},string_question_:function(X){return h(X)},substring:function(Z,Y,X){v(Z,h,"substring","string",1);v(Y,k,"substring","natural",2);v(X,k,"substring","natural",3);if(Y.toInteger()>X.toInteger()){throw new B("substring: begin > end")}if(X.toInteger()>Z.length){throw new B("substring: end > length")}return String.makeInstance(Z.substring(Y.toInteger(),X.toInteger()))},char_question_:function(X){return o(X)},char_dash__greaterthan_integer:function(X){v(X,o,"char->integer","char",1);var Y=new String(X.val);return plt.types.Rational.makeInstance(Y.charCodeAt(0),1)},integer_dash__greaterthan_char:function(Y){v(Y,m,"integer->char","integer",1);var X=String.fromCharCode(Y.toInteger());return plt.types.Char.makeInstance(X)},char_equal__question_:W(function(X,Y){return X.val==Y.val},"char=?"),char_lessthan__question_:W(function(X,Y){return X.val<Y.val},"char<?"),char_lessthan__equal__question_:W(function(X,Y){return X.val<=Y.val},"char<=?"),char_greaterthan__question_:W(function(X,Y){return X.val>Y.val},"char>?"),char_greaterthan__equal__question_:W(function(X,Y){return X.val>=Y.val},"char>=?"),char_dash_ci_equal__question_:W(function(X,Y){return X.val.toUpperCase()==Y.val.toUpperCase()},"char-ci=?"),char_dash_ci_lessthan__question_:W(function(X,Y){return X.val.toUpperCase()<Y.val.toUpperCase()},"char-ci<?"),char_dash_ci_lessthan__equal__question_:W(function(X,Y){return X.val.toUpperCase()<=Y.val.toUpperCase()},"char-ci<=?"),char_dash_ci_greaterthan__question_:W(function(X,Y){return X.val.toUpperCase()>Y.val.toUpperCase()},"char-ci>?"),char_dash_ci_greaterthan__equal__question_:W(function(X,Y){return X.val.toUpperCase()>=Y.val.toUpperCase()},"char-ci>=?"),char_dash_numeric_question_:function(X){v(X,o,"char-numeric?","char",1);var Y=X.val;return(Y>="0"&&Y<="9")},char_dash_alphabetic_question_:function(X){v(X,o,"char-alphabetic?","char",1);var Y=X.val;return s(Y)},char_dash_whitespace_question_:function(X){v(X,o,"char-whitespace?","char",1);var Y=X.val;return J(Y)},char_dash_upper_dash_case_question_:function(X){v(X,o,"char-upper-case?","char",1);return s(X.val)&&X.val.toUpperCase()==X.val},char_dash_lower_dash_case_question_:function(X){v(X,o,"char-lower-case?","char",1);return s(X.val)&&X.val.toLowerCase()==X.val},char_dash_upcase:function(X){v(X,o,"char-upcase","char",1);return plt.types.Char.makeInstance(X.val.toUpperCase())},char_dash_downcase:function(X){v(X,o,"char-downcase","char",1);return plt.types.Char.makeInstance(X.val.toLowerCase())},list_dash__greaterthan_string:function(X){Q(X,o,"list->string","char",1);var Y="";while(!X.isEmpty()){Y+=X.first().val;X=X.rest()}return plt.types.String.makeInstance(Y)},implode:function(X){Q(X,h,"implode","string",1);var Y=[];while(!X.isEmpty()){Y.push(X.first().toString());X=X.rest()}return plt.types.String.makeInstance(Y.join(""))},string_dash_numeric_question_:function(Y){v(Y,h,"string-numeric?","string",1);for(var X=0;X<Y.length;X++){if(Y[X]<"0"||Y[X]>"9"){return plt.types.Logic.FALSE}}return plt.types.Logic.TRUE},string_dash_alphabetic_question_:function(X){v(X,h,"string-alphabetic?","string",1);return s(X)?plt.types.Logic.TRUE:plt.types.Logic.FALSE},string_dash_whitespace_question_:function(X){v(X,h,"string-whitespace?","string",1);return J(X)?plt.types.Logic.TRUE:plt.types.Logic.FALSE},string_dash_upper_dash_case_question_:function(X){v(X,h,"string-upper-case?","string",1);return s(X)&&X.toUpperCase()==X},string_dash_lower_dash_case_question_:function(X){v(X,h,"string-lower-case?","string",1);return s(X)&&X.toLowerCase()==X},string:function(Z){g(Z,function(aa,ab){v(this,o,"string","char",ab+1)});var X=[];for(var Y=0;Y<Z.length;Y++){X.push(Z[Y].val)}return String.makeInstance(X.join(""))},make_dash_string:function(ab,Z){v(ab,k,"make-string","natural",1);v(Z,o,"make-string","char",2);var X="";var aa=Z.val;var Y=plt.types.Rational.ZERO;for(;plt.Kernel._lessthan_(Y,ab,[]);Y=plt.Kernel.add1(Y)){X+=aa}return plt.types.String.makeInstance(X)},string_dash__greaterthan_list:function(aa){v(aa,h,"string->list","string",1);var Z=aa;var X=plt.types.Empty.EMPTY;for(var Y=Z.length-1;Y>=0;Y--){X=plt.types.Cons.makeInstance(plt.types.Char.makeInstance(Z.charAt(Y)),X)}return X},explode:function(aa){v(aa,h,"explode","string",1);var Z=aa;var X=plt.types.Empty.EMPTY;for(var Y=Z.length-1;Y>=0;Y--){X=plt.types.Cons.makeInstance(plt.types.String.makeInstance(Z.charAt(Y)),X)}return X}};plt.Kernel._dumpKernelSymbols=function(){var X=plt.types.Empty.EMPTY;for(var Y in plt.Kernel){X=plt.types.Cons.makeInstance(plt.types.Symbol.makeInstance(Y),X)}return X};var t=function(X){this.hash=X};plt.Kernel.openInputStx=function(X){throw new B("open-input-stx currently unsupported")},plt.Kernel._kernelMakeImmutableHashEq=function(ab){var Y={};while(!ab.isEmpty()){var Z=ab.first();var aa=Z.first();var X=Z.rest();Y[aa]=X;ab=ab.rest()}return new t(Y)};plt.Kernel._kernelHashSet=function(ab,Y,ac){var Z={};var aa=ab.hash;for(var X in aa){Z[X]=aa[X]}Z[Y]=ac;return new t(Z)};plt.Kernel._kernelHashRef=function(Y,X,Z){if(X in Y.hash){return Y.hash[X]}else{if(q(Z)){return Z([])}return Z}};plt.Kernel._kernelHashRemove=function(ab,Y){var Z={};var aa=ab.hash;for(var X in aa){if(X!=Y){Z[X]=aa[X]}}return new t(Z)};plt.Kernel._kernelHashMap=function(Y,aa){var X=plt.types.Empty.EMPTY;var Z;for(Z in Y.hash){var ab=Y.hash[Z];X=plt.Kernel.cons(aa([Z,ab]),X)}return X};plt.Kernel.apply=function(ac,ab,X){var aa;var Z=[];v(ac,q,"apply","function",1);if(X.length==0){aa=ab;G(aa,"apply",2);while(!aa.isEmpty()){var Y=aa.first();Z.push(Y);aa=aa.rest()}}else{aa=X.pop();G(aa,"apply",3);while(!aa.isEmpty()){var Y=aa.first();Z.push(Y);aa=aa.rest()}while(X.length>0){Z.unshift(X.pop())}Z.unshift(ab)}return ac(Z)};plt.Kernel.map=function(aa,ab){v(aa,q,"map","function",1);g(ab,function(ac,ad){G(ac,"map",ad+2)});var Z=plt.types.Empty.EMPTY;while(!ab[0].isEmpty()){var X=[];for(var Y=0;Y<ab.length;Y++){X.push(ab[Y].first());ab[Y]=ab[Y].rest()}Z=plt.Kernel.cons(aa(X),Z)}return plt.Kernel.reverse(Z)};plt.Kernel.for_dash_each=function(Z,aa){v(Z,q,"for-each","function",1);g(aa,function(ab,ac){G(ab,"for-each",ac+2)});while(!aa[0].isEmpty()){var X=[];for(var Y=0;Y<aa.length;Y++){X.push(aa[Y].first());aa[Y]=aa[Y].rest()}Z(X)}return undefined};plt.Kernel.andmap=function(Z,aa){v(Z,q,"andmap","function",1);g(aa,function(ab,ac){G(ab,"andmap",ac+2)});while(!aa[0].isEmpty()){var X=[];for(var Y=0;Y<aa.length;Y++){X.push(aa[Y].first());aa[Y]=aa[Y].rest()}if(!Z(X)){return plt.types.Logic.FALSE}}return plt.types.Logic.TRUE};plt.Kernel.ormap=function(Z,aa){v(Z,q,"ormap","function",1);g(aa,function(ab,ac){G(ab,"ormap",ac+2)});while(!aa[0].isEmpty()){var X=[];for(var Y=0;Y<aa.length;Y++){X.push(aa[Y].first());aa[Y]=aa[Y].rest()}if(Z(X)){return plt.types.Logic.TRUE}}return plt.types.Logic.FALSE};plt.Kernel.filter=function(Y,Z){v(Y,q,"filter","function",1);v(Z,b,"filter","list",2);var X=plt.types.Empty.EMPTY;while(!Z.isEmpty()){if(Y([Z.first()])){X=plt.types.Cons.makeInstance(Z.first(),X)}Z=Z.rest()}return plt.Kernel.reverse(X)};plt.Kernel.foldl=function(ab,aa,ac){v(ab,q,"foldl","function",1);g(ac,function(ad,ae){v(ad,b,"foldl","list",ae+3)});var X=aa;while(!ac[0].isEmpty()){var Y=[];for(var Z=0;Z<ac.length;Z++){Y.push(ac[Z].first());ac[Z]=ac[Z].rest()}Y.push(X);X=ab(Y)}return X};plt.Kernel.foldr=function(ab,aa,ac){v(ab,q,"foldr","function",1);g(ac,function(ad,ae){v(ad,b,"foldr","list",ae+3)});var X=aa;for(var Z=0;Z<ac.length;Z++){ac[Z]=plt.Kernel.reverse(ac[Z])}while(!ac[0].isEmpty()){var Y=[];for(var Z=0;Z<ac.length;Z++){Y.push(ac[Z].first());ac[Z]=ac[Z].rest()}Y.push(X);X=ab(Y)}return X};plt.Kernel.argmin=function(Z,ab){v(Z,q,"argmin","function",1);v(ab,R,"argmin","nonempty list",2);var Y=ab.first();var X=Z([ab.first()]).toFloat();ab=ab.rest();while(!ab.isEmpty()){var aa=Z([ab.first()]).toFloat();if(aa<X){Y=ab.first();X=aa}ab=ab.rest()}return Y};plt.Kernel.argmax=function(Z,ab){v(Z,q,"argmax","function",1);v(ab,R,"argmax","nonempty list",2);var Y=ab.first();var X=Z([ab.first()]).toFloat();ab=ab.rest();while(!ab.isEmpty()){var aa=Z([ab.first()]).toFloat();if(aa>X){Y=ab.first();X=aa}ab=ab.rest()}return Y};plt.Kernel.sort=function(Y,Z){v(Y,b,"sort","list",1);v(Z,q,"sort","function",2);var X=[];while(!Y.isEmpty()){X.push(Y.first());Y=Y.rest()}X.sort(function(aa,ab){return Z([aa,ab])?-1:1});return plt.Kernel.list(X)};plt.Kernel.quicksort=plt.Kernel.sort;plt.Kernel.build_dash_list=function(aa,Z){v(aa,k,"build-list","natural",1);v(Z,q,"build-list","function",2);var X=plt.types.Empty.EMPTY;for(var Y=0;Y<aa.toInteger();Y++){X=plt.Kernel.cons(Z([plt.types.Rational.makeInstance(Y,1)]),X)}return plt.Kernel.reverse(X)};plt.Kernel.build_dash_string=function(ab,aa){v(ab,k,"build-string","natural",1);v(aa,q,"build-string","function",2);var Z=[];for(var X=0;X<ab.toInteger();X++){var Y=aa([plt.types.Rational.makeInstance(X,1)]);Z.push(Y.val)}return plt.types.String.makeInstance(Z.join(""))};plt.Kernel.format=function(Z,aa){v(Z,h,"format","string",1);var ac=new RegExp("~[sSaAn%~]","g");var Y=aa;function ab(ad){if(ad=="~~"){return"~"}else{if(ad=="~n"||ad=="~%"){return"\n"}else{if(ad=="~s"||ad=="~S"){if(Y.length==0){throw new B("format: fewer arguments passed than expected")}return plt.Kernel.toWrittenString(Y.shift())}else{if(ad=="~a"||ad=="~A"){if(Y.length==0){throw new B("format: fewer arguments passed than expected")}return plt.Kernel.toDisplayedString(Y.shift())}else{throw new B("Unimplemented format "+ad)}}}}}var X=plt.types.String.makeInstance(Z.replace(ac,ab));if(Y.length>0){throw new B("format: More arguments passed than expected")}return X};plt.Kernel.string=function(X){var Z=[];for(var Y=0;Y<X.length;Y++){Z.push(X[Y].getValue())}return plt.types.String.makeInstance(Z.join(""))};plt.Kernel.procedure_question_=function(X){return q(X)};plt.Kernel.xml_dash__greaterthan_s_dash_exp=function(Z){v(Z,h,"xml->s-exp","string",1);if(Z.length==0){return plt.types.String.makeInstance("")}var aa;try{aa=new ActiveXObject("Microsoft.XMLDOM");aa.async="false";aa.loadXML(Z)}catch(ab){var ad=new DOMParser();aa=ad.parseFromString(Z,"text/xml")}var Y=function(af){var ae=plt.types.Empty.EMPTY;for(var ag=0;ag<af.length;ag++){var ah=plt.types.Cons.makeInstance(plt.types.Symbol.makeInstance(af.item(ag).nodeName),plt.types.Cons.makeInstance(af.item(ag).nodeValue,plt.types.Empty.EMPTY));ae=plt.types.Cons.makeInstance(ah,ae)}return plt.types.Cons.makeInstance(plt.types.Symbol.makeInstance("@"),plt.Kernel.reverse(ae))};var ac=function(ag){if(ag.nodeType==Node.ELEMENT_NODE){var ae=plt.types.Empty.EMPTY;var ah=ag.firstChild;while(ah!=null){var af=ac(ah);if(h(af)&&!ae.isEmpty()&&h(ae.first())){ae=plt.types.Cons.makeInstance(ae.first()+af,ae.rest())}else{ae=plt.types.Cons.makeInstance(af,ae)}ah=ah.nextSibling}ae=plt.Kernel.reverse(ae);ae=plt.types.Cons.makeInstance(Y(ag.attributes),ae);ae=plt.types.Cons.makeInstance(plt.types.Symbol.makeInstance(ag.nodeName),ae);return ae}else{if(ag.nodeType==Node.TEXT_NODE){return ag.textContent}else{if(ag.nodeType==Node.CDATA_SECTION_NODE){return ag.data}else{return plt.types.Empty.EMPTY}}}};var X=ac(aa.firstChild);return X};plt.Kernel.split_dash_whitespace=function(X){X=X.replace(/^\s+/,"");X=X.replace(/\s+$/,"");return plt.Kernel.list(X.split(/\s+/))};var S=function(X){plt.Kernel.Struct.call(this,"box",[X])};S.prototype=y(plt.Kernel.Struct.prototype);plt.Kernel.box=function(X){return new S(X)};plt.Kernel.unbox=function(X){v(X,plt.Kernel.box_question_,"unbox","box",1);return X._fields[0]};plt.Kernel.box_question_=function(X){return X!=null&&X!=undefined&&X instanceof S};plt.Kernel.set_dash_box_bang_=function(Y,X){v(Y,plt.Kernel.box_question_,"set-box!","box",1);Y._fields[0]=X;return undefined};var u=function(X,Y){plt.Kernel.Struct.call(this,"make-posn",[X,Y])};u.prototype=y(plt.Kernel.Struct.prototype);var A=function(Y,X){return new u(Y,X)};var O=function(X){v(X,K,"posn-x","posn",1);return X._fields[0]};var N=function(X){v(X,K,"posn-y","posn",1);return X._fields[1]};var K=function(X){return X!=null&&X!=undefined&&X instanceof u};plt.Kernel.make_dash_posn=A;plt.Kernel.posn_question_=K;plt.Kernel.posn_dash_x=O;plt.Kernel.posn_dash_y=N;plt.Kernel.error=function(X,Y){v(X,i,"error","symbol",1);v(Y,h,"error","string",2);throw new B(plt.Kernel.format("~a: ~a",[X,Y]).toString())};plt.Kernel.syntax_dash_error=function(Y,X){v(Y,h,"syntax-error","string",1);v(X,M,"syntax-error","stx",2);throw new L(Y,X)};plt.Kernel.toWrittenString=function(X){if(X==undefined||X==null){return"<undefined>"}if(typeof(X)=="string"){return X.toWrittenString()}if(typeof(X)!="object"&&typeof(X)!="function"){return X.toString()}if("toWrittenString" in X){return X.toWrittenString()}if("toDisplayedString" in X){return X.toDisplayedString()}else{return X.toString()}};plt.Kernel.toDisplayedString=function(X){if(X==undefined||X==null){return"<undefined>"}if(typeof(X)=="string"){return X.toDisplayedString()}if(typeof(X)!="object"&&typeof(X)!="function"){return X.toString()}if("toWrittenString" in X){return X.toWrittenString()}if("toDisplayedString" in X){return X.toDisplayedString()}else{return X.toString()}};plt.Kernel.toDomNode=function(X){if(X==undefined||X==null){var Y=document.createTextNode("<undefined>");return Y}if(typeof(X)=="string"){var Y=document.createTextNode(X.toWrittenString());return Y}if(typeof(X)!="object"&&typeof(X)!="function"){var Y=document.createTextNode(X.toString());return Y}if(X.nodeType){return X}if("toDomNode" in X){return X.toDomNode()}if("toWrittenString" in X){var Y=document.createTextNode(X.toWrittenString());return Y}if("toDisplayedString" in X){var Y=document.createTextNode(X.toDisplayedString());return Y}else{var Y=document.createTextNode(X.toString());return Y}};plt.Kernel.Struct.prototype.toWrittenString=function(){var X=[];X.push("(");X.push(this._constructorName);for(var Y=0;Y<this._fields.length;Y++){X.push(" ");X.push(plt.Kernel.toWrittenString(this._fields[Y]))}X.push(")");return plt.types.String.makeInstance(X.join(""))};plt.Kernel.Struct.prototype.toDisplayedString=plt.Kernel.Struct.prototype.toWrittenString;var d=function(X,Y){X.appendChild(Y)};plt.Kernel.Struct.prototype.toDomNode=function(){var Y=document.createElement("div");Y.appendChild(document.createTextNode("("));Y.appendChild(document.createTextNode(this._constructorName));for(var X=0;X<this._fields.length;X++){Y.appendChild(document.createTextNode(" "));d(Y,plt.Kernel.toDomNode(this._fields[X]))}Y.appendChild(document.createTextNode(")"));return Y};plt.Kernel.Struct.prototype.isEqual=function(X){if(typeof(X)!="object"){return false}if(!X._constructorName){return false}if(X._constructorName!=this._constructorName){return false}if(!"_fields" in X){return false}if(this._fields.length!=X._fields.length){return false}for(var Y=0;Y<this._fields.length;Y++){if(!plt.Kernel.equal_question_(this._fields[Y],X._fields[Y])){return false}}return true};plt.Kernel.reportError=function(Y){var X;if(typeof(console)!="undefined"&&typeof(console.log)!="undefined"){X=(function(Z){console.log(Z)})}else{X=(function(Z){alert(Z)})}if(typeof Y=="string"){X(Y)}else{if(Y.msg){X(Y.msg)}else{X(Y.toString())}}if(plt.Kernel.lastLoc){X("Error was raised around "+plt.Kernel.lastLoc)}};plt.Kernel._void_=function(X){return undefined};plt.Kernel.build_dash_vector=function(aa,Y){v(aa,k,"build-vector","natural",1);v(Y,q,"build-vector","function",2);var Z=[];for(var X=0;X<aa.toInteger();X++){Z[X]=Y([plt.types.Rational.makeInstance(X,1)])}return plt.types.Vector.makeInstance(aa.toInteger(),Z)};plt.Kernel.make_dash_vector=function(X){v(X,k,"make-vector","natural",1);return plt.types.Vector.makeInstance(X.toInteger())};plt.Kernel.vector=function(X){return plt.types.Vector.makeInstance(X.length,X)};plt.Kernel.vector_dash_length=function(X){v(X,c,"vector-length","vector",1);return plt.types.Rational.makeInstance(X.length())};plt.Kernel.vector_dash_ref=function(Y,X){v(Y,c,"vector-ref","vector",1);v(X,function(Z){return k(Z)&&Z.toInteger()<Y.length()},"vector-ref","natural < vector length",2);return Y.ref(X.toInteger())};plt.Kernel.vector_dash_set_bang_=function(Z,Y,X){v(Z,c,"vector-set!","vector",1);v(Y,function(aa){return k(aa)&&aa.toInteger()<Z.length()},"vector-set!","natural < vector length",2);return Z.set(Y.toInteger(),X)};plt.Kernel.vector_question_=function(X){return c(X)?plt.types.Logic.TRUE:plt.types.Logic.FALSE};plt.Kernel.check_dash_expect=function(Z,X){var aa=Z([]);var Y=X([]);if(!plt.Kernel.equal_question_(aa,Y)){throw new P(plt.Kernel.format("~s doesn't match the expected value ~s",[aa,Y]))}};plt.Kernel.check_dash_within=function(ab,Y,aa){var ac=ab([]);var Z=Y([]);var X=aa([]);if(!plt.Kernel._equal__tilde_(ac,Z,X)){throw new P(plt.Kernel.format("~s doesn't match the expected value ~s within ~s",[ac,Z,X]))}};plt.Kernel.check_dash_error=function(X,Z){var ab=Z([]);var aa;try{aa=X([])}catch(Y){if(!plt.Kernel.equal_question_(Y.msg,ab)){throw new P(plt.Kernel.format("check-error encountered the error ~s instead of the expected error ~s.",[Y.msg,ab]))}else{return}}throw new P(plt.Kernel.format("check-error expected the error ~s, but instead received the value ~s.",[ab,aa]))};plt.Kernel.lastLoc=undefined;plt.Kernel.setLastLoc=function(X){plt.Kernel.lastLoc=X;return true};plt.Kernel.printf=function(X,Y){var Z=plt.Kernel.format(X,Y);plt.Kernel.printHook(Z);return undefined};plt.Kernel.printHook=function(X){};plt.Kernel.isSymbol=i;plt.Kernel.isChar=o;plt.Kernel.isString=h;plt.Kernel.isBoolean=E;plt.Kernel.isPair=R;plt.Kernel.isEmpty=r;plt.Kernel.isReal=T;plt.Kernel.isRational=C;plt.Kernel.isComplex=D;plt.Kernel.isInteger=m;plt.Kernel.isNatural=k;plt.Kernel.isNumber=U;plt.Kernel.isAlphabeticString=s;plt.Kernel.isWhitespaceString=J;plt.Kernel.isList=b;plt.Kernel.isVector=c;plt.Kernel.isFunction=q;plt.Kernel.arrayEach=g;plt.Kernel.check=v;plt.Kernel.checkList=G;plt.Kernel.checkListof=Q;plt.Kernel.MobyError=w;plt.Kernel.MobyParserError=V;plt.Kernel.MobySyntaxError=L;plt.Kernel.MobyTypeError=F;plt.Kernel.MobyRuntimeError=B;plt.Kernel.attachEvent=f;plt.Kernel.detachEvent=p})();var plt=plt||{};plt.reader={};(function(){var d=function(g){return g.replace(/\\./g,function(i,j,h){switch(i){case"\\b":return"\b";case"\\f":return"\f";case"\\n":return"\n";case"\\r":return"\r";case"\\t":return"\t";case"\\v":return"\v";default:return i.substring(1)}})};var b=function(h){var g;var j=0;for(g=0;g<h.length;g++){if(h[g]=="\n"){j++}}return j};var c=[["whitespace",/^(\s+)/],["#;",/^([#][;])/],["comment",new RegExp("^([#][|](?:(?:\\|[^\\#])|[^\\|])*[|][#])")],["comment",/(^;[^\n]*)/],["(",/^($|\[|\{)/],[")",/^($|\]|\})/],["'",/^(\')/],["`",/^(`)/],[",@",/^(,@)/],[",",/^(,)/],["char",/^\#\\(newline|backspace)/],["char",/^\#\\(.)/],["complex",/^((?:\#[ei])?[+\-]?(?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+)?[+\-](?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+)i)/],["number",/^((?:\#[ei])?[+-]inf.0)/],["number",/^((?:\#[ei])?[+-]nan.0)/],["number",/^((?:\#[ei])?[+\-]?(?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+))/],["string",new RegExp('^"((?:([^\\\\"]|(\\\\.)))*)"')],["symbol",/^([a-zA-Z\:\+\=\~\_\?\!\@\#\$\%\^\&\*\-\/\.\>\<][\w\:\+\=\~\_\?\!\@\#\$\%\^\&\*\-\/\.\>\<]*)/]];var f=function(p,g){var h=0;var q=1;var n=[];if(!g){g=""}while(true){var l=false;for(var j=0;j<c.length;j++){var k=c[j][0];var m=c[j][1];var o=p.match(m);if(o!=null){if(k=="string"){o[1]=d(o[1])}if(k!="whitespace"&&k!="comment"){n.push([k,o[1],new Loc(h,q,o[0].length,g)])}h=h+o[0].length;q=q+b(o[0]);p=p.substring(o[0].length);l=true;break}}if(!l){break}}return[n,p]};var e=function(u,y){var x=make_dash_stx_colon_list;var A=make_dash_stx_colon_atom;var h=f(u,y);var v=h[0];var z=undefined;if(h[1].length>0){throw new plt.Kernel.MobyParserError("Error while tokenizing: the rest of the stream is: "+h[1],new Loc(u.length-h[1].length,b(u.substring(0,u.length-h[1].length)),h[1].length,y))}var q=plt.types.Symbol.makeInstance("quote");var g=plt.types.Symbol.makeInstance("quasiquote");var w=plt.types.Symbol.makeInstance("unquote");var i=plt.types.Symbol.makeInstance("unquote-splicing");var n=plt.types.Empty.EMPTY;var k=function(s){return(v.length>0&&v[0][0]==s)};var o=function(B){if(v.length==0){if(z){throw new plt.Kernel.MobyParserError("token stream exhausted while trying to eat "+B,z[2])}else{throw new plt.Kernel.MobyParserError("token stream exhausted while trying to eat "+B,new Loc(0,0,u.length,y))}}var s=v.shift();z=s;if(s[0]==B){return s}else{throw new plt.Kernel.MobyParserError("Unexpected token "+s,s[2])}};var m;var r;var j;j=function(B,D){var s=o(B);var C=m();return x(plt.Kernel.cons(A(D,s[2]),plt.Kernel.cons(C,n)),new Loc(s[2].offset,s[2].line,(C.loc.offset-s[2].offset+C.loc.span),""))};var l=function(s){switch(s){case"(":return")";case"[":return"]";case"{":return"}";default:throw new Error()}};var t=function(D,C){var B=D.match(/([+\-]?\d+)\/(\d+)/);if(D=="+inf.0"){return plt.types.FloatPoint.makeInstance(Number.POSITIVE_INFINITY)}else{if(D=="-inf.0"){return plt.types.FloatPoint.makeInstance(Number.NEGATIVE_INFINITY)}else{if(D=="+nan.0"||D=="-nan.0"){return plt.types.FloatPoint.makeInstance(Number.NaN)}else{if(D.match(/\./)){if(C){var s=D.match("^(.*)[.](.*)$");return plt.types.NumberTower.add(plt.types.Rational.makeInstance(parseInt(s[1]||"0")),plt.types.Rational.makeInstance(parseInt(s[2]),Math.pow(10,s[2].length)))}else{return plt.types.FloatPoint.makeInstance(parseFloat(D))}}else{if(B){if(C){return plt.types.Rational.makeInstance(parseInt(B[1]),parseInt(B[2]))}else{return plt.types.FloatPoint.makeInstance(parseInt(B[1])/parseInt(B[2]))}}else{if(C){return plt.types.Rational.makeInstance(parseInt(D),1)}else{return plt.types.FloatPoint.makeInstance(parseInt(D))}}}}}}};m=function(){if(v.length==0){if(z){throw new plt.Kernel.MobyParserError("Parse broke with empty token stream",z[2])}else{throw new plt.Kernel.MobyParserError("Parse broke with empty token stream",new Loc(0,0,u.length,y))}}switch(v[0][0]){case"(":var L=o("(");var H=L[1];var F=l(L[1]);var N=r();if(v.length==0){throw new plt.Kernel.MobyParserError("Expected a "+F+" to close "+H,L[2])}else{if(v[0][1]!=F){throw new plt.Kernel.MobyParserError("Expected a "+F+" to close "+H,v[0][2])}}var J=o(")");return make_dash_stx_colon_list(N,new Loc(L[2].offset,L[2].line,J[2].offset-L[2].offset+1,""));case"#;":var E=o("#;");var D=m();return m();case"'":return j("'",q);case"`":return j("`",g);case",":return j(",",w);case",@":return j(",@",i);case"number":var M=o("number");var K=M[1].match(/^(\#[ie])(.+)$/);if(K){if(K[1]=="#i"){return A(t(K[2],false),M[2])}else{return A(t(K[2],true),M[2])}}else{return A(t(M[1],true),M[2])}case"complex":var M=o("complex");var C=M[1].match(/^((?:\#[ei])?)([+\-]?(?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+)?)([+\-](?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+))i/);var B=(C[1]=="#i"?false:true);var I=(C[2]!=""?t(C[2],B):plt.types.Rational.ZERO);var G=t(C[3],B);var s=A(plt.types.Complex.makeInstance(I,G));return s;case"string":var M=o("string");return A(plt.types.String.makeInstance(M[1]),M[2]);case"char":var M=o("char");if(M[1]=="newline"){return A(plt.types.Char.makeInstance("\n"),M[2])}else{if(M[1]=="backspace"){return A(plt.types.Char.makeInstance(String.fromCharCode(8)),M[2])}else{return A(plt.types.Char.makeInstance(M[1]),M[2])}}case"symbol":var M=o("symbol");if(M[1]=="."){throw new plt.Kernel.MobyParserError("Dotted pairs are not currently accepted by Moby",M[2])}return A(plt.types.Symbol.makeInstance(M[1]),M[2]);default:throw new plt.Kernel.MobyParserError("Parse broke with token stream "+v,v[0][2])}};r=function(){var s=plt.types.Empty.EMPTY;while(true){if(v.length==0||k(")")){break}else{if(k("#;")){o("#;");var B=m()}else{var C=m();s=plt.types.Cons.makeInstance(C,s)}}}return plt.Kernel.reverse(s)};var p=r();if(v.length>0){throw new plt.Kernel.MobyParserError("More elements in the program's token stream than expected: the next unconsumed token is: "+v[0][1],v[0][2])}return p};plt.reader.tokenize=f;plt.reader.readSchemeExpressions=e}());var stx_colon_atom=function(b,c){plt.Kernel.Struct.call(this,"make-stx:atom",[b,c]);this.datum=b;this.loc=c};stx_colon_atom.prototype=new plt.Kernel.Struct();var make_dash_stx_colon_atom=function(d,b){var c=new stx_colon_atom(d,b);return c};var stx_colon_atom_dash_datum=function(b){if(stx_colon_atom_question_(b)){return b.datum}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("stx_colon_atom_dash_datum: not a stx:atom: ~s",[b]))}};var stx_colon_atom_dash_loc=function(b){if(stx_colon_atom_question_(b)){return b.loc}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("stx_colon_atom_dash_loc: not a stx:atom: ~s",[b]))}};var set_dash_stx_colon_atom_dash_datum_bang_=function(c,b){if(stx_colon_atom_question_(c)){c.datum=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_stx_colon_atom_dash_datum_bang_: not a stx:atom: ~s",[c]))}};var set_dash_stx_colon_atom_dash_loc_bang_=function(c,b){if(stx_colon_atom_question_(c)){c.loc=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_stx_colon_atom_dash_loc_bang_: not a stx:atom: ~s",[c]))}};var stx_colon_atom_question_=function(b){return(b!=null&&b!=undefined&&b instanceof stx_colon_atom)};var stx_colon_list=function(b,c){plt.Kernel.Struct.call(this,"make-stx:list",[b,c]);this.elts=b;this.loc=c};stx_colon_list.prototype=new plt.Kernel.Struct();var make_dash_stx_colon_list=function(c,b){return new stx_colon_list(c,b)};var stx_colon_list_dash_elts=function(b){if(stx_colon_list_question_(b)){return b.elts}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("stx_colon_list_dash_elts: not a stx:list: ~s",[b]))}};var stx_colon_list_dash_loc=function(b){if(stx_colon_list_question_(b)){return b.loc}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("stx_colon_list_dash_loc: not a stx:list: ~s",[b]))}};var set_dash_stx_colon_list_dash_elts_bang_=function(c,b){if(stx_colon_list_question_(c)){c.elts=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_stx_colon_list_dash_elts_bang_: not a stx:list: ~s",[c]))}};var set_dash_stx_colon_list_dash_loc_bang_=function(c,b){if(stx_colon_list_question_(c)){c.loc=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_stx_colon_list_dash_loc_bang_: not a stx:list: ~s",[c]))}};var stx_colon_list_question_=function(b){return b!=null&&b!=undefined&&b instanceof stx_colon_list};var Loc=function(d,b,c,e){plt.Kernel.Struct.call(this,"make-Loc",[d,b,c,e]);this.offset=d;this.line=b;this.span=c;this.id=e};Loc.prototype=new plt.Kernel.Struct();var make_dash_Loc=function(e,d,c,b){return new Loc(e,d,c,b)};var Loc_dash_offset=function(b){if(Loc_question_(b)){return b.offset}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("Loc_dash_offset: not a Loc: ~s",[b]))}};var Loc_dash_line=function(b){if(Loc_question_(b)){return b.line}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("Loc_dash_line: not a Loc: ~s",[b]))}};var Loc_dash_span=function(b){if(Loc_question_(b)){return b.span}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("Loc_dash_span: not a Loc: ~s",[b]))}};var Loc_dash_id=function(b){if(Loc_question_(b)){return b.id}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("Loc_dash_id: not a Loc: ~s",[b]))}};var set_dash_Loc_dash_offset_bang_=function(c,b){if(Loc_question_(c)){c.offset=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_Loc_dash_offset_bang_: not a Loc: ~s",[c]))}};var set_dash_Loc_dash_line_bang_=function(c,b){if(Loc_question_(c)){c.line=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_Loc_dash_line_bang_: not a Loc: ~s",[c]))}};var set_dash_Loc_dash_span_bang_=function(c,b){if(Loc_question_(c)){c.span=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_Loc_dash_span_bang_: not a Loc: ~s",[c]))}};var set_dash_Loc_dash_id_bang_=function(c,b){if(Loc_question_(c)){c.id=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_Loc_dash_id_bang_: not a Loc: ~s",[c]))}};var Loc_question_=function(b){return b!=null&&b!=undefined&&b instanceof Loc};var Loc_dash__greaterthan_string=function(b){return(plt.Kernel.setLastLoc('offset=284 line=14 span=154 id="stx.ss"')&&plt.Kernel.format((plt.types.String.makeInstance("offset=~a line=~a span=~a id=~s")),[(plt.Kernel.setLastLoc('offset=337 line=15 span=18 id="stx.ss"')&&Loc_dash_offset(b)),(plt.Kernel.setLastLoc('offset=367 line=16 span=16 id="stx.ss"')&&Loc_dash_line(b)),(plt.Kernel.setLastLoc('offset=395 line=17 span=16 id="stx.ss"')&&Loc_dash_span(b)),(plt.Kernel.setLastLoc('offset=423 line=18 span=14 id="stx.ss"')&&Loc_dash_id(b))]))};var stx_question_=function(b){return((plt.Kernel.setLastLoc('offset=489 line=23 span=13 id="stx.ss"')&&stx_colon_atom_question_(b))||(plt.Kernel.setLastLoc('offset=509 line=24 span=13 id="stx.ss"')&&stx_colon_list_question_(b)))};var stx_dash_e=function(b){return((plt.Kernel.setLastLoc('offset=635 line=31 span=17 id="stx.ss"')&&stx_colon_atom_question_(b))?(plt.Kernel.setLastLoc('offset=658 line=32 span=22 id="stx.ss"')&&stx_colon_atom_dash_datum(b)):((plt.Kernel.setLastLoc('offset=687 line=33 span=17 id="stx.ss"')&&stx_colon_list_question_(b))?(plt.Kernel.setLastLoc('offset=710 line=34 span=21 id="stx.ss"')&&stx_colon_list_dash_elts(b)):(plt.Kernel.setLastLoc('offset=624 line=30 span=109 id="stx.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=624 line=30 span=109 id=\\"stx.ss\\""'))))))};var stx_dash_loc=function(b){return((plt.Kernel.setLastLoc('offset=797 line=40 span=17 id="stx.ss"')&&stx_colon_atom_question_(b))?(plt.Kernel.setLastLoc('offset=820 line=41 span=20 id="stx.ss"')&&stx_colon_atom_dash_loc(b)):((plt.Kernel.setLastLoc('offset=847 line=42 span=17 id="stx.ss"')&&stx_colon_list_question_(b))?(plt.Kernel.setLastLoc('offset=870 line=43 span=20 id="stx.ss"')&&stx_colon_list_dash_loc(b)):(plt.Kernel.setLastLoc('offset=786 line=39 span=106 id="stx.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=786 line=39 span=106 id=\\"stx.ss\\""'))))))};var stx_dash_begins_dash_with_question_=function(c,b){return((plt.Kernel.setLastLoc('offset=991 line=49 span=17 id="stx.ss"')&&stx_colon_atom_question_(c))?plt.types.Logic.FALSE:((plt.Kernel.setLastLoc('offset=1023 line=51 span=17 id="stx.ss"')&&stx_colon_list_question_(c))?((plt.Kernel.setLastLoc('offset=1051 line=52 span=36 id="stx.ss"')&&plt.Kernel.not((plt.Kernel.setLastLoc('offset=1056 line=52 span=30 id="stx.ss"')&&plt.Kernel.empty_question_((plt.Kernel.setLastLoc('offset=1064 line=52 span=21 id="stx.ss"')&&stx_colon_list_dash_elts(c))))))&&(plt.Kernel.setLastLoc('offset=1098 line=53 span=47 id="stx.ss"')&&plt.Kernel.symbol_question_((plt.Kernel.setLastLoc('offset=1107 line=53 span=37 id="stx.ss"')&&stx_dash_e((plt.Kernel.setLastLoc('offset=1114 line=53 span=29 id="stx.ss"')&&plt.Kernel.first((plt.Kernel.setLastLoc('offset=1121 line=53 span=21 id="stx.ss"')&&stx_colon_list_dash_elts(c))))))))&&(plt.Kernel.setLastLoc('offset=1156 line=54 span=74 id="stx.ss"')&&plt.Kernel.symbol_equal__question_((plt.Kernel.setLastLoc('offset=1166 line=54 span=37 id="stx.ss"')&&stx_dash_e((plt.Kernel.setLastLoc('offset=1173 line=54 span=29 id="stx.ss"')&&plt.Kernel.first((plt.Kernel.setLastLoc('offset=1180 line=54 span=21 id="stx.ss"')&&stx_colon_list_dash_elts(c)))))),b))):(plt.Kernel.setLastLoc('offset=980 line=48 span=253 id="stx.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=980 line=48 span=253 id=\\"stx.ss\\""'))))))};var datum_dash__greaterthan_stx=function(b,c){return((plt.Kernel.setLastLoc('offset=1461 line=65 span=14 id="stx.ss"')&&stx_question_(b))?b:(((plt.Kernel.setLastLoc('offset=1499 line=67 span=15 id="stx.ss"')&&plt.Kernel.pair_question_(b))||(plt.Kernel.setLastLoc('offset=1515 line=67 span=16 id="stx.ss"')&&plt.Kernel.empty_question_(b)))?(plt.Kernel.setLastLoc('offset=1538 line=68 span=89 id="stx.ss"')&&make_dash_stx_colon_list((plt.Kernel.setLastLoc('offset=1553 line=68 span=47 id="stx.ss"')&&plt.Kernel.map(((function(){plt.Kernel.setLastLoc('offset=1558 line=68 span=33 id="stx.ss"');var d=(function(f){var e=f[0];return(plt.Kernel.setLastLoc('offset=1570 line=68 span=20 id="stx.ss"')&&datum_dash__greaterthan_stx(e,c))});d.toWrittenString=function(){return"<function:lambda>"};d.toDisplayedString=d.toWrittenString;return d})()),[b])),c)):(plt.types.Logic.TRUE?(plt.Kernel.setLastLoc('offset=1644 line=71 span=29 id="stx.ss"')&&make_dash_stx_colon_atom(b,c)):(plt.Kernel.setLastLoc('offset=1450 line=64 span=225 id="stx.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=1450 line=64 span=225 id=\\"stx.ss\\""')))))))};var stx_dash__greaterthan_datum=function(b){return((plt.Kernel.setLastLoc('offset=1787 line=84 span=17 id="stx.ss"')&&stx_colon_atom_question_(b))?(plt.Kernel.setLastLoc('offset=1810 line=85 span=22 id="stx.ss"')&&stx_colon_atom_dash_datum(b)):((plt.Kernel.setLastLoc('offset=1839 line=86 span=17 id="stx.ss"')&&stx_colon_list_question_(b))?(plt.Kernel.setLastLoc('offset=1862 line=87 span=38 id="stx.ss"')&&plt.Kernel.map((function(){var c=(function(d){return stx_dash__greaterthan_datum(d[0])});c.toWrittenString=function(){return"<function:stx->datum>"};c.toDisplayedString=function(){return"<function:stx->datum>"};return c})(),[(plt.Kernel.setLastLoc('offset=1878 line=87 span=21 id="stx.ss"')&&stx_colon_list_dash_elts(b))])):(plt.Kernel.setLastLoc('offset=1776 line=83 span=126 id="stx.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=1776 line=83 span=126 id=\\"stx.ss\\""'))))))};(function(){((function(b){}))(arguments[0]||plt.Kernel.identity)})();var plt=plt||{};plt.world=plt.world||{};plt.world.config=plt.world.config||{};(function(){var d=function(i,g){var f={};for(var h in i){f[h]=i[h]}for(var h in g){f[h]=g[h]}return f};var e=function(){this.vals={changeWorld:false,shutdownWorld:false,initialEffect:false,onRedraw:false,onDraw:false,onDrawCss:false,tickDelay:false,onTick:false,onTickEffect:false,onKey:false,onKeyEffect:false,onTilt:false,onTiltEffect:false,onAcceleration:false,onAccelerationEffect:false,onShake:false,onShakeEffect:false,onLocationChange:false,onLocationChangeEffect:false,onAnnounce:false,onAnnounceEffect:false,stopWhen:false,stopWhenEffect:false}};e.prototype.lookup=function(f){plt.Kernel.check(f,plt.Kernel.isString,"WorldConfig.lookup","string",1);if(f in this.vals){return this.vals[f]}else{throw Error("Can't find "+f+" in the configuration")}};e.prototype.updateAll=function(g){var f=new e();f.vals=d(this.vals,g);return f};plt.world.config.WorldConfig=e;plt.world.config.CONFIG=new e();var c=function(){return make_dash_effect_colon_none()};var b=function(h,g){h.toWrittenString=function(){return"("+g+" ...)"};h.toDisplayedString=h.toWrittenString;return h};plt.world.config.Kernel=plt.world.config.Kernel||{};plt.world.config.Kernel.onRedraw=function(g){plt.Kernel.check(g,plt.Kernel.isFunction,"on-redraw","function",1);return b(function(f){return f.updateAll({onRedraw:g})},"on-redraw")};plt.world.config.Kernel.initialEffect=function(f){return b(function(g){return g.updateAll({initialEffect:f})},"initial-effect")};plt.world.config.Kernel.onDraw=function(g,f){plt.Kernel.check(g,plt.Kernel.isFunction,"on-draw","function",1);plt.Kernel.check(f,plt.Kernel.isFunction,"on-draw","function",2);return b(function(h){return h.updateAll({onDraw:g,onDrawCss:f})},"on-draw")};plt.world.config.Kernel.onTick=function(g,h){plt.Kernel.check(g,plt.Kernel.isNumber,"on-tick","number",1);plt.Kernel.check(h,plt.Kernel.isFunction,"on-tick","function",2);return plt.world.config.Kernel.onTick_star_(g,h,function(f){return c()})};plt.world.config.Kernel.onTick_star_=function(f,h,g){plt.Kernel.check(f,plt.Kernel.isNumber,"on-tick*","number",1);plt.Kernel.check(h,plt.Kernel.isFunction,"on-tick*","function",2);plt.Kernel.check(g,plt.Kernel.isFunction,"on-tick*","function",3);return b(function(i){var j={onTick:h,onTickEffect:g,tickDelay:(plt.types.NumberTower.toInteger(plt.types.NumberTower.multiply(plt.types.Rational.makeInstance(1000,1),f)))};return i.updateAll(j)},"on-tick")};plt.world.config.Kernel.onTilt=function(f){plt.Kernel.check(f,plt.Kernel.isFunction,"on-tilt","function",1);return plt.world.config.Kernel.onTilt_star_(f,function(h,g,j,i){return c()})};plt.world.config.Kernel.onTilt_star_=function(g,f){plt.Kernel.check(g,plt.Kernel.isFunction,"on-tilt*","function",1);plt.Kernel.check(f,plt.Kernel.isFunction,"on-tilt*","function",2);return b(function(h){return h.updateAll({onTilt:g,onTiltEffect:f})},"on-tilt")};plt.world.config.Kernel.onAnnounce=function(f){plt.Kernel.check(f,plt.Kernel.isFunction,"on-announce","function",1);return plt.world.config.Kernel.onAnnounce_star_(f,function(g,h,i){return c()})};plt.world.config.Kernel.onAnnounce_star_=function(g,f){plt.Kernel.check(g,plt.Kernel.isFunction,"on-announce*","function",1);plt.Kernel.check(f,plt.Kernel.isFunction,"on-announce*","function",2);return b(function(h){return h.updateAll({onAnnounce:g,onAnnounceEffect:f})},"on-announce")};plt.world.config.Kernel.onAcceleration=function(f){plt.Kernel.check(f,plt.Kernel.isFunction,"on-acceleration","function",1);return plt.world.config.Kernel.onAcceleration_star_(f,function(h,g,j,i){return c()})};plt.world.config.Kernel.onAcceleration_star_=function(g,f){plt.Kernel.check(g,plt.Kernel.isFunction,"on-acceleration*","function",1);plt.Kernel.check(f,plt.Kernel.isFunction,"on-acceleration*","function",2);return b(function(h){return h.updateAll({onAcceleration:g,onAccelerationEffect:f})},"on-acceleration")};plt.world.config.Kernel.onShake=function(f){plt.Kernel.check(f,plt.Kernel.isFunction,"on-shake","function",1);return plt.world.config.Kernel.onShake_star_(f,function(h,g,j,i){return c()})};plt.world.config.Kernel.onShake_star_=function(g,f){plt.Kernel.check(g,plt.Kernel.isFunction,"on-shake*","function",1);plt.Kernel.check(f,plt.Kernel.isFunction,"on-shake*","function",2);return b(function(h){return h.updateAll({onShake:g,onShakeEffect:f})},"on-shake")};plt.world.config.Kernel.onKey=function(f){plt.Kernel.check(f,plt.Kernel.isFunction,"on-key","function",1);return plt.world.config.Kernel.onKey_star_(f,function(g,h){return c()})};plt.world.config.Kernel.onKey_star_=function(g,f){plt.Kernel.check(g,plt.Kernel.isFunction,"on-key*","function",1);plt.Kernel.check(f,plt.Kernel.isFunction,"on-key*","function",2);return b(function(h){return h.updateAll({onKey:g,onKeyEffect:f})},"on-key")};plt.world.config.Kernel.onLocationChange=function(f){plt.Kernel.check(f,plt.Kernel.isFunction,"on-location-change","function",1);return plt.world.config.Kernel.onLocationChange_star_(f,function(g,i,h){return c()})};plt.world.config.Kernel.onLocationChange_star_=function(g,f){plt.Kernel.check(g,plt.Kernel.isFunction,"on-location-change*","function",1);plt.Kernel.check(f,plt.Kernel.isFunction,"on-location-change*","function",2);return b(function(h){return h.updateAll({onLocationChange:g,onLocationChangeEffect:f})},"on-location-change")};plt.world.config.Kernel.stopWhen=function(f){plt.Kernel.check(f,plt.Kernel.isFunction,"stop-when","function",1);return plt.world.config.Kernel.stopWhen_star_(f,function(g){return c()})};plt.world.config.Kernel.stopWhen_star_=function(g,f){plt.Kernel.check(g,plt.Kernel.isFunction,"stop-when*","function",1);plt.Kernel.check(f,plt.Kernel.isFunction,"stop-when*","function",2);return b(function(h){return h.updateAll({stopWhen:g,stopWhenEffect:f})},"stop-when")}})();var plt=plt||{};plt.platform={};(function(){plt.platform.Platform={};var y=false;plt.platform.Platform.getInstance=function(){if(!y){y=new r()}return y};var r=function(){this.tiltService=m;this.shakeService=u();this.locationService=I();this.telephonyService=D();this.networkService=C();this.soundService=G();this.powerService=J();this.smsService=p();this.pickPlaylistService=i()};r.prototype.getTiltService=function(){return this.tiltService};r.prototype.getShakeService=function(){return this.shakeService};r.prototype.getLocationService=function(){return this.locationService};r.prototype.getTelephonyService=function(){return this.telephonyService};r.prototype.getNetworkService=function(){return this.networkService};r.prototype.getSoundService=function(){return this.soundService};r.prototype.getPowerService=function(){return this.powerService};r.prototype.getSmsService=function(){return this.smsService};r.prototype.getPickPlaylistService=function(){return this.pickPlaylistService};var I=function(){if(N()){return new l()}else{if(f()){return new x()}else{if(n()){return new k()}else{return new b()}}}};var N=function(){return(typeof Device!="undefined")};var f=function(){return(window.google&&window.google.gears&&true)};var n=function(){return(typeof(navigator)!="undefined"&&typeof(navigator.geolocation)!="undefined")};var K=function(W,V,U,T){var S=function(X){return X*Math.PI/180};var R=function(X,Y){return Math.pow(Math.sin((S(X)-S(Y))/2),2)};return 6378000*2*Math.asin(Math.min(1,Math.sqrt(R(W,U)+(Math.cos(S(W))*Math.cos(S(U))*R(V,T)))))};var x=function(){this.geo=google.gears.factory.create("beta.geolocation");this.listeners=[];this.currentPosition={latitude:0,longitude:0,altitude:0,bearing:0,speed:0};this.watchId=false};x.prototype.startService=function(){var R=this;function S(T){R.currentPosition.latitude=T.latitude;R.currentPosition.longitude=T.longitude;R.currentPosition.altitude=T.altitude;for(var U=0;U<R.listeners.length;U++){R.listeners[U](T.latitude,T.longitude)}}this.watchId=this.geo.watchPosition(S)};x.prototype.shutdownService=function(){this.geo.clearWatch(this.watchId)};x.prototype.addLocationChangeListener=function(R){this.listeners.push(R)};x.prototype.getLatitude=function(){return plt.types.FloatPoint.makeInstance(this.currentPosition.latitude)};x.prototype.getLongitude=function(){return plt.types.FloatPoint.makeInstance(this.currentPosition.longitude)};x.prototype.getAltitude=function(){return plt.types.FloatPoint.makeInstance(this.currentPosition.altitude)};x.prototype.getBearing=function(){return plt.types.FloatPoint.makeInstance(this.currentPosition.bearing)};x.prototype.getSpeed=function(){return plt.types.FloatPoint.makeInstance(this.currentPosition.speed)};x.prototype.getDistanceBetween=function(U,T,S,R){return plt.types.FloatPoint.makeInstance(K(U.toFloat(),T.toFloat(),S.toFloat(),R.toFloat()))};var b=function(){};b.prototype.startService=function(){};b.prototype.shutdownService=function(){};b.prototype.addLocationChangeListener=function(R){};b.prototype.getLatitude=function(){return plt.types.Rational.ZERO};b.prototype.getLongitude=function(){return plt.types.Rational.ZERO};b.prototype.getAltitude=function(){return plt.types.Rational.ZERO};b.prototype.getBearing=function(){return plt.types.Rational.ZERO};b.prototype.getSpeed=function(){return plt.types.Rational.ZERO};b.prototype.getDistanceBetween=function(U,T,S,R){return plt.types.FloatPoint.makeInstance(K(U.toFloat(),T.toFloat(),S.toFloat(),R.toFloat()))};var l=function(){this.locationListeners=[];this.currentPosition={latitude:0,longitude:0,atttitude:0,bearing:0,speed:0};this.watchId=false};l.prototype.startService=function(){var S=this;var R=function(V){S.currentPosition.latitude=parseFloat(V.latitude);S.currentPosition.longitude=parseFloat(V.longitude);for(var T=0;T<S.locationListeners.length;T++){var U=S.locationListeners[T];U(S.currentPosition.latitude,S.currentPosition.longitude)}};this.watchId=navigator.geolocation.watchPosition(R,function(){},{})};l.prototype.shutdownService=function(){navigator.geolocation.clearWatch(this.watchId)};l.prototype.addLocationChangeListener=function(R){this.locationListeners.push(R)};l.prototype.getLatitude=function(){return plt.types.FloatPoint.makeInstance(navigator.geolocation.lastPosition.latitude)};l.prototype.getLongitude=function(){return plt.types.FloatPoint.makeInstance(navigator.geolocation.lastPosition.longitude)};l.prototype.getAltitude=function(){return plt.types.Rational.ZERO};l.prototype.getBearing=function(){return plt.types.Rational.ZERO};l.prototype.getSpeed=function(){return plt.types.Rational.ZERO};l.prototype.getDistanceBetween=function(U,T,S,R){return plt.types.FloatPoint.makeInstance(navigator.geolocation.getDistanceBetween(U.toFloat(),T.toFloat(),S.toFloat(),R.toFloat()))};var k=function(){this.locationListeners=[];this.currentPosition={latitude:0,longitude:0,atttitude:0,bearing:0,speed:0};this.watchId=false};k.prototype.startService=function(){var T=this;var R=function(W){T.currentPosition.latitude=W.coords.latitude;T.currentPosition.longitude=W.coords.longitude;for(var U=0;U<T.locationListeners.length;U++){var V=T.locationListeners[U];V(W.coords.latitude,W.coords.longitude)}};var S=function(){};if(typeof navigator.geolocation!="undefined"&&typeof navigator.geolocation.getCurrentPosition!="undefined"){navigator.geolocation.watchPosition(R)}setTimeout(function(){navigator.geolocation.getCurrentPosition(R)},10000)};k.prototype.shutdownService=function(){if(this.watchId){navigator.geolocation.clearWatch(this.watchId);this.watchId=false}};k.prototype.addLocationChangeListener=function(R){this.locationListeners.push(R)};k.prototype.getLatitude=function(){return plt.types.FloatPoint.makeInstance(this.currentPosition.latitude)};k.prototype.getLongitude=function(){return plt.types.FloatPOint.makeInstance(this.currentPosition.longitude)};k.prototype.getAltitude=function(){return plt.types.FloatPoint.makeInstance(this.currentPosition.altitude)};k.prototype.getBearing=function(){return plt.types.FloatPoint.makeInstance(this.currentPosition.bearing)};k.prototype.getSpeed=function(){return plt.types.FloatPoint.makeInstance(this.currentPosition.speed)};k.prototype.getDistanceBetween=function(U,T,S,R){return plt.types.FloatPoint.makeInstance(K(U.toFloat(),T.toFloat(),S.toFloat(),R.toFloat()))};var j=[];var s=[];var q;var t;var F;var g=function(S){for(var R=0;R<j.length;R++){j[R](parseFloat(S.x),parseFloat(S.y),parseFloat(S.z))}};var z=function(R){for(var S=0;S<s.length;S++){s[S](parseFloat(R.azimuth),parseFloat(R.pitch),parseFloat(R.roll))}};var m={startService:function(){if(typeof Accelerometer!="undefined"){q=navigator.accelerometer.watchAcceleration(g,function(){});t=navigator.accelerometer.watchOrientation(z,function(){})}},shutdownService:function(){if(typeof Accelerometer!="undefined"){navigator.accelerometer.clearWatch(q);navigator.accelerometer.clearWatch(t);navigator.accelerometer.stopAllShakeWatches()}},addOrientationChangeListener:function(R){s.push(R)},addAccelerationChangeListener:function(R){j.push(R)}};var D=function(){if(N()){return new e()}else{return new A()}};var A=function(){};A.prototype.getSignalStrengths=function(){return plt.types.Empty.EMPTY};var e=function(){};e.prototype.getSignalStrengths=function(){var R=plt.types.Empty.EMPTY;var U=Device.getSignalStrengths();for(var S=0;S<U.length;S++){var T=U.get(S);R=plt.types.Cons.makeInstance(plt.Kernel.list([toNum(T.getId()),toNum(T.getStrength())]),R)}return R};var u=function(){if(N()){return new B()}else{return new H()}};var B=function(){this.listeners=[]};B.prototype.startService=function(){var S=this;var T=function(){for(var U=0;U<S.listeners.length;U++){S.listeners[U]()}};var R=function(){};this.shakeId=navigator.accelerometer.watchShake(T,R)};B.prototype.shutdownService=function(){navigator.accelerometer.stopAllShakeWatches()};B.prototype.addListener=function(R){this.listeners.push(R)};var H=function(){};H.prototype.startService=function(){};H.prototype.shutdownService=function(){};H.prototype.addListener=function(R){};var C=function(){if(N()){return new M()}else{return new Q()}};var M=function(){};M.prototype.getUrl=function(S){var R=Device.getUrl(S);return plt.types.String.makeInstance(""+R)};var Q=function(){};Q.prototype.getUrl=function(S){var T=new XMLHttpRequest();var R="/networkProxy?url="+encodeURIComponent(S);T.open("GET",R,false);T.send(null);return plt.types.String.makeInstance(T.responseText)};var G=function(){if(N()){return new P()}else{if(h()){return new d()}else{return new L()}}};var h=function(){return !!(document.createElement("audio").canPlayType)};var P=function(){};P.prototype.beep=function(){navigator.notification.beep(1)};P.prototype.playPlaylist=function(R){Device.playPlaylistRecord(R)};P.prototype.pausePlaylist=function(R){Device.pausePlaylistRecord(R)};P.prototype.stopPlaylist=function(R){Device.stopPlaylistRecord(R)};P.prototype.playSoundUrl=function(R){navigator.audio.playMusic(R)};P.prototype.playDtmfTone=function(S,R){navigator.audio.playDTMF(S);setTimeout(function(){navigator.audio.stopDTMF()},R)};P.prototype.stopSoundUrl=function(R){navigator.audio.stopMusic(R)};P.prototype.pauseSoundUrl=function(R){navigator.audio.pauseMusic(R)};P.prototype.setVolume=function(R){navigator.audio.setMusicVolume(R)};P.prototype.raiseVolume=function(){navigator.audio.increaseMusicVolume()};P.prototype.lowerVolume=function(){navigator.audio.decreaseMusicVolume()};var d=function(){this.cachedUrls={};this.baseVolume=100};d.prototype.beep=function(){alert("Beep")};d.prototype.playPlaylistSound=function(R){};d.prototype.pausePlaylistSound=function(R){};d.prototype.stopPlaylistSound=function(R){};d.prototype.playSoundUrl=function(R){if(!this.cachedUrls[R]){this.cachedUrls[R]=new Audio(R)}var S=this.cachedUrls[R];if(S.ended||S.paused){this.cachedUrls[R].play()}};d.prototype.playDtmfTone=function(S,R){alert("dtmf tone")};d.prototype.stopSoundUrl=function(R){if(this.cachedUrls[R]){this.cachedUrls[R].pause();this.cachedUrls[R].currentTime=0}};d.prototype.pauseSoundUrl=function(R){if(this.cachedUrls[R]){this.cachedUrls[R].pause()}};d.prototype.setVolume=function(S){for(var R in this.cachedUrls){this.cachedUrls[R].volume=S/100}this.baseVolume=S};d.prototype.raiseVolume=function(){this.setVolume(Math.min(this.baseVolume+5,100))};d.prototype.lowerVolume=function(){this.setVolume(Math.max(this.baseVolume-5,0))};var L=function(){};L.prototype.beep=function(){alert("Beep")};L.prototype.playPlaylistSound=function(R){};L.prototype.pausePlaylistSound=function(R){};L.prototype.stopPlaylistSound=function(R){};L.prototype.playSoundUrl=function(R){alert("sound url "+R)};L.prototype.playDtmfTone=function(S,R){alert("dtmf tone")};L.prototype.stopSoundUrl=function(R){};L.prototype.pauseSoundUrl=function(R){};L.prototype.setVolume=function(R){};L.prototype.raiseVolume=function(){};L.prototype.lowerVolume=function(){};var J=function(){if(N()){return new c()}else{return new O()}};var c=function(){this.currentLockFlags=-1};c.prototype.setWakeLock=function(R){if(R!=this.currentLockFlags){navigator.power.setWakeLock(R);this.currentLockFlags=R}};c.prototype.releaseWakeLock=function(){if(this.currentLockFlags!=-1){navigator.power.releaseWakeLock();this.currentLockFlags=-1}};var O=function(){};O.prototype.setWakeLock=function(R){};O.prototype.releaseWakeLock=function(){};var p=function(){if(N()){return new E()}else{return new w()}};var E=function(){};E.prototype.send=function(R,S){navigator.sms.send(R,S)};var w=function(){};w.prototype.send=function(R,S){alert("SMS should be sent to "+R+" with the content: "+S)};var i=function(){if(N()){return new v()}else{return new o()}};var v=function(){};v.prototype.pickPlaylist=function(S){var R=function(T){S(T)};navigator.dialogPickers.pickPlaylist(R)};var o=function(){};o.prototype.pickPlaylist=function(R){alert("pick playlist currently unavailable")}})();var plt=plt||{};plt.lib={};(function(){plt.lib.Telephony={};plt.lib.Telephony.getSignalStrengths=function(){return plt.platform.Platform.getInstance().getTelephonyService().getSignalStrengths()};plt.lib.Location={};plt.lib.Location.getLatitude=function(){return plt.platform.Platform.getInstance().getLocationService().getLatitude()};plt.lib.Location.getLongitude=function(){return plt.platform.Platform.getInstance().getLocationService().getLongitude()};plt.lib.Location.getAttitude=function(){return plt.platform.Platform.getInstance().getLocationService().getAttitude()};plt.lib.Location.getBearing=function(){return plt.platform.Platform.getInstance().getLocationService().getBearing()};plt.lib.Location.getSpeed=function(){return plt.platform.Platform.getInstance().getLocationService().getSpeed()};plt.lib.Location.getDistanceBetween=function(e,d,c,b){return plt.platform.Platform.getInstance().getLocationService().getDistanceBetween(e,d,c,b)};plt.lib.Net={};plt.lib.Net.getUrl=function(b){return plt.platform.Platform.getInstance().getNetworkService().getUrl(b)}}());var effect_colon_none=function(){plt.Kernel.Struct.call(this,"make-effect:none",[])};effect_colon_none.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_none=function(){return new effect_colon_none()};var effect_colon_none_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_none};var effect_colon_beep=function(){plt.Kernel.Struct.call(this,"make-effect:beep",[])};effect_colon_beep.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_beep=function(){return new effect_colon_beep()};var effect_colon_beep_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_beep};var effect_colon_play_dash_dtmf_dash_tone=function(c,b){plt.Kernel.Struct.call(this,"make-effect:play-dtmf-tone",[c,b]);this.tone=c;this.duration=b};effect_colon_play_dash_dtmf_dash_tone.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_play_dash_dtmf_dash_tone=function(c,b){return new effect_colon_play_dash_dtmf_dash_tone(c,b)};var effect_colon_play_dash_dtmf_dash_tone_dash_tone=function(b){if(effect_colon_play_dash_dtmf_dash_tone_question_(b)){return b.tone}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:play-dtmf-tone-tone: not a effect:play-dtmf-tone: ~s",[b]))}};var effect_colon_play_dash_dtmf_dash_tone_dash_duration=function(b){if(effect_colon_play_dash_dtmf_dash_tone_question_(b)){return b.duration}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:play-dtmf-tone-duration: not a effect:play-dtmf-tone: ~s",[b]))}};var set_dash_effect_colon_play_dash_dtmf_dash_tone_dash_tone_bang_=function(c,b){if(effect_colon_play_dash_dtmf_dash_tone_question_(c)){c.tone=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_play_dash_dtmf_dash_tone_dash_tone_bang_: not a effect:play-dtmf-tone: ~s",[c]))}};var set_dash_effect_colon_play_dash_dtmf_dash_tone_dash_duration_bang_=function(c,b){if(effect_colon_play_dash_dtmf_dash_tone_question_(c)){c.duration=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_play_dash_dtmf_dash_tone_dash_duration_bang_: not a effect:play-dtmf-tone: ~s",[c]))}};var effect_colon_play_dash_dtmf_dash_tone_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_play_dash_dtmf_dash_tone};var effect_colon_send_dash_sms=function(b,c){plt.Kernel.Struct.call(this,"make-effect:send-sms",[b,c]);this.address=b;this.msg=c};effect_colon_send_dash_sms.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_send_dash_sms=function(c,b){return new effect_colon_send_dash_sms(c,b)};var effect_colon_send_dash_sms_dash_address=function(b){if(effect_colon_send_dash_sms_question_(b)){return b.address}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:send-sms-address: not a effect:send-sms: ~s",[b]))}};var effect_colon_send_dash_sms_dash_msg=function(b){if(effect_colon_send_dash_sms_question_(b)){return b.msg}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:send-sms-msg: not a effect:send-sms: ~s",[b]))}};var set_dash_effect_colon_send_dash_sms_dash_address_bang_=function(c,b){if(effect_colon_send_dash_sms_question_(c)){c.address=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_send_dash_sms_dash_address_bang_: not a effect:send-sms: ~s",[c]))}};var set_dash_effect_colon_send_dash_sms_dash_msg_bang_=function(c,b){if(effect_colon_send_dash_sms_question_(c)){c.msg=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_send_dash_sms_dash_msg_bang_: not a effect:send-sms: ~s",[c]))}};var effect_colon_send_dash_sms_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_send_dash_sms};var playlist_dash_sound=function(b){plt.Kernel.Struct.call(this,"make-playlist-sound",[b]);this.playlist=b};playlist_dash_sound.prototype=new plt.Kernel.Struct();var make_dash_playlist_dash_sound=function(b){return new playlist_dash_sound(b)};var playlist_dash_sound_dash_playlist=function(b){if(playlist_dash_sound_question_(b)){return b.playlist}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("playlist-sound-playlist: not a playlist-sound: ~s",[b]))}};var set_dash_playlist_dash_sound_dash_playlist_bang_=function(c,b){if(playlist_dash_sound_question_(c)){c.playlist=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_playlist_dash_sound_dash_playlist_bang_: not a playlist-sound: ~s",[c]))}};var playlist_dash_sound_question_=function(b){return b!=null&&b!=undefined&&b instanceof playlist_dash_sound};var sound_question_=function(b){return((plt.Kernel.setLastLoc('offset=417 line=19 span=11 id="effect-struct.ss"')&&plt.Kernel.string_question_(b))||(plt.Kernel.setLastLoc('offset=435 line=20 span=19 id="effect-struct.ss"')&&playlist_dash_sound_question_(b)))};var effect_colon_play_dash_sound=function(b){plt.Kernel.Struct.call(this,"make-effect:play-sound",[b]);this.sound=b};effect_colon_play_dash_sound.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_play_dash_sound=function(b){return new effect_colon_play_dash_sound(b)};var effect_colon_play_dash_sound_dash_sound=function(b){if(effect_colon_play_dash_sound_question_(b)){return b.sound}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:play-sound-sound: not a effect:play-sound: ~s",[b]))}};var set_dash_effect_colon_play_dash_sound_dash_sound_bang_=function(c,b){if(effect_colon_play_dash_sound_question_(c)){c.sound=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_play_dash_sound_dash_sound_bang_: not a effect:play-sound: ~s",[c]))}};var effect_colon_play_dash_sound_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_play_dash_sound};var effect_colon_pause_dash_sound=function(b){plt.Kernel.Struct.call(this,"make-effect:pause-sound",[b]);this.sound=b};effect_colon_pause_dash_sound.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_pause_dash_sound=function(b){return new effect_colon_pause_dash_sound(b)};var effect_colon_pause_dash_sound_dash_sound=function(b){if(effect_colon_pause_dash_sound_question_(b)){return b.sound}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:pause-sound-sound: not a effect:pause-sound: ~s",[b]))}};var set_dash_effect_colon_pause_dash_sound_dash_sound_bang_=function(c,b){if(effect_colon_pause_dash_sound_question_(c)){c.sound=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_pause_dash_sound_dash_sound_bang_: not a effect:pause-sound: ~s",[c]))}};var effect_colon_pause_dash_sound_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_pause_dash_sound};var effect_colon_stop_dash_sound=function(b){plt.Kernel.Struct.call(this,"make-effect:stop-sound",[b]);this.sound=b};effect_colon_stop_dash_sound.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_stop_dash_sound=function(b){return new effect_colon_stop_dash_sound(b)};var effect_colon_stop_dash_sound_dash_sound=function(b){if(effect_colon_stop_dash_sound_question_(b)){return b.sound}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:stop-sound-sound: not a effect:stop-sound: ~s",[b]))}};var set_dash_effect_colon_stop_dash_sound_dash_sound_bang_=function(c,b){if(effect_colon_stop_dash_sound_question_(c)){c.sound=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_stop_dash_sound_dash_sound_bang_: not a effect:stop-sound: ~s",[c]))}};var effect_colon_stop_dash_sound_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_stop_dash_sound};var effect_colon_set_dash_sound_dash_volume=function(b){plt.Kernel.Struct.call(this,"make-effect:set-sound-volume",[b]);this.volume=b};effect_colon_set_dash_sound_dash_volume.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_set_dash_sound_dash_volume=function(b){return new effect_colon_set_dash_sound_dash_volume(b)};var effect_colon_set_dash_sound_dash_volume_dash_volume=function(b){if(effect_colon_set_dash_sound_dash_volume_question_(b)){return b.volume}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:set-sound-volume-volume: not a effect:set-sound-volume: ~s",[b]))}};var set_dash_effect_colon_set_dash_sound_dash_volume_dash_volume_bang_=function(c,b){if(effect_colon_set_dash_sound_dash_volume_question_(c)){c.volume=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_set_dash_sound_dash_volume_dash_volume_bang_: not a effect:set-sound-volume: ~s",[c]))}};var effect_colon_set_dash_sound_dash_volume_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_set_dash_sound_dash_volume};var effect_colon_raise_dash_sound_dash_volume=function(){plt.Kernel.Struct.call(this,"make-effect:raise-sound-volume",[])};effect_colon_raise_dash_sound_dash_volume.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_raise_dash_sound_dash_volume=function(){return new effect_colon_raise_dash_sound_dash_volume()};var effect_colon_raise_dash_sound_dash_volume_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_raise_dash_sound_dash_volume};var effect_colon_lower_dash_sound_dash_volume=function(){plt.Kernel.Struct.call(this,"make-effect:lower-sound-volume",[])};effect_colon_lower_dash_sound_dash_volume.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_lower_dash_sound_dash_volume=function(){return new effect_colon_lower_dash_sound_dash_volume()};var effect_colon_lower_dash_sound_dash_volume_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_lower_dash_sound_dash_volume};var effect_colon_set_dash_wake_dash_lock=function(b){plt.Kernel.Struct.call(this,"make-effect:set-wake-lock",[b]);this.locks=b};effect_colon_set_dash_wake_dash_lock.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_set_dash_wake_dash_lock=function(b){return new effect_colon_set_dash_wake_dash_lock(b)};var effect_colon_set_dash_wake_dash_lock_dash_locks=function(b){if(effect_colon_set_dash_wake_dash_lock_question_(b)){return b.locks}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:set-wake-lock-locks: not a effect:set-wake-lock: ~s",[b]))}};var set_dash_effect_colon_set_dash_wake_dash_lock_dash_locks_bang_=function(c,b){if(effect_colon_set_dash_wake_dash_lock_question_(c)){c.locks=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_set_dash_wake_dash_lock_dash_locks_bang_: not a effect:set-wake-lock: ~s",[c]))}};var effect_colon_set_dash_wake_dash_lock_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_set_dash_wake_dash_lock};var effect_colon_release_dash_wake_dash_lock=function(){plt.Kernel.Struct.call(this,"make-effect:release-wake-lock",[])};effect_colon_release_dash_wake_dash_lock.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_release_dash_wake_dash_lock=function(){return new effect_colon_release_dash_wake_dash_lock()};var effect_colon_release_dash_wake_dash_lock_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_release_dash_wake_dash_lock};var effect_colon_pick_dash_playlist=function(b){plt.Kernel.Struct.call(this,"make-effect:pick-playlist",[b]);this.update_dash_f=b};effect_colon_pick_dash_playlist.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_pick_dash_playlist=function(b){return new effect_colon_pick_dash_playlist(b)};var effect_colon_pick_dash_playlist_dash_update_dash_f=function(b){if(effect_colon_pick_dash_playlist_question_(b)){return b.update_dash_f}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:pick-playlist-update-f: not a effect:pick-playlist: ~s",[b]))}};var set_dash_effect_colon_pick_dash_playlist_dash_update_dash_f_bang_=function(c,b){if(effect_colon_pick_dash_playlist_question_(c)){c.update_dash_f=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_pick_dash_playlist_dash_update_dash_f_bang_: not a effect:pick-playlist: ~s",[c]))}};var effect_colon_pick_dash_playlist_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_pick_dash_playlist};var effect_colon_pick_dash_random=function(c,b){plt.Kernel.Struct.call(this,"make-effect:pick-random",[c,b]);this.n=c;this.update_dash_f=b};effect_colon_pick_dash_random.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_pick_dash_random=function(c,b){return new effect_colon_pick_dash_random(c,b)};var effect_colon_pick_dash_random_dash_n=function(b){if(effect_colon_pick_dash_random_question_(b)){return b.n}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:pick-random-n: not a effect:pick-random: ~s",[b]))}};var effect_colon_pick_dash_random_dash_update_dash_f=function(b){if(effect_colon_pick_dash_random_question_(b)){return b.update_dash_f}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:pick-random-update-f: not a effect:pick-random: ~s",[b]))}};var set_dash_effect_colon_pick_dash_random_dash_n_bang_=function(c,b){if(effect_colon_pick_dash_random_question_(c)){c.n=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_pick_dash_random_dash_n_bang_: not a effect:pick-random: ~s",[c]))}};var set_dash_effect_colon_pick_dash_random_dash_update_dash_f_bang_=function(c,b){if(effect_colon_pick_dash_random_question_(c)){c.update_dash_f=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_pick_dash_random_dash_update_dash_f_bang_: not a effect:pick-random: ~s",[c]))}};var effect_colon_pick_dash_random_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_pick_dash_random};var effect_question_=function(b){return((plt.Kernel.setLastLoc('offset=1069 line=43 span=20 id="effect-struct.ss"')&&effect_colon_none_question_(b))||(plt.Kernel.setLastLoc('offset=1096 line=44 span=20 id="effect-struct.ss"')&&effect_colon_beep_question_(b))||(plt.Kernel.setLastLoc('offset=1123 line=45 span=30 id="effect-struct.ss"')&&effect_colon_play_dash_dtmf_dash_tone_question_(b))||(plt.Kernel.setLastLoc('offset=1160 line=46 span=24 id="effect-struct.ss"')&&effect_colon_send_dash_sms_question_(b))||(plt.Kernel.setLastLoc('offset=1191 line=47 span=26 id="effect-struct.ss"')&&effect_colon_play_dash_sound_question_(b))||(plt.Kernel.setLastLoc('offset=1224 line=48 span=27 id="effect-struct.ss"')&&effect_colon_pause_dash_sound_question_(b))||(plt.Kernel.setLastLoc('offset=1258 line=49 span=26 id="effect-struct.ss"')&&effect_colon_stop_dash_sound_question_(b))||(plt.Kernel.setLastLoc('offset=1291 line=50 span=32 id="effect-struct.ss"')&&effect_colon_set_dash_sound_dash_volume_question_(b))||(plt.Kernel.setLastLoc('offset=1330 line=51 span=34 id="effect-struct.ss"')&&effect_colon_raise_dash_sound_dash_volume_question_(b))||(plt.Kernel.setLastLoc('offset=1371 line=52 span=34 id="effect-struct.ss"')&&effect_colon_lower_dash_sound_dash_volume_question_(b))||(plt.Kernel.setLastLoc('offset=1412 line=53 span=29 id="effect-struct.ss"')&&effect_colon_set_dash_wake_dash_lock_question_(b))||(plt.Kernel.setLastLoc('offset=1448 line=54 span=33 id="effect-struct.ss"')&&effect_colon_release_dash_wake_dash_lock_question_(b))||(plt.Kernel.setLastLoc('offset=1488 line=55 span=29 id="effect-struct.ss"')&&effect_colon_pick_dash_playlist_question_(b))||(plt.Kernel.setLastLoc('offset=1524 line=56 span=27 id="effect-struct.ss"')&&effect_colon_pick_dash_random_question_(b)))};(function(){((function(b){}))(arguments[0]||plt.Kernel.identity)})();var plt=plt||{};plt.world=plt.world||{};plt.world.Kernel=plt.world.Kernel||{};(function(){var p;var w=[];var e;var o=false;var q=function(C){var B=function(){};B.prototype=C;return new B()};var v=[];plt.world.Kernel.addAnnounceListener=function(B){v.push(B)};plt.world.Kernel.removeAnnounceListener=function(C){var B=v.indexOf(C);if(B!=-1){v.splice(B,1)}};plt.world.Kernel.announce=function(B,D){for(var C=0;C<v.length;C++){try{v[C](B,D)}catch(E){}}};var t=function(B){p=B;g()};plt.world.Kernel.updateWorld=function(C){var B=C(p);t(B)};plt.world.Kernel.shutdownWorld=function(){e=true};var g=function(){var B;for(B=0;B<w.length;B++){w[B](p)}};var z=function(B){w.push(B)};var i=function(D){var B=D.charCode||D.keyCode;var C;if(B==37){C="left"}else{if(B==38){C="up"}else{if(B==39){C="right"}else{if(B==40){C="down"}else{C=String.fromCharCode(B)}}}}return C};var h=function(){if(o){clearInterval(o);o=false}e=false;w=[]};var x=function(C,B){if(window.document.getElementById("canvas")!=undefined){return window}var D=window.open("big-bang.html","big-bang");if(D==null){throw new Error("Error: Not allowed to create a new window.")}return D};plt.world.Kernel.bigBang=function(C,I,B,F){plt.Kernel.check(C,plt.Kernel.isNumber,"big-bang","number",1);plt.Kernel.check(I,plt.Kernel.isNumber,"big-bang","number",2);plt.Kernel.arrayEach(args,function(K,L){plt.Kernel.check(K,plt.Kernel.isFunction,"big-bang","handler",L+4)});var G;var H=x(C,I);var D=H.document.getElementById("canvas");D.width=C.toInteger();D.height=I.toInteger();h();var E=new plt.world.config.WorldConfig();for(G=0;G<F.length;G++){E=F[G](E)}E=E.updateAll({changeWorld:plt.world.Kernel.updateWorld,shutdownWorld:plt.world.Kernel.shutdownWorld});plt.world.config.CONFIG=E;if(E.lookup("onKey")){H.onkeydown=function(K){plt.world.stimuli.onKey(K)}}if(E.lookup("onRedraw")){z(function(K){var L=D.getContext("2d");var M=E.lookup("onRedraw")([K]);M.render(L,0,0)})}z(function(K){if(E.lookup("stopWhen")){if(E.lookup("stopWhen")([K])){e=true}}});if(E.lookup("onTick")){l(H,E)}t(B);if(E.lookup("initialEffect")){var J=plt.world.Kernel.applyEffect(E.lookup("initialEffect"));for(var G=0;G<J.length;G++){if(!e){updateWorld(J)}}}};var l=function(C,B){o=C.setInterval(function(){if(e){C.clearTimeout(o);o=false}else{plt.world.stimuli.onTick()}},B.lookup("tickDelay"))};plt.world.Kernel.isKeyEqual=function(D,C){var B=(D.toString().toLowerCase()==C.toString().toLowerCase());return B};plt.world.Kernel.imageWidth=function(B){plt.Kernel.check(B,r,"image-width","image",1);return plt.types.Rational.makeInstance(B.getWidth(),1)};plt.world.Kernel.imageHeight=function(B){plt.Kernel.check(B,r,"image-height","image",1);return plt.types.Rational.makeInstance(B.getHeight(),1)};plt.world.Kernel.placeImage=function(D,B,E,C){plt.Kernel.check(D,r,"place-image","image",1);plt.Kernel.check(B,plt.Kernel.isNumber,"place-image","number",2);plt.Kernel.check(E,plt.Kernel.isNumber,"place-image","number",3);plt.Kernel.check(C,A,"place-image","scene",4);return C.add(D,plt.types.NumberTower.toInteger(B),plt.types.NumberTower.toInteger(E))};plt.world.Kernel.emptyScene=function(C,B){plt.Kernel.check(C,plt.Kernel.isNumber,"empty-scene","number",1);plt.Kernel.check(B,plt.Kernel.isNumber,"empty-scene","number",2);return new c(plt.types.NumberTower.toInteger(C),plt.types.NumberTower.toInteger(B),[])};var u=function(B){return typeof(b.get(B))!="undefined"};plt.world.Kernel.text=function(D,B,C){plt.Kernel.check(D,plt.Kernel.isString,"text","string",1);plt.Kernel.check(B,plt.Kernel.isNumber,"text","number",2);plt.Kernel.check(C,u,"text","color",3);if(b.get(C)){C=b.get(C)}return new d(D,plt.types.NumberTower.toInteger(B),C)};plt.world.Kernel.circle=function(D,C,B){plt.Kernel.check(D,plt.Kernel.isNumber,"circle","number",1);plt.Kernel.check(C,plt.Kernel.isString,"circle","string",2);plt.Kernel.check(B,u,"circle","color",3);if(b.get(B)){B=b.get(B)}return new f(plt.types.NumberTower.toInteger(D),C,B)};plt.world.Kernel.openImageUrl=function(B){plt.Kernel.check(B,plt.Kernel.isString,"open-image-url","string",1);return k.makeInstance(B.toString())};plt.world.Kernel.nwRectangle=function(B,E,D,F){plt.Kernel.check(B,plt.Kernel.isNumber,"nw:rectangle","number",1);plt.Kernel.check(E,plt.Kernel.isNumber,"nw:rectangle","number",2);plt.Kernel.check(D,plt.Kernel.isString,"nw:rectangle","string",3);plt.Kernel.check(F,u,"nw:rectangle","color",4);if(b.get(F)){F=b.get(F)}var C=new n(plt.types.NumberTower.toInteger(B),plt.types.NumberTower.toInteger(E),D,F);return C.updatePinhole(0,0)};plt.world.Kernel.rectangle=function(B,D,C,E){plt.Kernel.check(B,plt.Kernel.isNumber,"rectangle","number",1);plt.Kernel.check(D,plt.Kernel.isNumber,"rectangle","number",2);plt.Kernel.check(C,plt.Kernel.isString,"rectangle","string",3);plt.Kernel.check(E,u,"rectangle","color",4);if(b.get(E)){E=b.get(E)}return new n(plt.types.NumberTower.toInteger(B),plt.types.NumberTower.toInteger(D),C,E)};var y=function(C,B){this.pinholeX=C;this.pinholeY=B};plt.world.Kernel.BaseImage=y;var r=function(B){return((B!=null)&&(B!=undefined)&&(B instanceof y))};plt.world.Kernel.isImage=r;y.prototype.updatePinhole=function(B,D){var C={};for(attr in this){C[attr]=this[attr]}C.__proto__=this.__proto__;C.pinholeX=B;C.pinholeY=D;return C};y.prototype.render=function(C,B,D){throw new MobyRuntimeError("Unimplemented method render")};plt.world.Kernel.makeCanvas=function(D,B){var C=document.createElement("canvas");C.width=D;C.height=B;C.style.width=C.width+"px";C.style.height=C.height+"px";if(window&&typeof window.G_vmlCanvasManager!="undefined"){C.style.display="none";document.body.appendChild(C);C=window.G_vmlCanvasManager.initElement(C);document.body.removeChild(C);C.style.display=""}return C};y.prototype.toDomNode=function(){var F=this;var E=plt.world.Kernel.imageWidth(F).toInteger();var B=plt.world.Kernel.imageHeight(F).toInteger();var D=plt.world.Kernel.makeCanvas(E,B);var G=D.style.display;D.style.display="none";document.body.appendChild(D);var C=D.getContext("2d");F.render(C,0,0);document.body.removeChild(D);D.style.display="";return D};y.prototype.toWrittenString=function(){return"<image>"};y.prototype.toDisplayedString=function(){return"<image>"};plt.world.Kernel.image_question_=function(B){return r(B)};plt.world.Kernel.image_equal__question_=function(C,B){check(C,r,"image=?","image",1);check(B,r,"image=?","image",2);return C==B?plt.types.Logic.TRUE:plt.types.Logic.FALSE};var A=function(B){return((B!=undefined)&&(B!=null)&&(B instanceof c))};var c=function(D,B,C){y.call(this,0,0);this.width=D;this.height=B;this.children=C};c.prototype=q(y.prototype);c.prototype.add=function(C,B,D){return new c(this.width,this.height,this.children.concat([[C,B,D]]))};c.prototype.render=function(E,C,H){var G;var F,D,B;E.clearRect(C-this.pinholeX,H-this.pinholeY,this.width,this.height);for(G=0;G<this.children.length;G++){F=this.children[G][0];D=this.children[G][1];B=this.children[G][2];E.save();F.render(E,D+C-F.pinholeX,B+H-F.pinholeY);E.restore()}};c.prototype.getWidth=function(){return this.width};c.prototype.getHeight=function(){return this.height};var k=function(D,C){y.call(this,0,0);var B=this;this.isLoaded=false;if(C&&C.complete){this.img=C;this.isLoaded=true;this.pinholeX=B.img.width/2;this.pinholeY=B.img.height/2}else{this.img=new Image();this.img.onload=function(){B.isLoaded=true;B.pinholeX=B.img.width/2;B.pinholeY=B.img.height/2};this.img.onerror=function(E){B.img.onerror="";B.img.src="http://www.wescheme.org/images/broken.png"};this.img.src=D}};k.prototype=q(y.prototype);plt.world.Kernel.FileImage=k;var j={};k.makeInstance=function(B){if(!(B in j)){j[B]=new k(B)}return j[B]};k.installInstance=function(C,B){j[C]=new k(C,B)};k.prototype.render=function(C,B,D){C.drawImage(this.img,B,D)};k.prototype.getWidth=function(){return this.img.width};k.prototype.getHeight=function(){return this.img.height};k.prototype.toDomNode=function(){return this.img.cloneNode(true)};var n=function(E,B,D,C){y.call(this,E/2,B/2);this.width=E;this.height=B;this.style=D;this.color=C};n.prototype=q(y.prototype);n.prototype.render=function(C,B,D){C.fillStyle=this.color.toString();if(this.style.toString().toLowerCase()=="outline"){C.strokeRect(B,D,this.width,this.height)}else{C.fillRect(B,D,this.width,this.height)}};n.prototype.getWidth=function(){return this.width};n.prototype.getHeight=function(){return this.height};var d=function(D,C,B){y.call(this,0,0);this.msg=D;this.size=C;this.color=B;this.font="Optimer"};d.prototype=q(y.prototype);d.prototype.render=function(C,B,D){if(C.fillText){C.font=this.size+"px Optimer";C.fillStyle=this.color.toRGBAString();C.fillText(this.msg,B,D)}else{if("mozDrawText" in C){C.mozTextStyle=this.size+"px "+this.font;C.translate(B,D+this.size);C.fillStyle=this.color;C.mozDrawText(this.msg)}}};d.prototype.getWidth=function(){return this.size*this.msg.length};d.prototype.getHeight=function(){return 10};var f=function(B,D,C){y.call(this,B,B);this.radius=B;this.style=D;this.color=C};f.prototype=q(y.prototype);f.prototype.render=function(C,B,D){C.translate(0,0);C.beginPath();C.fillStyle=this.color.toString();C.arc(B+this.radius,D+this.radius,this.radius,0,2*Math.PI,false);if(this.style.toString().toLowerCase()=="outline"){C.stroke()}else{C.fill()}C.closePath()};f.prototype.getWidth=function(){return this.radius*2};f.prototype.getHeight=function(){return this.radius*2};plt.world.Kernel.applyEffect=function(D){var C=[];if(plt.Kernel.empty_question_(D)){}else{if(plt.Kernel.pair_question_(D)){C=C.concat(plt.world.Kernel.applyEffect(D.first()));C=C.concat(plt.world.Kernel.applyEffect(D.rest()))}else{var B=D.run();if(B){C=C.concat(B)}}}return C};effect_colon_none.prototype.run=function(){};effect_colon_beep.prototype.run=function(){plt.platform.Platform.getInstance().getSoundService().beep()};effect_colon_play_dash_dtmf_dash_tone.prototype.run=function(){plt.platform.Platform.getInstance().getSoundService().playDtmfTone(this._fields[0].toInteger(),this._fields[1].toInteger())};effect_colon_send_dash_sms.prototype.run=function(){plt.platform.Platform.getInstance().getSmsService().send(this._fields[0],this._fields[1])};effect_colon_play_dash_sound.prototype.run=function(){if(plt.Kernel.isString(this._fields[0])){plt.platform.Platform.getInstance().getSoundService().playSoundUrl(this._fields[0])}else{if(playlist_dash_sound_question_(this._fields[0])){plt.platform.Platform.getInstance().getSoundService().playPlaylist(this._fields[0]._fields[0])}}};effect_colon_pause_dash_sound.prototype.run=function(){if(plt.Kernel.isString(this._fields[0])){plt.platform.Platform.getInstance().getSoundService().pauseSoundUrl(this._fields[0])}else{if(playlist_dash_sound_question_(this._fields[0])){plt.platform.Platform.getInstance().getSoundService().pausePlaylist(this._fields[0]._fields[0])}}};effect_colon_stop_dash_sound.prototype.run=function(){if(plt.Kernel.isString(this._fields[0])){plt.platform.Platform.getInstance().getSoundService().stopSoundUrl(this._fields[0])}else{if(playlist_dash_sound_question_(this._fields[0])){plt.platform.Platform.getInstance().getSoundService().stopPlaylist(this._fields[0]._fields[0])}}};effect_colon_set_dash_sound_dash_volume.prototype.run=function(){plt.platform.Platform.getInstance().getSoundService().setVolume(this._fields[0].toInteger())};effect_colon_raise_dash_sound_dash_volume.prototype.run=function(){plt.platform.Platform.getInstance().getSoundService.raiseVolume()};effect_colon_lower_dash_sound_dash_volume.prototype.run=function(){plt.platform.Platform.getInstance().getSoundService.lowerVolume()};effect_colon_set_dash_wake_dash_lock.prototype.run=function(){plt.platform.Platform.getInstance().getPowerService().setWakeLock(this._fields[0].toInteger())};effect_colon_release_dash_wake_dash_lock.prototype.run=function(){plt.platform.Platform.getInstance().getPowerService().releaseWakeLock()};effect_colon_pick_dash_playlist.prototype.run=function(){var B=this._fields[0];var C=function(E){var D=make_dash_playlist_dash_sound(E);setTimeout(function(){var F=plt.world.config.CONFIG.lookup("changeWorld");F(function(G){return B([G,D])})},0)};plt.platform.Platform.getInstance().getPickPlaylistService().pickPlaylist(C)};effect_colon_pick_dash_random.prototype.run=function(){var C=plt.types.Rational.makeInstance(Math.floor(plt.types.NumberTower.toInteger(this._fields[0])*Math.random()),1);var B=this._fields[1];return function(D){return B([D,C])}};var m=function(){this.colors={}};m.prototype.put=function(C,B){this.colors[C]=B};m.prototype.get=function(B){return this.colors[B.toString().toUpperCase()]};var s=function(D,C,B){this.r=D;this.g=C;this.b=B};s.prototype.toString=function(){return"rgb("+this.r+","+this.g+","+this.b+")"};s.prototype.toRGBAString=function(){return"rgba("+this.r+","+this.g+","+this.b+", 1)"};var b=new m();b.put("ORANGE",new s(255,165,0));b.put("RED",new s(255,0,0));b.put("ORANGERED",new s(255,69,0));b.put("TOMATO",new s(255,99,71));b.put("DARKRED",new s(139,0,0));b.put("RED",new s(255,0,0));b.put("FIREBRICK",new s(178,34,34));b.put("CRIMSON",new s(220,20,60));b.put("DEEPPINK",new s(255,20,147));b.put("MAROON",new s(176,48,96));b.put("INDIAN RED",new s(205,92,92));b.put("INDIANRED",new s(205,92,92));b.put("MEDIUM VIOLET RED",new s(199,21,133));b.put("MEDIUMVIOLETRED",new s(199,21,133));b.put("VIOLET RED",new s(208,32,144));b.put("VIOLETRED",new s(208,32,144));b.put("LIGHTCORAL",new s(240,128,128));b.put("HOTPINK",new s(255,105,180));b.put("PALEVIOLETRED",new s(219,112,147));b.put("LIGHTPINK",new s(255,182,193));b.put("ROSYBROWN",new s(188,143,143));b.put("PINK",new s(255,192,203));b.put("ORCHID",new s(218,112,214));b.put("LAVENDERBLUSH",new s(255,240,245));b.put("SNOW",new s(255,250,250));b.put("CHOCOLATE",new s(210,105,30));b.put("SADDLEBROWN",new s(139,69,19));b.put("BROWN",new s(132,60,36));b.put("DARKORANGE",new s(255,140,0));b.put("CORAL",new s(255,127,80));b.put("SIENNA",new s(160,82,45));b.put("ORANGE",new s(255,165,0));b.put("SALMON",new s(250,128,114));b.put("PERU",new s(205,133,63));b.put("DARKGOLDENROD",new s(184,134,11));b.put("GOLDENROD",new s(218,165,32));b.put("SANDYBROWN",new s(244,164,96));b.put("LIGHTSALMON",new s(255,160,122));b.put("DARKSALMON",new s(233,150,122));b.put("GOLD",new s(255,215,0));b.put("YELLOW",new s(255,255,0));b.put("OLIVE",new s(128,128,0));b.put("BURLYWOOD",new s(222,184,135));b.put("TAN",new s(210,180,140));b.put("NAVAJOWHITE",new s(255,222,173));b.put("PEACHPUFF",new s(255,218,185));b.put("KHAKI",new s(240,230,140));b.put("DARKKHAKI",new s(189,183,107));b.put("MOCCASIN",new s(255,228,181));b.put("WHEAT",new s(245,222,179));b.put("BISQUE",new s(255,228,196));b.put("PALEGOLDENROD",new s(238,232,170));b.put("BLANCHEDALMOND",new s(255,235,205));b.put("MEDIUM GOLDENROD",new s(234,234,173));b.put("MEDIUMGOLDENROD",new s(234,234,173));b.put("PAPAYAWHIP",new s(255,239,213));b.put("MISTYROSE",new s(255,228,225));b.put("LEMONCHIFFON",new s(255,250,205));b.put("ANTIQUEWHITE",new s(250,235,215));b.put("CORNSILK",new s(255,248,220));b.put("LIGHTGOLDENRODYELLOW",new s(250,250,210));b.put("OLDLACE",new s(253,245,230));b.put("LINEN",new s(250,240,230));b.put("LIGHTYELLOW",new s(255,255,224));b.put("SEASHELL",new s(255,245,238));b.put("BEIGE",new s(245,245,220));b.put("FLORALWHITE",new s(255,250,240));b.put("IVORY",new s(255,255,240));b.put("GREEN",new s(0,255,0));b.put("LAWNGREEN",new s(124,252,0));b.put("CHARTREUSE",new s(127,255,0));b.put("GREEN YELLOW",new s(173,255,47));b.put("GREENYELLOW",new s(173,255,47));b.put("YELLOW GREEN",new s(154,205,50));b.put("YELLOWGREEN",new s(154,205,50));b.put("MEDIUM FOREST GREEN",new s(107,142,35));b.put("OLIVEDRAB",new s(107,142,35));b.put("MEDIUMFORESTGREEN",new s(107,142,35));b.put("DARK OLIVE GREEN",new s(85,107,47));b.put("DARKOLIVEGREEN",new s(85,107,47));b.put("DARKSEAGREEN",new s(143,188,139));b.put("LIME",new s(0,255,0));b.put("DARK GREEN",new s(0,100,0));b.put("DARKGREEN",new s(0,100,0));b.put("LIME GREEN",new s(50,205,50));b.put("LIMEGREEN",new s(50,205,50));b.put("FOREST GREEN",new s(34,139,34));b.put("FORESTGREEN",new s(34,139,34));b.put("SPRING GREEN",new s(0,255,127));b.put("SPRINGGREEN",new s(0,255,127));b.put("MEDIUM SPRING GREEN",new s(0,250,154));b.put("MEDIUMSPRINGGREEN",new s(0,250,154));b.put("SEA GREEN",new s(46,139,87));b.put("SEAGREEN",new s(46,139,87));b.put("MEDIUM SEA GREEN",new s(60,179,113));b.put("MEDIUMSEAGREEN",new s(60,179,113));b.put("AQUAMARINE",new s(112,216,144));b.put("LIGHTGREEN",new s(144,238,144));b.put("PALE GREEN",new s(152,251,152));b.put("PALEGREEN",new s(152,251,152));b.put("MEDIUM AQUAMARINE",new s(102,205,170));b.put("MEDIUMAQUAMARINE",new s(102,205,170));b.put("TURQUOISE",new s(64,224,208));b.put("LIGHTSEAGREEN",new s(32,178,170));b.put("MEDIUM TURQUOISE",new s(72,209,204));b.put("MEDIUMTURQUOISE",new s(72,209,204));b.put("HONEYDEW",new s(240,255,240));b.put("MINTCREAM",new s(245,255,250));b.put("ROYALBLUE",new s(65,105,225));b.put("DODGERBLUE",new s(30,144,255));b.put("DEEPSKYBLUE",new s(0,191,255));b.put("CORNFLOWERBLUE",new s(100,149,237));b.put("STEEL BLUE",new s(70,130,180));b.put("STEELBLUE",new s(70,130,180));b.put("LIGHTSKYBLUE",new s(135,206,250));b.put("DARK TURQUOISE",new s(0,206,209));b.put("DARKTURQUOISE",new s(0,206,209));b.put("CYAN",new s(0,255,255));b.put("AQUA",new s(0,255,255));b.put("DARKCYAN",new s(0,139,139));b.put("TEAL",new s(0,128,128));b.put("SKY BLUE",new s(135,206,235));b.put("SKYBLUE",new s(135,206,235));b.put("CADET BLUE",new s(96,160,160));b.put("CADETBLUE",new s(95,158,160));b.put("DARK SLATE GRAY",new s(47,79,79));b.put("DARKSLATEGRAY",new s(47,79,79));b.put("LIGHTSLATEGRAY",new s(119,136,153));b.put("SLATEGRAY",new s(112,128,144));b.put("LIGHT STEEL BLUE",new s(176,196,222));b.put("LIGHTSTEELBLUE",new s(176,196,222));b.put("LIGHT BLUE",new s(173,216,230));b.put("LIGHTBLUE",new s(173,216,230));b.put("POWDERBLUE",new s(176,224,230));b.put("PALETURQUOISE",new s(175,238,238));b.put("LIGHTCYAN",new s(224,255,255));b.put("ALICEBLUE",new s(240,248,255));b.put("AZURE",new s(240,255,255));b.put("MEDIUM BLUE",new s(0,0,205));b.put("MEDIUMBLUE",new s(0,0,205));b.put("DARKBLUE",new s(0,0,139));b.put("MIDNIGHT BLUE",new s(25,25,112));b.put("MIDNIGHTBLUE",new s(25,25,112));b.put("NAVY",new s(36,36,140));b.put("BLUE",new s(0,0,255));b.put("INDIGO",new s(75,0,130));b.put("BLUE VIOLET",new s(138,43,226));b.put("BLUEVIOLET",new s(138,43,226));b.put("MEDIUM SLATE BLUE",new s(123,104,238));b.put("MEDIUMSLATEBLUE",new s(123,104,238));b.put("SLATE BLUE",new s(106,90,205));b.put("SLATEBLUE",new s(106,90,205));b.put("PURPLE",new s(160,32,240));b.put("DARK SLATE BLUE",new s(72,61,139));b.put("DARKSLATEBLUE",new s(72,61,139));b.put("DARKVIOLET",new s(148,0,211));b.put("DARK ORCHID",new s(153,50,204));b.put("DARKORCHID",new s(153,50,204));b.put("MEDIUMPURPLE",new s(147,112,219));b.put("CORNFLOWER BLUE",new s(68,64,108));b.put("MEDIUM ORCHID",new s(186,85,211));b.put("MEDIUMORCHID",new s(186,85,211));b.put("MAGENTA",new s(255,0,255));b.put("FUCHSIA",new s(255,0,255));b.put("DARKMAGENTA",new s(139,0,139));b.put("VIOLET",new s(238,130,238));b.put("PLUM",new s(221,160,221));b.put("LAVENDER",new s(230,230,250));b.put("THISTLE",new s(216,191,216));b.put("GHOSTWHITE",new s(248,248,255));b.put("WHITE",new s(255,255,255));b.put("WHITESMOKE",new s(245,245,245));b.put("GAINSBORO",new s(220,220,220));b.put("LIGHT GRAY",new s(211,211,211));b.put("LIGHTGRAY",new s(211,211,211));b.put("SILVER",new s(192,192,192));b.put("GRAY",new s(190,190,190));b.put("DARK GRAY",new s(169,169,169));b.put("DARKGRAY",new s(169,169,169));b.put("DIM GRAY",new s(105,105,105));b.put("DIMGRAY",new s(105,105,105));b.put("BLACK",new s(0,0,0))})();if(typeof(plt)=="undefined"){var plt={}}plt.Jsworld={};(function(){var ac=plt.Jsworld;var e=false;function J(){}var av=new J();var W=[];var an=[];ac.shutdown=function(){while(an.length>0){var p=an.pop();if(p){p.pause()}}q()};function E(p){W.push(p)}function aj(aJ){var p=W.indexOf(aJ);if(p!=-1){W.splice(p,1)}}function q(){av=new J();W=[]}function L(aL){var p=av;try{av=aL(av)}catch(aK){return}if(p!=av){for(var aJ=0;aJ<W.length;aJ++){try{W[aJ](av,p)}catch(aK){av=p;throw aK}}}}ac.change_world=L;Number.prototype.NaN0=function(){return isNaN(this)?0:this};function H(aK){var aJ=0;var p=0;while(aK.offsetParent){aJ+=aK.offsetLeft+(aK.currentStyle?(parseInt(aK.currentStyle.borderLeftWidth)).NaN0():0);p+=aK.offsetTop+(aK.currentStyle?(parseInt(aK.currentStyle.borderTopWidth)).NaN0():0);aK=aK.offsetParent}aJ+=aK.offsetLeft+(aK.currentStyle?(parseInt(aK.currentStyle.borderLeftWidth)).NaN0():0);p+=aK.offsetTop+(aK.currentStyle?(parseInt(aK.currentStyle.borderTopWidth)).NaN0():0);return{x:aJ,y:p}}ac.getPosition=H;var Z=0;function n(){return Z++}ac.gensym=n;function I(aJ,aL){var p=new Array(aJ.length);for(var aK=0;aK<aJ.length;aK++){p[aK]=aL(aJ[aK])}return p}ac.map=I;function b(aJ,aL){var p=[];for(var aK=0;aK<aJ.length;aK++){p=p.concat(aL(aJ[aK]))}return p}function m(aJ,aL){var p=new Array(aJ.length);for(var aK=0;aK<aJ.length;aK++){p[aK]=aL(aJ[aK],aK)}return p}ac.mapi=m;function v(aJ,p,aL){for(var aK=0;aK<aJ.length;aK++){p=aL(aJ[aK],p)}return p}ac.fold=v;function ap(aL,aJ){var p={};for(var aK in aL){p[aK]=aL[aK]}for(var aK in aJ){p[aK]=aJ[aK]}return p}ac.augment=ap;function P(aM,aK,aJ){var p={};for(var aL in aM){p[aL]=aM[aL]}p[aK]=aJ;return p}ac.assoc_cons=P;function ah(aJ,p){return aJ.concat([p])}ac.cons=ah;function V(aJ,p){return aJ.concat(p)}ac.append=V;function K(aL,aJ){var aK=[];for(var p=0;p<aL.length;p++){aK.push([aL[p],aJ[p]])}return aK}ac.array_join=K;function o(aK,aJ){for(var p=0;p<aK.length;p++){if(aK[p]===aJ){return aK.slice(0,p).concat(aK.slice(p+1))}}return aK}ac.removeq=o;function x(aK,aJ){for(var p=0;p<aK.length;p++){if(aJ(aK[p])){return aK.slice(0,p).concat(aK.slice(p+1))}}return aK}ac.removef=x;function Q(aK,aJ){for(var p=0;p<aK.length;p++){if(aJ(aK[p])){return aK.slice(0,p).concat(Q(aK.slice(p+1),aJ))}}return aK}ac.filter=Q;function aE(aK,aJ){var aL={};for(var p in aK){if(p!=aJ){aL[p]=aK[p]}}return aL}ac.without=aE;function k(aJ,p){for(var aK=0;aK<aJ.length;aK++){if(aJ[aK]===p){return true}}return false}ac.memberq=k;function ao(aJ,p){for(var aK=0;aK<aJ.length;aK++){if(aJ[aK]==p){return true}}return false}ac.member=ao;function O(p){return p[0]}ac.head=O;function U(p){return p.slice(1,p.length)}ac.tail=U;function ay(aJ){var p=[aJ];for(var aK=aJ.firstChild;aK!=null;aK=aK.nextSibling){p.push(ay(aK))}return p}ac.node_to_tree=ay;function i(p){var aJ=[p.node];if(p.node.jsworldOpaque==true){return aJ}for(var aK=0;aK<p.children.length;aK++){aJ=aJ.concat(i(p.children[aK]))}return aJ}function aA(aJ,p){return(aJ&&p&&aJ===p)}function d(aJ,p){return !aA(aJ,p)}function Y(p){var aJ=[];if(p.node.jsworldOpaque==true){return[]}for(var aK=0;aK<p.children.length;aK++){aJ.push({relation:"parent",parent:p.node,child:p.children[aK].node})}for(var aK=0;aK<p.children.length-1;aK++){aJ.push({relation:"neighbor",left:p.children[aK].node,right:p.children[aK+1].node})}for(var aK=0;aK<p.children.length;aK++){aJ=aJ.concat(Y(p.children[aK]))}return aJ}function au(p,aJ){p.appendChild(aJ)}function ag(aJ,aS,aM){for(var aV=0;aV<aM.length;aV++){if(aM[aV].relation=="parent"){var aP=aM[aV].parent,aN=aM[aV].child;if(d(aN.parentNode,aP)){au(aP,aN)}else{}}}for(;;){var aX=false;for(var aV=0;aV<aM.length;aV++){if(aM[aV].relation=="neighbor"){var aL=aM[aV].left,aY=aM[aV].right;if(d(aL.nextSibling,aY)){aL.parentNode.insertBefore(aL,aY);aX=true}}}if(!aX){break}}var aO;function aK(a2,a1){var a0=a2.compareDocumentPosition(a1);if(a0&a2.DOCUMENT_POSITION_CONTAINED_BY){return 1}if(a0&a2.DOCUMENT_POSITION_CONTAINS){return -1}if(a0&a2.DOCUMENT_POSITION_FOLLOWING){return -1}if(a0&a2.DOCUMENT_POSITION_PRECEDING){return 1}return 0}try{aO=aS.concat(aJ).sort(aK)}catch(aW){aO=null}var aT=aJ,aU=aJ.parentNode;while(aT!=aU){for(;;){if(aT.firstChild==null||aT.jsworldOpaque==true){break}aT=aT.firstChild}while(aT!=aU){var aR=aT.nextSibling,aP=aT.parentNode;if(aT.jsworldOpaque==true){}else{var aQ=false;var p=undefined;if(aO!=null){while(aO.length>0&&aK(aT,aO[0])>=0){var aZ=aO.shift();if(aA(aZ,aT)){aQ=true;p=aZ;break}}}else{for(var aV=0;aV<aS.length;aV++){if(aA(aS[aV],aT)){aQ=true;p=aS[aV];break}}}if(!aQ){while(aT.firstChild!=null){au(aT.parentNode,aT.firstChild)}aR=aT.nextSibling;aT.parentNode.removeChild(aT)}else{ai(aT,p)}}if(aR==null){aT=aP}else{aT=aR;break}}}ab(aS)}function ai(aJ,p){}function ar(aJ,aK){for(var p=0;p<aK.length;p++){aJ.style[aK[p].attrib]=aK[p].values.join(" ")}}function j(aJ,p){if(p.id.match(/^\./)){return("class" in aJ&&ao(aJ["class"].split(/\s+/),p.id.substring(1)))}else{return("id" in aJ&&aJ.id==p.id)}}function aG(p,aL){for(var aK=0;aK<p.length;aK++){if("style" in p[aK]){p[aK].style.cssText=""}}for(var aK=0;aK<aL.length;aK++){if("id" in aL[aK]){for(var aJ=0;aJ<p.length;aJ++){if(j(p[aJ],aL[aK])){ar(p[aJ],aL[aK].attribs)}}}else{ar(aL[aK].node,aL[aK].attribs)}}}function ab(p){for(var aJ=0;aJ<p.length;aJ++){if(p[aJ].onWorldChange){p[aJ].onWorldChange(av)}}}function z(aM,p,aO,aL,aN){if(p instanceof J){var aJ=B(aL(aM));var aK=i(aJ);aG(aK,D(aN(aM)));ag(aO,aK,Y(aJ));return}else{aF(function(){var aU=aL(p);var aQ=aL(aM);var aP=aN(p);var aR=aN(aM);var aS=B(aQ);var aT=i(aS);if(aU!==aQ){aG(aT,D(aR));ag(aO,aT,Y(aS))}else{if(aP!==aR){aG(aT,D(aR))}}})}}function aF(aJ){var p;if(aD()){p=at();aJ();p.restore()}else{aJ()}}function A(){this.focused=e;this.selectionStart=e.selectionStart;this.selectionEnd=e.selectionEnd}A.prototype.restore=function(){if(this.focused.parentNode){this.focused.selectionStart=this.selectionStart;this.focused.selectionEnd=this.selectionEnd;this.focused.focus()}else{if(this.focused.id){var p=document.getElementById(this.focused.id);if(p){p.selectionStart=this.selectionStart;p.selectionEnd=this.selectionEnd;p.focus()}}}};function aD(){return e!=undefined}function at(){return new A()}function G(aL,aJ,aK,p,aM){this.top=aL;this.world=aJ;this.handlers=p;this.handlerCreators=aK;this.attribs=aM}G.prototype.restart=function(){N(this.top,this.world,this.handlerCreators,this.attribs)};G.prototype.pause=function(){for(var p=0;p<this.handlers.length;p++){if(this.handlers[p] instanceof T){}else{this.handlers[p].onUnregister(top)}}};function N(aQ,aN,aL,p){q();var aJ=I(aL,function(aS){return aS()});if(an.length>0){an[an.length-1].pause()}var aP=new G(aQ,aN,aL,aJ,p);an.push(aP);function aR(aS,aT){aP.world=aS}E(aR);var aM=new T(function(aS){return false},function(aS){});for(var aK=0;aK<aJ.length;aK++){if(aJ[aK] instanceof T){aM=aJ[aK]}else{aJ[aK].onRegister(aQ)}}function aO(aT,aV){if(aM.test(aT)){aM.receiver(av);var aS=an.pop();if(aS){aS.pause()}if(an.length>0){var aU=an.pop();aU.restart()}}}E(aO);aC(aQ,p);L(function(aS){return aN})}ac.big_bang=N;function ad(p,aJ){return function(){var aK={watchId:-1,onRegister:function(aL){aK.watchId=setInterval(function(){L(aJ)},p)},onUnregister:function(aL){clearInterval(aK.watchId)}};return aK}}ac.on_tick=ad;function r(aK,aJ){function p(aL){var aM=aK(aL);s(aM,aM);return aM}return function(){var aL={_top:null,_listener:function(aM,aN){z(aM,aN,aL._top,p,aJ)},onRegister:function(aM){aL._top=aM;E(aL._listener)},onUnregister:function(aM){aj(aL._listener)}};return aL}}ac.on_draw=r;function T(aJ,p){this.test=aJ;this.receiver=p}function al(aJ,p){return function(){if(p==undefined){p=function(aK){}}return new T(aJ,p)}}ac.stop_when=al;function w(aJ){var p=function(aL,aK){aJ(aL)};return function(){return{onRegister:function(aK){E(p)},onUnregister:function(aK){aj(p)}}}}ac.on_world_change=w;function R(aK,p,aJ){if(aK.addEventListener){aK.addEventListener(p,aJ,false)}else{aK.attachEvent("on"+p,aJ,false)}}function az(aJ,p,aK){R(aJ,p,function(aL){L(function(aM){return aK(aM,aL)})})}function am(aJ,p,aK){R(aJ,p,function(aL){setTimeout(function(){L(function(aM){return aK(aM,aL)})},0)})}function t(p){R(p,"focus",function(aJ){e=p});R(p,"blur",function(aJ){e=undefined});return p}function B(p){if(p.length==undefined){return{node:p,children:[]}}else{return{node:p[0],children:I(p.slice(1),B)}}}function ae(p){return{attrib:p[0],values:p.slice(1)}}function l(p){var aJ=I(p.slice(1),ae);if(typeof p[0]=="string"){return[{id:p[0],attribs:aJ}]}else{if("length" in p[0]){return I(p[0],function(aK){return{id:aK,attribs:aJ}})}else{return[{node:p[0],attribs:aJ}]}}}function D(p){return b(p,l)}function F(p){return(p.nodeType==Node.TEXT_NODE)}function af(p){return(p.nodeType==Node.ELEMENT_NODE)}var h=function(p,aJ){throw new aB(plt.Kernel.format("Expected a non-empty array, received ~s within ~s",[p,aJ]),p)};function s(p,aK){if(!p instanceof Array){h(p,aK)}if(p.length==0){h(p,aK)}if(F(p[0])){if(p.length>1){throw new aB(plt.Kernel.format("Text node ~s can not have children",[p]),p)}}else{if(af(p[0])){for(var aJ=1;aJ<p.length;aJ++){s(p[aJ],p)}}else{throw new aB(plt.Kernel.format("expected a Text or an Element, received ~s within ~s",[p,aK]),p[0])}}}function aB(aJ,p){this.msg=aJ;this.elt=p}aB.prototype.toString=function(){return"on-draw: "+this.msg};function aC(p,aJ){if(aJ){for(a in aJ){if(typeof aJ[a]=="function"){az(p,a,aJ[a])}else{p[a]=aJ[a]}}}return p}function X(p){return t(aC(document.createElement("p"),p))}ac.p=X;function C(p){return t(aC(document.createElement("div"),p))}ac.div=C;function g(p,aJ){var aK=document.createElement("button");az(aK,"click",p);return t(aC(aK,aJ))}ac.button=g;var M=function(p){if(p.preventDefault){p.preventDefault()}else{p.returnValue=false}};var ak=function(p){if(p.stopPropagation){p.stopPropagation()}else{p.cancelBubble=true}};var u=function(p){R(p,"click",function(aJ){ak(aJ)});return p};function aH(aJ,aO,aN){var aP=document.createElement("input");aP.type=aJ;function aM(aQ,aR){return aO(aQ,aP.value)}am(aP,"keypress",aM);var p=1000;var aL=aP.value;var aK=setInterval(function(){if(!aP.parentNode){clearInterval(aK);return}if(aL!=aP.value){aL=aP.value;L(function(aQ){return aO(aQ,aP.value)})}},p);return u(t(aC(aP,aN)))}ac.input=aH;function c(aK,aM,aL){var aN=document.createElement("input");aN.type="text";var aJ=undefined;function p(aO,aP){return aM(aO,aN.value)}az(aN,"keypress",p);return u(t(aC(aN,aL)))}function aq(p,aJ){return t(aC(document.createTextNode(p),aJ))}ac.text=aq;function ax(aL,aJ,aK){var aM=document.createElement("select");for(var p=0;p<aJ.length;p++){au(aM,S({value:aJ[p]}))}az(aM,"change",aK);return t(aC(aM,aL))}ac.select=ax;function S(p){return t(aC(document.createElement("option"),p))}ac.option=S;function f(p){return t(aC(document.createElement("textarea"),p))}ac.textarea=f;function aw(p){return t(aC(document.createElement("h1"),p))}ac.h1=aw;function aI(p){return t(aC(document.createElement("canvas"),p))}ac.canvas=aI;function aa(aJ,p){var aK=document.createElement("img");aK.src=aJ;return t(aC(aK,p))}ac.img=aa;function y(p,aJ){return t(aC(p,aJ))}ac.raw_node=y})();var plt=plt||{};plt.world=plt.world||{};plt.world.MobyJsworld={};(function(){var e=plt.world.MobyJsworld;var o=plt.Jsworld;var g=plt.Kernel.MobyTypeError;var j=function(q){return typeof(q)=="function"};var l=function(r){var s=r;if(plt.Kernel.empty_question_(s)){return[]}else{if(plt.Kernel.pair_question_(s)){var q=[];while(!s.isEmpty()){q.push(l(s.first()));s=s.rest()}return q}else{return r}}};var h=function(r){var q={};while(!r.isEmpty()){var s=r.first().first();var t=r.first().rest().first();q[s]=t;r=r.rest()}return q};var p=function(){if(window.document.getElementById("jsworld-div")!=undefined){return window}var q=window.open("big-bang.html","big-bang");if(q==null){throw new Error("Error: Not allowed to create a new window.")}return q};e.makeToplevelNode=function(){return p().document.getElementById("jsworld-div")};var f=function(q){return(q instanceof plt.types.Cons)||(q instanceof plt.types.Empty)};e.printWorldHook=function(s,r){var q;if(r.lastChild==null){q=plt.Kernel.toDomNode(s);r.appendChild(q)}else{q=plt.Kernel.toDomNode(s);r.replaceChild(q,r.lastChild)}};var i=function(r){var q;if(r.target){q=r.target}else{if(r.srcElement){q=r.srcElement}}if(q.nodeType==3){q=q.parentNode}return q};var d=function(q,v,s){if(plt.Kernel.pair_question_(q)){var r=plt.Kernel.first(q);var u=plt.Kernel.rest(q);if(r.nodeType==Node.TEXT_NODE&&!plt.Kernel.empty_question_(u)){throw new g(plt.Kernel.format("on-draw: the text node ~s must not have children. It has ~s",[r,u]))}var t=2;while(!plt.Kernel.empty_question_(u)){d(plt.Kernel.first(u),q,t);u=plt.Kernel.rest(u);t++}}else{throw new g(plt.Kernel.format("on-draw: expected a dom-s-expression, but received ~s instead.~a",[q,(s!=undefined?plt.Kernel.format("the ~a element within ~s",[s,v]):"")]))}};var k=function(s,q,r){plt.Kernel.attachEvent(s,q,r)};var m=function(q){if(q.preventDefault){q.preventDefault()}else{q.returnValue=false}};var n=function(q){if(q.stopPropagation){q.stopPropagation()}else{q.cancelBubble=true}};e.bigBang=function(z,u){var r=plt.types.Empty.EMPTY;plt.Kernel.arrayEach(u,function(D,E){plt.Kernel.check(D,function(F){return j(F)||f(F)},"js-big-bang","handler or attribute list",E+2)});var A=e.makeToplevelNode();A.tabIndex=0;k(A,"click",function(D){m(D);n(D);return false},false);var t=new plt.world.config.WorldConfig();for(var y=0;y<u.length;y++){if(f(u[y])){r=u[y]}else{if(j(u[y])){t=u[y](t)}}}t=t.updateAll({changeWorld:e.updateWorld,shutdownWorld:e.shutdownWorld});plt.world.config.CONFIG=t;var s=[];var B;if(t.lookup("onDraw")){wrappedRedraw=function(E){var F=t.lookup("onDraw")([E]);plt.Kernel.setLastLoc(undefined);d(F,F,undefined);var D=[A,l(F)];return D};B=function(E){var D=l(t.lookup("onDrawCss")([E]));plt.Kernel.setLastLoc(undefined);return D};s.push(o.on_draw(wrappedRedraw,B))}else{if(t.lookup("onRedraw")){var x=undefined;var q=undefined;wrappedRedraw=function(F){var H=t.lookup("onRedraw")([F]);if(H!=null&&H!=undefined&&H instanceof plt.world.Kernel.BaseImage){var G=plt.world.Kernel.imageWidth(H).toInteger();var D=plt.world.Kernel.imageHeight(H).toInteger();if(!x){x=plt.world.Kernel.makeCanvas(G,D);x.jsworldOpaque=true;q=o.node_to_tree(x)}x.width=G;x.height=D;var E=x.getContext("2d");H.render(E,0,0);return[A,q]}else{return[A,o.node_to_tree(plt.Kernel.toDomNode(H))]}};B=function(D){return[[x,["width",x.width+"px"],["height",x.height+"px"]]]};s.push(o.on_draw(wrappedRedraw,B))}else{s.push(o.on_world_change(function(D){e.printWorldHook(D,A)}))}}if(t.lookup("tickDelay")){var v=function(D){setTimeout(function(){plt.world.stimuli.onTick()},0);return D};var w=t.lookup("tickDelay");s.push(o.on_tick(w,v))}if(t.lookup("stopWhen")){s.push(o.stop_when(function(D){return t.lookup("stopWhen")([D])}))}if(t.lookup("onKey")){k(A,"keydown",function(D){plt.world.stimuli.onKey(D);m(D);n(D);return false});k(A,"keypress",function(D){m(D);n(D);return false});A.focus()}if(t.lookup("initialEffect")){var C=plt.world.Kernel.applyEffect(t.lookup("initialEffect"));for(var y=0;y<C.length;y++){if(t.lookup("stopWhen")&&t.lookup("stopWhen")([z])){break}else{z=C[y](z)}}}return o.big_bang(A,z,s,h(r))};var c=function(s){var q=plt.types.Empty.EMPTY;for(var r=0;r<s.length;r++){q=plt.types.Cons.makeInstance(s[length-r-1],q)}return q};e.updateWorld=function(r){var q=function(s){try{return r(s)}catch(t){plt.Kernel.reportError(t);plt.Kernel.reportError("Shutting down jsworld computations");plt.world.stimuli.onShutdown();return s}};o.change_world(q)};e.shutdownWorld=function(){o.shutdown()};var b=function(q){if(q.length==0){return[]}if(q.length==1){return h(q[0])}else{throw new Error()}};e.p=function(q){var s=b(q);var r=o.p(s);r.toWrittenString=function(){return plt.Kernel.format("(js-p)",[])};r.toDisplayedString=r.toWrittenString;r.toDomNode=function(){return r};return r};e.div=function(q){var s=b(q);var r=o.div(s);r.toWrittenString=function(){return plt.Kernel.format("(js-div)",[])};r.toDisplayedString=r.toWrittenString;r.toDomNode=function(){return r};return r};e.button=function(t,q){var s=function(u){return make_dash_effect_colon_none()};var r=e.buttonStar(t,s,q);r.toWrittenString=function(){return"(js-button ...)"};r.toDisplayedString=r.toWrittenString;r.toDomNode=function(){return r};return r};e.buttonStar=function(q,u,s){var v=b(s);var r=function(y,w){try{var x=u([y]);var A=q([y]);plt.world.Kernel.applyEffect(x);return A}catch(z){plt.Kernel.reportError(z);return y}};var t=o.button(r,v);t.toWrittenString=function(){return"(js-button ...)"};t.toDisplayedString=t.toWrittenString;t.toDomNode=function(){return t};return t};e.input=function(r,u,q){plt.Kernel.check(r,plt.Kernel.isString,"js-input","string",1);plt.Kernel.check(u,plt.Kernel.isFunction,"js-input","(world string -> world)",1);var t=b(q);var s=o.input(r,function(x,y){return u([x,y])},t);s.toWrittenString=function(){return"(js-input ...)"};s.toDisplayedString=s.toWrittenString;s.toDomNode=function(){return s};return s};e.get_dash_input_dash_value=function(q){plt.Kernel.check(q,function(r){return(plt.Kernel.isString(q)||q.nodeType==Node.ELEMENT_NODE)},"get-input-value","dom-node",1);if(plt.Kernel.isString(q)){return plt.types.String.makeInstance(document.getElementById(q).value||"")}else{return plt.types.String.makeInstance(q.value||"")}};e.img=function(t,q){var s=b(q);var r=o.img(t,s);r.toWrittenString=function(){return"(js-img ...)"};r.toDisplayedString=r.toWrittenString;r.toDomNode=function(){return r};return r};e.text=function(q){var r=o.text(q,[]);r.toWrittenString=function(){return"(js-img ...)"};r.toDisplayedString=r.toWrittenString;r.toDomNode=function(){return r};return r};e.rawNode=function(q,r){var t=b(r);var s=o.raw_node(plt.Kernel.toDomNode(q),t);s.toWrittenString=function(){return"(js-img ...)"};s.toDisplayedString=s.toWrittenString;s.toDomNode=function(){return s};return s}})();var plt=plt||{};plt.world=plt.world||{};(function(){var c={};plt.world.stimuli=c;var g=function(m,j,h){var l=[];e(function(i){var n=[i].concat(h);if(m){var o=m(n);l=b(o)}if(j){return j(n)}else{return i}});for(var k=0;k<l.length;k++){e(l[k])}};c.onTilt=function(k,l,j){var i=d("onTilt");var h=d("onTiltEffect");g(h,i,[f(k),f(l),f(j)])};c.onAcceleration=function(h,l,k){var i=d("onAcceleration");var j=d("onAccelerationEffect");g(j,i,[f(h),f(l),f(k)])};c.onShake=function(){var i=d("onShake");var h=d("onShakeEffect");g(h,i,[])};c.onLocation=function(k,h){var i=d("onLocationChange");var j=d("onLocationChangeEffect");g(j,i,[f(k),f(h)])};c.onKey=function(j){var k=function(o){var m=o.charCode||o.keyCode;var n;if(m==37){n="left"}else{if(m==38){n="up"}else{if(m==39){n="right"}else{if(m==40){n="down"}else{if(m==32){n="space"}else{if(m==13){n="enter"}else{n=String.fromCharCode(m)}}}}}}return n};var i=k(j);var h=d("onKey");var l=d("onKeyEffect");g(l,h,[i])};c.onTick=function(){var i=d("onTick");var h=d("onTickEffect");g(h,i,[])};c.onAnnounce=function(j,m){var l=plt.types.Empty.EMPTY;for(var k=0;k<m.length;k++){l=plt.types.Cons.makeInstance(m[m.length-k-1],l)}var n=d("onAnnounce");var h=d("onAnnounceEffect");g(n,h,[j,l])};c.onShutdown=function(){var h=d("shutdownWorld");if(h){h()}};var f=plt.types.FloatPoint.makeInstance;var d=function(h){return plt.world.config.CONFIG.lookup(h)};var e=function(h){d("changeWorld")(h)};var b=function(h){return plt.world.Kernel.applyEffect(h)}})();var permission_colon_location=function(){plt.Kernel.Struct.call(this,"make-permission:location",[])};permission_colon_location.prototype=new plt.Kernel.Struct();var make_dash_permission_colon_location=function(){return new permission_colon_location()};var permission_colon_location_question_=function(b){return b!=null&&b!=undefined&&b instanceof permission_colon_location};var permission_colon_send_dash_sms=function(){plt.Kernel.Struct.call(this,"make-permission:send-sms",[])};permission_colon_send_dash_sms.prototype=new plt.Kernel.Struct();var make_dash_permission_colon_send_dash_sms=function(){return new permission_colon_send_dash_sms()};var permission_colon_send_dash_sms_question_=function(b){return b!=null&&b!=undefined&&b instanceof permission_colon_send_dash_sms};var permission_colon_receive_dash_sms=function(){plt.Kernel.Struct.call(this,"make-permission:receive-sms",[])};permission_colon_receive_dash_sms.prototype=new plt.Kernel.Struct();var make_dash_permission_colon_receive_dash_sms=function(){return new permission_colon_receive_dash_sms()};var permission_colon_receive_dash_sms_question_=function(b){return b!=null&&b!=undefined&&b instanceof permission_colon_receive_dash_sms};var permission_colon_tilt=function(){plt.Kernel.Struct.call(this,"make-permission:tilt",[])};permission_colon_tilt.prototype=new plt.Kernel.Struct();var make_dash_permission_colon_tilt=function(){return new permission_colon_tilt()};var permission_colon_tilt_question_=function(b){return b!=null&&b!=undefined&&b instanceof permission_colon_tilt};var permission_colon_shake=function(){plt.Kernel.Struct.call(this,"make-permission:shake",[])};permission_colon_shake.prototype=new plt.Kernel.Struct();var make_dash_permission_colon_shake=function(){return new permission_colon_shake()};var permission_colon_shake_question_=function(b){return b!=null&&b!=undefined&&b instanceof permission_colon_shake};var permission_colon_internet=function(){plt.Kernel.Struct.call(this,"make-permission:internet",[])};permission_colon_internet.prototype=new plt.Kernel.Struct();var make_dash_permission_colon_internet=function(){return new permission_colon_internet()};var permission_colon_internet_question_=function(b){return b!=null&&b!=undefined&&b instanceof permission_colon_internet};var permission_colon_telephony=function(){plt.Kernel.Struct.call(this,"make-permission:telephony",[])};permission_colon_telephony.prototype=new plt.Kernel.Struct();var make_dash_permission_colon_telephony=function(){return new permission_colon_telephony()};var permission_colon_telephony_question_=function(b){return b!=null&&b!=undefined&&b instanceof permission_colon_telephony};var permission_colon_wake_dash_lock=function(){plt.Kernel.Struct.call(this,"make-permission:wake-lock",[])};permission_colon_wake_dash_lock.prototype=new plt.Kernel.Struct();var make_dash_permission_colon_wake_dash_lock=function(){return new permission_colon_wake_dash_lock()};var permission_colon_wake_dash_lock_question_=function(b){return b!=null&&b!=undefined&&b instanceof permission_colon_wake_dash_lock};var permission_colon_open_dash_image_dash_url=function(b){plt.Kernel.Struct.call(this,"make-permission:open-image-url",[b]);this.url=b};permission_colon_open_dash_image_dash_url.prototype=new plt.Kernel.Struct();var make_dash_permission_colon_open_dash_image_dash_url=function(b){return new permission_colon_open_dash_image_dash_url(b)};var permission_colon_open_dash_image_dash_url_dash_url=function(b){if(permission_colon_open_dash_image_dash_url_question_(b)){return b.url}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("permission:open-image-url-url: not a permission:open-image-url: ~s",[b]))}};var set_dash_permission_colon_open_dash_image_dash_url_dash_url_bang_=function(c,b){if(permission_colon_open_dash_image_dash_url_question_(c)){c.url=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_permission_colon_open_dash_image_dash_url_dash_url_bang_: not a permission:open-image-url: ~s",[c]))}};var permission_colon_open_dash_image_dash_url_question_=function(b){return b!=null&&b!=undefined&&b instanceof permission_colon_open_dash_image_dash_url};var permission_question_=function(b){return((plt.Kernel.setLastLoc('offset=512 line=17 span=28 id="permission.ss"')&&permission_colon_location_question_(b))||(plt.Kernel.setLastLoc('offset=547 line=18 span=28 id="permission.ss"')&&permission_colon_send_dash_sms_question_(b))||(plt.Kernel.setLastLoc('offset=582 line=19 span=31 id="permission.ss"')&&permission_colon_receive_dash_sms_question_(b))||(plt.Kernel.setLastLoc('offset=620 line=20 span=24 id="permission.ss"')&&permission_colon_tilt_question_(b))||(plt.Kernel.setLastLoc('offset=651 line=21 span=25 id="permission.ss"')&&permission_colon_shake_question_(b))||(plt.Kernel.setLastLoc('offset=683 line=22 span=28 id="permission.ss"')&&permission_colon_internet_question_(b))||(plt.Kernel.setLastLoc('offset=718 line=23 span=29 id="permission.ss"')&&permission_colon_telephony_question_(b))||(plt.Kernel.setLastLoc('offset=754 line=24 span=29 id="permission.ss"')&&permission_colon_wake_dash_lock_question_(b))||(plt.Kernel.setLastLoc('offset=790 line=25 span=34 id="permission.ss"')&&permission_colon_open_dash_image_dash_url_question_(b)))};var PERMISSION_colon_LOCATION;var PERMISSION_colon_SEND_dash_SMS;var PERMISSION_colon_RECEIVE_dash_SMS;var PERMISSION_colon_TILT;var PERMISSION_colon_SHAKE;var PERMISSION_colon_INTERNET;var PERMISSION_colon_TELEPHONY;var PERMISSION_colon_WAKE_dash_LOCK;var permission_dash__greaterthan_string=function(b){return((plt.Kernel.setLastLoc('offset=1465 line=42 span=35 id="permission.ss"')&&permission_colon_location_question_(b))?(plt.types.String.makeInstance("PERMISSION:LOCATION")):((plt.Kernel.setLastLoc('offset=1534 line=44 span=35 id="permission.ss"')&&permission_colon_send_dash_sms_question_(b))?(plt.types.String.makeInstance("PERMISSION:SEND-SMS")):((plt.Kernel.setLastLoc('offset=1603 line=46 span=38 id="permission.ss"')&&permission_colon_receive_dash_sms_question_(b))?(plt.types.String.makeInstance("PERMISSION:RECEIVE-SMS")):((plt.Kernel.setLastLoc('offset=1678 line=48 span=31 id="permission.ss"')&&permission_colon_tilt_question_(b))?(plt.types.String.makeInstance("PERMISSION:TILT")):((plt.Kernel.setLastLoc('offset=1739 line=50 span=32 id="permission.ss"')&&permission_colon_shake_question_(b))?(plt.types.String.makeInstance("PERMISSION:SHAKE")):((plt.Kernel.setLastLoc('offset=1802 line=52 span=35 id="permission.ss"')&&permission_colon_internet_question_(b))?(plt.types.String.makeInstance("PERMISSION:INTERNET")):((plt.Kernel.setLastLoc('offset=1871 line=54 span=36 id="permission.ss"')&&permission_colon_telephony_question_(b))?(plt.types.String.makeInstance("PERMISSION:TELEPHONY")):((plt.Kernel.setLastLoc('offset=1942 line=56 span=36 id="permission.ss"')&&permission_colon_wake_dash_lock_question_(b))?(plt.types.String.makeInstance("PERMISSION:WAKE-LOCK")):((plt.Kernel.setLastLoc('offset=2013 line=58 span=41 id="permission.ss"')&&permission_colon_open_dash_image_dash_url_question_(b))?(plt.Kernel.setLastLoc('offset=2060 line=59 span=84 id="permission.ss"')&&plt.Kernel.format((plt.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL ~a")),[(plt.Kernel.setLastLoc('offset=2099 line=59 span=44 id="permission.ss"')&&permission_colon_open_dash_image_dash_url_dash_url(b))])):(plt.Kernel.setLastLoc('offset=1454 line=41 span=692 id="permission.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=1454 line=41 span=692 id=\\"permission.ss\\""')))))))))))))};var string_dash__greaterthan_permission=function(b){return((plt.Kernel.setLastLoc('offset=2242 line=65 span=38 id="permission.ss"')&&plt.Kernel.string_equal__question_(b,(plt.types.String.makeInstance("PERMISSION:LOCATION")),[]))?PERMISSION_colon_LOCATION:((plt.Kernel.setLastLoc('offset=2312 line=67 span=38 id="permission.ss"')&&plt.Kernel.string_equal__question_(b,(plt.types.String.makeInstance("PERMISSION:SEND-SMS")),[]))?PERMISSION_colon_SEND_dash_SMS:((plt.Kernel.setLastLoc('offset=2387 line=69 span=41 id="permission.ss"')&&plt.Kernel.string_equal__question_(b,(plt.types.String.makeInstance("PERMISSION:RECEIVE-SMS")),[]))?PERMISSION_colon_RECEIVE_dash_SMS:((plt.Kernel.setLastLoc('offset=2463 line=71 span=34 id="permission.ss"')&&plt.Kernel.string_equal__question_(b,(plt.types.String.makeInstance("PERMISSION:TILT")),[]))?PERMISSION_colon_TILT:((plt.Kernel.setLastLoc('offset=2525 line=73 span=35 id="permission.ss"')&&plt.Kernel.string_equal__question_(b,(plt.types.String.makeInstance("PERMISSION:SHAKE")),[]))?PERMISSION_colon_SHAKE:((plt.Kernel.setLastLoc('offset=2589 line=75 span=38 id="permission.ss"')&&plt.Kernel.string_equal__question_(b,(plt.types.String.makeInstance("PERMISSION:INTERNET")),[]))?PERMISSION_colon_INTERNET:((plt.Kernel.setLastLoc('offset=2659 line=77 span=39 id="permission.ss"')&&plt.Kernel.string_equal__question_(b,(plt.types.String.makeInstance("PERMISSION:TELEPHONY")),[]))?PERMISSION_colon_TELEPHONY:((plt.Kernel.setLastLoc('offset=2731 line=79 span=39 id="permission.ss"')&&plt.Kernel.string_equal__question_(b,(plt.types.String.makeInstance("PERMISSION:WAKE-LOCK")),[]))?PERMISSION_colon_WAKE_dash_LOCK:(((plt.Kernel.setLastLoc('offset=2808 line=81 span=82 id="permission.ss"')&&plt.Kernel._greaterthan_((plt.Kernel.setLastLoc('offset=2811 line=81 span=21 id="permission.ss"')&&plt.Kernel.string_dash_length(b)),(plt.Kernel.setLastLoc('offset=2846 line=82 span=43 id="permission.ss"')&&plt.Kernel.string_dash_length((plt.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL")))),[]))&&(plt.Kernel.setLastLoc('offset=2901 line=83 span=122 id="permission.ss"')&&plt.Kernel.string_equal__question_((plt.Kernel.setLastLoc('offset=2911 line=83 span=63 id="permission.ss"')&&plt.Kernel.substring(b,(plt.types.Rational.makeInstance(0,1)),(plt.Kernel.setLastLoc('offset=2930 line=83 span=43 id="permission.ss"')&&plt.Kernel.string_dash_length((plt.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL")))))),(plt.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL")),[])))?(plt.Kernel.setLastLoc('offset=3030 line=85 span=220 id="permission.ss"')&&make_dash_permission_colon_open_dash_image_dash_url((plt.Kernel.setLastLoc('offset=3062 line=85 span=187 id="permission.ss"')&&plt.Kernel.substring(b,(plt.Kernel.setLastLoc('offset=3128 line=86 span=50 id="permission.ss"')&&plt.Kernel.add1((plt.Kernel.setLastLoc('offset=3134 line=86 span=43 id="permission.ss"')&&plt.Kernel.string_dash_length((plt.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL")))))),(plt.Kernel.setLastLoc('offset=3227 line=87 span=21 id="permission.ss"')&&plt.Kernel.string_dash_length(b)))))):(plt.Kernel.setLastLoc('offset=2231 line=64 span=1021 id="permission.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=2231 line=64 span=1021 id=\\"permission.ss\\""')))))))))))))};var permission_dash__greaterthan_android_dash_permissions=function(b){return((plt.Kernel.setLastLoc('offset=3392 line=95 span=35 id="permission.ss"')&&permission_colon_location_question_(b))?(plt.Kernel.setLastLoc('offset=3433 line=96 span=103 id="permission.ss"')&&plt.Kernel.list([(plt.types.String.makeInstance("android.permission.ACCESS_COARSE_LOCATION")),(plt.types.String.makeInstance("android.permission.ACCESS_FINE_LOCATION"))])):((plt.Kernel.setLastLoc('offset=3543 line=98 span=35 id="permission.ss"')&&permission_colon_send_dash_sms_question_(b))?(plt.Kernel.setLastLoc('offset=3584 line=99 span=36 id="permission.ss"')&&plt.Kernel.list([(plt.types.String.makeInstance("android.permission.SEND_SMS"))])):((plt.Kernel.setLastLoc('offset=3627 line=100 span=38 id="permission.ss"')&&permission_colon_receive_dash_sms_question_(b))?(plt.Kernel.setLastLoc('offset=3671 line=101 span=39 id="permission.ss"')&&plt.Kernel.list([(plt.types.String.makeInstance("android.permission.RECEIVE_SMS"))])):((plt.Kernel.setLastLoc('offset=3717 line=102 span=31 id="permission.ss"')&&permission_colon_tilt_question_(b))?(plt.Kernel.setLastLoc('offset=3754 line=103 span=6 id="permission.ss"')&&plt.Kernel.list([])):((plt.Kernel.setLastLoc('offset=3767 line=104 span=32 id="permission.ss"')&&permission_colon_shake_question_(b))?(plt.Kernel.setLastLoc('offset=3805 line=105 span=6 id="permission.ss"')&&plt.Kernel.list([])):((plt.Kernel.setLastLoc('offset=3818 line=106 span=35 id="permission.ss"')&&permission_colon_internet_question_(b))?(plt.Kernel.setLastLoc('offset=3859 line=107 span=36 id="permission.ss"')&&plt.Kernel.list([(plt.types.String.makeInstance("android.permission.INTERNET"))])):((plt.Kernel.setLastLoc('offset=3902 line=108 span=36 id="permission.ss"')&&permission_colon_telephony_question_(b))?(plt.Kernel.setLastLoc('offset=3944 line=109 span=49 id="permission.ss"')&&plt.Kernel.list([(plt.types.String.makeInstance("android.permission.ACCESS_COARSE_UPDATES"))])):((plt.Kernel.setLastLoc('offset=4000 line=110 span=36 id="permission.ss"')&&permission_colon_wake_dash_lock_question_(b))?(plt.Kernel.setLastLoc('offset=4042 line=111 span=37 id="permission.ss"')&&plt.Kernel.list([(plt.types.String.makeInstance("android.permission.WAKE_LOCK"))])):((plt.Kernel.setLastLoc('offset=4086 line=112 span=41 id="permission.ss"')&&permission_colon_open_dash_image_dash_url_question_(b))?(plt.Kernel.setLastLoc('offset=4133 line=113 span=6 id="permission.ss"')&&plt.Kernel.list([])):(plt.Kernel.setLastLoc('offset=3381 line=94 span=760 id="permission.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=3381 line=94 span=760 id=\\"permission.ss\\""')))))))))))))};var permission_dash__greaterthan_on_dash_start_dash_code=function(b){return((plt.Kernel.setLastLoc('offset=4258 line=119 span=35 id="permission.ss"')&&permission_colon_location_question_(b))?(plt.types.String.makeInstance("plt.platform.Platform.getInstance().getLocationService().startService();\n plt.platform.Platform.getInstance().getLocationService().addLocationChangeListener(listener);")):((plt.Kernel.setLastLoc('offset=4480 line=122 span=35 id="permission.ss"')&&permission_colon_send_dash_sms_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=4530 line=124 span=38 id="permission.ss"')&&permission_colon_receive_dash_sms_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=4583 line=126 span=31 id="permission.ss"')&&permission_colon_tilt_question_(b))?(plt.types.String.makeInstance("plt.platform.Platform.getInstance().getTiltService().startService();\n plt.platform.Platform.getInstance().getTiltService().addOrientationChangeListener(listener);\n plt.platform.Platform.getInstance().getTiltService().addAccelerationChangeListener(listener);\n plt.platform.Platform.getInstance().getTiltService().addShakeListener(listener);")):((plt.Kernel.setLastLoc('offset=4988 line=132 span=32 id="permission.ss"')&&permission_colon_shake_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5042 line=135 span=35 id="permission.ss"')&&permission_colon_internet_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5092 line=137 span=36 id="permission.ss"')&&permission_colon_telephony_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5143 line=139 span=36 id="permission.ss"')&&permission_colon_wake_dash_lock_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5194 line=141 span=41 id="permission.ss"')&&permission_colon_open_dash_image_dash_url_question_(b))?(plt.types.String.makeInstance("")):(plt.Kernel.setLastLoc('offset=4247 line=118 span=998 id="permission.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=4247 line=118 span=998 id=\\"permission.ss\\""')))))))))))))};var permission_dash__greaterthan_on_dash_pause_dash_code=function(b){return((plt.Kernel.setLastLoc('offset=5362 line=148 span=35 id="permission.ss"')&&permission_colon_location_question_(b))?(plt.types.String.makeInstance("plt.platform.Platform.getInstance().getLocationService().shutdownService();")):((plt.Kernel.setLastLoc('offset=5487 line=150 span=35 id="permission.ss"')&&permission_colon_send_dash_sms_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5537 line=152 span=38 id="permission.ss"')&&permission_colon_receive_dash_sms_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5590 line=154 span=31 id="permission.ss"')&&permission_colon_tilt_question_(b))?(plt.types.String.makeInstance("plt.platform.Platform.getInstance().getTiltService().shutdownService();")):((plt.Kernel.setLastLoc('offset=5707 line=156 span=32 id="permission.ss"')&&permission_colon_shake_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5754 line=158 span=35 id="permission.ss"')&&permission_colon_internet_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5804 line=160 span=36 id="permission.ss"')&&permission_colon_telephony_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5855 line=162 span=36 id="permission.ss"')&&permission_colon_wake_dash_lock_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5906 line=164 span=41 id="permission.ss"')&&permission_colon_open_dash_image_dash_url_question_(b))?(plt.types.String.makeInstance("")):(plt.Kernel.setLastLoc('offset=5351 line=147 span=606 id="permission.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=5351 line=147 span=606 id=\\"permission.ss\\""')))))))))))))};var permission_dash__greaterthan_on_dash_destroy_dash_code=function(b){return((plt.Kernel.setLastLoc('offset=6078 line=171 span=35 id="permission.ss"')&&permission_colon_location_question_(b))?(plt.types.String.makeInstance("plt.platform.Platform.getInstance().getLocationService().shutdownService();")):((plt.Kernel.setLastLoc('offset=6203 line=173 span=35 id="permission.ss"')&&permission_colon_send_dash_sms_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=6253 line=175 span=38 id="permission.ss"')&&permission_colon_receive_dash_sms_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=6306 line=177 span=31 id="permission.ss"')&&permission_colon_tilt_question_(b))?(plt.types.String.makeInstance("plt.platform.Platform.getInstance().getTiltService().shutdownService();")):((plt.Kernel.setLastLoc('offset=6423 line=179 span=32 id="permission.ss"')&&permission_colon_shake_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=6470 line=181 span=35 id="permission.ss"')&&permission_colon_internet_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=6520 line=183 span=36 id="permission.ss"')&&permission_colon_telephony_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=6571 line=185 span=36 id="permission.ss"')&&permission_colon_wake_dash_lock_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=6622 line=187 span=41 id="permission.ss"')&&permission_colon_open_dash_image_dash_url_question_(b))?(plt.types.String.makeInstance("")):(plt.Kernel.setLastLoc('offset=6067 line=170 span=606 id="permission.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=6067 line=170 span=606 id=\\"permission.ss\\""')))))))))))))};(function(){((function(b){PERMISSION_colon_LOCATION=(plt.Kernel.setLastLoc('offset=857 line=28 span=26 id="permission.ss"')&&make_dash_permission_colon_location());PERMISSION_colon_SEND_dash_SMS=(plt.Kernel.setLastLoc('offset=913 line=29 span=26 id="permission.ss"')&&make_dash_permission_colon_send_dash_sms());PERMISSION_colon_RECEIVE_dash_SMS=(plt.Kernel.setLastLoc('offset=972 line=30 span=26 id="permission.ss"')&&make_dash_permission_colon_send_dash_sms());PERMISSION_colon_TILT=(plt.Kernel.setLastLoc('offset=1024 line=31 span=22 id="permission.ss"')&&make_dash_permission_colon_tilt());PERMISSION_colon_SHAKE=(plt.Kernel.setLastLoc('offset=1073 line=32 span=23 id="permission.ss"')&&make_dash_permission_colon_shake());PERMISSION_colon_INTERNET=(plt.Kernel.setLastLoc('offset=1126 line=33 span=26 id="permission.ss"')&&make_dash_permission_colon_internet());PERMISSION_colon_TELEPHONY=(plt.Kernel.setLastLoc('offset=1183 line=34 span=27 id="permission.ss"')&&make_dash_permission_colon_telephony());PERMISSION_colon_WAKE_dash_LOCK=(plt.Kernel.setLastLoc('offset=1241 line=35 span=27 id="permission.ss"')&&make_dash_permission_colon_wake_dash_lock())}))(arguments[0]||plt.Kernel.identity)})();var plt=plt||{};(function(){plt.permission={};var i=function(k){return permission_colon_location_question_(k)};var g=function(k){return permission_colon_send_dash_sms_question_(k)};var j=function(k){return permission_colon_receive_dash_sms_question_(k)};var b=function(k){return permission_colon_tilt_question_(k)};var c=function(k){return permission_colon_shake_question_(k)};var h=function(k){return permission_colon_internet_question_(k)};var d=function(k){return permission_colon_telephony_question_(k)};var e=function(k){return permission_colon_wake_dash_lock_question_(k)};var f=function(k){return permission_colon_open_dash_image_dash_url_question_(k)};plt.permission.startupAllPermissions=function(k,l){if(k.length>0){var m=k.pop();plt.permission._runStartupCode(m,k,l)}else{l()}};plt.permission._runStartupCode=function(k,o,m){var l=plt.platform.Platform.getInstance();var r=plt.world.stimuli;var n=function(){setTimeout(function(){plt.permission.startupAllPermissions(o,m)},0)};if(i(k)){l.getLocationService().startService();l.getLocationService().addLocationChangeListener(function(u,p){r.onLocation(u,p)});n()}else{if(g(k)){n()}else{if(j(k)){n()}else{if(b(k)){l.getTiltService().startService();l.getTiltService().addOrientationChangeListener(function(u,v,p){r.onTilt(u,v,p)});l.getTiltService().addAccelerationChangeListener(function(p,v,u){r.onAcceleration(p,v,u)});n()}else{if(c(k)){l.getShakeService().startService();l.getShakeService().addListener(function(){r.onShake()});n()}else{if(h(k)){n()}else{if(d(k)){n()}else{if(e(k)){n()}else{if(f(k)){var t=permission_colon_open_dash_image_dash_url_dash_url(k);var q=new Image();var s=function(){plt.Kernel.detachEvent(q,"load",s);plt.world.Kernel.FileImage.installInstance(t,q);n()};plt.Kernel.attachEvent(q,"load",s);plt.Kernel.attachEvent(q,"error",function(){q.src="http://www.wescheme.org/images/broken.png";plt.Kernel.detachEvent(q,"load",s);n()});q.src=t}else{n()}}}}}}}}}};plt.permission.runShutdownCode=function(l){var k=plt.platform.Platform.getInstance();if(i(l)){k.getLocationService().shutdownService()}if(g(l)){}if(j(l)){}if(b(l)){k.getTiltService().shutdownService()}if(c(l)){}if(h(l)){}if(d(l)){}if(e(l)){}if(f(l)){}}})(); \ No newline at end of file +(function(){if(window.google&&google.gears){return}var b=null;if(typeof GearsFactory!="undefined"){b=new GearsFactory()}else{try{b=new ActiveXObject("Gears.Factory");if(b.getBuildInfo().indexOf("ie_mobile")!=-1){b.privateSetGlobalObject(this)}}catch(c){if((typeof navigator.mimeTypes!="undefined")&&navigator.mimeTypes["application/x-googlegears"]){b=document.createElement("object");b.style.display="none";b.width=0;b.height=0;b.type="application/x-googlegears";document.documentElement.appendChild(b)}}}if(!b){return}if(!window.google){google={}}if(!google.gears){google.gears={factory:b}}})();var plt=plt||{};(function(){plt.types=plt.types||{};plt.types.Logic={TRUE:true,FALSE:false};Boolean.prototype.toWrittenString=function(){if(this.valueOf()){return"true"}return"false"};Boolean.prototype.toDisplayedString=Boolean.prototype.toWrittenString;Boolean.prototype.isEqual=function(l){return this==l};plt.types.Char=function(l){this.val=l};plt.types.Char.makeInstance=function(l){return new plt.types.Char(l)};plt.types.Char.prototype.toWrittenString=function(){return"#\\"+this.val};plt.types.Char.prototype.toDisplayedString=function(){return this.val};plt.types.Char.prototype.getValue=function(){return this.val};plt.types.Char.prototype.isEqual=function(l){return l instanceof plt.types.Char&&this.val==l.val};plt.types.Symbol=function(l){this.val=l};var e={};plt.types.Symbol.makeInstance=function(l){if(!(l in e)){e[l]=new plt.types.Symbol(l)}else{}return e[l]};plt.types.Symbol.prototype.isEqual=function(l){return l instanceof plt.types.Symbol&&this.val==l.val};plt.types.Symbol.prototype.toString=function(){return this.val};plt.types.Symbol.prototype.toWrittenString=function(){return this.val};plt.types.Symbol.prototype.toDisplayedString=function(){return this.val};plt.types.Empty=function(){};plt.types.Empty.EMPTY=new plt.types.Empty();plt.types.Empty.prototype.isEqual=function(l){return l instanceof plt.types.Empty};plt.types.Empty.prototype.first=function(){throw new plt.Kernel.MobyRuntimeError("first can't be applied on empty.")};plt.types.Empty.prototype.rest=function(){throw new plt.Kernel.MobyRuntimeError("rest can't be applied on empty.")};plt.types.Empty.prototype.isEmpty=function(){return true};plt.types.Empty.prototype.toWrittenString=function(){return"empty"};plt.types.Empty.prototype.toDisplayedString=function(){return"empty"};plt.types.Empty.prototype.append=function(l){return l};plt.types.Cons=function(m,l){this.f=m;this.r=l};plt.types.Cons.makeInstance=function(m,l){return new plt.types.Cons(m,l)};plt.types.Cons.prototype.isEqual=function(l){if(!(l instanceof plt.types.Cons)){return plt.types.Logic.FALSE}return(plt.Kernel.equal_question_(this.first(),l.first())&&plt.Kernel.equal_question_(this.rest(),l.rest()))};plt.types.Cons.prototype.first=function(){return this.f};plt.types.Cons.prototype.rest=function(){return this.r};plt.types.Cons.prototype.isEmpty=function(){return false};plt.types.Cons.prototype.append=function(m){if(m.isEmpty()){return this}var n=m;var l=plt.Kernel.reverse(this);while(!l.isEmpty()){n=plt.types.Cons.makeInstance(l.first(),n);l=l.rest()}return n};plt.types.Cons.prototype.toWrittenString=function(){var l=[];var m=this;while(!m.isEmpty()){l.push(plt.Kernel.toWrittenString(m.first()));m=m.rest()}return"("+l.join(" ")+")"};plt.types.Cons.prototype.toDisplayedString=function(){var l=[];var m=this;while(!m.isEmpty()){l.push(m.first().toDisplayedString());m=m.rest()}return"("+l.join(" ")+")"};var g=function(l,m){l.appendChild(m)};plt.types.Cons.prototype.toDomNode=function(){var l=document.createElement("div");l.appendChild(document.createTextNode("("));var m=this;while(!m.isEmpty()){g(l,plt.Kernel.toDomNode(m.first()));m=m.rest();if(!m.isEmpty()){g(l,document.createTextNode(" "))}}l.appendChild(document.createTextNode(")"));return l};plt.types.Vector=function(o,m){this.elts=new Array(o);if(m){for(var l=0;l<o;l++){this.elts[l]=m[l]}}else{for(var l=0;l<o;l++){this.elts[l]=undefined}}};plt.types.Vector.makeInstance=function(m,l){return new plt.types.Vector(m,l)};plt.types.Vector.prototype.length=function(){return this.elts.length};plt.types.Vector.prototype.ref=function(l){return this.elts[l]};plt.types.Vector.prototype.set=function(m,l){this.elts[m]=l};plt.types.Vector.prototype.toWrittenString=function(){var m=[];for(var l=0;l<this.length();l++){m.push(plt.Kernel.toWrittenString(this.ref(l)))}return"#("+m.join(" ")+")"};plt.types.Vector.prototype.toDisplayedString=function(){var m=[];for(var l=0;l<this.length();l++){m.push(plt.Kernel.toDisplayedStringString(this.ref(l)))}return"#("+m.join(" ")+")"};plt.types.Vector.prototype.toDomNode=function(){var m=document.createElement("div");m.appendChild(document.createTextNode("#("));for(var l=0;l<this.length();l++){g(m,plt.Kernel.toDomNode(this.ref(l)))}m.appendChild(document.createTextNode(")"));return m};var i=function(m,l){var n;if(isNaN(m)||!isFinite(m)){throw new plt.Kernel.MobyRuntimeError("not a number: "+m)}if(isNaN(l)||!isFinite(l)){throw new plt.Kernel.MobyRuntimeError("not a number: "+l)}while(l!=0){n=m;m=l;l=n%l}return m};plt.types.Rational=function(o,l){if(l==undefined){l=1}if(l==0){throw new plt.Kernel.MobyRuntimeError("cannot have zero denominator.")}var m=i(Math.abs(o),Math.abs(l));this.n=o/m;this.d=l/m};plt.types.Rational.prototype.toWrittenString=function(){if(this.d==1){return this.n+""}else{return this.n+"/"+this.d}};plt.types.Rational.prototype.toDisplayedString=plt.types.Rational.prototype.toWrittenString;plt.types.Rational.prototype.level=function(){return 0};plt.types.Rational.prototype.lift=function(l){if(l.level()==1){return plt.types.FloatPoint.makeInstance(this.n/this.d)}if(l.level()==2){return plt.types.Complex.makeInstance(this,plt.types.Rational.ZERO)}throw new plt.Kernel.MobyRuntimeError("invalid level of Number")};plt.types.Rational.prototype.isFinite=function(){return true};plt.types.Rational.prototype.isEqual=function(l){return l instanceof plt.types.Rational&&this.n==l.n&&this.d==l.d};plt.types.Rational.prototype.isInteger=function(){return this.d==1};plt.types.Rational.prototype.isRational=function(){return true};plt.types.Rational.prototype.isReal=function(){return true};plt.types.Rational.prototype.add=function(l){return plt.types.Rational.makeInstance(this.n*l.d+this.d*l.n,this.d*l.d)};plt.types.Rational.prototype.subtract=function(l){return plt.types.Rational.makeInstance((this.n*l.d)-(this.d*l.n),(this.d*l.d))};plt.types.Rational.prototype.multiply=function(l){return plt.types.Rational.makeInstance(this.n*l.n,this.d*l.d)};plt.types.Rational.prototype.divide=function(l){if(this.d*l.n==0){throw new plt.Kernel.MobyRuntimeError("division by zero")}return plt.types.Rational.makeInstance(this.n*l.d,this.d*l.n)};plt.types.Rational.prototype.toExact=function(){return this};plt.types.Rational.prototype.isExact=function(){return true};plt.types.Rational.prototype.toInteger=function(){return Math.floor(this.n/this.d)};plt.types.Rational.prototype.numerator=function(){return plt.types.Rational.makeInstance(this.n)};plt.types.Rational.prototype.denominator=function(){return plt.types.Rational.makeInstance(this.d)};plt.types.Rational.prototype.toFloat=function(){return this.n/this.d};plt.types.Rational.prototype.toComplex=function(){return plt.types.Complex.makeInstance(this,plt.types.Rational.ZERO)};plt.types.Rational.prototype.greaterThan=function(l){return this.n*l.d>this.d*l.n};plt.types.Rational.prototype.greaterThanOrEqual=function(l){return this.n*l.d>=this.d*l.n};plt.types.Rational.prototype.lessThan=function(l){return this.n*l.d<this.d*l.n};plt.types.Rational.prototype.lessThanOrEqual=function(l){return this.n*l.d<=this.d*l.n};plt.types.Rational.prototype.sqrt=function(){if(this.n>=0){var m=Math.sqrt(this.n);var l=Math.sqrt(this.d);if(Math.floor(m)==m&&Math.floor(l)==l){return plt.types.Rational.makeInstance(m,l)}else{return plt.types.FloatPoint.makeInstance(m/l)}}else{var m=Math.sqrt(-this.n);var l=Math.sqrt(this.d);if(Math.floor(m)==m&&Math.floor(l)==l){return plt.types.Complex.makeInstance(plt.types.Rational.ZERO,plt.types.Rational.makeInstance(m,l))}else{return plt.types.Complex.makeInstance(plt.types.Rational.ZERO,plt.types.FloatPoint.makeInstance(m/l))}}};plt.types.Rational.prototype.abs=function(){return plt.types.Rational.makeInstance(Math.abs(this.n),this.d)};plt.types.Rational.prototype.floor=function(){return plt.types.Rational.makeInstance(Math.floor(this.n/this.d),1)};plt.types.Rational.prototype.ceiling=function(){return plt.types.Rational.makeInstance(Math.ceil(this.n/this.d),1)};plt.types.Rational.prototype.conjugate=plt.types.Rational.prototype.abs;plt.types.Rational.prototype.magnitude=plt.types.Rational.prototype.abs;plt.types.Rational.prototype.log=function(){return plt.types.FloatPoint.makeInstance(Math.log(this.n/this.d))};plt.types.Rational.prototype.angle=function(){if(0==this.n){return plt.types.Rational.ZERO}if(this.n>0){return plt.types.Rational.ZERO}else{return plt.Kernel.pi}};plt.types.Rational.prototype.atan=function(){return plt.types.FloatPoint.makeInstance(Math.atan(this.n/this.d))};plt.types.Rational.prototype.cos=function(){return plt.types.FloatPoint.makeInstance(Math.cos(this.n/this.d))};plt.types.Rational.prototype.sin=function(){return plt.types.FloatPoint.makeInstance(Math.sin(this.n/this.d))};plt.types.Rational.prototype.expt=function(l){return plt.types.FloatPoint.makeInstance(Math.pow(this.n/this.d,l.n/l.d))};plt.types.Rational.prototype.exp=function(){return plt.types.FloatPoint.makeInstance(Math.exp(this.n/this.d))};plt.types.Rational.prototype.acos=function(){return plt.types.FloatPoint.makeInstance(Math.acos(this.n/this.d))};plt.types.Rational.prototype.asin=function(){return plt.types.FloatPoint.makeInstance(Math.asin(this.n/this.d))};plt.types.Rational.prototype.imag_dash_part=function(){return plt.types.Rational.ZERO};plt.types.Rational.prototype.real_dash_part=function(){return this};plt.types.Rational.prototype.timesI=function(){return plt.types.Complex.makeInstance(plt.types.Rational.ZERO,this)};plt.types.Rational.prototype.round=function(){if(this.d==2){var l=this.n/this.d;var m=Math.floor(l);var n=Math.ceil(l);if(m%2==0){return plt.types.Rational.makeInstance(m)}else{return plt.types.Rational.makeInstance(n)}}else{return plt.types.Rational.makeInstance(Math.round(this.n/this.d))}};plt.types.Rational.prototype.half=function(){return plt.types.Rational.makeInstance(this.n,this.d*2)};plt.types.Rational.prototype.minus=function(){return plt.types.Rational.makeInstance(0-this.n,this.d)};var h={};plt.types.Rational.makeInstance=function(m,l){if(m==undefined){throw new plt.Kernel.MobyRuntimeError("n undefined")}if(l==undefined){l=1}if(l<0){m=-m;l=-l}if(l==1&&m in h){return h[m]}else{return new plt.types.Rational(m,l)}};h={};(function(){var l;for(l=-500;l<500;l++){h[l]=new plt.types.Rational(l,1)}})();plt.types.Rational.NEGATIVE_ONE=h[-1];plt.types.Rational.ZERO=h[0];plt.types.Rational.ONE=h[1];plt.types.Rational.TWO=h[2];plt.types.FloatPoint=function(l){this.n=l};plt.types.FloatPoint.makeInstance=function(l){return new plt.types.FloatPoint(l)};var j=plt.types.FloatPoint.makeInstance(Number.NaN);var b=plt.types.FloatPoint.makeInstance(Number.POSITIVE_INFINITY);var c=plt.types.FloatPoint.makeInstance(Number.NEGATIVE_INFINITY);plt.types.FloatPoint.prototype.isFinite=function(){return isFinite(this.n)};plt.types.FloatPoint.prototype.toExact=function(){return plt.types.Rational.makeInstance(Math.floor(this.n),1)};plt.types.FloatPoint.prototype.isExact=function(){return false};plt.types.FloatPoint.prototype.level=function(){return 1};plt.types.FloatPoint.prototype.lift=function(l){return plt.types.Complex.makeInstance(this,plt.types.Rational.ZERO)};plt.types.FloatPoint.prototype.toWrittenString=function(){if(this.n==Number.POSITIVE_INFINITY){return"+inf.0"}else{if(this.n==Number.NEGATIVE_INFINITY){return"-inf.0"}else{if(this.n==Number.NaN){return"+nan.0"}else{return this.n.toString()}}}};plt.types.FloatPoint.prototype.toDisplayedString=plt.types.FloatPoint.prototype.toWrittenString;plt.types.FloatPoint.prototype.isEqual=function(l){return((l instanceof plt.types.FloatPoint)&&((this.n==l.n)||(isNaN(this.n)&&isNaN(l.n))))};plt.types.FloatPoint.prototype.isRational=function(){return this.isFinite()&&this.n==Math.floor(this.n)};plt.types.FloatPoint.prototype.isInteger=function(){return this.isFinite()&&this.n==Math.floor(this.n)};plt.types.FloatPoint.prototype.isReal=function(){return true};var d=function(l){if(plt.types.NumberTower.lessThan(l,plt.types.Rational.ZERO)){return -1}else{if(plt.types.NumberTower.greaterThan(l,plt.types.Rational.ZERO)){return 1}else{return 0}}};plt.types.FloatPoint.prototype.add=function(l){if(this.isFinite()&&l.isFinite()){return plt.types.FloatPoint.makeInstance(this.n+l.n)}else{if(isNaN(this.n)||isNaN(l.n)){return j}else{if(this.isFinite()&&!l.isFinite()){return l}else{if(!this.isFinite()&&l.isFinite()){return this}else{return((d(this)*d(l)==1)?this:j)}}}}};plt.types.FloatPoint.prototype.subtract=function(l){if(this.isFinite()&&l.isFinite()){return plt.types.FloatPoint.makeInstance(this.n-l.n)}else{if(isNaN(this.n)||isNaN(l.n)){return j}else{if(!this.isFinite()&&!l.isFinite()){if(d(this)==d(l)){return j}else{return this}}else{if(this.isFinite()){return plt.types.NumberTower.multiply(l,plt.types.Rational.NEGATIVE_ONE)}else{return this}}}}};plt.types.FloatPoint.prototype.multiply=function(l){if(this.n==0||l.n==0){return plt.types.Rational.ZERO}if(this.isFinite()&&l.isFinite()){return plt.types.FloatPoint.makeInstance(this.n*l.n)}else{if(isNaN(this.n)||isNaN(l.n)){return j}else{return((d(this)*d(l)==1)?b:c)}}};plt.types.FloatPoint.prototype.divide=function(l){if(this.isFinite()&&l.isFinite()){if(l.n==0){throw new plt.Kernel.MobyRuntimeError("division by zero")}return plt.types.FloatPoint.makeInstance(this.n/l.n)}else{if(isNaN(this.n)||isNaN(l.n)){return j}else{if(!this.isFinite()&&!l.isFinite()){return j}else{if(this.isFinite()&&!l.isFinite()){return plt.types.FloatPoint.makeInstance(0)}else{if(!this.isFinite()&&l.isFinite()){return((d(this)*d(l)==1)?b:c)}}}}}};plt.types.FloatPoint.prototype.toInteger=function(){return Math.floor(this.n)};plt.types.FloatPoint.prototype.numerator=function(){var m=this.n.toString();var l=m.match(/^(.*)\.(.*)$/);if(l){return plt.types.FloatPoint.makeInstance(parseFloat(l[1]+l[2]))}else{return this}};plt.types.FloatPoint.prototype.denominator=function(){var m=this.n.toString();var l=m.match(/^(.*)\.(.*)$/);if(l){return plt.types.FloatPoint.makeInstance(Math.pow(10,l[2].length))}else{return plt.types.FloatPoint.makeInstance(1)}};plt.types.FloatPoint.prototype.toFloat=function(){return this.n};plt.types.FloatPoint.prototype.toComplex=function(){return plt.types.Complex.makeInstance(this,plt.types.Rational.ZERO)};plt.types.FloatPoint.prototype.floor=function(){if(!isFinite(this.n)){return this}return plt.types.Rational.makeInstance(Math.floor(this.n),1)};plt.types.FloatPoint.prototype.ceiling=function(){if(!isFinite(this.n)){return this}return plt.types.Rational.makeInstance(Math.ceil(this.n),1)};plt.types.FloatPoint.prototype.greaterThan=function(l){return this.n>l.n};plt.types.FloatPoint.prototype.greaterThanOrEqual=function(l){return this.n>=l.n};plt.types.FloatPoint.prototype.lessThan=function(l){return this.n<l.n};plt.types.FloatPoint.prototype.lessThanOrEqual=function(l){return this.n<=l.n};plt.types.FloatPoint.prototype.sqrt=function(){if(this.n<0){var l=plt.types.Complex.makeInstance(plt.types.Rational.ZERO,plt.types.FloatPoint.makeInstance(Math.sqrt(-this.n)));return l}else{return plt.types.FloatPoint.makeInstance(Math.sqrt(this.n))}};plt.types.FloatPoint.prototype.abs=function(){return plt.types.FloatPoint.makeInstance(Math.abs(this.n))};plt.types.FloatPoint.prototype.log=function(){if(this.n<0){return this.toComplex().log()}else{return plt.types.FloatPoint.makeInstance(Math.log(this.n))}};plt.types.FloatPoint.prototype.angle=function(){if(0==this.n){return plt.types.Rational.ZERO}if(this.n>0){return plt.types.Rational.ZERO}else{return plt.Kernel.pi}};plt.types.FloatPoint.prototype.atan=function(){return plt.types.FloatPoint.makeInstance(Math.atan(this.n))};plt.types.FloatPoint.prototype.cos=function(){return plt.types.FloatPoint.makeInstance(Math.cos(this.n))};plt.types.FloatPoint.prototype.sin=function(){return plt.types.FloatPoint.makeInstance(Math.sin(this.n))};plt.types.FloatPoint.prototype.expt=function(l){if(this.n==1){if(l.isFinite()){return this}else{if(isNaN(l.n)){return this}else{return this}}}else{return plt.types.FloatPoint.makeInstance(Math.pow(this.n,l.n))}};plt.types.FloatPoint.prototype.exp=function(){return plt.types.FloatPoint.makeInstance(Math.exp(this.n))};plt.types.FloatPoint.prototype.acos=function(){return plt.types.FloatPoint.makeInstance(Math.acos(this.n))};plt.types.FloatPoint.prototype.asin=function(){return plt.types.FloatPoint.makeInstance(Math.asin(this.n))};plt.types.FloatPoint.prototype.imag_dash_part=function(){return plt.types.Rational.ZERO};plt.types.FloatPoint.prototype.real_dash_part=function(){return this};plt.types.FloatPoint.prototype.round=function(){if(isFinite(this.n)){if(Math.abs(Math.floor(this.n)-this.n)==0.5){if(Math.floor(this.n)%2==0){return plt.types.Rational.makeInstance(Math.floor(this.n))}return plt.types.Rational.makeInstance(Math.ceil(this.n))}else{return plt.types.Rational.makeInstance(Math.round(this.n))}}else{return this}};plt.types.FloatPoint.prototype.conjugate=plt.types.FloatPoint.prototype.abs;plt.types.FloatPoint.prototype.magnitude=plt.types.FloatPoint.prototype.abs;plt.types.FloatPoint.prototype.minus=function(){return plt.types.FloatPoint.makeInstance(0-this.n)};plt.types.FloatPoint.prototype.half=function(){return plt.types.FloatPoint.makeInstance(this.n/2)};plt.types.FloatPoint.prototype.timesI=function(){return plt.types.Complex.makeInstance(plt.types.Rational.ZERO,this)};plt.types.Complex=function(m,l){this.r=m;this.i=l};plt.types.Complex.makeInstance=function(n,m){if(typeof(n)=="number"){n=(n==Math.floor(n)?plt.types.Rational.makeInstance(n):plt.types.FloatPoint.makeInstance(n))}if(typeof(m)=="number"){m=(m==Math.floor(m)?plt.types.Rational.makeInstance(m):plt.types.FloatPoint.makeInstance(m))}var l=new plt.types.Complex(n,m);return l};plt.types.Complex.prototype.toWrittenString=function(){if(plt.types.NumberTower.greaterThanOrEqual(this.i,plt.types.Rational.ZERO)){return plt.Kernel.toWrittenString(this.r)+"+"+plt.Kernel.toWrittenString(this.i)+"i"}else{return plt.Kernel.toWrittenString(this.r)+plt.Kernel.toWrittenString(this.i)+"i"}};plt.types.Complex.prototype.toDisplayedString=plt.types.Complex.prototype.toWrittenString;plt.types.Complex.prototype.isFinite=function(){return this.r.isFinite()&&this.i.isFinite()};plt.types.Complex.prototype.isRational=function(){return this.r.isRational()&&plt.types.NumberTower.equal(this.i,plt.types.Rational.ZERO)};plt.types.Complex.prototype.isInteger=function(){return this.r.isInteger()&&plt.types.NumberTower.equal(this.i,plt.types.Rational.ZERO)};plt.types.Complex.prototype.toExact=function(){if(!this.isReal()){throw new plt.Kernel.MobyRuntimeError("inexact->exact: expects argument of type real number")}return this.r.toExact()};plt.types.Complex.prototype.isExact=function(){return this.r.isExact()&&this.i.isExact()};plt.types.Complex.prototype.level=function(){return 2};plt.types.Complex.prototype.lift=function(l){throw new plt.Kernel.MobyRuntimeError("Don't know how to lift Complex number")};plt.types.Complex.prototype.isEqual=function(m){var l=((m instanceof plt.types.Complex)&&(plt.types.NumberTower.equal(this.r,m.r))&&(plt.types.NumberTower.equal(this.i,m.i)));return l};plt.types.Complex.prototype.greaterThan=function(l){if(!this.isReal()||!l.isReal()){throw new plt.Kernel.MobyRuntimeError(">: expects argument of type real number")}return plt.types.NumberTower.greaterThan(this.r,l.r)};plt.types.Complex.prototype.greaterThanOrEqual=function(l){if(!this.isReal()||!l.isReal()){throw new plt.Kernel.MobyRuntimeError(">: expects argument of type real number")}return plt.types.NumberTower.greaterThanOrEqual(this.r,l.r)};plt.types.Complex.prototype.lessThan=function(l){if(!this.isReal()||!l.isReal()){throw new plt.Kernel.MobyRuntimeError(">: expects argument of type real number")}return plt.types.NumberTower.lessThan(this.r,l.r)};plt.types.Complex.prototype.lessThanOrEqual=function(l){if(!this.isReal()||!l.isReal()){throw new plt.Kernel.MobyRuntimeError(">: expects argument of type real number")}return plt.types.NumberTower.lessThanOrEqual(this.r,l.r)};plt.types.Complex.prototype.abs=function(){if(!plt.types.NumberTower.equal(this.i,plt.types.Rational.ZERO).valueOf()){throw new plt.Kernel.MobyRuntimeError("abs: expects argument of type real number")}return this.r.abs()};plt.types.Complex.prototype.toInteger=function(){if(!plt.types.NumberTower.equal(this.i,plt.types.Rational.ZERO).valueOf()){throw new plt.Kernel.MobyRuntimeError("toInteger: expects argument of type real number")}return this.r.toInteger()};plt.types.Complex.prototype.numerator=function(){if(!this.isReal()){throw new plt.Kernel.MobyRuntimeError("numerator: can only be applied to real number")}return this.n.numerator()};plt.types.Complex.prototype.denominator=function(){if(!this.isReal()){throw new plt.Kernel.MobyRuntimeError("floor: can only be applied to real number")}return this.n.denominator()};plt.types.Complex.prototype.toFloat=function(){if(!plt.types.NumberTower.equal(this.i,plt.types.Rational.ZERO).valueOf()){throw new plt.Kernel.MobyRuntimeError("toFloat: expects argument of type real number")}return this.r.toFloat()};plt.types.Complex.prototype.toComplex=function(){return this};plt.types.Complex.prototype.add=function(l){return plt.types.Complex.makeInstance(plt.types.NumberTower.add(this.r,l.r),plt.types.NumberTower.add(this.i,l.i))};plt.types.Complex.prototype.subtract=function(l){return plt.types.Complex.makeInstance(plt.types.NumberTower.subtract(this.r,l.r),plt.types.NumberTower.subtract(this.i,l.i))};plt.types.Complex.prototype.multiply=function(l){if(l.isReal()){return plt.types.Complex.makeInstance(plt.types.NumberTower.multiply(this.r,l.r),plt.types.NumberTower.multiply(this.i,l.r))}var n=plt.types.NumberTower.subtract(plt.types.NumberTower.multiply(this.r,l.r),plt.types.NumberTower.multiply(this.i,l.i));var m=plt.types.NumberTower.add(plt.types.NumberTower.multiply(this.r,l.i),plt.types.NumberTower.multiply(this.i,l.r));if(plt.types.NumberTower.equal(m,plt.types.Rational.ZERO)){return n}return plt.types.Complex.makeInstance(n,m)};plt.types.Complex.prototype.divide=function(n){if(n.isReal()){return plt.types.Complex.makeInstance(plt.types.NumberTower.divide(this.r,n.r),plt.types.NumberTower.divide(this.i,n.r))}var o=n.conjugate();var m=plt.types.NumberTower.multiply(this,o).toComplex();var p=plt.types.NumberTower.multiply(n,o);var l=plt.types.Complex.makeInstance(plt.types.NumberTower.divide(m.r,p),plt.types.NumberTower.divide(m.i,p));return l};plt.types.Complex.prototype.conjugate=function(){var l=plt.types.Complex.makeInstance(this.r,plt.types.NumberTower.subtract(plt.types.Rational.ZERO,this.i));return l};plt.types.Complex.prototype.magnitude=function(){var l=plt.types.NumberTower.add(plt.types.NumberTower.multiply(this.r,this.r),plt.types.NumberTower.multiply(this.i,this.i));return l.sqrt()};plt.types.Complex.prototype.isReal=function(){return plt.types.NumberTower.equal(this.i,plt.types.Rational.ZERO)};plt.types.Complex.prototype.sqrt=function(){if(this.isReal()){return this.r.sqrt()}var l=plt.types.NumberTower.add(this.magnitude(),this.r);var n=l.half().sqrt();var m=plt.types.NumberTower.divide(this.i,plt.types.NumberTower.multiply(l,plt.types.FloatPoint.makeInstance(2)).sqrt());return plt.types.Complex.makeInstance(n,m)};plt.types.Complex.prototype.log=function(){var n=this.magnitude();var o=this.angle();var l=plt.types.NumberTower.add(n.log(),o.timesI());return l};plt.types.Complex.prototype.angle=function(){if(this.isReal()){return this.r.angle()}if(plt.types.NumberTower.equal(plt.types.Rational.ZERO,this.r)){var l=plt.Kernel.pi.half();return plt.types.NumberTower.greaterThan(this.i,plt.types.Rational.ZERO)?l:l.minus()}else{var l=plt.types.NumberTower.divide(this.i.abs(),this.r.abs()).atan();if(plt.types.NumberTower.greaterThan(this.r,plt.types.Rational.ZERO)){return plt.types.NumberTower.greaterThan(this.i,plt.types.Rational.ZERO)?l:l.minus()}else{return plt.types.NumberTower.greaterThan(this.i,plt.types.Rational.ZERO)?plt.Kernel.pi.subtract(l):l.subtract(plt.Kernel.pi)}}};var f=plt.types.Complex.makeInstance(plt.types.Rational.ZERO,plt.types.Rational.ONE);var k=plt.types.Complex.makeInstance(plt.types.Rational.ZERO,plt.types.Rational.NEGATIVE_ONE);plt.types.Complex.prototype.atan=function(){if(plt.types.NumberTower.equal(this,f)||plt.types.NumberTower.equal(this,k)){return plt.types.FloatPoint.makeInstance(Number.NEGATIVE_INFINITY)}return plt.types.NumberTower.multiply(f,plt.types.NumberTower.multiply(plt.types.FloatPoint.makeInstance(0.5),(plt.types.NumberTower.divide(plt.types.NumberTower.add(f,this),plt.types.NumberTower.add(f,plt.types.NumberTower.subtract(plt.types.Rational.ZERO,this)))).log()))};plt.types.Complex.prototype.cos=function(){if(this.isReal()){return this.r.cos()}var m=this.timesI();var l=m.minus();return plt.types.NumberTower.add(m.exp(),l.exp()).half()};plt.types.Complex.prototype.sin=function(){if(this.isReal()){return this.r.sin()}var p=this.timesI();var o=p.minus();var n=plt.types.Complex.makeInstance(plt.types.Rational.ZERO,plt.types.Rational.TWO);var m=plt.types.NumberTower.subtract(p.exp(),o.exp());var l=plt.types.NumberTower.divide(m,n);return l};plt.types.Complex.prototype.expt=function(m){var l=plt.types.NumberTower.multiply(m,this.log());return l.exp()};plt.types.Complex.prototype.exp=function(){var n=this.r.exp();var l=this.i.cos();var m=this.i.sin();return plt.types.NumberTower.multiply(n,plt.types.NumberTower.add(l,m.timesI()))};plt.types.Complex.prototype.acos=function(){if(this.isReal()){return this.r.acos()}var o=plt.Kernel.pi.half();var p=this.timesI();var n=plt.types.NumberTower.subtract(plt.types.Rational.ONE,this.multiply(this)).sqrt();var m=plt.types.NumberTower.add(p,n).log().timesI();return plt.types.NumberTower.add(o,m)};plt.types.Complex.prototype.asin=function(){if(this.isReal()){return this.r.asin()}var n=this.timesI();var l=plt.types.NumberTower.subtract(plt.types.Rational.ONE,this.multiply(this)).sqrt();var m=plt.types.NumberTower.add(n,l).log().timesI().minus();throw new plt.Kernel.MobyRuntimeError("")};plt.types.Complex.prototype.ceiling=function(){if(!this.isReal()){throw new plt.Kernel.MobyRuntimeError("ceiling: can only be applied to real number")}return this.r.ceiling()};plt.types.Complex.prototype.floor=function(){if(!this.isReal()){throw new plt.Kernel.MobyRuntimeError("floor: can only be applied to real number")}return this.r.floor()};plt.types.Complex.prototype.imag_dash_part=function(){return this.i};plt.types.Complex.prototype.real_dash_part=function(){return this.r};plt.types.Complex.prototype.round=function(){return this.r.round()};plt.types.Complex.prototype.timesI=function(){return this.multiply(plt.types.Complex.makeInstance(plt.types.Rational.ZERO,plt.types.Rational.ONE))};plt.types.Complex.prototype.minus=function(){return plt.types.Complex.makeInstance(plt.types.NumberTower.subtract(plt.types.Rational.ZERO,this.r),plt.types.NumberTower.subtract(plt.types.Rational.ZERO,this.i))};plt.types.Complex.prototype.half=function(){return plt.types.Complex.makeInstance(this.r.half(),this.i.half())};plt.types.NumberTower={};plt.types.NumberTower.toInteger=function(l){return l.toInteger()};plt.types.NumberTower.toFloat=function(l){return l.toFloat()};plt.types.NumberTower.abs=function(l){return l.abs()};plt.types.NumberTower.isFinite=function(l){return l.isFinite()};plt.types.NumberTower.toExact=function(l){return l.toExact()};plt.types.NumberTower.add=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}return l.add(m)};plt.types.NumberTower.subtract=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}return l.subtract(m)};plt.types.NumberTower.multiply=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}return l.multiply(m)};plt.types.NumberTower.divide=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}return l.divide(m)};plt.types.NumberTower.equal=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}return l.isEqual(m)};plt.types.NumberTower.approxEqual=function(l,n,m){return plt.types.NumberTower.lessThan(plt.types.NumberTower.abs(plt.types.NumberTower.subtract(l,n)),m)};plt.types.NumberTower.greaterThanOrEqual=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}if(!(l.isReal()&&m.isReal())){throw new plt.Kernel.MobyRuntimeError("greaterThanOrEqual: couldn't be applied to complex number")}return l.greaterThanOrEqual(m)};plt.types.NumberTower.lessThanOrEqual=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}if(!(l.isReal()&&m.isReal())){throw new plt.Kernel.MobyRuntimeError("lessThanOrEqual: couldn't be applied to complex number")}return l.lessThanOrEqual(m)};plt.types.NumberTower.greaterThan=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}if(!(l.isReal()&&m.isReal())){throw new plt.Kernel.MobyRuntimeError("greaterThan: couldn't be applied to complex number")}return l.greaterThan(m)};plt.types.NumberTower.lessThan=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}if(!(l.isReal()&&m.isReal())){throw new plt.Kernel.MobyRuntimeError("lessThan: couldn't be applied to complex number")}return l.lessThan(m)};plt.types.NumberTower.modulo=function(o,p){var l=plt.types.Rational.makeInstance(o.toInteger()%p.toInteger(),1);if(plt.types.NumberTower.lessThan(p,plt.types.Rational.ZERO)){if(plt.types.NumberTower.lessThanOrEqual(l,plt.types.Rational.ZERO)){return l}return plt.types.NumberTower.add(l,p)}else{if(plt.types.NumberTower.lessThan(l,plt.types.Rational.ZERO)){return plt.types.NumberTower.add(l,p)}return l}};plt.types.NumberTower.sqr=function(l){return plt.types.NumberTower.multiply(l,l)};plt.types.NumberTower.expt=function(l,m){if(l.level()<m.level()){l=l.lift(m)}if(m.level()<l.level()){m=m.lift(l)}return l.expt(m)};plt.types.String=String;plt.types.String.makeInstance=function(l){return l.valueOf()};plt.types.String.prototype.isEqual=function(l){return this==l};plt.types.String.prototype.toWrittenString=function(){return'"'+this.replace(/["\\]/g,function(m,n,l){return"\\"+m})+'"'};plt.types.String.prototype.toDisplayedString=function(){return this}})();var plt=plt||{};plt._Hashtable=(function(){function o(A){return(typeof A==="undefined")}function m(A){return(typeof A==="function")}function k(A){return(typeof A==="string")}function g(B,A){return m(B[A])}function n(A){return g(A,"equals")}function l(A){return g(A,"hashCode")}function i(B){if(k(B)){return B}else{if(l(B)){var A=B.hashCode();if(!k(A)){return i(A)}return A}else{if(g(B,"toString")){return B.toString()}else{return String(B)}}}}function j(B,A){return B.equals(A)}function e(B,A){if(n(A)){return A.equals(B)}else{return B===A}}function b(B,A){return B===A}function h(C,G,F,E,B){var D;for(var H=0,A=C.length;H<A;H++){D=C[H];if(B(G,F(D))){return E?[H,D]:true}}return false}function u(C,B){if(g(C,"splice")){C.splice(B,1)}else{if(B===C.length-1){C.length=B}else{var E=C.slice(B+1);C.length=B;for(var D=0,A=E.length;D<A;D++){C[B+D]=E[D]}}}}function p(B,A){if(B===null){throw new Error("null is not a valid "+A)}else{if(o(B)){throw new Error(A+" must not be undefined")}}}var t="key",s="value";function r(A){p(A,t)}function z(A){p(A,s)}function y(A,C,B){this.entries=[];this.addEntry(A,C);if(B!==null){this.getEqualityFunction=function(){return B}}}function x(A){return A[0]}function w(A){return A[1]}y.prototype={getEqualityFunction:function(A){if(n(A)){return j}else{return e}},searchForEntry:function(A){return h(this.entries,A,x,true,this.getEqualityFunction(A))},getEntryForKey:function(A){return this.searchForEntry(A)[1]},getEntryIndexForKey:function(A){return this.searchForEntry(A)[0]},removeEntryForKey:function(B){var A=this.searchForEntry(B);if(A){u(this.entries,A[0]);return true}return false},addEntry:function(B,A){this.entries[this.entries.length]=[B,A]},size:function(){return this.entries.length},keys:function(C){var B=C.length;for(var D=0,A=this.entries.length;D<A;D++){C[B+D]=this.entries[D][0]}},values:function(D){var C=D.length;for(var B=0,A=this.entries.length;B<A;B++){D[C+B]=this.entries[B][1]}},containsKey:function(A){return h(this.entries,A,x,false,this.getEqualityFunction(A))},containsValue:function(A){return h(this.entries,A,w,false,b)}};function f(){}f.prototype=[];function d(A){return A[0]}function c(C,B,A){return h(C,B,d,true,A)}function v(C,B){var A=C[B];if(A&&(A instanceof f)){return A[1]}return null}function q(D,C){var B=[];var A={};D=m(D)?D:i;C=m(C)?C:null;this.put=function(E,J){r(E);z(J);var I=D(E);var G=v(A,I);if(G){var H=G.getEntryForKey(E);if(H){H[1]=J}else{G.addEntry(E,J)}}else{var F=new f();F[0]=I;F[1]=new y(E,J,C);B[B.length]=F;A[I]=F}};this.get=function(F){r(F);var H=D(F);var G=v(A,H);if(G){var E=G.getEntryForKey(F);if(E){return E[1]}}return null};this.containsKey=function(G){r(G);var F=D(G);var E=v(A,F);if(E){return E.containsKey(G)}return false};this.containsValue=function(F){z(F);for(var G=0,E=B.length;G<E;G++){if(B[G][1].containsValue(F)){return true}}return false};this.clear=function(){B.length=0;A={}};this.isEmpty=function(){return B.length===0};this.keys=function(){var F=[];for(var G=0,E=B.length;G<E;G++){B[G][1].keys(F)}return F};this.values=function(){var G=[];for(var F=0,E=B.length;F<E;F++){B[F][1].values(G)}return G};this.remove=function(E){r(E);var H=D(E);var G=v(A,H);if(G){if(G.removeEntryForKey(E)){if(G.size()===0){var F=c(B,H,G.getEqualityFunction(E));u(B,F[0]);delete A[H]}}}};this.size=function(){var G=0;for(var F=0,E=B.length;F<E;F++){G+=B[F][1].size()}return G}}return q})();var plt=plt||{};(function(){if(!Array.indexOf){Array.prototype.indexOf=function(Z){for(var Y=0;Y<this.length;Y++){if(this[Y]==Z){return Y}}return -1}}var f=function(aa,Y,Z){if(aa.addEventListener){aa.addEventListener(Y,Z,false)}else{aa.attachEvent("on"+Y,Z,false)}};var p=function(aa,Y,Z){if(aa.addEventListener){aa.removeEventListener(Y,Z,false)}else{aa.detachEvent("on"+Y,Z,false)}};var z=function(Z){var Y=function(){};Y.prototype=Z;return new Y()};var x=function(Y){this.msg=Y};x.prototype.name="MobyError";x.prototype.toString=function(){return this.name+": "+this.msg};var W=function(Z,Y){x.call(this,Z);this.loc=Y};W.prototype=z(x.prototype);W.prototype.name="MobyParserError";var M=function(Z,Y){x.call(this,Z);this.stx=Y};M.prototype=z(x.prototype);M.prototype.name="MobySyntaxError";var G=function(Y){x.call(this,Y)};G.prototype=z(x.prototype);G.prototype.name="MobyTypeError";var C=function(Y){x.call(this,Y)};C.prototype=z(x.prototype);C.prototype.name="MobyRuntimeError";var Q=function(Y){x.call(this,Y)};Q.prototype=z(C.prototype);Q.prototype.name="MobyTestingError";var J=function(Z,Y){while(Y!=0){var aa=Z;Z=Y;Y=aa%Y}return Math.abs(Z)};var e=function(Z,Y){return Math.abs(Z*Y/J(Z,Y))};var V=function(Y){return(Y!=null&&Y!=undefined&&(Y instanceof plt.types.Rational||Y instanceof plt.types.FloatPoint||Y instanceof plt.types.Complex))};var i=function(Y){return(Y!=null&&Y!=undefined&&Y instanceof plt.types.Symbol)};var o=function(Y){return Y!=null&&Y!=undefined&&Y instanceof plt.types.Char};var N=function(Y){return stx_question_(Y)};var h=function(Y){return typeof(Y)=="string"};var F=function(Y){return(Y==plt.types.Logic.TRUE||Y==plt.types.Logic.FALSE)};var S=function(Y){return Y!=null&&Y!=undefined&&Y instanceof plt.types.Cons};var r=function(Y){return Y!=null&&Y!=undefined&&Y instanceof plt.types.Empty};var U=function(Y){return(V(Y)&&Y.isReal())};var D=function(Y){return V(Y)&&Y.isRational()};var E=function(Y){return V(Y)};var q=function(Y){return typeof(Y)=="function"};var m=function(Y){return(V(Y)&&Y.isInteger())};var k=function(Y){return V(Y)&&Y.isInteger()&&Y.toInteger()>=0};var s=function(Z){for(var Y=0;Y<Z.length;Y++){if(!((Z[Y]>="a"&&Z[Y]<="z")||(Z[Y]>="A"&&Z[Y]<="Z"))){return false}}return true};var K=(function(){var Y=new RegExp("^\\s*$");return function(Z){return(Z.match(Y)?true:false)}}());var c=function(Y){return Y!=null&&Y!=undefined&&(Y instanceof plt.types.Vector)};var g=function(Y,aa){for(var Z=0;Z<Y.length;Z++){aa.apply(Y[Z],[Y[Z],Z])}};var I=function(ac,ab,Y,aa){if(!ac(ab,Y).valueOf()){return false}if(aa.length==0){return true}if(!ac(Y,aa[0]).valueOf()){return false}for(var Z=0;Z<aa.length-1;Z++){if(!ac(aa[Z],aa[Z+1]).valueOf()){return false}}return true};var j=function(Y,ac,aa){var Z;var ab=ac;for(Z=0;Z<aa.length;Z++){if(!(Y(ab,aa[Z])).valueOf()){ab=aa[Z]}}return ab};var b=function(Y){return Y!=null&&Y!=undefined&&((Y instanceof plt.types.Cons)||(Y instanceof plt.types.Empty))};var A=function(ac,Z,Y,ab){var aa=["th","st","nd","rd","th","th","th","th"];return plt.Kernel.format("~a: expects type <~a> as ~a argument, given: ~s",[ac,Z,Y+aa[Math.min(aa.length-1,Y)],ab])};var w=function(Z,ac,ab,aa,Y){if(!ac(Z)){throw new G(A(ab,aa,Y,Z))}};var H=function(Z,aa,Y){if(!b(Z)){throw new G(A(aa,"list",Y,Z))}};var R=function(Z,ac,ab,aa,Y){if(!b(Z)){throw new G(A(ab,"listof "+aa,Y,Z))}while(!Z.isEmpty()){if(!ac(Z.first())){throw new G(A(ab,"listof "+aa,Y,Z))}Z=Z.rest()}};var y=function(ab,Z,aa,Y){return function(ae,ac,ad){w(ae,ab,Y,Z,1);w(ac,ab,Y,Z,2);g(ad,function(af,ag){w(af,ab,Y,Z,ag+3)});return aa(ae,ac,ad)}};var l=function(Z,Y){return y(V,"number",function(ac,aa,ab){return I(Z,ac,aa,ab)},Y)};var X=function(Z,Y){return y(o,"char",function(ac,aa,ab){return I(Z,ac,aa,ab)},Y)};var n=function(Z,Y){return y(h,"string",function(ac,aa,ab){return I(Z,ac,aa,ab)},Y)};plt.Kernel={_heir:z,pi:plt.types.FloatPoint.makeInstance(Math.PI),e:plt.types.FloatPoint.makeInstance(Math.E),Struct:function(Z,Y){this._constructorName=Z;this._fields=Y},struct_question_:function(Y){return(Y!=null&&Y!=undefined&&Y instanceof plt.Kernel.Struct)},number_question_:function(Y){return V(Y)},equal_question_:function(Y,Z){if(plt.Kernel.number_question_(Y)&&plt.Kernel.number_question_(Z)){if("isEqual" in Y){return plt.types.NumberTower.equal(Y,Z)}else{if("isEqual" in Z){return plt.types.NumberTower.equal(Z,Y)}else{return(Y==Z)}}}else{return Y.isEqual(Z)}},equal_tilde__question_:function(Y,aa,Z){w(Z,V,"equal~?","number",3);if(plt.Kernel.number_question_(Y).valueOf()&&plt.Kernel.number_question_(aa).valueOf()){if("isEqual" in Y){return plt.types.NumberTower.approxEqual(Y,aa,Z)}else{if("isEqual" in aa){return plt.types.NumberTower.approxEqual(aa,Y,Z)}else{return(Y==aa)}}}else{return Y.isEqual(aa)}},eq_question_:function(Y,Z){return(Y==Z)},eqv_question_:function(Y,Z){if(V(Y)&&V(Z)&&Y.level()==Z.level()){return plt.types.NumberTower.equal(Y,Z)}else{if(o(Y)&&o(Z)){return Y.getValue()==Z.getValue()}}return Y===Z},identity:function(Y){return Y},cons:function(Y,Z){H(Z,"cons",2);return plt.types.Cons.makeInstance(Y,Z)},first:function(Y){H(Y,"first",1);return Y.first()},rest:function(Y){H(Y,"rest",1);return Y.rest()},second:function(Y){H(Y,"second",1);return Y.rest().first()},third:function(Y){H(Y,"third",1);return Y.rest().rest().first()},fourth:function(Y){H(Y,"fourth",1);return Y.rest().rest().rest().first()},fifth:function(Y){H(Y,"fifth",1);return Y.rest().rest().rest().rest().first()},random:function(Y){w(Y,m,"random","integer",1);return plt.types.Rational.makeInstance(Math.floor(plt.types.NumberTower.toInteger(Y)*Math.random()),1)},current_dash_seconds:function(){return plt.types.Rational.makeInstance(new Date().getMilliseconds()/1000)},floor:function(Y){w(Y,V,"floor","number",1);return Y.floor()},ceiling:function(Y){w(Y,V,"ceiling","number",1);return Y.ceiling()},sqrt:function(Y){w(Y,V,"sqrt","number",1);return Y.sqrt()},integer_dash_sqrt:function(Z){w(Z,m,"integer-sqrt","integer",1);var Y=Z.sqrt();if(D(Y)){return plt.types.Rational.makeInstance(Y.toInteger())}else{if(U(Y)){return plt.types.Rational.makeInstance(Y.toInteger())}else{return plt.types.Complex.makeInstance(plt.types.Rational.makeInstance(plt.Kernel.real_dash_part(Y).toInteger()),plt.types.Rational.makeInstance(plt.Kernel.imag_dash_part(Y).toInteger()))}}},sqr:function(Y){w(Y,V,"sqr","number",1);return plt.types.NumberTower.sqr(Y)},sin:function(Y){w(Y,V,"sin","number",1);return Y.sin()},cos:function(Y){w(Y,V,"cos","number",1);return Y.cos()},modulo:function(Y,Z){w(Y,V,"modulo","number",1);w(Z,V,"modulo","number",2);return plt.types.NumberTower.modulo(Y,Z)},zero_question_:function(Y){w(Y,V,"zero?","number",1);return plt.types.NumberTower.equal(Y,plt.types.Rational.ZERO)},_equal__tilde_:function(Y,aa,Z){w(Y,V,"=~","number",1);w(aa,V,"=~","number",2);w(Z,V,"=~","number",3);return plt.types.NumberTower.approxEqual(Y,aa,Z)},abs:function(Y){w(Y,V,"abs","number",1);return plt.types.NumberTower.abs(Y)},add1:function(Y){w(Y,V,"add1","number",1);return plt.types.NumberTower.add(Y,plt.types.Rational.ONE)},sub1:function(Y){w(Y,V,"sub1","number",1);return plt.types.NumberTower.subtract(Y,plt.types.Rational.ONE)},_plus_:function(Y){g(Y,function(ab,ac){w(ab,V,"+","number",ac+1)});var Z,aa=plt.types.Rational.ZERO;for(Z=0;Z<Y.length;Z++){aa=plt.types.NumberTower.add(aa,Y[Z])}return aa},_dash_:function(ab,Y){w(ab,V,"-","number",1);g(Y,function(ac,ad){w(ac,V,"-","number",ad+2)});if(Y.length==0){return plt.types.NumberTower.subtract(plt.types.Rational.ZERO,ab)}var Z,aa=ab;for(Z=0;Z<Y.length;Z++){aa=plt.types.NumberTower.subtract(aa,Y[Z])}return aa},_star_:function(Z){g(Z,function(ab,ac){w(ab,V,"*","number",ac+1)});var aa,Y=plt.types.Rational.ONE;for(aa=0;aa<Z.length;aa++){Y=plt.types.NumberTower.multiply(Y,Z[aa])}return Y},_slash_:function(aa,Y){w(aa,V,"/","number",1);g(Y,function(ac,ad){w(ac,V,"/","number",ad+2)});var Z,ab=aa;if(Y.length==0){return plt.types.NumberTower.divide(plt.types.Rational.ONE,ab)}else{for(Z=0;Z<Y.length;Z++){ab=plt.types.NumberTower.divide(ab,Y[Z])}return ab}},_equal_:l(plt.types.NumberTower.equal,"="),_greaterthan__equal_:l(plt.types.NumberTower.greaterThanOrEqual,">="),_lessthan__equal_:l(plt.types.NumberTower.lessThanOrEqual,"<="),_greaterthan_:l(plt.types.NumberTower.greaterThan,">"),_lessthan_:l(plt.types.NumberTower.lessThan,"<"),min:function(Z,Y){w(Z,V,"min","number",1);g(Y,function(aa,ab){w(this,V,"min","number",ab+2)});return j(plt.types.NumberTower.lessThanOrEqual,Z,Y)},max:function(Z,Y){w(Z,V,"max","number",1);g(Y,function(aa,ab){w(this,V,"max","number",ab+2)});return j(plt.types.NumberTower.greaterThanOrEqual,Z,Y)},lcm:function(ab,aa){w(ab,m,"lcm","number",1);g(aa,function(ac,ad){w(this,m,"lcm","number",ad+2)});var Y=Math.abs(ab.toInteger());if(Y==0){return plt.types.Rational.ZERO}for(var Z=0;Z<aa.length;Z++){if(aa[Z].toInteger()==0){return plt.types.Rational.ZERO}Y=e(Y,aa[Z].toInteger())}return plt.types.Rational.makeInstance(Y)},gcd:function(ab,aa){w(ab,m,"gcd","number",1);g(aa,function(ac,ad){w(this,m,"gcd","number",ad+2)});var Y=Math.abs(ab.toInteger());for(var Z=0;Z<aa.length;Z++){Y=J(Y,aa[Z].toInteger())}return plt.types.Rational.makeInstance(Y)},exact_dash__greaterthan_inexact:function(Y){w(Y,V,"exact->inexact","number",1);return plt.types.FloatPoint.makeInstance(Y.toFloat())},inexact_dash__greaterthan_exact:function(Y){w(Y,V,"inexact->exact","number",1);return plt.types.NumberTower.toExact(Y)},exact_question_:function(Y){w(Y,V,"exact?","number",1);return Y.isExact()},inexact_question_:function(Y){w(Y,V,"inexact?","number",1);return !Y.isExact()},rational_question_:function(Y){return(plt.Kernel.number_question_(Y)&&Y.isRational())},number_dash__greaterthan_string:function(Y){w(Y,V,"number->string","number",1);return plt.types.String.makeInstance(plt.Kernel.toWrittenString(Y))},conjugate:function(Y){w(Y,V,"conjugate","number",1);return Y.conjugate()},magnitude:function(Y){w(Y,V,"magnitude","number",1);return Y.magnitude()},log:function(Y){w(Y,V,"log","number",1);return Y.log()},angle:function(Y){w(Y,V,"angle","number",1);return Y.angle()},atan:function(Y,Z){if(Z.length==0){w(Y,V,"atan","number",1);return Y.atan()}else{if(Z.length==1){w(Y,U,"atan","number",1);w(Z[0],U,"atan","number",2);return plt.types.FloatPoint.makeInstance(Math.atan2(plt.types.NumberTower.toFloat(Y),plt.types.NumberTower.toFloat(Z[0])))}else{throw new C(plt.Kernel.format("atan: expects 1 to 2 arguments, given ~a.",[plt.types.Rational.makeInstance(Z.length)]))}}},expt:function(Y,Z){w(Y,V,"expt","number",1);w(Z,V,"expt","number",2);return plt.types.NumberTower.expt(Y,Z)},exp:function(Y){w(Y,V,"exp","number",1);return Y.exp()},acos:function(Y){w(Y,V,"acos","number",1);return Y.acos()},asin:function(Y){w(Y,V,"asin","number",1);return Y.asin()},tan:function(Y){w(Y,V,"tan","number",1);return plt.types.NumberTower.divide(Y.sin(),Y.cos())},complex_question_:function(Y){return E(Y)},cosh:function(Y){w(Y,V,"cosh","number",1);return this._plus_([this.exp(Y),this.exp(Y.minus())]).half()},sinh:function(Y){w(Y,V,"sinh","number",1);return plt.types.NumberTower.subtract(this.exp(Y),this.exp(Y.minus())).half()},denominator:function(Y){w(Y,D,"denominator","rational",1);return Y.denominator()},numerator:function(Y){w(Y,D,"numerator","rational",1);return Y.numerator()},odd_question_:function(Y){w(Y,V,"odd?","number",1);return(Math.abs((Y.toInteger()%2))==1)},even_question_:function(Y){w(Y,V,"even?","number",1);return(Math.abs((Y.toInteger()%2))==0)},positive_question_:function(Y){w(Y,V,"positive?","number",1);return this._greaterthan_(Y,plt.types.Rational.ZERO,[])},negative_question_:function(Y){w(Y,V,"negative?","number",1);return this._lessthan_(Y,plt.types.Rational.ZERO,[])},imag_dash_part:function(Y){w(Y,V,"imag-part","number",1);return Y.imag_dash_part()},real_dash_part:function(Y){w(Y,V,"real-part","number",1);return Y.real_dash_part()},make_dash_polar:function(aa,Z){if(plt.types.NumberTower.equal(Z,plt.types.Rational.ZERO)){return aa}var Y=plt.types.NumberTower.multiply(aa,Z.cos());var ab=plt.types.NumberTower.multiply(aa,Z.sin());return plt.types.Complex.makeInstance(Y,ab)},integer_question_:function(Y){return(m(Y))},make_dash_rectangular:function(Y,Z){return plt.types.Complex.makeInstance(Y,Z)},quotient:function(Y,aa){w(Y,m,"quotient","integer",1);w(aa,m,"quotient","integer",2);var Z=plt.types.NumberTower.divide(Y,aa);if(plt.Kernel.positive_question_(Z)){return plt.types.Rational.makeInstance(Z.floor().toInteger(),1)}else{return plt.types.Rational.makeInstance(Z.ceiling().toInteger(),1)}},remainder:function(Y,Z){w(Y,V,"remainder","number",1);w(Z,V,"remainder","number",2);return plt.types.Rational.makeInstance(Y.toInteger()%Z.toInteger(),1)},real_question_:function(Y){return U(Y)},round:function(Y){w(Y,V,"round","number",1);return Y.round()},sgn:function(Y){w(Y,V,"sgn","number",1);if(this.positive_question_(Y).valueOf()){return plt.types.Rational.ONE}if(this.negative_question_(Y).valueOf()){return plt.types.Rational.NEGATIVE_ONE}else{return plt.types.Rational.ZERO}},boolean_equal__question_:function(Y,Z){w(Y,F,"boolean=?","boolean",1);w(Z,F,"boolean=?","boolean",2);return Y==Z},boolean_question_:function(Y){return F(Y)},false_question_:function(Y){return(Y==plt.types.Logic.FALSE)},not:function(Y){if(!Y||Y===plt.types.Logic.FALSE){return plt.types.Logic.TRUE}return plt.types.Logic.FALSE},symbol_dash__greaterthan_string:function(Y){w(Y,i,"symbol->string","symbol",1);return plt.types.String.makeInstance(Y.val)},symbol_equal__question_:function(Y,Z){w(Y,i,"symbol=?","symbol",1);w(Z,i,"symbol=?","symbol",2);return(Y.val==Z.val)},symbol_question_:function(Y){return i(Y)},append:function(ab,aa){H(ab,"append",1);var Y=ab;var Z;for(Z=0;Z<aa.length;Z++){H(aa[Z],"append",Z+2);Y=Y.append(aa[Z])}return Y},reverse:function(Y){H(Y,"reverse",1);var Z=plt.types.Empty.EMPTY;while(!Y.isEmpty()){Z=plt.types.Cons.makeInstance(Y.first(),Z);Y=Y.rest()}return Z},assq:function(Z,Y){H(Y,"assq",2);while(!Y.isEmpty()&&!plt.Kernel.eq_question_(Z,Y.first().first())){Y=Y.rest()}if(Y.isEmpty()){return plt.types.Logic.FALSE}else{return Y.first()}},caaar:function(Y){H(Y,"caaar",1);return Y.first().first().first()},caadr:function(Y){H(Y,"caadr",1);return Y.first().first().rest()},caar:function(Y){H(Y,"caar",1);return Y.first().first()},cadar:function(Y){H(Y,"cadar",1);return Y.first().rest().first()},cadddr:function(Y){H(Y,"cadddr",1);return Y.rest().rest().rest().first()},caddr:function(Y){H(Y,"caddr",1);return Y.rest().rest().first()},cadr:function(Y){H(Y,"cadr",1);return Y.rest().first()},car:function(Y){H(Y,"car",1);return Y.first()},cdaar:function(Y){H(Y,"cdaar",1);return Y.first().first().rest()},cdadr:function(Y){H(Y,"cdadr",1);return Y.rest().first().rest()},cdar:function(Y){H(Y,"cdar",1);return Y.first().rest()},cddar:function(Y){H(Y,"cddar",1);return Y.first().rest().rest()},cdddr:function(Y){H(Y,"cdddr",1);return Y.rest().rest().rest()},cddr:function(Y){H(Y,"cddr",1);return Y.rest().rest()},cdr:function(Y){H(Y,"cdr",1);return Y.rest()},null_question_:function(Y){return r(Y)},empty_question_:function(Y){return r(Y)},pair_question_:function(Y){return S(Y)},cons_question_:function(Y){return S(Y)},sixth:function(Y){H(Y,"sixth",1);return Y.rest().rest().rest().rest().rest().first()},seventh:function(Y){H(Y,"seventh",1);return Y.rest().rest().rest().rest().rest().rest().first()},eighth:function(Y){H(Y,"eighth",1);return Y.rest().rest().rest().rest().rest().rest().rest().first()},set_dash_car_bang_:function(Y,Z){H(Y,"set-car!",1);Y.f=Z;return undefined},set_dash_cdr_bang_:function(Y,Z){H(Y,"set-cdr!",1);H(Z,"set-cdr!",2);Y.r=Z;return undefined},length:function(Y){H(Y,"length",1);var Z=plt.types.Rational.ZERO;for(;!Y.isEmpty();Y=Y.rest()){Z=plt.Kernel.add1(Z)}return Z},list:function(Y){var Z=plt.types.Empty.EMPTY;for(var aa=Y.length-1;aa>=0;aa--){Z=plt.types.Cons.makeInstance(Y[aa],Z)}return Z},list_star_:function(Y,aa){var Z=aa.pop();if(Z==undefined||!Z instanceof plt.types.Cons){throw new G("list*: "+Z+" not a list")}aa.unshift(Y);return plt.Kernel.append(plt.Kernel.list(aa),[Z])},list_dash_ref:function(Z,Y){H(Z,"list-ref",1);w(Y,k,"list-ref","natural",2);var aa=plt.types.Rational.ZERO;for(;plt.Kernel._lessthan_(aa,Y,[]);aa=plt.Kernel.add1(aa)){if(Z.isEmpty()){throw new C("list-ref: index too small")}else{Z=Z.rest()}}return Z.first()},remove:function(ab,Z){H(Z,"member",2);var aa=Z;var Y=plt.types.Empty.EMPTY;while(!Z.isEmpty()){if(plt.Kernel.equal_question_(ab,Z.first()).valueOf()){return plt.Kernel.append(plt.Kernel.reverse(Y),[Z.rest()])}else{Y=plt.types.Cons.makeInstance(Z.first(),Y);Z=Z.rest()}}return aa},member:function(Z,Y){H(Y,"member",2);while(!Y.isEmpty()){if(plt.Kernel.equal_question_(Z,Y.first()).valueOf()){return plt.types.Logic.TRUE}Y=Y.rest()}return plt.types.Logic.FALSE},memq:function(Z,Y){H(Y,"memq",2);while(!Y.isEmpty()){if(plt.Kernel.eq_question_(Z,Y.first()).valueOf()){return Y}Y=Y.rest()}return plt.types.Logic.FALSE},memv:function(Z,Y){H(Y,"memv",2);while(!Y.isEmpty()){if(plt.Kernel.eqv_question_(Z,Y.first()).valueOf()){return Y}Y=Y.rest()}return plt.types.Logic.FALSE},memf:function(Z,Y){w(Z,q,"memf","function",1);H(Y,"memf",2);while(!Y.isEmpty()){if(Z([Y.first()])){return Y}Y=Y.rest()}return plt.types.Logic.FALSE},compose:function(Y){return function(Z){var ab=Z;for(var aa=Y.length-1;aa>=0;aa--){ab=[Y[aa](ab)]}return ab[0]}},string_dash__greaterthan_number:function(ab){w(ab,h,"string->number","string",1);try{var Z=plt.reader.readSchemeExpressions(ab,"");if(plt.types.NumberTower.equal(plt.Kernel.length(Z),plt.types.Rational.ONE)){var Y=stx_dash_e(Z.first());if(V(Y)){return Y}else{return plt.types.Logic.FALSE}}else{return plt.types.Logic.FALSE}}catch(aa){return plt.types.Logic.FALSE}},string_dash__greaterthan_symbol:function(Y){w(Y,h,"string->symbol","string",1);return plt.types.Symbol.makeInstance(Y)},string_dash__greaterthan_int:function(Y){w(Y,h,"string->int","string",1);return plt.types.Rational.makeInstance(Y.toString().charCodeAt(0),1)},string_dash_append:function(Y){g(Y,function(Z,aa){w(Z,h,"string-append","string",aa+1)});return plt.types.String.makeInstance(Y.join(""))},replicate:function(ab,aa){w(ab,k,"replicate","natural",1);w(aa,h,"replicate","string",2);var Y=[];for(var Z=0;Z<ab.toInteger();Z++){Y.push(aa)}return plt.types.String.makeInstance(Y.join(""))},string_equal__question_:n(function(Y,Z){return Y==Z},"string=?"),string_lessthan__equal__question_:n(function(Y,Z){return Y<=Z},"string<=?"),string_lessthan__question_:n(function(Y,Z){return Y<Z},"string<?"),string_greaterthan__equal__question_:n(function(Y,Z){return Y>=Z},"string>=?"),string_greaterthan__question_:n(function(Y,Z){return Y>Z},"string>?"),string_dash_ci_equal__question_:n(function(Y,Z){return Y.toUpperCase()==Z.toUpperCase()},"string-ci=?"),string_dash_ci_lessthan__equal__question_:n(function(Y,Z){return Y.toUpperCase()<=Z.toUpperCase()},"string-ci<=?"),string_dash_ci_lessthan__question_:n(function(Y,Z){return Y.toUpperCase()<Z.toUpperCase()},"string-ci<?"),string_dash_ci_greaterthan__question_:n(function(Y,Z){return Y.toUpperCase()>Z.toUpperCase()},"string-ci>?"),string_dash_ci_greaterthan__equal__question_:n(function(Y,Z){return Y.toUpperCase()>=Z.toUpperCase()},"string-ci>=?"),string_dash_copy:function(Y){w(Y,h,"string-copy","string",1);return Y.substring(0,Y.length)},string_dash_length:function(Y){w(Y,h,"string-length","string",1);return plt.types.Rational.makeInstance(Y.length,1)},string_dash_ref:function(Z,Y){w(Z,h,"string-ref","string",1);w(Y,k,"string-ref","natural",2);if(Y.toInteger()>=Z.length){throw new C("string-ref: index >= length")}return plt.types.String.makeInstance(Z.charAt(Y.toInteger()))},string_dash_ith:function(Z,Y){w(Z,h,"string-ith","string",1);w(Y,k,"string-ith","natural",2);if(Y.toInteger()>=Z.length){throw new C("string-ith: index >= string length")}return plt.types.String.makeInstance(Z.substring(Y.toInteger(),Y.toInteger()+1))},int_dash__greaterthan_string:function(Y){w(Y,m,"int->string","integer",1);return plt.types.String.makeInstance(String.fromCharCode(Y.toInteger()))},string_question_:function(Y){return h(Y)},substring:function(aa,Z,Y){w(aa,h,"substring","string",1);w(Z,k,"substring","natural",2);w(Y,k,"substring","natural",3);if(Z.toInteger()>Y.toInteger()){throw new C("substring: begin > end")}if(Y.toInteger()>aa.length){throw new C("substring: end > length")}return String.makeInstance(aa.substring(Z.toInteger(),Y.toInteger()))},char_question_:function(Y){return o(Y)},char_dash__greaterthan_integer:function(Y){w(Y,o,"char->integer","char",1);var Z=new String(Y.val);return plt.types.Rational.makeInstance(Z.charCodeAt(0),1)},integer_dash__greaterthan_char:function(Z){w(Z,m,"integer->char","integer",1);var Y=String.fromCharCode(Z.toInteger());return plt.types.Char.makeInstance(Y)},char_equal__question_:X(function(Y,Z){return Y.val==Z.val},"char=?"),char_lessthan__question_:X(function(Y,Z){return Y.val<Z.val},"char<?"),char_lessthan__equal__question_:X(function(Y,Z){return Y.val<=Z.val},"char<=?"),char_greaterthan__question_:X(function(Y,Z){return Y.val>Z.val},"char>?"),char_greaterthan__equal__question_:X(function(Y,Z){return Y.val>=Z.val},"char>=?"),char_dash_ci_equal__question_:X(function(Y,Z){return Y.val.toUpperCase()==Z.val.toUpperCase()},"char-ci=?"),char_dash_ci_lessthan__question_:X(function(Y,Z){return Y.val.toUpperCase()<Z.val.toUpperCase()},"char-ci<?"),char_dash_ci_lessthan__equal__question_:X(function(Y,Z){return Y.val.toUpperCase()<=Z.val.toUpperCase()},"char-ci<=?"),char_dash_ci_greaterthan__question_:X(function(Y,Z){return Y.val.toUpperCase()>Z.val.toUpperCase()},"char-ci>?"),char_dash_ci_greaterthan__equal__question_:X(function(Y,Z){return Y.val.toUpperCase()>=Z.val.toUpperCase()},"char-ci>=?"),char_dash_numeric_question_:function(Y){w(Y,o,"char-numeric?","char",1);var Z=Y.val;return(Z>="0"&&Z<="9")},char_dash_alphabetic_question_:function(Y){w(Y,o,"char-alphabetic?","char",1);var Z=Y.val;return s(Z)},char_dash_whitespace_question_:function(Y){w(Y,o,"char-whitespace?","char",1);var Z=Y.val;return K(Z)},char_dash_upper_dash_case_question_:function(Y){w(Y,o,"char-upper-case?","char",1);return s(Y.val)&&Y.val.toUpperCase()==Y.val},char_dash_lower_dash_case_question_:function(Y){w(Y,o,"char-lower-case?","char",1);return s(Y.val)&&Y.val.toLowerCase()==Y.val},char_dash_upcase:function(Y){w(Y,o,"char-upcase","char",1);return plt.types.Char.makeInstance(Y.val.toUpperCase())},char_dash_downcase:function(Y){w(Y,o,"char-downcase","char",1);return plt.types.Char.makeInstance(Y.val.toLowerCase())},list_dash__greaterthan_string:function(Y){R(Y,o,"list->string","char",1);var Z="";while(!Y.isEmpty()){Z+=Y.first().val;Y=Y.rest()}return plt.types.String.makeInstance(Z)},implode:function(Y){R(Y,h,"implode","string",1);var Z=[];while(!Y.isEmpty()){Z.push(Y.first().toString());Y=Y.rest()}return plt.types.String.makeInstance(Z.join(""))},string_dash_numeric_question_:function(Z){w(Z,h,"string-numeric?","string",1);for(var Y=0;Y<Z.length;Y++){if(Z[Y]<"0"||Z[Y]>"9"){return plt.types.Logic.FALSE}}return plt.types.Logic.TRUE},string_dash_alphabetic_question_:function(Y){w(Y,h,"string-alphabetic?","string",1);return s(Y)?plt.types.Logic.TRUE:plt.types.Logic.FALSE},string_dash_whitespace_question_:function(Y){w(Y,h,"string-whitespace?","string",1);return K(Y)?plt.types.Logic.TRUE:plt.types.Logic.FALSE},string_dash_upper_dash_case_question_:function(Y){w(Y,h,"string-upper-case?","string",1);return s(Y)&&Y.toUpperCase()==Y},string_dash_lower_dash_case_question_:function(Y){w(Y,h,"string-lower-case?","string",1);return s(Y)&&Y.toLowerCase()==Y},string:function(aa){g(aa,function(ab,ac){w(this,o,"string","char",ac+1)});var Y=[];for(var Z=0;Z<aa.length;Z++){Y.push(aa[Z].val)}return String.makeInstance(Y.join(""))},make_dash_string:function(ac,aa){w(ac,k,"make-string","natural",1);w(aa,o,"make-string","char",2);var Y="";var ab=aa.val;var Z=plt.types.Rational.ZERO;for(;plt.Kernel._lessthan_(Z,ac,[]);Z=plt.Kernel.add1(Z)){Y+=ab}return plt.types.String.makeInstance(Y)},string_dash__greaterthan_list:function(ab){w(ab,h,"string->list","string",1);var aa=ab;var Y=plt.types.Empty.EMPTY;for(var Z=aa.length-1;Z>=0;Z--){Y=plt.types.Cons.makeInstance(plt.types.Char.makeInstance(aa.charAt(Z)),Y)}return Y},explode:function(ab){w(ab,h,"explode","string",1);var aa=ab;var Y=plt.types.Empty.EMPTY;for(var Z=aa.length-1;Z>=0;Z--){Y=plt.types.Cons.makeInstance(plt.types.String.makeInstance(aa.charAt(Z)),Y)}return Y}};plt.Kernel._dumpKernelSymbols=function(){var Y=plt.types.Empty.EMPTY;for(var Z in plt.Kernel){Y=plt.types.Cons.makeInstance(plt.types.Symbol.makeInstance(Z),Y)}return Y};plt.Kernel.openInputStx=function(Y){throw new C("open-input-stx currently unsupported")};var u=function(Y){this.hash=new plt._Hashtable()};u.prototype.toWrittenString=function(){return"<hash>"};u.prototype.toDisplayedString=function(){return"<hash>"};u.prototype.isEqual=function(Y){return this===Y};plt.Kernel.makeHashEq=function(){var Y=new u();return Y};plt.Kernel.hashSetBang=function(Z,Y,aa){w(Z,t,"hash-set!","hash",1);Z.hash.put(Y,aa);return undefined};plt.Kernel.hashRef=function(Z,Y,aa){w(Z,t,"hash-ref","hash",1);if(Z.hash.containsKey(Y)){return Z.hash.get(Y)}else{if(q(aa)){return aa([])}return aa}};plt.Kernel.hashRemoveBang=function(Z,Y){w(Z,t,"hash-remove!","hash",1);Z.hash.remove(Y);return undefined};plt.Kernel.hashMap=function(Z,ac){w(Z,t,"hash-map","hash",1);var Y=plt.types.Empty.EMPTY;var ab=Z.hash.keys();for(var aa=0;aa<ab.length;aa++){var ad=Z.hash.get(ab[aa]);Y=plt.Kernel.cons(ac([ab[aa],ad]),Y)}return Y};var t=function(Y){return((Y!=null)&&(Y!=undefined)&&(Y instanceof u))};plt.Kernel.isHash=t;plt.Kernel.apply=function(ad,ac,Y){var ab;var aa=[];w(ad,q,"apply","function",1);if(Y.length==0){ab=ac;H(ab,"apply",2);while(!ab.isEmpty()){var Z=ab.first();aa.push(Z);ab=ab.rest()}}else{ab=Y.pop();H(ab,"apply",3);while(!ab.isEmpty()){var Z=ab.first();aa.push(Z);ab=ab.rest()}while(Y.length>0){aa.unshift(Y.pop())}aa.unshift(ac)}return ad(aa)};plt.Kernel.map=function(ab,ac){w(ab,q,"map","function",1);g(ac,function(ad,ae){H(ad,"map",ae+2)});var aa=plt.types.Empty.EMPTY;while(!ac[0].isEmpty()){var Y=[];for(var Z=0;Z<ac.length;Z++){Y.push(ac[Z].first());ac[Z]=ac[Z].rest()}aa=plt.Kernel.cons(ab(Y),aa)}return plt.Kernel.reverse(aa)};plt.Kernel.for_dash_each=function(aa,ab){w(aa,q,"for-each","function",1);g(ab,function(ac,ad){H(ac,"for-each",ad+2)});while(!ab[0].isEmpty()){var Y=[];for(var Z=0;Z<ab.length;Z++){Y.push(ab[Z].first());ab[Z]=ab[Z].rest()}aa(Y)}return undefined};plt.Kernel.andmap=function(aa,ab){w(aa,q,"andmap","function",1);g(ab,function(ac,ad){H(ac,"andmap",ad+2)});while(!ab[0].isEmpty()){var Y=[];for(var Z=0;Z<ab.length;Z++){Y.push(ab[Z].first());ab[Z]=ab[Z].rest()}if(!aa(Y)){return plt.types.Logic.FALSE}}return plt.types.Logic.TRUE};plt.Kernel.ormap=function(aa,ab){w(aa,q,"ormap","function",1);g(ab,function(ac,ad){H(ac,"ormap",ad+2)});while(!ab[0].isEmpty()){var Y=[];for(var Z=0;Z<ab.length;Z++){Y.push(ab[Z].first());ab[Z]=ab[Z].rest()}if(aa(Y)){return plt.types.Logic.TRUE}}return plt.types.Logic.FALSE};plt.Kernel.filter=function(Z,aa){w(Z,q,"filter","function",1);w(aa,b,"filter","list",2);var Y=plt.types.Empty.EMPTY;while(!aa.isEmpty()){if(Z([aa.first()])){Y=plt.types.Cons.makeInstance(aa.first(),Y)}aa=aa.rest()}return plt.Kernel.reverse(Y)};plt.Kernel.foldl=function(ac,ab,ad){w(ac,q,"foldl","function",1);g(ad,function(ae,af){w(ae,b,"foldl","list",af+3)});var Y=ab;while(!ad[0].isEmpty()){var Z=[];for(var aa=0;aa<ad.length;aa++){Z.push(ad[aa].first());ad[aa]=ad[aa].rest()}Z.push(Y);Y=ac(Z)}return Y};plt.Kernel.foldr=function(ac,ab,ad){w(ac,q,"foldr","function",1);g(ad,function(ae,af){w(ae,b,"foldr","list",af+3)});var Y=ab;for(var aa=0;aa<ad.length;aa++){ad[aa]=plt.Kernel.reverse(ad[aa])}while(!ad[0].isEmpty()){var Z=[];for(var aa=0;aa<ad.length;aa++){Z.push(ad[aa].first());ad[aa]=ad[aa].rest()}Z.push(Y);Y=ac(Z)}return Y};plt.Kernel.argmin=function(aa,ac){w(aa,q,"argmin","function",1);w(ac,S,"argmin","nonempty list",2);var Z=ac.first();var Y=aa([ac.first()]).toFloat();ac=ac.rest();while(!ac.isEmpty()){var ab=aa([ac.first()]).toFloat();if(ab<Y){Z=ac.first();Y=ab}ac=ac.rest()}return Z};plt.Kernel.argmax=function(aa,ac){w(aa,q,"argmax","function",1);w(ac,S,"argmax","nonempty list",2);var Z=ac.first();var Y=aa([ac.first()]).toFloat();ac=ac.rest();while(!ac.isEmpty()){var ab=aa([ac.first()]).toFloat();if(ab>Y){Z=ac.first();Y=ab}ac=ac.rest()}return Z};plt.Kernel.sort=function(Z,aa){w(Z,b,"sort","list",1);w(aa,q,"sort","function",2);var Y=[];while(!Z.isEmpty()){Y.push(Z.first());Z=Z.rest()}Y.sort(function(ab,ac){return aa([ab,ac])?-1:1});return plt.Kernel.list(Y)};plt.Kernel.quicksort=plt.Kernel.sort;plt.Kernel.build_dash_list=function(ab,aa){w(ab,k,"build-list","natural",1);w(aa,q,"build-list","function",2);var Y=plt.types.Empty.EMPTY;for(var Z=0;Z<ab.toInteger();Z++){Y=plt.Kernel.cons(aa([plt.types.Rational.makeInstance(Z,1)]),Y)}return plt.Kernel.reverse(Y)};plt.Kernel.build_dash_string=function(ac,ab){w(ac,k,"build-string","natural",1);w(ab,q,"build-string","function",2);var aa=[];for(var Y=0;Y<ac.toInteger();Y++){var Z=ab([plt.types.Rational.makeInstance(Y,1)]);aa.push(Z.val)}return plt.types.String.makeInstance(aa.join(""))};plt.Kernel.format=function(aa,ab){w(aa,h,"format","string",1);var ad=new RegExp("~[sSaAn%~]","g");var Z=ab;function ac(ae){if(ae=="~~"){return"~"}else{if(ae=="~n"||ae=="~%"){return"\n"}else{if(ae=="~s"||ae=="~S"){if(Z.length==0){throw new C("format: fewer arguments passed than expected")}return plt.Kernel.toWrittenString(Z.shift())}else{if(ae=="~a"||ae=="~A"){if(Z.length==0){throw new C("format: fewer arguments passed than expected")}return plt.Kernel.toDisplayedString(Z.shift())}else{throw new C("Unimplemented format "+ae)}}}}}var Y=plt.types.String.makeInstance(aa.replace(ad,ac));if(Z.length>0){throw new C("format: More arguments passed than expected")}return Y};plt.Kernel.string=function(Y){var aa=[];for(var Z=0;Z<Y.length;Z++){aa.push(Y[Z].getValue())}return plt.types.String.makeInstance(aa.join(""))};plt.Kernel.procedure_question_=function(Y){return q(Y)};plt.Kernel.xml_dash__greaterthan_s_dash_exp=function(aa){w(aa,h,"xml->s-exp","string",1);if(aa.length==0){return plt.types.String.makeInstance("")}var ab;try{ab=new ActiveXObject("Microsoft.XMLDOM");ab.async="false";ab.loadXML(aa)}catch(ac){var ae=new DOMParser();ab=ae.parseFromString(aa,"text/xml")}var Z=function(ag){var af=plt.types.Empty.EMPTY;for(var ah=0;ah<ag.length;ah++){var ai=plt.types.Cons.makeInstance(plt.types.Symbol.makeInstance(ag.item(ah).nodeName),plt.types.Cons.makeInstance(ag.item(ah).nodeValue,plt.types.Empty.EMPTY));af=plt.types.Cons.makeInstance(ai,af)}return plt.types.Cons.makeInstance(plt.types.Symbol.makeInstance("@"),plt.Kernel.reverse(af))};var ad=function(ah){if(ah.nodeType==Node.ELEMENT_NODE){var af=plt.types.Empty.EMPTY;var ai=ah.firstChild;while(ai!=null){var ag=ad(ai);if(h(ag)&&!af.isEmpty()&&h(af.first())){af=plt.types.Cons.makeInstance(af.first()+ag,af.rest())}else{af=plt.types.Cons.makeInstance(ag,af)}ai=ai.nextSibling}af=plt.Kernel.reverse(af);af=plt.types.Cons.makeInstance(Z(ah.attributes),af);af=plt.types.Cons.makeInstance(plt.types.Symbol.makeInstance(ah.nodeName),af);return af}else{if(ah.nodeType==Node.TEXT_NODE){return ah.textContent}else{if(ah.nodeType==Node.CDATA_SECTION_NODE){return ah.data}else{return plt.types.Empty.EMPTY}}}};var Y=ad(ab.firstChild);return Y};plt.Kernel.split_dash_whitespace=function(Y){Y=Y.replace(/^\s+/,"");Y=Y.replace(/\s+$/,"");return plt.Kernel.list(Y.split(/\s+/))};var T=function(Y){plt.Kernel.Struct.call(this,"box",[Y])};T.prototype=z(plt.Kernel.Struct.prototype);plt.Kernel.box=function(Y){return new T(Y)};plt.Kernel.unbox=function(Y){w(Y,plt.Kernel.box_question_,"unbox","box",1);return Y._fields[0]};plt.Kernel.box_question_=function(Y){return Y!=null&&Y!=undefined&&Y instanceof T};plt.Kernel.set_dash_box_bang_=function(Z,Y){w(Z,plt.Kernel.box_question_,"set-box!","box",1);Z._fields[0]=Y;return undefined};var v=function(Y,Z){plt.Kernel.Struct.call(this,"make-posn",[Y,Z])};v.prototype=z(plt.Kernel.Struct.prototype);var B=function(Z,Y){return new v(Z,Y)};var P=function(Y){w(Y,L,"posn-x","posn",1);return Y._fields[0]};var O=function(Y){w(Y,L,"posn-y","posn",1);return Y._fields[1]};var L=function(Y){return Y!=null&&Y!=undefined&&Y instanceof v};plt.Kernel.make_dash_posn=B;plt.Kernel.posn_question_=L;plt.Kernel.posn_dash_x=P;plt.Kernel.posn_dash_y=O;plt.Kernel.error=function(Y,Z){w(Y,i,"error","symbol",1);w(Z,h,"error","string",2);throw new C(plt.Kernel.format("~a: ~a",[Y,Z]).toString())};plt.Kernel.syntax_dash_error=function(Z,Y){w(Z,h,"syntax-error","string",1);w(Y,N,"syntax-error","stx",2);throw new M(Z,Y)};plt.Kernel.toWrittenString=function(Y){if(Y==undefined||Y==null){return"<undefined>"}if(typeof(Y)=="string"){return Y.toWrittenString()}if(typeof(Y)!="object"&&typeof(Y)!="function"){return Y.toString()}if("toWrittenString" in Y){return Y.toWrittenString()}if("toDisplayedString" in Y){return Y.toDisplayedString()}else{return Y.toString()}};plt.Kernel.toDisplayedString=function(Y){if(Y==undefined||Y==null){return"<undefined>"}if(typeof(Y)=="string"){return Y.toDisplayedString()}if(typeof(Y)!="object"&&typeof(Y)!="function"){return Y.toString()}if("toWrittenString" in Y){return Y.toWrittenString()}if("toDisplayedString" in Y){return Y.toDisplayedString()}else{return Y.toString()}};plt.Kernel.toDomNode=function(Y){if(Y==undefined||Y==null){var Z=document.createTextNode("<undefined>");return Z}if(typeof(Y)=="string"){var Z=document.createTextNode(Y.toWrittenString());return Z}if(typeof(Y)!="object"&&typeof(Y)!="function"){var Z=document.createTextNode(Y.toString());return Z}if(Y.nodeType){return Y}if("toDomNode" in Y){return Y.toDomNode()}if("toWrittenString" in Y){var Z=document.createTextNode(Y.toWrittenString());return Z}if("toDisplayedString" in Y){var Z=document.createTextNode(Y.toDisplayedString());return Z}else{var Z=document.createTextNode(Y.toString());return Z}};plt.Kernel.Struct.prototype.toWrittenString=function(){var Y=[];Y.push("(");Y.push(this._constructorName);for(var Z=0;Z<this._fields.length;Z++){Y.push(" ");Y.push(plt.Kernel.toWrittenString(this._fields[Z]))}Y.push(")");return plt.types.String.makeInstance(Y.join(""))};plt.Kernel.Struct.prototype.toDisplayedString=plt.Kernel.Struct.prototype.toWrittenString;var d=function(Y,Z){Y.appendChild(Z)};plt.Kernel.Struct.prototype.toDomNode=function(){var Z=document.createElement("div");Z.appendChild(document.createTextNode("("));Z.appendChild(document.createTextNode(this._constructorName));for(var Y=0;Y<this._fields.length;Y++){Z.appendChild(document.createTextNode(" "));d(Z,plt.Kernel.toDomNode(this._fields[Y]))}Z.appendChild(document.createTextNode(")"));return Z};plt.Kernel.Struct.prototype.isEqual=function(Y){if(typeof(Y)!="object"){return false}if(!Y._constructorName){return false}if(Y._constructorName!=this._constructorName){return false}if(!"_fields" in Y){return false}if(this._fields.length!=Y._fields.length){return false}for(var Z=0;Z<this._fields.length;Z++){if(!plt.Kernel.equal_question_(this._fields[Z],Y._fields[Z])){return false}}return true};plt.Kernel.reportError=function(Z){var Y;if(typeof(console)!="undefined"&&typeof(console.log)!="undefined"){Y=(function(aa){console.log(aa)})}else{Y=(function(aa){alert(aa)})}if(typeof Z=="string"){Y(Z)}else{if(Z.msg){Y(Z.msg)}else{Y(Z.toString())}}if(plt.Kernel.lastLoc){Y("Error was raised around "+plt.Kernel.lastLoc)}};plt.Kernel._void_=function(Y){return undefined};plt.Kernel.build_dash_vector=function(ab,Z){w(ab,k,"build-vector","natural",1);w(Z,q,"build-vector","function",2);var aa=[];for(var Y=0;Y<ab.toInteger();Y++){aa[Y]=Z([plt.types.Rational.makeInstance(Y,1)])}return plt.types.Vector.makeInstance(ab.toInteger(),aa)};plt.Kernel.make_dash_vector=function(Y){w(Y,k,"make-vector","natural",1);return plt.types.Vector.makeInstance(Y.toInteger())};plt.Kernel.vector=function(Y){return plt.types.Vector.makeInstance(Y.length,Y)};plt.Kernel.vector_dash_length=function(Y){w(Y,c,"vector-length","vector",1);return plt.types.Rational.makeInstance(Y.length())};plt.Kernel.vector_dash_ref=function(Z,Y){w(Z,c,"vector-ref","vector",1);w(Y,function(aa){return k(aa)&&aa.toInteger()<Z.length()},"vector-ref","natural < vector length",2);return Z.ref(Y.toInteger())};plt.Kernel.vector_dash_set_bang_=function(aa,Z,Y){w(aa,c,"vector-set!","vector",1);w(Z,function(ab){return k(ab)&&ab.toInteger()<aa.length()},"vector-set!","natural < vector length",2);return aa.set(Z.toInteger(),Y)};plt.Kernel.vector_question_=function(Y){return c(Y)?plt.types.Logic.TRUE:plt.types.Logic.FALSE};plt.Kernel.check_dash_expect=function(aa,Y){var ab=aa([]);var Z=Y([]);if(!plt.Kernel.equal_question_(ab,Z)){throw new Q(plt.Kernel.format("~s doesn't match the expected value ~s",[ab,Z]))}};plt.Kernel.check_dash_within=function(ac,Z,ab){var ad=ac([]);var aa=Z([]);var Y=ab([]);if(!plt.Kernel._equal__tilde_(ad,aa,Y)){throw new Q(plt.Kernel.format("~s doesn't match the expected value ~s within ~s",[ad,aa,Y]))}};plt.Kernel.check_dash_error=function(Y,aa){var ac=aa([]);var ab;try{ab=Y([])}catch(Z){if(!plt.Kernel.equal_question_(Z.msg,ac)){throw new Q(plt.Kernel.format("check-error encountered the error ~s instead of the expected error ~s.",[Z.msg,ac]))}else{return}}throw new Q(plt.Kernel.format("check-error expected the error ~s, but instead received the value ~s.",[ac,ab]))};plt.Kernel.lastLoc=undefined;plt.Kernel.setLastLoc=function(Y){plt.Kernel.lastLoc=Y;return true};plt.Kernel.printf=function(Y,Z){var aa=plt.Kernel.format(Y,Z);plt.Kernel.printHook(aa);return undefined};plt.Kernel.printHook=function(Y){};plt.Kernel.isSymbol=i;plt.Kernel.isChar=o;plt.Kernel.isString=h;plt.Kernel.isBoolean=F;plt.Kernel.isPair=S;plt.Kernel.isEmpty=r;plt.Kernel.isReal=U;plt.Kernel.isRational=D;plt.Kernel.isComplex=E;plt.Kernel.isInteger=m;plt.Kernel.isNatural=k;plt.Kernel.isNumber=V;plt.Kernel.isAlphabeticString=s;plt.Kernel.isWhitespaceString=K;plt.Kernel.isList=b;plt.Kernel.isVector=c;plt.Kernel.isFunction=q;plt.Kernel.arrayEach=g;plt.Kernel.check=w;plt.Kernel.checkList=H;plt.Kernel.checkListof=R;plt.Kernel.MobyError=x;plt.Kernel.MobyParserError=W;plt.Kernel.MobySyntaxError=M;plt.Kernel.MobyTypeError=G;plt.Kernel.MobyRuntimeError=C;plt.Kernel.attachEvent=f;plt.Kernel.detachEvent=p})();var plt=plt||{};plt.reader={};(function(){var d=function(g){return g.replace(/\\./g,function(i,j,h){switch(i){case"\\b":return"\b";case"\\f":return"\f";case"\\n":return"\n";case"\\r":return"\r";case"\\t":return"\t";case"\\v":return"\v";default:return i.substring(1)}})};var b=function(h){var g;var j=0;for(g=0;g<h.length;g++){if(h[g]=="\n"){j++}}return j};var c=[["whitespace",/^(\s+)/],["#;",/^([#][;])/],["comment",new RegExp("^([#][|](?:(?:\\|[^\\#])|[^\\|])*[|][#])")],["comment",/(^;[^\n]*)/],["(",/^($|\[|\{)/],[")",/^($|\]|\})/],["'",/^(\')/],["`",/^(`)/],[",@",/^(,@)/],[",",/^(,)/],["char",/^\#\\(newline|backspace)/],["char",/^\#\\(.)/],["complex",/^((?:\#[ei])?[+\-]?(?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+)?[+\-](?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+)i)/],["number",/^((?:\#[ei])?[+-]inf.0)/],["number",/^((?:\#[ei])?[+-]nan.0)/],["number",/^((?:\#[ei])?[+\-]?(?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+))/],["string",new RegExp('^"((?:([^\\\\"]|(\\\\.)))*)"')],["symbol",/^([a-zA-Z\:\+\=\~\_\?\!\@\#\$\%\^\&\*\-\/\.\>\<][\w\:\+\=\~\_\?\!\@\#\$\%\^\&\*\-\/\.\>\<]*)/]];var f=function(p,g){var h=0;var q=1;var n=[];if(!g){g=""}while(true){var l=false;for(var j=0;j<c.length;j++){var k=c[j][0];var m=c[j][1];var o=p.match(m);if(o!=null){if(k=="string"){o[1]=d(o[1])}if(k!="whitespace"&&k!="comment"){n.push([k,o[1],new Loc(h,q,o[0].length,g)])}h=h+o[0].length;q=q+b(o[0]);p=p.substring(o[0].length);l=true;break}}if(!l){break}}return[n,p]};var e=function(u,y){var x=make_dash_stx_colon_list;var A=make_dash_stx_colon_atom;var h=f(u,y);var v=h[0];var z=undefined;if(h[1].length>0){throw new plt.Kernel.MobyParserError("Error while tokenizing: the rest of the stream is: "+h[1],new Loc(u.length-h[1].length,b(u.substring(0,u.length-h[1].length)),h[1].length,y))}var q=plt.types.Symbol.makeInstance("quote");var g=plt.types.Symbol.makeInstance("quasiquote");var w=plt.types.Symbol.makeInstance("unquote");var i=plt.types.Symbol.makeInstance("unquote-splicing");var n=plt.types.Empty.EMPTY;var k=function(s){return(v.length>0&&v[0][0]==s)};var o=function(B){if(v.length==0){if(z){throw new plt.Kernel.MobyParserError("token stream exhausted while trying to eat "+B,z[2])}else{throw new plt.Kernel.MobyParserError("token stream exhausted while trying to eat "+B,new Loc(0,0,u.length,y))}}var s=v.shift();z=s;if(s[0]==B){return s}else{throw new plt.Kernel.MobyParserError("Unexpected token "+s,s[2])}};var m;var r;var j;j=function(B,D){var s=o(B);var C=m();return x(plt.Kernel.cons(A(D,s[2]),plt.Kernel.cons(C,n)),new Loc(s[2].offset,s[2].line,(C.loc.offset-s[2].offset+C.loc.span),""))};var l=function(s){switch(s){case"(":return")";case"[":return"]";case"{":return"}";default:throw new Error()}};var t=function(D,C){var B=D.match(/([+\-]?\d+)\/(\d+)/);if(D=="+inf.0"){return plt.types.FloatPoint.makeInstance(Number.POSITIVE_INFINITY)}else{if(D=="-inf.0"){return plt.types.FloatPoint.makeInstance(Number.NEGATIVE_INFINITY)}else{if(D=="+nan.0"||D=="-nan.0"){return plt.types.FloatPoint.makeInstance(Number.NaN)}else{if(D.match(/\./)){if(C){var s=D.match("^(.*)[.](.*)$");return plt.types.NumberTower.add(plt.types.Rational.makeInstance(parseInt(s[1]||"0")),plt.types.Rational.makeInstance(parseInt(s[2]),Math.pow(10,s[2].length)))}else{return plt.types.FloatPoint.makeInstance(parseFloat(D))}}else{if(B){if(C){return plt.types.Rational.makeInstance(parseInt(B[1]),parseInt(B[2]))}else{return plt.types.FloatPoint.makeInstance(parseInt(B[1])/parseInt(B[2]))}}else{if(C){return plt.types.Rational.makeInstance(parseInt(D),1)}else{return plt.types.FloatPoint.makeInstance(parseInt(D))}}}}}}};m=function(){if(v.length==0){if(z){throw new plt.Kernel.MobyParserError("Parse broke with empty token stream",z[2])}else{throw new plt.Kernel.MobyParserError("Parse broke with empty token stream",new Loc(0,0,u.length,y))}}switch(v[0][0]){case"(":var L=o("(");var H=L[1];var F=l(L[1]);var N=r();if(v.length==0){throw new plt.Kernel.MobyParserError("Expected a "+F+" to close "+H,L[2])}else{if(v[0][1]!=F){throw new plt.Kernel.MobyParserError("Expected a "+F+" to close "+H,v[0][2])}}var J=o(")");return make_dash_stx_colon_list(N,new Loc(L[2].offset,L[2].line,J[2].offset-L[2].offset+1,""));case"#;":var E=o("#;");var D=m();return m();case"'":return j("'",q);case"`":return j("`",g);case",":return j(",",w);case",@":return j(",@",i);case"number":var M=o("number");var K=M[1].match(/^(\#[ie])(.+)$/);if(K){if(K[1]=="#i"){return A(t(K[2],false),M[2])}else{return A(t(K[2],true),M[2])}}else{return A(t(M[1],true),M[2])}case"complex":var M=o("complex");var C=M[1].match(/^((?:\#[ei])?)([+\-]?(?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+)?)([+\-](?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+))i/);var B=(C[1]=="#i"?false:true);var I=(C[2]!=""?t(C[2],B):plt.types.Rational.ZERO);var G=t(C[3],B);var s=A(plt.types.Complex.makeInstance(I,G));return s;case"string":var M=o("string");return A(plt.types.String.makeInstance(M[1]),M[2]);case"char":var M=o("char");if(M[1]=="newline"){return A(plt.types.Char.makeInstance("\n"),M[2])}else{if(M[1]=="backspace"){return A(plt.types.Char.makeInstance(String.fromCharCode(8)),M[2])}else{return A(plt.types.Char.makeInstance(M[1]),M[2])}}case"symbol":var M=o("symbol");if(M[1]=="."){throw new plt.Kernel.MobyParserError("Dotted pairs are not currently accepted by Moby",M[2])}return A(plt.types.Symbol.makeInstance(M[1]),M[2]);default:throw new plt.Kernel.MobyParserError("Parse broke with token stream "+v,v[0][2])}};r=function(){var s=plt.types.Empty.EMPTY;while(true){if(v.length==0||k(")")){break}else{if(k("#;")){o("#;");var B=m()}else{var C=m();s=plt.types.Cons.makeInstance(C,s)}}}return plt.Kernel.reverse(s)};var p=r();if(v.length>0){throw new plt.Kernel.MobyParserError("More elements in the program's token stream than expected: the next unconsumed token is: "+v[0][1],v[0][2])}return p};plt.reader.tokenize=f;plt.reader.readSchemeExpressions=e}());var stx_colon_atom=function(b,c){plt.Kernel.Struct.call(this,"make-stx:atom",[b,c]);this.datum=b;this.loc=c};stx_colon_atom.prototype=new plt.Kernel.Struct();var make_dash_stx_colon_atom=function(d,b){var c=new stx_colon_atom(d,b);return c};var stx_colon_atom_dash_datum=function(b){if(stx_colon_atom_question_(b)){return b.datum}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("stx_colon_atom_dash_datum: not a stx:atom: ~s",[b]))}};var stx_colon_atom_dash_loc=function(b){if(stx_colon_atom_question_(b)){return b.loc}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("stx_colon_atom_dash_loc: not a stx:atom: ~s",[b]))}};var set_dash_stx_colon_atom_dash_datum_bang_=function(c,b){if(stx_colon_atom_question_(c)){c.datum=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_stx_colon_atom_dash_datum_bang_: not a stx:atom: ~s",[c]))}};var set_dash_stx_colon_atom_dash_loc_bang_=function(c,b){if(stx_colon_atom_question_(c)){c.loc=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_stx_colon_atom_dash_loc_bang_: not a stx:atom: ~s",[c]))}};var stx_colon_atom_question_=function(b){return(b!=null&&b!=undefined&&b instanceof stx_colon_atom)};var stx_colon_list=function(b,c){plt.Kernel.Struct.call(this,"make-stx:list",[b,c]);this.elts=b;this.loc=c};stx_colon_list.prototype=new plt.Kernel.Struct();var make_dash_stx_colon_list=function(c,b){return new stx_colon_list(c,b)};var stx_colon_list_dash_elts=function(b){if(stx_colon_list_question_(b)){return b.elts}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("stx_colon_list_dash_elts: not a stx:list: ~s",[b]))}};var stx_colon_list_dash_loc=function(b){if(stx_colon_list_question_(b)){return b.loc}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("stx_colon_list_dash_loc: not a stx:list: ~s",[b]))}};var set_dash_stx_colon_list_dash_elts_bang_=function(c,b){if(stx_colon_list_question_(c)){c.elts=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_stx_colon_list_dash_elts_bang_: not a stx:list: ~s",[c]))}};var set_dash_stx_colon_list_dash_loc_bang_=function(c,b){if(stx_colon_list_question_(c)){c.loc=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_stx_colon_list_dash_loc_bang_: not a stx:list: ~s",[c]))}};var stx_colon_list_question_=function(b){return b!=null&&b!=undefined&&b instanceof stx_colon_list};var Loc=function(d,b,c,e){plt.Kernel.Struct.call(this,"make-Loc",[d,b,c,e]);this.offset=d;this.line=b;this.span=c;this.id=e};Loc.prototype=new plt.Kernel.Struct();var make_dash_Loc=function(e,d,c,b){return new Loc(e,d,c,b)};var Loc_dash_offset=function(b){if(Loc_question_(b)){return b.offset}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("Loc_dash_offset: not a Loc: ~s",[b]))}};var Loc_dash_line=function(b){if(Loc_question_(b)){return b.line}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("Loc_dash_line: not a Loc: ~s",[b]))}};var Loc_dash_span=function(b){if(Loc_question_(b)){return b.span}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("Loc_dash_span: not a Loc: ~s",[b]))}};var Loc_dash_id=function(b){if(Loc_question_(b)){return b.id}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("Loc_dash_id: not a Loc: ~s",[b]))}};var set_dash_Loc_dash_offset_bang_=function(c,b){if(Loc_question_(c)){c.offset=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_Loc_dash_offset_bang_: not a Loc: ~s",[c]))}};var set_dash_Loc_dash_line_bang_=function(c,b){if(Loc_question_(c)){c.line=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_Loc_dash_line_bang_: not a Loc: ~s",[c]))}};var set_dash_Loc_dash_span_bang_=function(c,b){if(Loc_question_(c)){c.span=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_Loc_dash_span_bang_: not a Loc: ~s",[c]))}};var set_dash_Loc_dash_id_bang_=function(c,b){if(Loc_question_(c)){c.id=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_Loc_dash_id_bang_: not a Loc: ~s",[c]))}};var Loc_question_=function(b){return b!=null&&b!=undefined&&b instanceof Loc};var Loc_dash__greaterthan_string=function(b){return(plt.Kernel.setLastLoc('offset=284 line=14 span=154 id="stx.ss"')&&plt.Kernel.format((plt.types.String.makeInstance("offset=~a line=~a span=~a id=~s")),[(plt.Kernel.setLastLoc('offset=337 line=15 span=18 id="stx.ss"')&&Loc_dash_offset(b)),(plt.Kernel.setLastLoc('offset=367 line=16 span=16 id="stx.ss"')&&Loc_dash_line(b)),(plt.Kernel.setLastLoc('offset=395 line=17 span=16 id="stx.ss"')&&Loc_dash_span(b)),(plt.Kernel.setLastLoc('offset=423 line=18 span=14 id="stx.ss"')&&Loc_dash_id(b))]))};var stx_question_=function(b){return((plt.Kernel.setLastLoc('offset=489 line=23 span=13 id="stx.ss"')&&stx_colon_atom_question_(b))||(plt.Kernel.setLastLoc('offset=509 line=24 span=13 id="stx.ss"')&&stx_colon_list_question_(b)))};var stx_dash_e=function(b){return((plt.Kernel.setLastLoc('offset=635 line=31 span=17 id="stx.ss"')&&stx_colon_atom_question_(b))?(plt.Kernel.setLastLoc('offset=658 line=32 span=22 id="stx.ss"')&&stx_colon_atom_dash_datum(b)):((plt.Kernel.setLastLoc('offset=687 line=33 span=17 id="stx.ss"')&&stx_colon_list_question_(b))?(plt.Kernel.setLastLoc('offset=710 line=34 span=21 id="stx.ss"')&&stx_colon_list_dash_elts(b)):(plt.Kernel.setLastLoc('offset=624 line=30 span=109 id="stx.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=624 line=30 span=109 id=\\"stx.ss\\""'))))))};var stx_dash_loc=function(b){return((plt.Kernel.setLastLoc('offset=797 line=40 span=17 id="stx.ss"')&&stx_colon_atom_question_(b))?(plt.Kernel.setLastLoc('offset=820 line=41 span=20 id="stx.ss"')&&stx_colon_atom_dash_loc(b)):((plt.Kernel.setLastLoc('offset=847 line=42 span=17 id="stx.ss"')&&stx_colon_list_question_(b))?(plt.Kernel.setLastLoc('offset=870 line=43 span=20 id="stx.ss"')&&stx_colon_list_dash_loc(b)):(plt.Kernel.setLastLoc('offset=786 line=39 span=106 id="stx.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=786 line=39 span=106 id=\\"stx.ss\\""'))))))};var stx_dash_begins_dash_with_question_=function(c,b){return((plt.Kernel.setLastLoc('offset=991 line=49 span=17 id="stx.ss"')&&stx_colon_atom_question_(c))?plt.types.Logic.FALSE:((plt.Kernel.setLastLoc('offset=1023 line=51 span=17 id="stx.ss"')&&stx_colon_list_question_(c))?((plt.Kernel.setLastLoc('offset=1051 line=52 span=36 id="stx.ss"')&&plt.Kernel.not((plt.Kernel.setLastLoc('offset=1056 line=52 span=30 id="stx.ss"')&&plt.Kernel.empty_question_((plt.Kernel.setLastLoc('offset=1064 line=52 span=21 id="stx.ss"')&&stx_colon_list_dash_elts(c))))))&&(plt.Kernel.setLastLoc('offset=1098 line=53 span=47 id="stx.ss"')&&plt.Kernel.symbol_question_((plt.Kernel.setLastLoc('offset=1107 line=53 span=37 id="stx.ss"')&&stx_dash_e((plt.Kernel.setLastLoc('offset=1114 line=53 span=29 id="stx.ss"')&&plt.Kernel.first((plt.Kernel.setLastLoc('offset=1121 line=53 span=21 id="stx.ss"')&&stx_colon_list_dash_elts(c))))))))&&(plt.Kernel.setLastLoc('offset=1156 line=54 span=74 id="stx.ss"')&&plt.Kernel.symbol_equal__question_((plt.Kernel.setLastLoc('offset=1166 line=54 span=37 id="stx.ss"')&&stx_dash_e((plt.Kernel.setLastLoc('offset=1173 line=54 span=29 id="stx.ss"')&&plt.Kernel.first((plt.Kernel.setLastLoc('offset=1180 line=54 span=21 id="stx.ss"')&&stx_colon_list_dash_elts(c)))))),b))):(plt.Kernel.setLastLoc('offset=980 line=48 span=253 id="stx.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=980 line=48 span=253 id=\\"stx.ss\\""'))))))};var datum_dash__greaterthan_stx=function(b,c){return((plt.Kernel.setLastLoc('offset=1461 line=65 span=14 id="stx.ss"')&&stx_question_(b))?b:(((plt.Kernel.setLastLoc('offset=1499 line=67 span=15 id="stx.ss"')&&plt.Kernel.pair_question_(b))||(plt.Kernel.setLastLoc('offset=1515 line=67 span=16 id="stx.ss"')&&plt.Kernel.empty_question_(b)))?(plt.Kernel.setLastLoc('offset=1538 line=68 span=89 id="stx.ss"')&&make_dash_stx_colon_list((plt.Kernel.setLastLoc('offset=1553 line=68 span=47 id="stx.ss"')&&plt.Kernel.map(((function(){plt.Kernel.setLastLoc('offset=1558 line=68 span=33 id="stx.ss"');var d=(function(f){var e=f[0];return(plt.Kernel.setLastLoc('offset=1570 line=68 span=20 id="stx.ss"')&&datum_dash__greaterthan_stx(e,c))});d.toWrittenString=function(){return"<function:lambda>"};d.toDisplayedString=d.toWrittenString;return d})()),[b])),c)):(plt.types.Logic.TRUE?(plt.Kernel.setLastLoc('offset=1644 line=71 span=29 id="stx.ss"')&&make_dash_stx_colon_atom(b,c)):(plt.Kernel.setLastLoc('offset=1450 line=64 span=225 id="stx.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=1450 line=64 span=225 id=\\"stx.ss\\""')))))))};var stx_dash__greaterthan_datum=function(b){return((plt.Kernel.setLastLoc('offset=1787 line=84 span=17 id="stx.ss"')&&stx_colon_atom_question_(b))?(plt.Kernel.setLastLoc('offset=1810 line=85 span=22 id="stx.ss"')&&stx_colon_atom_dash_datum(b)):((plt.Kernel.setLastLoc('offset=1839 line=86 span=17 id="stx.ss"')&&stx_colon_list_question_(b))?(plt.Kernel.setLastLoc('offset=1862 line=87 span=38 id="stx.ss"')&&plt.Kernel.map((function(){var c=(function(d){return stx_dash__greaterthan_datum(d[0])});c.toWrittenString=function(){return"<function:stx->datum>"};c.toDisplayedString=function(){return"<function:stx->datum>"};return c})(),[(plt.Kernel.setLastLoc('offset=1878 line=87 span=21 id="stx.ss"')&&stx_colon_list_dash_elts(b))])):(plt.Kernel.setLastLoc('offset=1776 line=83 span=126 id="stx.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=1776 line=83 span=126 id=\\"stx.ss\\""'))))))};(function(){((function(b){}))(arguments[0]||plt.Kernel.identity)})();var plt=plt||{};plt.world=plt.world||{};plt.world.config=plt.world.config||{};(function(){var d=function(i,g){var f={};for(var h in i){f[h]=i[h]}for(var h in g){f[h]=g[h]}return f};var e=function(){this.vals={changeWorld:false,shutdownWorld:false,initialEffect:false,onRedraw:false,onDraw:false,onDrawCss:false,tickDelay:false,onTick:false,onTickEffect:false,onKey:false,onKeyEffect:false,onTilt:false,onTiltEffect:false,onAcceleration:false,onAccelerationEffect:false,onShake:false,onShakeEffect:false,onLocationChange:false,onLocationChangeEffect:false,onAnnounce:false,onAnnounceEffect:false,stopWhen:false,stopWhenEffect:false}};e.prototype.lookup=function(f){plt.Kernel.check(f,plt.Kernel.isString,"WorldConfig.lookup","string",1);if(f in this.vals){return this.vals[f]}else{throw Error("Can't find "+f+" in the configuration")}};e.prototype.updateAll=function(g){var f=new e();f.vals=d(this.vals,g);return f};plt.world.config.WorldConfig=e;plt.world.config.CONFIG=new e();var c=function(){return make_dash_effect_colon_none()};var b=function(h,g){h.toWrittenString=function(){return"("+g+" ...)"};h.toDisplayedString=h.toWrittenString;return h};plt.world.config.Kernel=plt.world.config.Kernel||{};plt.world.config.Kernel.onRedraw=function(g){plt.Kernel.check(g,plt.Kernel.isFunction,"on-redraw","function",1);return b(function(f){return f.updateAll({onRedraw:g})},"on-redraw")};plt.world.config.Kernel.initialEffect=function(f){return b(function(g){return g.updateAll({initialEffect:f})},"initial-effect")};plt.world.config.Kernel.onDraw=function(g,f){plt.Kernel.check(g,plt.Kernel.isFunction,"on-draw","function",1);plt.Kernel.check(f,plt.Kernel.isFunction,"on-draw","function",2);return b(function(h){return h.updateAll({onDraw:g,onDrawCss:f})},"on-draw")};plt.world.config.Kernel.onTick=function(g,h){plt.Kernel.check(g,plt.Kernel.isNumber,"on-tick","number",1);plt.Kernel.check(h,plt.Kernel.isFunction,"on-tick","function",2);return plt.world.config.Kernel.onTick_star_(g,h,function(f){return c()})};plt.world.config.Kernel.onTick_star_=function(f,h,g){plt.Kernel.check(f,plt.Kernel.isNumber,"on-tick*","number",1);plt.Kernel.check(h,plt.Kernel.isFunction,"on-tick*","function",2);plt.Kernel.check(g,plt.Kernel.isFunction,"on-tick*","function",3);return b(function(i){var j={onTick:h,onTickEffect:g,tickDelay:(plt.types.NumberTower.toInteger(plt.types.NumberTower.multiply(plt.types.Rational.makeInstance(1000,1),f)))};return i.updateAll(j)},"on-tick")};plt.world.config.Kernel.onTilt=function(f){plt.Kernel.check(f,plt.Kernel.isFunction,"on-tilt","function",1);return plt.world.config.Kernel.onTilt_star_(f,function(h,g,j,i){return c()})};plt.world.config.Kernel.onTilt_star_=function(g,f){plt.Kernel.check(g,plt.Kernel.isFunction,"on-tilt*","function",1);plt.Kernel.check(f,plt.Kernel.isFunction,"on-tilt*","function",2);return b(function(h){return h.updateAll({onTilt:g,onTiltEffect:f})},"on-tilt")};plt.world.config.Kernel.onAnnounce=function(f){plt.Kernel.check(f,plt.Kernel.isFunction,"on-announce","function",1);return plt.world.config.Kernel.onAnnounce_star_(f,function(g,h,i){return c()})};plt.world.config.Kernel.onAnnounce_star_=function(g,f){plt.Kernel.check(g,plt.Kernel.isFunction,"on-announce*","function",1);plt.Kernel.check(f,plt.Kernel.isFunction,"on-announce*","function",2);return b(function(h){return h.updateAll({onAnnounce:g,onAnnounceEffect:f})},"on-announce")};plt.world.config.Kernel.onAcceleration=function(f){plt.Kernel.check(f,plt.Kernel.isFunction,"on-acceleration","function",1);return plt.world.config.Kernel.onAcceleration_star_(f,function(h,g,j,i){return c()})};plt.world.config.Kernel.onAcceleration_star_=function(g,f){plt.Kernel.check(g,plt.Kernel.isFunction,"on-acceleration*","function",1);plt.Kernel.check(f,plt.Kernel.isFunction,"on-acceleration*","function",2);return b(function(h){return h.updateAll({onAcceleration:g,onAccelerationEffect:f})},"on-acceleration")};plt.world.config.Kernel.onShake=function(f){plt.Kernel.check(f,plt.Kernel.isFunction,"on-shake","function",1);return plt.world.config.Kernel.onShake_star_(f,function(h,g,j,i){return c()})};plt.world.config.Kernel.onShake_star_=function(g,f){plt.Kernel.check(g,plt.Kernel.isFunction,"on-shake*","function",1);plt.Kernel.check(f,plt.Kernel.isFunction,"on-shake*","function",2);return b(function(h){return h.updateAll({onShake:g,onShakeEffect:f})},"on-shake")};plt.world.config.Kernel.onKey=function(f){plt.Kernel.check(f,plt.Kernel.isFunction,"on-key","function",1);return plt.world.config.Kernel.onKey_star_(f,function(g,h){return c()})};plt.world.config.Kernel.onKey_star_=function(g,f){plt.Kernel.check(g,plt.Kernel.isFunction,"on-key*","function",1);plt.Kernel.check(f,plt.Kernel.isFunction,"on-key*","function",2);return b(function(h){return h.updateAll({onKey:g,onKeyEffect:f})},"on-key")};plt.world.config.Kernel.onLocationChange=function(f){plt.Kernel.check(f,plt.Kernel.isFunction,"on-location-change","function",1);return plt.world.config.Kernel.onLocationChange_star_(f,function(g,i,h){return c()})};plt.world.config.Kernel.onLocationChange_star_=function(g,f){plt.Kernel.check(g,plt.Kernel.isFunction,"on-location-change*","function",1);plt.Kernel.check(f,plt.Kernel.isFunction,"on-location-change*","function",2);return b(function(h){return h.updateAll({onLocationChange:g,onLocationChangeEffect:f})},"on-location-change")};plt.world.config.Kernel.stopWhen=function(f){plt.Kernel.check(f,plt.Kernel.isFunction,"stop-when","function",1);return plt.world.config.Kernel.stopWhen_star_(f,function(g){return c()})};plt.world.config.Kernel.stopWhen_star_=function(g,f){plt.Kernel.check(g,plt.Kernel.isFunction,"stop-when*","function",1);plt.Kernel.check(f,plt.Kernel.isFunction,"stop-when*","function",2);return b(function(h){return h.updateAll({stopWhen:g,stopWhenEffect:f})},"stop-when")}})();var plt=plt||{};plt.platform={};(function(){plt.platform.Platform={};var y=false;plt.platform.Platform.getInstance=function(){if(!y){y=new r()}return y};var r=function(){this.tiltService=m;this.shakeService=u();this.locationService=I();this.telephonyService=D();this.networkService=C();this.soundService=G();this.powerService=J();this.smsService=p();this.pickPlaylistService=i()};r.prototype.getTiltService=function(){return this.tiltService};r.prototype.getShakeService=function(){return this.shakeService};r.prototype.getLocationService=function(){return this.locationService};r.prototype.getTelephonyService=function(){return this.telephonyService};r.prototype.getNetworkService=function(){return this.networkService};r.prototype.getSoundService=function(){return this.soundService};r.prototype.getPowerService=function(){return this.powerService};r.prototype.getSmsService=function(){return this.smsService};r.prototype.getPickPlaylistService=function(){return this.pickPlaylistService};var I=function(){if(N()){return new l()}else{if(f()){return new x()}else{if(n()){return new k()}else{return new b()}}}};var N=function(){return(typeof Device!="undefined")};var f=function(){return(window.google&&window.google.gears&&true)};var n=function(){return(typeof(navigator)!="undefined"&&typeof(navigator.geolocation)!="undefined")};var K=function(W,V,U,T){var S=function(X){return X*Math.PI/180};var R=function(X,Y){return Math.pow(Math.sin((S(X)-S(Y))/2),2)};return 6378000*2*Math.asin(Math.min(1,Math.sqrt(R(W,U)+(Math.cos(S(W))*Math.cos(S(U))*R(V,T)))))};var x=function(){this.geo=google.gears.factory.create("beta.geolocation");this.listeners=[];this.currentPosition={latitude:0,longitude:0,altitude:0,bearing:0,speed:0};this.watchId=false};x.prototype.startService=function(){var R=this;function S(T){R.currentPosition.latitude=T.latitude;R.currentPosition.longitude=T.longitude;R.currentPosition.altitude=T.altitude;for(var U=0;U<R.listeners.length;U++){R.listeners[U](T.latitude,T.longitude)}}this.watchId=this.geo.watchPosition(S)};x.prototype.shutdownService=function(){this.geo.clearWatch(this.watchId)};x.prototype.addLocationChangeListener=function(R){this.listeners.push(R)};x.prototype.getLatitude=function(){return plt.types.FloatPoint.makeInstance(this.currentPosition.latitude)};x.prototype.getLongitude=function(){return plt.types.FloatPoint.makeInstance(this.currentPosition.longitude)};x.prototype.getAltitude=function(){return plt.types.FloatPoint.makeInstance(this.currentPosition.altitude)};x.prototype.getBearing=function(){return plt.types.FloatPoint.makeInstance(this.currentPosition.bearing)};x.prototype.getSpeed=function(){return plt.types.FloatPoint.makeInstance(this.currentPosition.speed)};x.prototype.getDistanceBetween=function(U,T,S,R){return plt.types.FloatPoint.makeInstance(K(U.toFloat(),T.toFloat(),S.toFloat(),R.toFloat()))};var b=function(){};b.prototype.startService=function(){};b.prototype.shutdownService=function(){};b.prototype.addLocationChangeListener=function(R){};b.prototype.getLatitude=function(){return plt.types.Rational.ZERO};b.prototype.getLongitude=function(){return plt.types.Rational.ZERO};b.prototype.getAltitude=function(){return plt.types.Rational.ZERO};b.prototype.getBearing=function(){return plt.types.Rational.ZERO};b.prototype.getSpeed=function(){return plt.types.Rational.ZERO};b.prototype.getDistanceBetween=function(U,T,S,R){return plt.types.FloatPoint.makeInstance(K(U.toFloat(),T.toFloat(),S.toFloat(),R.toFloat()))};var l=function(){this.locationListeners=[];this.currentPosition={latitude:0,longitude:0,atttitude:0,bearing:0,speed:0};this.watchId=false};l.prototype.startService=function(){var S=this;var R=function(V){S.currentPosition.latitude=parseFloat(V.latitude);S.currentPosition.longitude=parseFloat(V.longitude);for(var T=0;T<S.locationListeners.length;T++){var U=S.locationListeners[T];U(S.currentPosition.latitude,S.currentPosition.longitude)}};this.watchId=navigator.geolocation.watchPosition(R,function(){},{})};l.prototype.shutdownService=function(){navigator.geolocation.clearWatch(this.watchId)};l.prototype.addLocationChangeListener=function(R){this.locationListeners.push(R)};l.prototype.getLatitude=function(){return plt.types.FloatPoint.makeInstance(navigator.geolocation.lastPosition.latitude)};l.prototype.getLongitude=function(){return plt.types.FloatPoint.makeInstance(navigator.geolocation.lastPosition.longitude)};l.prototype.getAltitude=function(){return plt.types.Rational.ZERO};l.prototype.getBearing=function(){return plt.types.Rational.ZERO};l.prototype.getSpeed=function(){return plt.types.Rational.ZERO};l.prototype.getDistanceBetween=function(U,T,S,R){return plt.types.FloatPoint.makeInstance(navigator.geolocation.getDistanceBetween(U.toFloat(),T.toFloat(),S.toFloat(),R.toFloat()))};var k=function(){this.locationListeners=[];this.currentPosition={latitude:0,longitude:0,atttitude:0,bearing:0,speed:0};this.watchId=false};k.prototype.startService=function(){var T=this;var R=function(W){T.currentPosition.latitude=W.coords.latitude;T.currentPosition.longitude=W.coords.longitude;for(var U=0;U<T.locationListeners.length;U++){var V=T.locationListeners[U];V(W.coords.latitude,W.coords.longitude)}};var S=function(){};if(typeof navigator.geolocation!="undefined"&&typeof navigator.geolocation.getCurrentPosition!="undefined"){navigator.geolocation.watchPosition(R)}setTimeout(function(){navigator.geolocation.getCurrentPosition(R)},10000)};k.prototype.shutdownService=function(){if(this.watchId){navigator.geolocation.clearWatch(this.watchId);this.watchId=false}};k.prototype.addLocationChangeListener=function(R){this.locationListeners.push(R)};k.prototype.getLatitude=function(){return plt.types.FloatPoint.makeInstance(this.currentPosition.latitude)};k.prototype.getLongitude=function(){return plt.types.FloatPOint.makeInstance(this.currentPosition.longitude)};k.prototype.getAltitude=function(){return plt.types.FloatPoint.makeInstance(this.currentPosition.altitude)};k.prototype.getBearing=function(){return plt.types.FloatPoint.makeInstance(this.currentPosition.bearing)};k.prototype.getSpeed=function(){return plt.types.FloatPoint.makeInstance(this.currentPosition.speed)};k.prototype.getDistanceBetween=function(U,T,S,R){return plt.types.FloatPoint.makeInstance(K(U.toFloat(),T.toFloat(),S.toFloat(),R.toFloat()))};var j=[];var s=[];var q;var t;var F;var g=function(S){for(var R=0;R<j.length;R++){j[R](parseFloat(S.x),parseFloat(S.y),parseFloat(S.z))}};var z=function(R){for(var S=0;S<s.length;S++){s[S](parseFloat(R.azimuth),parseFloat(R.pitch),parseFloat(R.roll))}};var m={startService:function(){if(typeof Accelerometer!="undefined"){q=navigator.accelerometer.watchAcceleration(g,function(){});t=navigator.accelerometer.watchOrientation(z,function(){})}},shutdownService:function(){if(typeof Accelerometer!="undefined"){navigator.accelerometer.clearWatch(q);navigator.accelerometer.clearWatch(t);navigator.accelerometer.stopAllShakeWatches()}},addOrientationChangeListener:function(R){s.push(R)},addAccelerationChangeListener:function(R){j.push(R)}};var D=function(){if(N()){return new e()}else{return new A()}};var A=function(){};A.prototype.getSignalStrengths=function(){return plt.types.Empty.EMPTY};var e=function(){};e.prototype.getSignalStrengths=function(){var R=plt.types.Empty.EMPTY;var U=Device.getSignalStrengths();for(var S=0;S<U.length;S++){var T=U.get(S);R=plt.types.Cons.makeInstance(plt.Kernel.list([toNum(T.getId()),toNum(T.getStrength())]),R)}return R};var u=function(){if(N()){return new B()}else{return new H()}};var B=function(){this.listeners=[]};B.prototype.startService=function(){var S=this;var T=function(){for(var U=0;U<S.listeners.length;U++){S.listeners[U]()}};var R=function(){};this.shakeId=navigator.accelerometer.watchShake(T,R)};B.prototype.shutdownService=function(){navigator.accelerometer.stopAllShakeWatches()};B.prototype.addListener=function(R){this.listeners.push(R)};var H=function(){};H.prototype.startService=function(){};H.prototype.shutdownService=function(){};H.prototype.addListener=function(R){};var C=function(){if(N()){return new M()}else{return new Q()}};var M=function(){};M.prototype.getUrl=function(S){var R=Device.getUrl(S);return plt.types.String.makeInstance(""+R)};var Q=function(){};Q.prototype.getUrl=function(S){var T=new XMLHttpRequest();var R="/networkProxy?url="+encodeURIComponent(S);T.open("GET",R,false);T.send(null);return plt.types.String.makeInstance(T.responseText)};var G=function(){if(N()){return new P()}else{if(h()){return new d()}else{return new L()}}};var h=function(){return !!(document.createElement("audio").canPlayType)};var P=function(){};P.prototype.beep=function(){navigator.notification.beep(1)};P.prototype.playPlaylist=function(R){Device.playPlaylistRecord(R)};P.prototype.pausePlaylist=function(R){Device.pausePlaylistRecord(R)};P.prototype.stopPlaylist=function(R){Device.stopPlaylistRecord(R)};P.prototype.playSoundUrl=function(R){navigator.audio.playMusic(R)};P.prototype.playDtmfTone=function(S,R){navigator.audio.playDTMF(S);setTimeout(function(){navigator.audio.stopDTMF()},R)};P.prototype.stopSoundUrl=function(R){navigator.audio.stopMusic(R)};P.prototype.pauseSoundUrl=function(R){navigator.audio.pauseMusic(R)};P.prototype.setVolume=function(R){navigator.audio.setMusicVolume(R)};P.prototype.raiseVolume=function(){navigator.audio.increaseMusicVolume()};P.prototype.lowerVolume=function(){navigator.audio.decreaseMusicVolume()};var d=function(){this.cachedUrls={};this.baseVolume=100};d.prototype.beep=function(){alert("Beep")};d.prototype.playPlaylistSound=function(R){};d.prototype.pausePlaylistSound=function(R){};d.prototype.stopPlaylistSound=function(R){};d.prototype.playSoundUrl=function(R){if(!this.cachedUrls[R]){this.cachedUrls[R]=new Audio(R)}var S=this.cachedUrls[R];if(S.ended||S.paused){this.cachedUrls[R].play()}};d.prototype.playDtmfTone=function(S,R){alert("dtmf tone")};d.prototype.stopSoundUrl=function(R){if(this.cachedUrls[R]){this.cachedUrls[R].pause();this.cachedUrls[R].currentTime=0}};d.prototype.pauseSoundUrl=function(R){if(this.cachedUrls[R]){this.cachedUrls[R].pause()}};d.prototype.setVolume=function(S){for(var R in this.cachedUrls){this.cachedUrls[R].volume=S/100}this.baseVolume=S};d.prototype.raiseVolume=function(){this.setVolume(Math.min(this.baseVolume+5,100))};d.prototype.lowerVolume=function(){this.setVolume(Math.max(this.baseVolume-5,0))};var L=function(){};L.prototype.beep=function(){alert("Beep")};L.prototype.playPlaylistSound=function(R){};L.prototype.pausePlaylistSound=function(R){};L.prototype.stopPlaylistSound=function(R){};L.prototype.playSoundUrl=function(R){alert("sound url "+R)};L.prototype.playDtmfTone=function(S,R){alert("dtmf tone")};L.prototype.stopSoundUrl=function(R){};L.prototype.pauseSoundUrl=function(R){};L.prototype.setVolume=function(R){};L.prototype.raiseVolume=function(){};L.prototype.lowerVolume=function(){};var J=function(){if(N()){return new c()}else{return new O()}};var c=function(){this.currentLockFlags=-1};c.prototype.setWakeLock=function(R){if(R!=this.currentLockFlags){navigator.power.setWakeLock(R);this.currentLockFlags=R}};c.prototype.releaseWakeLock=function(){if(this.currentLockFlags!=-1){navigator.power.releaseWakeLock();this.currentLockFlags=-1}};var O=function(){};O.prototype.setWakeLock=function(R){};O.prototype.releaseWakeLock=function(){};var p=function(){if(N()){return new E()}else{return new w()}};var E=function(){};E.prototype.send=function(R,S){navigator.sms.send(R,S)};var w=function(){};w.prototype.send=function(R,S){alert("SMS should be sent to "+R+" with the content: "+S)};var i=function(){if(N()){return new v()}else{return new o()}};var v=function(){};v.prototype.pickPlaylist=function(S){var R=function(T){S(T)};navigator.dialogPickers.pickPlaylist(R)};var o=function(){};o.prototype.pickPlaylist=function(R){alert("pick playlist currently unavailable")}})();var plt=plt||{};plt.lib={};(function(){plt.lib.Telephony={};plt.lib.Telephony.getSignalStrengths=function(){return plt.platform.Platform.getInstance().getTelephonyService().getSignalStrengths()};plt.lib.Location={};plt.lib.Location.getLatitude=function(){return plt.platform.Platform.getInstance().getLocationService().getLatitude()};plt.lib.Location.getLongitude=function(){return plt.platform.Platform.getInstance().getLocationService().getLongitude()};plt.lib.Location.getAttitude=function(){return plt.platform.Platform.getInstance().getLocationService().getAttitude()};plt.lib.Location.getBearing=function(){return plt.platform.Platform.getInstance().getLocationService().getBearing()};plt.lib.Location.getSpeed=function(){return plt.platform.Platform.getInstance().getLocationService().getSpeed()};plt.lib.Location.getDistanceBetween=function(e,d,c,b){return plt.platform.Platform.getInstance().getLocationService().getDistanceBetween(e,d,c,b)};plt.lib.Net={};plt.lib.Net.getUrl=function(b){return plt.platform.Platform.getInstance().getNetworkService().getUrl(b)}}());var effect_colon_none=function(){plt.Kernel.Struct.call(this,"make-effect:none",[])};effect_colon_none.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_none=function(){return new effect_colon_none()};var effect_colon_none_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_none};var effect_colon_beep=function(){plt.Kernel.Struct.call(this,"make-effect:beep",[])};effect_colon_beep.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_beep=function(){return new effect_colon_beep()};var effect_colon_beep_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_beep};var effect_colon_play_dash_dtmf_dash_tone=function(c,b){plt.Kernel.Struct.call(this,"make-effect:play-dtmf-tone",[c,b]);this.tone=c;this.duration=b};effect_colon_play_dash_dtmf_dash_tone.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_play_dash_dtmf_dash_tone=function(c,b){return new effect_colon_play_dash_dtmf_dash_tone(c,b)};var effect_colon_play_dash_dtmf_dash_tone_dash_tone=function(b){if(effect_colon_play_dash_dtmf_dash_tone_question_(b)){return b.tone}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:play-dtmf-tone-tone: not a effect:play-dtmf-tone: ~s",[b]))}};var effect_colon_play_dash_dtmf_dash_tone_dash_duration=function(b){if(effect_colon_play_dash_dtmf_dash_tone_question_(b)){return b.duration}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:play-dtmf-tone-duration: not a effect:play-dtmf-tone: ~s",[b]))}};var set_dash_effect_colon_play_dash_dtmf_dash_tone_dash_tone_bang_=function(c,b){if(effect_colon_play_dash_dtmf_dash_tone_question_(c)){c.tone=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_play_dash_dtmf_dash_tone_dash_tone_bang_: not a effect:play-dtmf-tone: ~s",[c]))}};var set_dash_effect_colon_play_dash_dtmf_dash_tone_dash_duration_bang_=function(c,b){if(effect_colon_play_dash_dtmf_dash_tone_question_(c)){c.duration=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_play_dash_dtmf_dash_tone_dash_duration_bang_: not a effect:play-dtmf-tone: ~s",[c]))}};var effect_colon_play_dash_dtmf_dash_tone_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_play_dash_dtmf_dash_tone};var effect_colon_send_dash_sms=function(b,c){plt.Kernel.Struct.call(this,"make-effect:send-sms",[b,c]);this.address=b;this.msg=c};effect_colon_send_dash_sms.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_send_dash_sms=function(c,b){return new effect_colon_send_dash_sms(c,b)};var effect_colon_send_dash_sms_dash_address=function(b){if(effect_colon_send_dash_sms_question_(b)){return b.address}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:send-sms-address: not a effect:send-sms: ~s",[b]))}};var effect_colon_send_dash_sms_dash_msg=function(b){if(effect_colon_send_dash_sms_question_(b)){return b.msg}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:send-sms-msg: not a effect:send-sms: ~s",[b]))}};var set_dash_effect_colon_send_dash_sms_dash_address_bang_=function(c,b){if(effect_colon_send_dash_sms_question_(c)){c.address=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_send_dash_sms_dash_address_bang_: not a effect:send-sms: ~s",[c]))}};var set_dash_effect_colon_send_dash_sms_dash_msg_bang_=function(c,b){if(effect_colon_send_dash_sms_question_(c)){c.msg=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_send_dash_sms_dash_msg_bang_: not a effect:send-sms: ~s",[c]))}};var effect_colon_send_dash_sms_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_send_dash_sms};var playlist_dash_sound=function(b){plt.Kernel.Struct.call(this,"make-playlist-sound",[b]);this.playlist=b};playlist_dash_sound.prototype=new plt.Kernel.Struct();var make_dash_playlist_dash_sound=function(b){return new playlist_dash_sound(b)};var playlist_dash_sound_dash_playlist=function(b){if(playlist_dash_sound_question_(b)){return b.playlist}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("playlist-sound-playlist: not a playlist-sound: ~s",[b]))}};var set_dash_playlist_dash_sound_dash_playlist_bang_=function(c,b){if(playlist_dash_sound_question_(c)){c.playlist=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_playlist_dash_sound_dash_playlist_bang_: not a playlist-sound: ~s",[c]))}};var playlist_dash_sound_question_=function(b){return b!=null&&b!=undefined&&b instanceof playlist_dash_sound};var sound_question_=function(b){return((plt.Kernel.setLastLoc('offset=417 line=19 span=11 id="effect-struct.ss"')&&plt.Kernel.string_question_(b))||(plt.Kernel.setLastLoc('offset=435 line=20 span=19 id="effect-struct.ss"')&&playlist_dash_sound_question_(b)))};var effect_colon_play_dash_sound=function(b){plt.Kernel.Struct.call(this,"make-effect:play-sound",[b]);this.sound=b};effect_colon_play_dash_sound.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_play_dash_sound=function(b){return new effect_colon_play_dash_sound(b)};var effect_colon_play_dash_sound_dash_sound=function(b){if(effect_colon_play_dash_sound_question_(b)){return b.sound}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:play-sound-sound: not a effect:play-sound: ~s",[b]))}};var set_dash_effect_colon_play_dash_sound_dash_sound_bang_=function(c,b){if(effect_colon_play_dash_sound_question_(c)){c.sound=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_play_dash_sound_dash_sound_bang_: not a effect:play-sound: ~s",[c]))}};var effect_colon_play_dash_sound_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_play_dash_sound};var effect_colon_pause_dash_sound=function(b){plt.Kernel.Struct.call(this,"make-effect:pause-sound",[b]);this.sound=b};effect_colon_pause_dash_sound.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_pause_dash_sound=function(b){return new effect_colon_pause_dash_sound(b)};var effect_colon_pause_dash_sound_dash_sound=function(b){if(effect_colon_pause_dash_sound_question_(b)){return b.sound}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:pause-sound-sound: not a effect:pause-sound: ~s",[b]))}};var set_dash_effect_colon_pause_dash_sound_dash_sound_bang_=function(c,b){if(effect_colon_pause_dash_sound_question_(c)){c.sound=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_pause_dash_sound_dash_sound_bang_: not a effect:pause-sound: ~s",[c]))}};var effect_colon_pause_dash_sound_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_pause_dash_sound};var effect_colon_stop_dash_sound=function(b){plt.Kernel.Struct.call(this,"make-effect:stop-sound",[b]);this.sound=b};effect_colon_stop_dash_sound.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_stop_dash_sound=function(b){return new effect_colon_stop_dash_sound(b)};var effect_colon_stop_dash_sound_dash_sound=function(b){if(effect_colon_stop_dash_sound_question_(b)){return b.sound}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:stop-sound-sound: not a effect:stop-sound: ~s",[b]))}};var set_dash_effect_colon_stop_dash_sound_dash_sound_bang_=function(c,b){if(effect_colon_stop_dash_sound_question_(c)){c.sound=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_stop_dash_sound_dash_sound_bang_: not a effect:stop-sound: ~s",[c]))}};var effect_colon_stop_dash_sound_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_stop_dash_sound};var effect_colon_set_dash_sound_dash_volume=function(b){plt.Kernel.Struct.call(this,"make-effect:set-sound-volume",[b]);this.volume=b};effect_colon_set_dash_sound_dash_volume.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_set_dash_sound_dash_volume=function(b){return new effect_colon_set_dash_sound_dash_volume(b)};var effect_colon_set_dash_sound_dash_volume_dash_volume=function(b){if(effect_colon_set_dash_sound_dash_volume_question_(b)){return b.volume}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:set-sound-volume-volume: not a effect:set-sound-volume: ~s",[b]))}};var set_dash_effect_colon_set_dash_sound_dash_volume_dash_volume_bang_=function(c,b){if(effect_colon_set_dash_sound_dash_volume_question_(c)){c.volume=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_set_dash_sound_dash_volume_dash_volume_bang_: not a effect:set-sound-volume: ~s",[c]))}};var effect_colon_set_dash_sound_dash_volume_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_set_dash_sound_dash_volume};var effect_colon_raise_dash_sound_dash_volume=function(){plt.Kernel.Struct.call(this,"make-effect:raise-sound-volume",[])};effect_colon_raise_dash_sound_dash_volume.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_raise_dash_sound_dash_volume=function(){return new effect_colon_raise_dash_sound_dash_volume()};var effect_colon_raise_dash_sound_dash_volume_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_raise_dash_sound_dash_volume};var effect_colon_lower_dash_sound_dash_volume=function(){plt.Kernel.Struct.call(this,"make-effect:lower-sound-volume",[])};effect_colon_lower_dash_sound_dash_volume.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_lower_dash_sound_dash_volume=function(){return new effect_colon_lower_dash_sound_dash_volume()};var effect_colon_lower_dash_sound_dash_volume_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_lower_dash_sound_dash_volume};var effect_colon_set_dash_wake_dash_lock=function(b){plt.Kernel.Struct.call(this,"make-effect:set-wake-lock",[b]);this.locks=b};effect_colon_set_dash_wake_dash_lock.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_set_dash_wake_dash_lock=function(b){return new effect_colon_set_dash_wake_dash_lock(b)};var effect_colon_set_dash_wake_dash_lock_dash_locks=function(b){if(effect_colon_set_dash_wake_dash_lock_question_(b)){return b.locks}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:set-wake-lock-locks: not a effect:set-wake-lock: ~s",[b]))}};var set_dash_effect_colon_set_dash_wake_dash_lock_dash_locks_bang_=function(c,b){if(effect_colon_set_dash_wake_dash_lock_question_(c)){c.locks=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_set_dash_wake_dash_lock_dash_locks_bang_: not a effect:set-wake-lock: ~s",[c]))}};var effect_colon_set_dash_wake_dash_lock_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_set_dash_wake_dash_lock};var effect_colon_release_dash_wake_dash_lock=function(){plt.Kernel.Struct.call(this,"make-effect:release-wake-lock",[])};effect_colon_release_dash_wake_dash_lock.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_release_dash_wake_dash_lock=function(){return new effect_colon_release_dash_wake_dash_lock()};var effect_colon_release_dash_wake_dash_lock_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_release_dash_wake_dash_lock};var effect_colon_pick_dash_playlist=function(b){plt.Kernel.Struct.call(this,"make-effect:pick-playlist",[b]);this.update_dash_f=b};effect_colon_pick_dash_playlist.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_pick_dash_playlist=function(b){return new effect_colon_pick_dash_playlist(b)};var effect_colon_pick_dash_playlist_dash_update_dash_f=function(b){if(effect_colon_pick_dash_playlist_question_(b)){return b.update_dash_f}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:pick-playlist-update-f: not a effect:pick-playlist: ~s",[b]))}};var set_dash_effect_colon_pick_dash_playlist_dash_update_dash_f_bang_=function(c,b){if(effect_colon_pick_dash_playlist_question_(c)){c.update_dash_f=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_pick_dash_playlist_dash_update_dash_f_bang_: not a effect:pick-playlist: ~s",[c]))}};var effect_colon_pick_dash_playlist_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_pick_dash_playlist};var effect_colon_pick_dash_random=function(c,b){plt.Kernel.Struct.call(this,"make-effect:pick-random",[c,b]);this.n=c;this.update_dash_f=b};effect_colon_pick_dash_random.prototype=new plt.Kernel.Struct();var make_dash_effect_colon_pick_dash_random=function(c,b){return new effect_colon_pick_dash_random(c,b)};var effect_colon_pick_dash_random_dash_n=function(b){if(effect_colon_pick_dash_random_question_(b)){return b.n}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:pick-random-n: not a effect:pick-random: ~s",[b]))}};var effect_colon_pick_dash_random_dash_update_dash_f=function(b){if(effect_colon_pick_dash_random_question_(b)){return b.update_dash_f}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("effect:pick-random-update-f: not a effect:pick-random: ~s",[b]))}};var set_dash_effect_colon_pick_dash_random_dash_n_bang_=function(c,b){if(effect_colon_pick_dash_random_question_(c)){c.n=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_pick_dash_random_dash_n_bang_: not a effect:pick-random: ~s",[c]))}};var set_dash_effect_colon_pick_dash_random_dash_update_dash_f_bang_=function(c,b){if(effect_colon_pick_dash_random_question_(c)){c.update_dash_f=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_effect_colon_pick_dash_random_dash_update_dash_f_bang_: not a effect:pick-random: ~s",[c]))}};var effect_colon_pick_dash_random_question_=function(b){return b!=null&&b!=undefined&&b instanceof effect_colon_pick_dash_random};var effect_question_=function(b){return((plt.Kernel.setLastLoc('offset=1069 line=43 span=20 id="effect-struct.ss"')&&effect_colon_none_question_(b))||(plt.Kernel.setLastLoc('offset=1096 line=44 span=20 id="effect-struct.ss"')&&effect_colon_beep_question_(b))||(plt.Kernel.setLastLoc('offset=1123 line=45 span=30 id="effect-struct.ss"')&&effect_colon_play_dash_dtmf_dash_tone_question_(b))||(plt.Kernel.setLastLoc('offset=1160 line=46 span=24 id="effect-struct.ss"')&&effect_colon_send_dash_sms_question_(b))||(plt.Kernel.setLastLoc('offset=1191 line=47 span=26 id="effect-struct.ss"')&&effect_colon_play_dash_sound_question_(b))||(plt.Kernel.setLastLoc('offset=1224 line=48 span=27 id="effect-struct.ss"')&&effect_colon_pause_dash_sound_question_(b))||(plt.Kernel.setLastLoc('offset=1258 line=49 span=26 id="effect-struct.ss"')&&effect_colon_stop_dash_sound_question_(b))||(plt.Kernel.setLastLoc('offset=1291 line=50 span=32 id="effect-struct.ss"')&&effect_colon_set_dash_sound_dash_volume_question_(b))||(plt.Kernel.setLastLoc('offset=1330 line=51 span=34 id="effect-struct.ss"')&&effect_colon_raise_dash_sound_dash_volume_question_(b))||(plt.Kernel.setLastLoc('offset=1371 line=52 span=34 id="effect-struct.ss"')&&effect_colon_lower_dash_sound_dash_volume_question_(b))||(plt.Kernel.setLastLoc('offset=1412 line=53 span=29 id="effect-struct.ss"')&&effect_colon_set_dash_wake_dash_lock_question_(b))||(plt.Kernel.setLastLoc('offset=1448 line=54 span=33 id="effect-struct.ss"')&&effect_colon_release_dash_wake_dash_lock_question_(b))||(plt.Kernel.setLastLoc('offset=1488 line=55 span=29 id="effect-struct.ss"')&&effect_colon_pick_dash_playlist_question_(b))||(plt.Kernel.setLastLoc('offset=1524 line=56 span=27 id="effect-struct.ss"')&&effect_colon_pick_dash_random_question_(b)))};(function(){((function(b){}))(arguments[0]||plt.Kernel.identity)})();var plt=plt||{};plt.world=plt.world||{};plt.world.Kernel=plt.world.Kernel||{};(function(){var p;var w=[];var e;var o=false;var q=function(C){var B=function(){};B.prototype=C;return new B()};var v=[];plt.world.Kernel.addAnnounceListener=function(B){v.push(B)};plt.world.Kernel.removeAnnounceListener=function(C){var B=v.indexOf(C);if(B!=-1){v.splice(B,1)}};plt.world.Kernel.announce=function(B,D){for(var C=0;C<v.length;C++){try{v[C](B,D)}catch(E){}}};var t=function(B){p=B;g()};plt.world.Kernel.updateWorld=function(C){var B=C(p);t(B)};plt.world.Kernel.shutdownWorld=function(){e=true};var g=function(){var B;for(B=0;B<w.length;B++){w[B](p)}};var z=function(B){w.push(B)};var i=function(D){var B=D.charCode||D.keyCode;var C;if(B==37){C="left"}else{if(B==38){C="up"}else{if(B==39){C="right"}else{if(B==40){C="down"}else{C=String.fromCharCode(B)}}}}return C};var h=function(){if(o){clearInterval(o);o=false}e=false;w=[]};var x=function(C,B){if(window.document.getElementById("canvas")!=undefined){return window}var D=window.open("big-bang.html","big-bang");if(D==null){throw new Error("Error: Not allowed to create a new window.")}return D};plt.world.Kernel.bigBang=function(C,I,B,F){plt.Kernel.check(C,plt.Kernel.isNumber,"big-bang","number",1);plt.Kernel.check(I,plt.Kernel.isNumber,"big-bang","number",2);plt.Kernel.arrayEach(args,function(K,L){plt.Kernel.check(K,plt.Kernel.isFunction,"big-bang","handler",L+4)});var G;var H=x(C,I);var D=H.document.getElementById("canvas");D.width=C.toInteger();D.height=I.toInteger();h();var E=new plt.world.config.WorldConfig();for(G=0;G<F.length;G++){E=F[G](E)}E=E.updateAll({changeWorld:plt.world.Kernel.updateWorld,shutdownWorld:plt.world.Kernel.shutdownWorld});plt.world.config.CONFIG=E;if(E.lookup("onKey")){H.onkeydown=function(K){plt.world.stimuli.onKey(K)}}if(E.lookup("onRedraw")){z(function(K){var L=D.getContext("2d");var M=E.lookup("onRedraw")([K]);M.render(L,0,0)})}z(function(K){if(E.lookup("stopWhen")){if(E.lookup("stopWhen")([K])){e=true}}});if(E.lookup("onTick")){l(H,E)}t(B);if(E.lookup("initialEffect")){var J=plt.world.Kernel.applyEffect(E.lookup("initialEffect"));for(var G=0;G<J.length;G++){if(!e){updateWorld(J)}}}};var l=function(C,B){o=C.setInterval(function(){if(e){C.clearTimeout(o);o=false}else{plt.world.stimuli.onTick()}},B.lookup("tickDelay"))};plt.world.Kernel.isKeyEqual=function(D,C){var B=(D.toString().toLowerCase()==C.toString().toLowerCase());return B};plt.world.Kernel.imageWidth=function(B){plt.Kernel.check(B,r,"image-width","image",1);return plt.types.Rational.makeInstance(B.getWidth(),1)};plt.world.Kernel.imageHeight=function(B){plt.Kernel.check(B,r,"image-height","image",1);return plt.types.Rational.makeInstance(B.getHeight(),1)};plt.world.Kernel.placeImage=function(D,B,E,C){plt.Kernel.check(D,r,"place-image","image",1);plt.Kernel.check(B,plt.Kernel.isNumber,"place-image","number",2);plt.Kernel.check(E,plt.Kernel.isNumber,"place-image","number",3);plt.Kernel.check(C,A,"place-image","scene",4);return C.add(D,plt.types.NumberTower.toInteger(B),plt.types.NumberTower.toInteger(E))};plt.world.Kernel.emptyScene=function(C,B){plt.Kernel.check(C,plt.Kernel.isNumber,"empty-scene","number",1);plt.Kernel.check(B,plt.Kernel.isNumber,"empty-scene","number",2);return new c(plt.types.NumberTower.toInteger(C),plt.types.NumberTower.toInteger(B),[])};var u=function(B){return typeof(b.get(B))!="undefined"};plt.world.Kernel.text=function(D,B,C){plt.Kernel.check(D,plt.Kernel.isString,"text","string",1);plt.Kernel.check(B,plt.Kernel.isNumber,"text","number",2);plt.Kernel.check(C,u,"text","color",3);if(b.get(C)){C=b.get(C)}return new d(D,plt.types.NumberTower.toInteger(B),C)};plt.world.Kernel.circle=function(D,C,B){plt.Kernel.check(D,plt.Kernel.isNumber,"circle","number",1);plt.Kernel.check(C,plt.Kernel.isString,"circle","string",2);plt.Kernel.check(B,u,"circle","color",3);if(b.get(B)){B=b.get(B)}return new f(plt.types.NumberTower.toInteger(D),C,B)};plt.world.Kernel.openImageUrl=function(B){plt.Kernel.check(B,plt.Kernel.isString,"open-image-url","string",1);return k.makeInstance(B.toString())};plt.world.Kernel.nwRectangle=function(B,E,D,F){plt.Kernel.check(B,plt.Kernel.isNumber,"nw:rectangle","number",1);plt.Kernel.check(E,plt.Kernel.isNumber,"nw:rectangle","number",2);plt.Kernel.check(D,plt.Kernel.isString,"nw:rectangle","string",3);plt.Kernel.check(F,u,"nw:rectangle","color",4);if(b.get(F)){F=b.get(F)}var C=new n(plt.types.NumberTower.toInteger(B),plt.types.NumberTower.toInteger(E),D,F);return C.updatePinhole(0,0)};plt.world.Kernel.rectangle=function(B,D,C,E){plt.Kernel.check(B,plt.Kernel.isNumber,"rectangle","number",1);plt.Kernel.check(D,plt.Kernel.isNumber,"rectangle","number",2);plt.Kernel.check(C,plt.Kernel.isString,"rectangle","string",3);plt.Kernel.check(E,u,"rectangle","color",4);if(b.get(E)){E=b.get(E)}return new n(plt.types.NumberTower.toInteger(B),plt.types.NumberTower.toInteger(D),C,E)};var y=function(C,B){this.pinholeX=C;this.pinholeY=B};plt.world.Kernel.BaseImage=y;var r=function(B){return((B!=null)&&(B!=undefined)&&(B instanceof y))};plt.world.Kernel.isImage=r;y.prototype.updatePinhole=function(B,D){var C={};for(attr in this){C[attr]=this[attr]}C.__proto__=this.__proto__;C.pinholeX=B;C.pinholeY=D;return C};y.prototype.render=function(C,B,D){throw new MobyRuntimeError("Unimplemented method render")};plt.world.Kernel.makeCanvas=function(D,B){var C=document.createElement("canvas");C.width=D;C.height=B;C.style.width=C.width+"px";C.style.height=C.height+"px";if(window&&typeof window.G_vmlCanvasManager!="undefined"){C.style.display="none";document.body.appendChild(C);C=window.G_vmlCanvasManager.initElement(C);document.body.removeChild(C);C.style.display=""}return C};y.prototype.toDomNode=function(){var F=this;var E=plt.world.Kernel.imageWidth(F).toInteger();var B=plt.world.Kernel.imageHeight(F).toInteger();var D=plt.world.Kernel.makeCanvas(E,B);var G=D.style.display;D.style.display="none";document.body.appendChild(D);var C=D.getContext("2d");F.render(C,0,0);document.body.removeChild(D);D.style.display="";return D};y.prototype.toWrittenString=function(){return"<image>"};y.prototype.toDisplayedString=function(){return"<image>"};plt.world.Kernel.image_question_=function(B){return r(B)};plt.world.Kernel.image_equal__question_=function(C,B){check(C,r,"image=?","image",1);check(B,r,"image=?","image",2);return C==B?plt.types.Logic.TRUE:plt.types.Logic.FALSE};var A=function(B){return((B!=undefined)&&(B!=null)&&(B instanceof c))};var c=function(D,B,C){y.call(this,0,0);this.width=D;this.height=B;this.children=C};c.prototype=q(y.prototype);c.prototype.add=function(C,B,D){return new c(this.width,this.height,this.children.concat([[C,B,D]]))};c.prototype.render=function(E,C,H){var G;var F,D,B;E.clearRect(C-this.pinholeX,H-this.pinholeY,this.width,this.height);for(G=0;G<this.children.length;G++){F=this.children[G][0];D=this.children[G][1];B=this.children[G][2];E.save();F.render(E,D+C-F.pinholeX,B+H-F.pinholeY);E.restore()}};c.prototype.getWidth=function(){return this.width};c.prototype.getHeight=function(){return this.height};var k=function(D,C){y.call(this,0,0);var B=this;this.isLoaded=false;if(C&&C.complete){this.img=C;this.isLoaded=true;this.pinholeX=B.img.width/2;this.pinholeY=B.img.height/2}else{this.img=new Image();this.img.onload=function(){B.isLoaded=true;B.pinholeX=B.img.width/2;B.pinholeY=B.img.height/2};this.img.onerror=function(E){B.img.onerror="";B.img.src="http://www.wescheme.org/images/broken.png"};this.img.src=D}};k.prototype=q(y.prototype);plt.world.Kernel.FileImage=k;var j={};k.makeInstance=function(B){if(!(B in j)){j[B]=new k(B)}return j[B]};k.installInstance=function(C,B){j[C]=new k(C,B)};k.prototype.render=function(C,B,D){C.drawImage(this.img,B,D)};k.prototype.getWidth=function(){return this.img.width};k.prototype.getHeight=function(){return this.img.height};k.prototype.toDomNode=function(){return this.img.cloneNode(true)};var n=function(E,B,D,C){y.call(this,E/2,B/2);this.width=E;this.height=B;this.style=D;this.color=C};n.prototype=q(y.prototype);n.prototype.render=function(C,B,D){C.fillStyle=this.color.toString();if(this.style.toString().toLowerCase()=="outline"){C.strokeRect(B,D,this.width,this.height)}else{C.fillRect(B,D,this.width,this.height)}};n.prototype.getWidth=function(){return this.width};n.prototype.getHeight=function(){return this.height};var d=function(D,C,B){y.call(this,0,0);this.msg=D;this.size=C;this.color=B;this.font="Optimer"};d.prototype=q(y.prototype);d.prototype.render=function(C,B,D){if(C.fillText){C.font=this.size+"px Optimer";C.fillStyle=this.color.toRGBAString();C.fillText(this.msg,B,D)}else{if("mozDrawText" in C){C.mozTextStyle=this.size+"px "+this.font;C.translate(B,D+this.size);C.fillStyle=this.color;C.mozDrawText(this.msg)}}};d.prototype.getWidth=function(){return this.size*this.msg.length};d.prototype.getHeight=function(){return 10};var f=function(B,D,C){y.call(this,B,B);this.radius=B;this.style=D;this.color=C};f.prototype=q(y.prototype);f.prototype.render=function(C,B,D){C.translate(0,0);C.beginPath();C.fillStyle=this.color.toString();C.arc(B+this.radius,D+this.radius,this.radius,0,2*Math.PI,false);if(this.style.toString().toLowerCase()=="outline"){C.stroke()}else{C.fill()}C.closePath()};f.prototype.getWidth=function(){return this.radius*2};f.prototype.getHeight=function(){return this.radius*2};plt.world.Kernel.applyEffect=function(D){var C=[];if(plt.Kernel.empty_question_(D)){}else{if(plt.Kernel.pair_question_(D)){C=C.concat(plt.world.Kernel.applyEffect(D.first()));C=C.concat(plt.world.Kernel.applyEffect(D.rest()))}else{var B=D.run();if(B){C=C.concat(B)}}}return C};effect_colon_none.prototype.run=function(){};effect_colon_beep.prototype.run=function(){plt.platform.Platform.getInstance().getSoundService().beep()};effect_colon_play_dash_dtmf_dash_tone.prototype.run=function(){plt.platform.Platform.getInstance().getSoundService().playDtmfTone(this._fields[0].toInteger(),this._fields[1].toInteger())};effect_colon_send_dash_sms.prototype.run=function(){plt.platform.Platform.getInstance().getSmsService().send(this._fields[0],this._fields[1])};effect_colon_play_dash_sound.prototype.run=function(){if(plt.Kernel.isString(this._fields[0])){plt.platform.Platform.getInstance().getSoundService().playSoundUrl(this._fields[0])}else{if(playlist_dash_sound_question_(this._fields[0])){plt.platform.Platform.getInstance().getSoundService().playPlaylist(this._fields[0]._fields[0])}}};effect_colon_pause_dash_sound.prototype.run=function(){if(plt.Kernel.isString(this._fields[0])){plt.platform.Platform.getInstance().getSoundService().pauseSoundUrl(this._fields[0])}else{if(playlist_dash_sound_question_(this._fields[0])){plt.platform.Platform.getInstance().getSoundService().pausePlaylist(this._fields[0]._fields[0])}}};effect_colon_stop_dash_sound.prototype.run=function(){if(plt.Kernel.isString(this._fields[0])){plt.platform.Platform.getInstance().getSoundService().stopSoundUrl(this._fields[0])}else{if(playlist_dash_sound_question_(this._fields[0])){plt.platform.Platform.getInstance().getSoundService().stopPlaylist(this._fields[0]._fields[0])}}};effect_colon_set_dash_sound_dash_volume.prototype.run=function(){plt.platform.Platform.getInstance().getSoundService().setVolume(this._fields[0].toInteger())};effect_colon_raise_dash_sound_dash_volume.prototype.run=function(){plt.platform.Platform.getInstance().getSoundService.raiseVolume()};effect_colon_lower_dash_sound_dash_volume.prototype.run=function(){plt.platform.Platform.getInstance().getSoundService.lowerVolume()};effect_colon_set_dash_wake_dash_lock.prototype.run=function(){plt.platform.Platform.getInstance().getPowerService().setWakeLock(this._fields[0].toInteger())};effect_colon_release_dash_wake_dash_lock.prototype.run=function(){plt.platform.Platform.getInstance().getPowerService().releaseWakeLock()};effect_colon_pick_dash_playlist.prototype.run=function(){var B=this._fields[0];var C=function(E){var D=make_dash_playlist_dash_sound(E);setTimeout(function(){var F=plt.world.config.CONFIG.lookup("changeWorld");F(function(G){return B([G,D])})},0)};plt.platform.Platform.getInstance().getPickPlaylistService().pickPlaylist(C)};effect_colon_pick_dash_random.prototype.run=function(){var C=plt.types.Rational.makeInstance(Math.floor(plt.types.NumberTower.toInteger(this._fields[0])*Math.random()),1);var B=this._fields[1];return function(D){return B([D,C])}};var m=function(){this.colors={}};m.prototype.put=function(C,B){this.colors[C]=B};m.prototype.get=function(B){return this.colors[B.toString().toUpperCase()]};var s=function(D,C,B){this.r=D;this.g=C;this.b=B};s.prototype.toString=function(){return"rgb("+this.r+","+this.g+","+this.b+")"};s.prototype.toRGBAString=function(){return"rgba("+this.r+","+this.g+","+this.b+", 1)"};var b=new m();b.put("ORANGE",new s(255,165,0));b.put("RED",new s(255,0,0));b.put("ORANGERED",new s(255,69,0));b.put("TOMATO",new s(255,99,71));b.put("DARKRED",new s(139,0,0));b.put("RED",new s(255,0,0));b.put("FIREBRICK",new s(178,34,34));b.put("CRIMSON",new s(220,20,60));b.put("DEEPPINK",new s(255,20,147));b.put("MAROON",new s(176,48,96));b.put("INDIAN RED",new s(205,92,92));b.put("INDIANRED",new s(205,92,92));b.put("MEDIUM VIOLET RED",new s(199,21,133));b.put("MEDIUMVIOLETRED",new s(199,21,133));b.put("VIOLET RED",new s(208,32,144));b.put("VIOLETRED",new s(208,32,144));b.put("LIGHTCORAL",new s(240,128,128));b.put("HOTPINK",new s(255,105,180));b.put("PALEVIOLETRED",new s(219,112,147));b.put("LIGHTPINK",new s(255,182,193));b.put("ROSYBROWN",new s(188,143,143));b.put("PINK",new s(255,192,203));b.put("ORCHID",new s(218,112,214));b.put("LAVENDERBLUSH",new s(255,240,245));b.put("SNOW",new s(255,250,250));b.put("CHOCOLATE",new s(210,105,30));b.put("SADDLEBROWN",new s(139,69,19));b.put("BROWN",new s(132,60,36));b.put("DARKORANGE",new s(255,140,0));b.put("CORAL",new s(255,127,80));b.put("SIENNA",new s(160,82,45));b.put("ORANGE",new s(255,165,0));b.put("SALMON",new s(250,128,114));b.put("PERU",new s(205,133,63));b.put("DARKGOLDENROD",new s(184,134,11));b.put("GOLDENROD",new s(218,165,32));b.put("SANDYBROWN",new s(244,164,96));b.put("LIGHTSALMON",new s(255,160,122));b.put("DARKSALMON",new s(233,150,122));b.put("GOLD",new s(255,215,0));b.put("YELLOW",new s(255,255,0));b.put("OLIVE",new s(128,128,0));b.put("BURLYWOOD",new s(222,184,135));b.put("TAN",new s(210,180,140));b.put("NAVAJOWHITE",new s(255,222,173));b.put("PEACHPUFF",new s(255,218,185));b.put("KHAKI",new s(240,230,140));b.put("DARKKHAKI",new s(189,183,107));b.put("MOCCASIN",new s(255,228,181));b.put("WHEAT",new s(245,222,179));b.put("BISQUE",new s(255,228,196));b.put("PALEGOLDENROD",new s(238,232,170));b.put("BLANCHEDALMOND",new s(255,235,205));b.put("MEDIUM GOLDENROD",new s(234,234,173));b.put("MEDIUMGOLDENROD",new s(234,234,173));b.put("PAPAYAWHIP",new s(255,239,213));b.put("MISTYROSE",new s(255,228,225));b.put("LEMONCHIFFON",new s(255,250,205));b.put("ANTIQUEWHITE",new s(250,235,215));b.put("CORNSILK",new s(255,248,220));b.put("LIGHTGOLDENRODYELLOW",new s(250,250,210));b.put("OLDLACE",new s(253,245,230));b.put("LINEN",new s(250,240,230));b.put("LIGHTYELLOW",new s(255,255,224));b.put("SEASHELL",new s(255,245,238));b.put("BEIGE",new s(245,245,220));b.put("FLORALWHITE",new s(255,250,240));b.put("IVORY",new s(255,255,240));b.put("GREEN",new s(0,255,0));b.put("LAWNGREEN",new s(124,252,0));b.put("CHARTREUSE",new s(127,255,0));b.put("GREEN YELLOW",new s(173,255,47));b.put("GREENYELLOW",new s(173,255,47));b.put("YELLOW GREEN",new s(154,205,50));b.put("YELLOWGREEN",new s(154,205,50));b.put("MEDIUM FOREST GREEN",new s(107,142,35));b.put("OLIVEDRAB",new s(107,142,35));b.put("MEDIUMFORESTGREEN",new s(107,142,35));b.put("DARK OLIVE GREEN",new s(85,107,47));b.put("DARKOLIVEGREEN",new s(85,107,47));b.put("DARKSEAGREEN",new s(143,188,139));b.put("LIME",new s(0,255,0));b.put("DARK GREEN",new s(0,100,0));b.put("DARKGREEN",new s(0,100,0));b.put("LIME GREEN",new s(50,205,50));b.put("LIMEGREEN",new s(50,205,50));b.put("FOREST GREEN",new s(34,139,34));b.put("FORESTGREEN",new s(34,139,34));b.put("SPRING GREEN",new s(0,255,127));b.put("SPRINGGREEN",new s(0,255,127));b.put("MEDIUM SPRING GREEN",new s(0,250,154));b.put("MEDIUMSPRINGGREEN",new s(0,250,154));b.put("SEA GREEN",new s(46,139,87));b.put("SEAGREEN",new s(46,139,87));b.put("MEDIUM SEA GREEN",new s(60,179,113));b.put("MEDIUMSEAGREEN",new s(60,179,113));b.put("AQUAMARINE",new s(112,216,144));b.put("LIGHTGREEN",new s(144,238,144));b.put("PALE GREEN",new s(152,251,152));b.put("PALEGREEN",new s(152,251,152));b.put("MEDIUM AQUAMARINE",new s(102,205,170));b.put("MEDIUMAQUAMARINE",new s(102,205,170));b.put("TURQUOISE",new s(64,224,208));b.put("LIGHTSEAGREEN",new s(32,178,170));b.put("MEDIUM TURQUOISE",new s(72,209,204));b.put("MEDIUMTURQUOISE",new s(72,209,204));b.put("HONEYDEW",new s(240,255,240));b.put("MINTCREAM",new s(245,255,250));b.put("ROYALBLUE",new s(65,105,225));b.put("DODGERBLUE",new s(30,144,255));b.put("DEEPSKYBLUE",new s(0,191,255));b.put("CORNFLOWERBLUE",new s(100,149,237));b.put("STEEL BLUE",new s(70,130,180));b.put("STEELBLUE",new s(70,130,180));b.put("LIGHTSKYBLUE",new s(135,206,250));b.put("DARK TURQUOISE",new s(0,206,209));b.put("DARKTURQUOISE",new s(0,206,209));b.put("CYAN",new s(0,255,255));b.put("AQUA",new s(0,255,255));b.put("DARKCYAN",new s(0,139,139));b.put("TEAL",new s(0,128,128));b.put("SKY BLUE",new s(135,206,235));b.put("SKYBLUE",new s(135,206,235));b.put("CADET BLUE",new s(96,160,160));b.put("CADETBLUE",new s(95,158,160));b.put("DARK SLATE GRAY",new s(47,79,79));b.put("DARKSLATEGRAY",new s(47,79,79));b.put("LIGHTSLATEGRAY",new s(119,136,153));b.put("SLATEGRAY",new s(112,128,144));b.put("LIGHT STEEL BLUE",new s(176,196,222));b.put("LIGHTSTEELBLUE",new s(176,196,222));b.put("LIGHT BLUE",new s(173,216,230));b.put("LIGHTBLUE",new s(173,216,230));b.put("POWDERBLUE",new s(176,224,230));b.put("PALETURQUOISE",new s(175,238,238));b.put("LIGHTCYAN",new s(224,255,255));b.put("ALICEBLUE",new s(240,248,255));b.put("AZURE",new s(240,255,255));b.put("MEDIUM BLUE",new s(0,0,205));b.put("MEDIUMBLUE",new s(0,0,205));b.put("DARKBLUE",new s(0,0,139));b.put("MIDNIGHT BLUE",new s(25,25,112));b.put("MIDNIGHTBLUE",new s(25,25,112));b.put("NAVY",new s(36,36,140));b.put("BLUE",new s(0,0,255));b.put("INDIGO",new s(75,0,130));b.put("BLUE VIOLET",new s(138,43,226));b.put("BLUEVIOLET",new s(138,43,226));b.put("MEDIUM SLATE BLUE",new s(123,104,238));b.put("MEDIUMSLATEBLUE",new s(123,104,238));b.put("SLATE BLUE",new s(106,90,205));b.put("SLATEBLUE",new s(106,90,205));b.put("PURPLE",new s(160,32,240));b.put("DARK SLATE BLUE",new s(72,61,139));b.put("DARKSLATEBLUE",new s(72,61,139));b.put("DARKVIOLET",new s(148,0,211));b.put("DARK ORCHID",new s(153,50,204));b.put("DARKORCHID",new s(153,50,204));b.put("MEDIUMPURPLE",new s(147,112,219));b.put("CORNFLOWER BLUE",new s(68,64,108));b.put("MEDIUM ORCHID",new s(186,85,211));b.put("MEDIUMORCHID",new s(186,85,211));b.put("MAGENTA",new s(255,0,255));b.put("FUCHSIA",new s(255,0,255));b.put("DARKMAGENTA",new s(139,0,139));b.put("VIOLET",new s(238,130,238));b.put("PLUM",new s(221,160,221));b.put("LAVENDER",new s(230,230,250));b.put("THISTLE",new s(216,191,216));b.put("GHOSTWHITE",new s(248,248,255));b.put("WHITE",new s(255,255,255));b.put("WHITESMOKE",new s(245,245,245));b.put("GAINSBORO",new s(220,220,220));b.put("LIGHT GRAY",new s(211,211,211));b.put("LIGHTGRAY",new s(211,211,211));b.put("SILVER",new s(192,192,192));b.put("GRAY",new s(190,190,190));b.put("DARK GRAY",new s(169,169,169));b.put("DARKGRAY",new s(169,169,169));b.put("DIM GRAY",new s(105,105,105));b.put("DIMGRAY",new s(105,105,105));b.put("BLACK",new s(0,0,0))})();if(typeof(plt)=="undefined"){var plt={}}plt.Jsworld={};(function(){var ac=plt.Jsworld;var e=false;function J(){}var av=new J();var W=[];var an=[];ac.shutdown=function(){while(an.length>0){var p=an.pop();if(p){p.pause()}}q()};function E(p){W.push(p)}function aj(aJ){var p=W.indexOf(aJ);if(p!=-1){W.splice(p,1)}}function q(){av=new J();W=[]}function L(aL){var p=av;try{av=aL(av)}catch(aK){return}if(p!=av){for(var aJ=0;aJ<W.length;aJ++){try{W[aJ](av,p)}catch(aK){av=p;throw aK}}}}ac.change_world=L;Number.prototype.NaN0=function(){return isNaN(this)?0:this};function H(aK){var aJ=0;var p=0;while(aK.offsetParent){aJ+=aK.offsetLeft+(aK.currentStyle?(parseInt(aK.currentStyle.borderLeftWidth)).NaN0():0);p+=aK.offsetTop+(aK.currentStyle?(parseInt(aK.currentStyle.borderTopWidth)).NaN0():0);aK=aK.offsetParent}aJ+=aK.offsetLeft+(aK.currentStyle?(parseInt(aK.currentStyle.borderLeftWidth)).NaN0():0);p+=aK.offsetTop+(aK.currentStyle?(parseInt(aK.currentStyle.borderTopWidth)).NaN0():0);return{x:aJ,y:p}}ac.getPosition=H;var Z=0;function n(){return Z++}ac.gensym=n;function I(aJ,aL){var p=new Array(aJ.length);for(var aK=0;aK<aJ.length;aK++){p[aK]=aL(aJ[aK])}return p}ac.map=I;function b(aJ,aL){var p=[];for(var aK=0;aK<aJ.length;aK++){p=p.concat(aL(aJ[aK]))}return p}function m(aJ,aL){var p=new Array(aJ.length);for(var aK=0;aK<aJ.length;aK++){p[aK]=aL(aJ[aK],aK)}return p}ac.mapi=m;function v(aJ,p,aL){for(var aK=0;aK<aJ.length;aK++){p=aL(aJ[aK],p)}return p}ac.fold=v;function ap(aL,aJ){var p={};for(var aK in aL){p[aK]=aL[aK]}for(var aK in aJ){p[aK]=aJ[aK]}return p}ac.augment=ap;function P(aM,aK,aJ){var p={};for(var aL in aM){p[aL]=aM[aL]}p[aK]=aJ;return p}ac.assoc_cons=P;function ah(aJ,p){return aJ.concat([p])}ac.cons=ah;function V(aJ,p){return aJ.concat(p)}ac.append=V;function K(aL,aJ){var aK=[];for(var p=0;p<aL.length;p++){aK.push([aL[p],aJ[p]])}return aK}ac.array_join=K;function o(aK,aJ){for(var p=0;p<aK.length;p++){if(aK[p]===aJ){return aK.slice(0,p).concat(aK.slice(p+1))}}return aK}ac.removeq=o;function x(aK,aJ){for(var p=0;p<aK.length;p++){if(aJ(aK[p])){return aK.slice(0,p).concat(aK.slice(p+1))}}return aK}ac.removef=x;function Q(aK,aJ){for(var p=0;p<aK.length;p++){if(aJ(aK[p])){return aK.slice(0,p).concat(Q(aK.slice(p+1),aJ))}}return aK}ac.filter=Q;function aE(aK,aJ){var aL={};for(var p in aK){if(p!=aJ){aL[p]=aK[p]}}return aL}ac.without=aE;function k(aJ,p){for(var aK=0;aK<aJ.length;aK++){if(aJ[aK]===p){return true}}return false}ac.memberq=k;function ao(aJ,p){for(var aK=0;aK<aJ.length;aK++){if(aJ[aK]==p){return true}}return false}ac.member=ao;function O(p){return p[0]}ac.head=O;function U(p){return p.slice(1,p.length)}ac.tail=U;function ay(aJ){var p=[aJ];for(var aK=aJ.firstChild;aK!=null;aK=aK.nextSibling){p.push(ay(aK))}return p}ac.node_to_tree=ay;function i(p){var aJ=[p.node];if(p.node.jsworldOpaque==true){return aJ}for(var aK=0;aK<p.children.length;aK++){aJ=aJ.concat(i(p.children[aK]))}return aJ}function aA(aJ,p){return(aJ&&p&&aJ===p)}function d(aJ,p){return !aA(aJ,p)}function Y(p){var aJ=[];if(p.node.jsworldOpaque==true){return[]}for(var aK=0;aK<p.children.length;aK++){aJ.push({relation:"parent",parent:p.node,child:p.children[aK].node})}for(var aK=0;aK<p.children.length-1;aK++){aJ.push({relation:"neighbor",left:p.children[aK].node,right:p.children[aK+1].node})}for(var aK=0;aK<p.children.length;aK++){aJ=aJ.concat(Y(p.children[aK]))}return aJ}function au(p,aJ){p.appendChild(aJ)}function ag(aJ,aS,aM){for(var aV=0;aV<aM.length;aV++){if(aM[aV].relation=="parent"){var aP=aM[aV].parent,aN=aM[aV].child;if(d(aN.parentNode,aP)){au(aP,aN)}else{}}}for(;;){var aX=false;for(var aV=0;aV<aM.length;aV++){if(aM[aV].relation=="neighbor"){var aL=aM[aV].left,aY=aM[aV].right;if(d(aL.nextSibling,aY)){aL.parentNode.insertBefore(aL,aY);aX=true}}}if(!aX){break}}var aO;function aK(a2,a1){var a0=a2.compareDocumentPosition(a1);if(a0&a2.DOCUMENT_POSITION_CONTAINED_BY){return 1}if(a0&a2.DOCUMENT_POSITION_CONTAINS){return -1}if(a0&a2.DOCUMENT_POSITION_FOLLOWING){return -1}if(a0&a2.DOCUMENT_POSITION_PRECEDING){return 1}return 0}try{aO=aS.concat(aJ).sort(aK)}catch(aW){aO=null}var aT=aJ,aU=aJ.parentNode;while(aT!=aU){for(;;){if(aT.firstChild==null||aT.jsworldOpaque==true){break}aT=aT.firstChild}while(aT!=aU){var aR=aT.nextSibling,aP=aT.parentNode;if(aT.jsworldOpaque==true){}else{var aQ=false;var p=undefined;if(aO!=null){while(aO.length>0&&aK(aT,aO[0])>=0){var aZ=aO.shift();if(aA(aZ,aT)){aQ=true;p=aZ;break}}}else{for(var aV=0;aV<aS.length;aV++){if(aA(aS[aV],aT)){aQ=true;p=aS[aV];break}}}if(!aQ){while(aT.firstChild!=null){au(aT.parentNode,aT.firstChild)}aR=aT.nextSibling;aT.parentNode.removeChild(aT)}else{ai(aT,p)}}if(aR==null){aT=aP}else{aT=aR;break}}}ab(aS)}function ai(aJ,p){}function ar(aJ,aK){for(var p=0;p<aK.length;p++){aJ.style[aK[p].attrib]=aK[p].values.join(" ")}}function j(aJ,p){if(p.id.match(/^\./)){return("class" in aJ&&ao(aJ["class"].split(/\s+/),p.id.substring(1)))}else{return("id" in aJ&&aJ.id==p.id)}}function aG(p,aL){for(var aK=0;aK<p.length;aK++){if("style" in p[aK]){p[aK].style.cssText=""}}for(var aK=0;aK<aL.length;aK++){if("id" in aL[aK]){for(var aJ=0;aJ<p.length;aJ++){if(j(p[aJ],aL[aK])){ar(p[aJ],aL[aK].attribs)}}}else{ar(aL[aK].node,aL[aK].attribs)}}}function ab(p){for(var aJ=0;aJ<p.length;aJ++){if(p[aJ].onWorldChange){p[aJ].onWorldChange(av)}}}function z(aM,p,aO,aL,aN){if(p instanceof J){var aJ=B(aL(aM));var aK=i(aJ);aG(aK,D(aN(aM)));ag(aO,aK,Y(aJ));return}else{aF(function(){var aU=aL(p);var aQ=aL(aM);var aP=aN(p);var aR=aN(aM);var aS=B(aQ);var aT=i(aS);if(aU!==aQ){aG(aT,D(aR));ag(aO,aT,Y(aS))}else{if(aP!==aR){aG(aT,D(aR))}}})}}function aF(aJ){var p;if(aD()){p=at();aJ();p.restore()}else{aJ()}}function A(){this.focused=e;this.selectionStart=e.selectionStart;this.selectionEnd=e.selectionEnd}A.prototype.restore=function(){if(this.focused.parentNode){this.focused.selectionStart=this.selectionStart;this.focused.selectionEnd=this.selectionEnd;this.focused.focus()}else{if(this.focused.id){var p=document.getElementById(this.focused.id);if(p){p.selectionStart=this.selectionStart;p.selectionEnd=this.selectionEnd;p.focus()}}}};function aD(){return e!=undefined}function at(){return new A()}function G(aL,aJ,aK,p,aM){this.top=aL;this.world=aJ;this.handlers=p;this.handlerCreators=aK;this.attribs=aM}G.prototype.restart=function(){N(this.top,this.world,this.handlerCreators,this.attribs)};G.prototype.pause=function(){for(var p=0;p<this.handlers.length;p++){if(this.handlers[p] instanceof T){}else{this.handlers[p].onUnregister(top)}}};function N(aQ,aN,aL,p){q();var aJ=I(aL,function(aS){return aS()});if(an.length>0){an[an.length-1].pause()}var aP=new G(aQ,aN,aL,aJ,p);an.push(aP);function aR(aS,aT){aP.world=aS}E(aR);var aM=new T(function(aS){return false},function(aS){});for(var aK=0;aK<aJ.length;aK++){if(aJ[aK] instanceof T){aM=aJ[aK]}else{aJ[aK].onRegister(aQ)}}function aO(aT,aV){if(aM.test(aT)){aM.receiver(av);var aS=an.pop();if(aS){aS.pause()}if(an.length>0){var aU=an.pop();aU.restart()}}}E(aO);aC(aQ,p);L(function(aS){return aN})}ac.big_bang=N;function ad(p,aJ){return function(){var aK={watchId:-1,onRegister:function(aL){aK.watchId=setInterval(function(){L(aJ)},p)},onUnregister:function(aL){clearInterval(aK.watchId)}};return aK}}ac.on_tick=ad;function r(aK,aJ){function p(aL){var aM=aK(aL);s(aM,aM);return aM}return function(){var aL={_top:null,_listener:function(aM,aN){z(aM,aN,aL._top,p,aJ)},onRegister:function(aM){aL._top=aM;E(aL._listener)},onUnregister:function(aM){aj(aL._listener)}};return aL}}ac.on_draw=r;function T(aJ,p){this.test=aJ;this.receiver=p}function al(aJ,p){return function(){if(p==undefined){p=function(aK){}}return new T(aJ,p)}}ac.stop_when=al;function w(aJ){var p=function(aL,aK){aJ(aL)};return function(){return{onRegister:function(aK){E(p)},onUnregister:function(aK){aj(p)}}}}ac.on_world_change=w;function R(aK,p,aJ){if(aK.addEventListener){aK.addEventListener(p,aJ,false)}else{aK.attachEvent("on"+p,aJ,false)}}function az(aJ,p,aK){R(aJ,p,function(aL){L(function(aM){return aK(aM,aL)})})}function am(aJ,p,aK){R(aJ,p,function(aL){setTimeout(function(){L(function(aM){return aK(aM,aL)})},0)})}function t(p){R(p,"focus",function(aJ){e=p});R(p,"blur",function(aJ){e=undefined});return p}function B(p){if(p.length==undefined){return{node:p,children:[]}}else{return{node:p[0],children:I(p.slice(1),B)}}}function ae(p){return{attrib:p[0],values:p.slice(1)}}function l(p){var aJ=I(p.slice(1),ae);if(typeof p[0]=="string"){return[{id:p[0],attribs:aJ}]}else{if("length" in p[0]){return I(p[0],function(aK){return{id:aK,attribs:aJ}})}else{return[{node:p[0],attribs:aJ}]}}}function D(p){return b(p,l)}function F(p){return(p.nodeType==Node.TEXT_NODE)}function af(p){return(p.nodeType==Node.ELEMENT_NODE)}var h=function(p,aJ){throw new aB(plt.Kernel.format("Expected a non-empty array, received ~s within ~s",[p,aJ]),p)};function s(p,aK){if(!p instanceof Array){h(p,aK)}if(p.length==0){h(p,aK)}if(F(p[0])){if(p.length>1){throw new aB(plt.Kernel.format("Text node ~s can not have children",[p]),p)}}else{if(af(p[0])){for(var aJ=1;aJ<p.length;aJ++){s(p[aJ],p)}}else{throw new aB(plt.Kernel.format("expected a Text or an Element, received ~s within ~s",[p,aK]),p[0])}}}function aB(aJ,p){this.msg=aJ;this.elt=p}aB.prototype.toString=function(){return"on-draw: "+this.msg};function aC(p,aJ){if(aJ){for(a in aJ){if(typeof aJ[a]=="function"){az(p,a,aJ[a])}else{p[a]=aJ[a]}}}return p}function X(p){return t(aC(document.createElement("p"),p))}ac.p=X;function C(p){return t(aC(document.createElement("div"),p))}ac.div=C;function g(p,aJ){var aK=document.createElement("button");az(aK,"click",p);return t(aC(aK,aJ))}ac.button=g;var M=function(p){if(p.preventDefault){p.preventDefault()}else{p.returnValue=false}};var ak=function(p){if(p.stopPropagation){p.stopPropagation()}else{p.cancelBubble=true}};var u=function(p){R(p,"click",function(aJ){ak(aJ)});return p};function aH(aJ,aO,aN){var aP=document.createElement("input");aP.type=aJ;function aM(aQ,aR){return aO(aQ,aP.value)}am(aP,"keypress",aM);var p=1000;var aL=aP.value;var aK=setInterval(function(){if(!aP.parentNode){clearInterval(aK);return}if(aL!=aP.value){aL=aP.value;L(function(aQ){return aO(aQ,aP.value)})}},p);return u(t(aC(aP,aN)))}ac.input=aH;function c(aK,aM,aL){var aN=document.createElement("input");aN.type="text";var aJ=undefined;function p(aO,aP){return aM(aO,aN.value)}az(aN,"keypress",p);return u(t(aC(aN,aL)))}function aq(p,aJ){return t(aC(document.createTextNode(p),aJ))}ac.text=aq;function ax(aL,aJ,aK){var aM=document.createElement("select");for(var p=0;p<aJ.length;p++){au(aM,S({value:aJ[p]}))}az(aM,"change",aK);return t(aC(aM,aL))}ac.select=ax;function S(p){return t(aC(document.createElement("option"),p))}ac.option=S;function f(p){return t(aC(document.createElement("textarea"),p))}ac.textarea=f;function aw(p){return t(aC(document.createElement("h1"),p))}ac.h1=aw;function aI(p){return t(aC(document.createElement("canvas"),p))}ac.canvas=aI;function aa(aJ,p){var aK=document.createElement("img");aK.src=aJ;return t(aC(aK,p))}ac.img=aa;function y(p,aJ){return t(aC(p,aJ))}ac.raw_node=y})();var plt=plt||{};plt.world=plt.world||{};plt.world.MobyJsworld={};(function(){var e=plt.world.MobyJsworld;var o=plt.Jsworld;var g=plt.Kernel.MobyTypeError;var j=function(q){return typeof(q)=="function"};var l=function(r){var s=r;if(plt.Kernel.empty_question_(s)){return[]}else{if(plt.Kernel.pair_question_(s)){var q=[];while(!s.isEmpty()){q.push(l(s.first()));s=s.rest()}return q}else{return r}}};var h=function(r){var q={};while(!r.isEmpty()){var s=r.first().first();var t=r.first().rest().first();q[s]=t;r=r.rest()}return q};var p=function(){if(window.document.getElementById("jsworld-div")!=undefined){return window}var q=window.open("big-bang.html","big-bang");if(q==null){throw new Error("Error: Not allowed to create a new window.")}return q};e.makeToplevelNode=function(){return p().document.getElementById("jsworld-div")};var f=function(q){return(q instanceof plt.types.Cons)||(q instanceof plt.types.Empty)};e.printWorldHook=function(s,r){var q;if(r.lastChild==null){q=plt.Kernel.toDomNode(s);r.appendChild(q)}else{q=plt.Kernel.toDomNode(s);r.replaceChild(q,r.lastChild)}};var i=function(r){var q;if(r.target){q=r.target}else{if(r.srcElement){q=r.srcElement}}if(q.nodeType==3){q=q.parentNode}return q};var d=function(q,v,s){if(plt.Kernel.pair_question_(q)){var r=plt.Kernel.first(q);var u=plt.Kernel.rest(q);if(r.nodeType==Node.TEXT_NODE&&!plt.Kernel.empty_question_(u)){throw new g(plt.Kernel.format("on-draw: the text node ~s must not have children. It has ~s",[r,u]))}var t=2;while(!plt.Kernel.empty_question_(u)){d(plt.Kernel.first(u),q,t);u=plt.Kernel.rest(u);t++}}else{throw new g(plt.Kernel.format("on-draw: expected a dom-s-expression, but received ~s instead.~a",[q,(s!=undefined?plt.Kernel.format("the ~a element within ~s",[s,v]):"")]))}};var k=function(s,q,r){plt.Kernel.attachEvent(s,q,r)};var m=function(q){if(q.preventDefault){q.preventDefault()}else{q.returnValue=false}};var n=function(q){if(q.stopPropagation){q.stopPropagation()}else{q.cancelBubble=true}};e.bigBang=function(z,u){var r=plt.types.Empty.EMPTY;plt.Kernel.arrayEach(u,function(D,E){plt.Kernel.check(D,function(F){return j(F)||f(F)},"js-big-bang","handler or attribute list",E+2)});var A=e.makeToplevelNode();A.tabIndex=0;k(A,"click",function(D){m(D);n(D);return false},false);var t=new plt.world.config.WorldConfig();for(var y=0;y<u.length;y++){if(f(u[y])){r=u[y]}else{if(j(u[y])){t=u[y](t)}}}t=t.updateAll({changeWorld:e.updateWorld,shutdownWorld:e.shutdownWorld});plt.world.config.CONFIG=t;var s=[];var B;if(t.lookup("onDraw")){wrappedRedraw=function(E){var F=t.lookup("onDraw")([E]);plt.Kernel.setLastLoc(undefined);d(F,F,undefined);var D=[A,l(F)];return D};B=function(E){var D=l(t.lookup("onDrawCss")([E]));plt.Kernel.setLastLoc(undefined);return D};s.push(o.on_draw(wrappedRedraw,B))}else{if(t.lookup("onRedraw")){var x=undefined;var q=undefined;wrappedRedraw=function(F){var H=t.lookup("onRedraw")([F]);if(H!=null&&H!=undefined&&H instanceof plt.world.Kernel.BaseImage){var G=plt.world.Kernel.imageWidth(H).toInteger();var D=plt.world.Kernel.imageHeight(H).toInteger();if(!x){x=plt.world.Kernel.makeCanvas(G,D);x.jsworldOpaque=true;q=o.node_to_tree(x)}x.width=G;x.height=D;var E=x.getContext("2d");H.render(E,0,0);return[A,q]}else{return[A,o.node_to_tree(plt.Kernel.toDomNode(H))]}};B=function(D){return[[x,["width",x.width+"px"],["height",x.height+"px"]]]};s.push(o.on_draw(wrappedRedraw,B))}else{s.push(o.on_world_change(function(D){e.printWorldHook(D,A)}))}}if(t.lookup("tickDelay")){var v=function(D){setTimeout(function(){plt.world.stimuli.onTick()},0);return D};var w=t.lookup("tickDelay");s.push(o.on_tick(w,v))}if(t.lookup("stopWhen")){s.push(o.stop_when(function(D){return t.lookup("stopWhen")([D])}))}if(t.lookup("onKey")){k(A,"keydown",function(D){plt.world.stimuli.onKey(D);m(D);n(D);return false});k(A,"keypress",function(D){m(D);n(D);return false});A.focus()}if(t.lookup("initialEffect")){var C=plt.world.Kernel.applyEffect(t.lookup("initialEffect"));for(var y=0;y<C.length;y++){if(t.lookup("stopWhen")&&t.lookup("stopWhen")([z])){break}else{z=C[y](z)}}}return o.big_bang(A,z,s,h(r))};var c=function(s){var q=plt.types.Empty.EMPTY;for(var r=0;r<s.length;r++){q=plt.types.Cons.makeInstance(s[length-r-1],q)}return q};e.updateWorld=function(r){var q=function(s){try{return r(s)}catch(t){plt.Kernel.reportError(t);plt.Kernel.reportError("Shutting down jsworld computations");plt.world.stimuli.onShutdown();return s}};o.change_world(q)};e.shutdownWorld=function(){o.shutdown()};var b=function(q){if(q.length==0){return[]}if(q.length==1){return h(q[0])}else{throw new Error()}};e.p=function(q){var s=b(q);var r=o.p(s);r.toWrittenString=function(){return plt.Kernel.format("(js-p)",[])};r.toDisplayedString=r.toWrittenString;r.toDomNode=function(){return r};return r};e.div=function(q){var s=b(q);var r=o.div(s);r.toWrittenString=function(){return plt.Kernel.format("(js-div)",[])};r.toDisplayedString=r.toWrittenString;r.toDomNode=function(){return r};return r};e.button=function(t,q){var s=function(u){return make_dash_effect_colon_none()};var r=e.buttonStar(t,s,q);r.toWrittenString=function(){return"(js-button ...)"};r.toDisplayedString=r.toWrittenString;r.toDomNode=function(){return r};return r};e.buttonStar=function(q,u,s){var v=b(s);var r=function(y,w){try{var x=u([y]);var A=q([y]);plt.world.Kernel.applyEffect(x);return A}catch(z){plt.Kernel.reportError(z);return y}};var t=o.button(r,v);t.toWrittenString=function(){return"(js-button ...)"};t.toDisplayedString=t.toWrittenString;t.toDomNode=function(){return t};return t};e.input=function(r,u,q){plt.Kernel.check(r,plt.Kernel.isString,"js-input","string",1);plt.Kernel.check(u,plt.Kernel.isFunction,"js-input","(world string -> world)",1);var t=b(q);var s=o.input(r,function(x,y){return u([x,y])},t);s.toWrittenString=function(){return"(js-input ...)"};s.toDisplayedString=s.toWrittenString;s.toDomNode=function(){return s};return s};e.get_dash_input_dash_value=function(q){plt.Kernel.check(q,function(r){return(plt.Kernel.isString(q)||q.nodeType==Node.ELEMENT_NODE)},"get-input-value","dom-node",1);if(plt.Kernel.isString(q)){return plt.types.String.makeInstance(document.getElementById(q).value||"")}else{return plt.types.String.makeInstance(q.value||"")}};e.img=function(t,q){var s=b(q);var r=o.img(t,s);r.toWrittenString=function(){return"(js-img ...)"};r.toDisplayedString=r.toWrittenString;r.toDomNode=function(){return r};return r};e.text=function(q){var r=o.text(q,[]);r.toWrittenString=function(){return"(js-img ...)"};r.toDisplayedString=r.toWrittenString;r.toDomNode=function(){return r};return r};e.rawNode=function(q,r){var t=b(r);var s=o.raw_node(plt.Kernel.toDomNode(q),t);s.toWrittenString=function(){return"(js-img ...)"};s.toDisplayedString=s.toWrittenString;s.toDomNode=function(){return s};return s}})();var plt=plt||{};plt.world=plt.world||{};(function(){var c={};plt.world.stimuli=c;var g=function(m,j,h){var l=[];e(function(i){var n=[i].concat(h);if(m){var o=m(n);l=b(o)}if(j){return j(n)}else{return i}});for(var k=0;k<l.length;k++){e(l[k])}};c.onTilt=function(k,l,j){var i=d("onTilt");var h=d("onTiltEffect");g(h,i,[f(k),f(l),f(j)])};c.onAcceleration=function(h,l,k){var i=d("onAcceleration");var j=d("onAccelerationEffect");g(j,i,[f(h),f(l),f(k)])};c.onShake=function(){var i=d("onShake");var h=d("onShakeEffect");g(h,i,[])};c.onLocation=function(k,h){var i=d("onLocationChange");var j=d("onLocationChangeEffect");g(j,i,[f(k),f(h)])};c.onKey=function(j){var k=function(o){var m=o.charCode||o.keyCode;var n;if(m==37){n="left"}else{if(m==38){n="up"}else{if(m==39){n="right"}else{if(m==40){n="down"}else{if(m==32){n="space"}else{if(m==13){n="enter"}else{n=String.fromCharCode(m)}}}}}}return n};var i=k(j);var h=d("onKey");var l=d("onKeyEffect");g(l,h,[i])};c.onTick=function(){var i=d("onTick");var h=d("onTickEffect");g(h,i,[])};c.onAnnounce=function(j,m){var l=plt.types.Empty.EMPTY;for(var k=0;k<m.length;k++){l=plt.types.Cons.makeInstance(m[m.length-k-1],l)}var n=d("onAnnounce");var h=d("onAnnounceEffect");g(n,h,[j,l])};c.onShutdown=function(){var h=d("shutdownWorld");if(h){h()}};var f=plt.types.FloatPoint.makeInstance;var d=function(h){return plt.world.config.CONFIG.lookup(h)};var e=function(h){d("changeWorld")(h)};var b=function(h){return plt.world.Kernel.applyEffect(h)}})();var permission_colon_location=function(){plt.Kernel.Struct.call(this,"make-permission:location",[])};permission_colon_location.prototype=new plt.Kernel.Struct();var make_dash_permission_colon_location=function(){return new permission_colon_location()};var permission_colon_location_question_=function(b){return b!=null&&b!=undefined&&b instanceof permission_colon_location};var permission_colon_send_dash_sms=function(){plt.Kernel.Struct.call(this,"make-permission:send-sms",[])};permission_colon_send_dash_sms.prototype=new plt.Kernel.Struct();var make_dash_permission_colon_send_dash_sms=function(){return new permission_colon_send_dash_sms()};var permission_colon_send_dash_sms_question_=function(b){return b!=null&&b!=undefined&&b instanceof permission_colon_send_dash_sms};var permission_colon_receive_dash_sms=function(){plt.Kernel.Struct.call(this,"make-permission:receive-sms",[])};permission_colon_receive_dash_sms.prototype=new plt.Kernel.Struct();var make_dash_permission_colon_receive_dash_sms=function(){return new permission_colon_receive_dash_sms()};var permission_colon_receive_dash_sms_question_=function(b){return b!=null&&b!=undefined&&b instanceof permission_colon_receive_dash_sms};var permission_colon_tilt=function(){plt.Kernel.Struct.call(this,"make-permission:tilt",[])};permission_colon_tilt.prototype=new plt.Kernel.Struct();var make_dash_permission_colon_tilt=function(){return new permission_colon_tilt()};var permission_colon_tilt_question_=function(b){return b!=null&&b!=undefined&&b instanceof permission_colon_tilt};var permission_colon_shake=function(){plt.Kernel.Struct.call(this,"make-permission:shake",[])};permission_colon_shake.prototype=new plt.Kernel.Struct();var make_dash_permission_colon_shake=function(){return new permission_colon_shake()};var permission_colon_shake_question_=function(b){return b!=null&&b!=undefined&&b instanceof permission_colon_shake};var permission_colon_internet=function(){plt.Kernel.Struct.call(this,"make-permission:internet",[])};permission_colon_internet.prototype=new plt.Kernel.Struct();var make_dash_permission_colon_internet=function(){return new permission_colon_internet()};var permission_colon_internet_question_=function(b){return b!=null&&b!=undefined&&b instanceof permission_colon_internet};var permission_colon_telephony=function(){plt.Kernel.Struct.call(this,"make-permission:telephony",[])};permission_colon_telephony.prototype=new plt.Kernel.Struct();var make_dash_permission_colon_telephony=function(){return new permission_colon_telephony()};var permission_colon_telephony_question_=function(b){return b!=null&&b!=undefined&&b instanceof permission_colon_telephony};var permission_colon_wake_dash_lock=function(){plt.Kernel.Struct.call(this,"make-permission:wake-lock",[])};permission_colon_wake_dash_lock.prototype=new plt.Kernel.Struct();var make_dash_permission_colon_wake_dash_lock=function(){return new permission_colon_wake_dash_lock()};var permission_colon_wake_dash_lock_question_=function(b){return b!=null&&b!=undefined&&b instanceof permission_colon_wake_dash_lock};var permission_colon_open_dash_image_dash_url=function(b){plt.Kernel.Struct.call(this,"make-permission:open-image-url",[b]);this.url=b};permission_colon_open_dash_image_dash_url.prototype=new plt.Kernel.Struct();var make_dash_permission_colon_open_dash_image_dash_url=function(b){return new permission_colon_open_dash_image_dash_url(b)};var permission_colon_open_dash_image_dash_url_dash_url=function(b){if(permission_colon_open_dash_image_dash_url_question_(b)){return b.url}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("permission:open-image-url-url: not a permission:open-image-url: ~s",[b]))}};var set_dash_permission_colon_open_dash_image_dash_url_dash_url_bang_=function(c,b){if(permission_colon_open_dash_image_dash_url_question_(c)){c.url=b}else{throw new plt.Kernel.MobyRuntimeError(plt.Kernel.format("set_dash_permission_colon_open_dash_image_dash_url_dash_url_bang_: not a permission:open-image-url: ~s",[c]))}};var permission_colon_open_dash_image_dash_url_question_=function(b){return b!=null&&b!=undefined&&b instanceof permission_colon_open_dash_image_dash_url};var permission_question_=function(b){return((plt.Kernel.setLastLoc('offset=512 line=17 span=28 id="permission.ss"')&&permission_colon_location_question_(b))||(plt.Kernel.setLastLoc('offset=547 line=18 span=28 id="permission.ss"')&&permission_colon_send_dash_sms_question_(b))||(plt.Kernel.setLastLoc('offset=582 line=19 span=31 id="permission.ss"')&&permission_colon_receive_dash_sms_question_(b))||(plt.Kernel.setLastLoc('offset=620 line=20 span=24 id="permission.ss"')&&permission_colon_tilt_question_(b))||(plt.Kernel.setLastLoc('offset=651 line=21 span=25 id="permission.ss"')&&permission_colon_shake_question_(b))||(plt.Kernel.setLastLoc('offset=683 line=22 span=28 id="permission.ss"')&&permission_colon_internet_question_(b))||(plt.Kernel.setLastLoc('offset=718 line=23 span=29 id="permission.ss"')&&permission_colon_telephony_question_(b))||(plt.Kernel.setLastLoc('offset=754 line=24 span=29 id="permission.ss"')&&permission_colon_wake_dash_lock_question_(b))||(plt.Kernel.setLastLoc('offset=790 line=25 span=34 id="permission.ss"')&&permission_colon_open_dash_image_dash_url_question_(b)))};var PERMISSION_colon_LOCATION;var PERMISSION_colon_SEND_dash_SMS;var PERMISSION_colon_RECEIVE_dash_SMS;var PERMISSION_colon_TILT;var PERMISSION_colon_SHAKE;var PERMISSION_colon_INTERNET;var PERMISSION_colon_TELEPHONY;var PERMISSION_colon_WAKE_dash_LOCK;var permission_dash__greaterthan_string=function(b){return((plt.Kernel.setLastLoc('offset=1465 line=42 span=35 id="permission.ss"')&&permission_colon_location_question_(b))?(plt.types.String.makeInstance("PERMISSION:LOCATION")):((plt.Kernel.setLastLoc('offset=1534 line=44 span=35 id="permission.ss"')&&permission_colon_send_dash_sms_question_(b))?(plt.types.String.makeInstance("PERMISSION:SEND-SMS")):((plt.Kernel.setLastLoc('offset=1603 line=46 span=38 id="permission.ss"')&&permission_colon_receive_dash_sms_question_(b))?(plt.types.String.makeInstance("PERMISSION:RECEIVE-SMS")):((plt.Kernel.setLastLoc('offset=1678 line=48 span=31 id="permission.ss"')&&permission_colon_tilt_question_(b))?(plt.types.String.makeInstance("PERMISSION:TILT")):((plt.Kernel.setLastLoc('offset=1739 line=50 span=32 id="permission.ss"')&&permission_colon_shake_question_(b))?(plt.types.String.makeInstance("PERMISSION:SHAKE")):((plt.Kernel.setLastLoc('offset=1802 line=52 span=35 id="permission.ss"')&&permission_colon_internet_question_(b))?(plt.types.String.makeInstance("PERMISSION:INTERNET")):((plt.Kernel.setLastLoc('offset=1871 line=54 span=36 id="permission.ss"')&&permission_colon_telephony_question_(b))?(plt.types.String.makeInstance("PERMISSION:TELEPHONY")):((plt.Kernel.setLastLoc('offset=1942 line=56 span=36 id="permission.ss"')&&permission_colon_wake_dash_lock_question_(b))?(plt.types.String.makeInstance("PERMISSION:WAKE-LOCK")):((plt.Kernel.setLastLoc('offset=2013 line=58 span=41 id="permission.ss"')&&permission_colon_open_dash_image_dash_url_question_(b))?(plt.Kernel.setLastLoc('offset=2060 line=59 span=84 id="permission.ss"')&&plt.Kernel.format((plt.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL ~a")),[(plt.Kernel.setLastLoc('offset=2099 line=59 span=44 id="permission.ss"')&&permission_colon_open_dash_image_dash_url_dash_url(b))])):(plt.Kernel.setLastLoc('offset=1454 line=41 span=692 id="permission.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=1454 line=41 span=692 id=\\"permission.ss\\""')))))))))))))};var string_dash__greaterthan_permission=function(b){return((plt.Kernel.setLastLoc('offset=2242 line=65 span=38 id="permission.ss"')&&plt.Kernel.string_equal__question_(b,(plt.types.String.makeInstance("PERMISSION:LOCATION")),[]))?PERMISSION_colon_LOCATION:((plt.Kernel.setLastLoc('offset=2312 line=67 span=38 id="permission.ss"')&&plt.Kernel.string_equal__question_(b,(plt.types.String.makeInstance("PERMISSION:SEND-SMS")),[]))?PERMISSION_colon_SEND_dash_SMS:((plt.Kernel.setLastLoc('offset=2387 line=69 span=41 id="permission.ss"')&&plt.Kernel.string_equal__question_(b,(plt.types.String.makeInstance("PERMISSION:RECEIVE-SMS")),[]))?PERMISSION_colon_RECEIVE_dash_SMS:((plt.Kernel.setLastLoc('offset=2463 line=71 span=34 id="permission.ss"')&&plt.Kernel.string_equal__question_(b,(plt.types.String.makeInstance("PERMISSION:TILT")),[]))?PERMISSION_colon_TILT:((plt.Kernel.setLastLoc('offset=2525 line=73 span=35 id="permission.ss"')&&plt.Kernel.string_equal__question_(b,(plt.types.String.makeInstance("PERMISSION:SHAKE")),[]))?PERMISSION_colon_SHAKE:((plt.Kernel.setLastLoc('offset=2589 line=75 span=38 id="permission.ss"')&&plt.Kernel.string_equal__question_(b,(plt.types.String.makeInstance("PERMISSION:INTERNET")),[]))?PERMISSION_colon_INTERNET:((plt.Kernel.setLastLoc('offset=2659 line=77 span=39 id="permission.ss"')&&plt.Kernel.string_equal__question_(b,(plt.types.String.makeInstance("PERMISSION:TELEPHONY")),[]))?PERMISSION_colon_TELEPHONY:((plt.Kernel.setLastLoc('offset=2731 line=79 span=39 id="permission.ss"')&&plt.Kernel.string_equal__question_(b,(plt.types.String.makeInstance("PERMISSION:WAKE-LOCK")),[]))?PERMISSION_colon_WAKE_dash_LOCK:(((plt.Kernel.setLastLoc('offset=2808 line=81 span=82 id="permission.ss"')&&plt.Kernel._greaterthan_((plt.Kernel.setLastLoc('offset=2811 line=81 span=21 id="permission.ss"')&&plt.Kernel.string_dash_length(b)),(plt.Kernel.setLastLoc('offset=2846 line=82 span=43 id="permission.ss"')&&plt.Kernel.string_dash_length((plt.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL")))),[]))&&(plt.Kernel.setLastLoc('offset=2901 line=83 span=122 id="permission.ss"')&&plt.Kernel.string_equal__question_((plt.Kernel.setLastLoc('offset=2911 line=83 span=63 id="permission.ss"')&&plt.Kernel.substring(b,(plt.types.Rational.makeInstance(0,1)),(plt.Kernel.setLastLoc('offset=2930 line=83 span=43 id="permission.ss"')&&plt.Kernel.string_dash_length((plt.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL")))))),(plt.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL")),[])))?(plt.Kernel.setLastLoc('offset=3030 line=85 span=220 id="permission.ss"')&&make_dash_permission_colon_open_dash_image_dash_url((plt.Kernel.setLastLoc('offset=3062 line=85 span=187 id="permission.ss"')&&plt.Kernel.substring(b,(plt.Kernel.setLastLoc('offset=3128 line=86 span=50 id="permission.ss"')&&plt.Kernel.add1((plt.Kernel.setLastLoc('offset=3134 line=86 span=43 id="permission.ss"')&&plt.Kernel.string_dash_length((plt.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL")))))),(plt.Kernel.setLastLoc('offset=3227 line=87 span=21 id="permission.ss"')&&plt.Kernel.string_dash_length(b)))))):(plt.Kernel.setLastLoc('offset=2231 line=64 span=1021 id="permission.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=2231 line=64 span=1021 id=\\"permission.ss\\""')))))))))))))};var permission_dash__greaterthan_android_dash_permissions=function(b){return((plt.Kernel.setLastLoc('offset=3392 line=95 span=35 id="permission.ss"')&&permission_colon_location_question_(b))?(plt.Kernel.setLastLoc('offset=3433 line=96 span=103 id="permission.ss"')&&plt.Kernel.list([(plt.types.String.makeInstance("android.permission.ACCESS_COARSE_LOCATION")),(plt.types.String.makeInstance("android.permission.ACCESS_FINE_LOCATION"))])):((plt.Kernel.setLastLoc('offset=3543 line=98 span=35 id="permission.ss"')&&permission_colon_send_dash_sms_question_(b))?(plt.Kernel.setLastLoc('offset=3584 line=99 span=36 id="permission.ss"')&&plt.Kernel.list([(plt.types.String.makeInstance("android.permission.SEND_SMS"))])):((plt.Kernel.setLastLoc('offset=3627 line=100 span=38 id="permission.ss"')&&permission_colon_receive_dash_sms_question_(b))?(plt.Kernel.setLastLoc('offset=3671 line=101 span=39 id="permission.ss"')&&plt.Kernel.list([(plt.types.String.makeInstance("android.permission.RECEIVE_SMS"))])):((plt.Kernel.setLastLoc('offset=3717 line=102 span=31 id="permission.ss"')&&permission_colon_tilt_question_(b))?(plt.Kernel.setLastLoc('offset=3754 line=103 span=6 id="permission.ss"')&&plt.Kernel.list([])):((plt.Kernel.setLastLoc('offset=3767 line=104 span=32 id="permission.ss"')&&permission_colon_shake_question_(b))?(plt.Kernel.setLastLoc('offset=3805 line=105 span=6 id="permission.ss"')&&plt.Kernel.list([])):((plt.Kernel.setLastLoc('offset=3818 line=106 span=35 id="permission.ss"')&&permission_colon_internet_question_(b))?(plt.Kernel.setLastLoc('offset=3859 line=107 span=36 id="permission.ss"')&&plt.Kernel.list([(plt.types.String.makeInstance("android.permission.INTERNET"))])):((plt.Kernel.setLastLoc('offset=3902 line=108 span=36 id="permission.ss"')&&permission_colon_telephony_question_(b))?(plt.Kernel.setLastLoc('offset=3944 line=109 span=49 id="permission.ss"')&&plt.Kernel.list([(plt.types.String.makeInstance("android.permission.ACCESS_COARSE_UPDATES"))])):((plt.Kernel.setLastLoc('offset=4000 line=110 span=36 id="permission.ss"')&&permission_colon_wake_dash_lock_question_(b))?(plt.Kernel.setLastLoc('offset=4042 line=111 span=37 id="permission.ss"')&&plt.Kernel.list([(plt.types.String.makeInstance("android.permission.WAKE_LOCK"))])):((plt.Kernel.setLastLoc('offset=4086 line=112 span=41 id="permission.ss"')&&permission_colon_open_dash_image_dash_url_question_(b))?(plt.Kernel.setLastLoc('offset=4133 line=113 span=6 id="permission.ss"')&&plt.Kernel.list([])):(plt.Kernel.setLastLoc('offset=3381 line=94 span=760 id="permission.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=3381 line=94 span=760 id=\\"permission.ss\\""')))))))))))))};var permission_dash__greaterthan_on_dash_start_dash_code=function(b){return((plt.Kernel.setLastLoc('offset=4258 line=119 span=35 id="permission.ss"')&&permission_colon_location_question_(b))?(plt.types.String.makeInstance("plt.platform.Platform.getInstance().getLocationService().startService();\n plt.platform.Platform.getInstance().getLocationService().addLocationChangeListener(listener);")):((plt.Kernel.setLastLoc('offset=4480 line=122 span=35 id="permission.ss"')&&permission_colon_send_dash_sms_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=4530 line=124 span=38 id="permission.ss"')&&permission_colon_receive_dash_sms_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=4583 line=126 span=31 id="permission.ss"')&&permission_colon_tilt_question_(b))?(plt.types.String.makeInstance("plt.platform.Platform.getInstance().getTiltService().startService();\n plt.platform.Platform.getInstance().getTiltService().addOrientationChangeListener(listener);\n plt.platform.Platform.getInstance().getTiltService().addAccelerationChangeListener(listener);\n plt.platform.Platform.getInstance().getTiltService().addShakeListener(listener);")):((plt.Kernel.setLastLoc('offset=4988 line=132 span=32 id="permission.ss"')&&permission_colon_shake_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5042 line=135 span=35 id="permission.ss"')&&permission_colon_internet_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5092 line=137 span=36 id="permission.ss"')&&permission_colon_telephony_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5143 line=139 span=36 id="permission.ss"')&&permission_colon_wake_dash_lock_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5194 line=141 span=41 id="permission.ss"')&&permission_colon_open_dash_image_dash_url_question_(b))?(plt.types.String.makeInstance("")):(plt.Kernel.setLastLoc('offset=4247 line=118 span=998 id="permission.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=4247 line=118 span=998 id=\\"permission.ss\\""')))))))))))))};var permission_dash__greaterthan_on_dash_pause_dash_code=function(b){return((plt.Kernel.setLastLoc('offset=5362 line=148 span=35 id="permission.ss"')&&permission_colon_location_question_(b))?(plt.types.String.makeInstance("plt.platform.Platform.getInstance().getLocationService().shutdownService();")):((plt.Kernel.setLastLoc('offset=5487 line=150 span=35 id="permission.ss"')&&permission_colon_send_dash_sms_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5537 line=152 span=38 id="permission.ss"')&&permission_colon_receive_dash_sms_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5590 line=154 span=31 id="permission.ss"')&&permission_colon_tilt_question_(b))?(plt.types.String.makeInstance("plt.platform.Platform.getInstance().getTiltService().shutdownService();")):((plt.Kernel.setLastLoc('offset=5707 line=156 span=32 id="permission.ss"')&&permission_colon_shake_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5754 line=158 span=35 id="permission.ss"')&&permission_colon_internet_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5804 line=160 span=36 id="permission.ss"')&&permission_colon_telephony_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5855 line=162 span=36 id="permission.ss"')&&permission_colon_wake_dash_lock_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=5906 line=164 span=41 id="permission.ss"')&&permission_colon_open_dash_image_dash_url_question_(b))?(plt.types.String.makeInstance("")):(plt.Kernel.setLastLoc('offset=5351 line=147 span=606 id="permission.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=5351 line=147 span=606 id=\\"permission.ss\\""')))))))))))))};var permission_dash__greaterthan_on_dash_destroy_dash_code=function(b){return((plt.Kernel.setLastLoc('offset=6078 line=171 span=35 id="permission.ss"')&&permission_colon_location_question_(b))?(plt.types.String.makeInstance("plt.platform.Platform.getInstance().getLocationService().shutdownService();")):((plt.Kernel.setLastLoc('offset=6203 line=173 span=35 id="permission.ss"')&&permission_colon_send_dash_sms_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=6253 line=175 span=38 id="permission.ss"')&&permission_colon_receive_dash_sms_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=6306 line=177 span=31 id="permission.ss"')&&permission_colon_tilt_question_(b))?(plt.types.String.makeInstance("plt.platform.Platform.getInstance().getTiltService().shutdownService();")):((plt.Kernel.setLastLoc('offset=6423 line=179 span=32 id="permission.ss"')&&permission_colon_shake_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=6470 line=181 span=35 id="permission.ss"')&&permission_colon_internet_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=6520 line=183 span=36 id="permission.ss"')&&permission_colon_telephony_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=6571 line=185 span=36 id="permission.ss"')&&permission_colon_wake_dash_lock_question_(b))?(plt.types.String.makeInstance("")):((plt.Kernel.setLastLoc('offset=6622 line=187 span=41 id="permission.ss"')&&permission_colon_open_dash_image_dash_url_question_(b))?(plt.types.String.makeInstance("")):(plt.Kernel.setLastLoc('offset=6067 line=170 span=606 id="permission.ss"')&&plt.Kernel.error((plt.types.Symbol.makeInstance("cond")),(plt.types.String.makeInstance('cond: fell out of cond around "offset=6067 line=170 span=606 id=\\"permission.ss\\""')))))))))))))};(function(){((function(b){PERMISSION_colon_LOCATION=(plt.Kernel.setLastLoc('offset=857 line=28 span=26 id="permission.ss"')&&make_dash_permission_colon_location());PERMISSION_colon_SEND_dash_SMS=(plt.Kernel.setLastLoc('offset=913 line=29 span=26 id="permission.ss"')&&make_dash_permission_colon_send_dash_sms());PERMISSION_colon_RECEIVE_dash_SMS=(plt.Kernel.setLastLoc('offset=972 line=30 span=26 id="permission.ss"')&&make_dash_permission_colon_send_dash_sms());PERMISSION_colon_TILT=(plt.Kernel.setLastLoc('offset=1024 line=31 span=22 id="permission.ss"')&&make_dash_permission_colon_tilt());PERMISSION_colon_SHAKE=(plt.Kernel.setLastLoc('offset=1073 line=32 span=23 id="permission.ss"')&&make_dash_permission_colon_shake());PERMISSION_colon_INTERNET=(plt.Kernel.setLastLoc('offset=1126 line=33 span=26 id="permission.ss"')&&make_dash_permission_colon_internet());PERMISSION_colon_TELEPHONY=(plt.Kernel.setLastLoc('offset=1183 line=34 span=27 id="permission.ss"')&&make_dash_permission_colon_telephony());PERMISSION_colon_WAKE_dash_LOCK=(plt.Kernel.setLastLoc('offset=1241 line=35 span=27 id="permission.ss"')&&make_dash_permission_colon_wake_dash_lock())}))(arguments[0]||plt.Kernel.identity)})();var plt=plt||{};(function(){plt.permission={};var i=function(k){return permission_colon_location_question_(k)};var g=function(k){return permission_colon_send_dash_sms_question_(k)};var j=function(k){return permission_colon_receive_dash_sms_question_(k)};var b=function(k){return permission_colon_tilt_question_(k)};var c=function(k){return permission_colon_shake_question_(k)};var h=function(k){return permission_colon_internet_question_(k)};var d=function(k){return permission_colon_telephony_question_(k)};var e=function(k){return permission_colon_wake_dash_lock_question_(k)};var f=function(k){return permission_colon_open_dash_image_dash_url_question_(k)};plt.permission.startupAllPermissions=function(k,l){if(k.length>0){var m=k.pop();plt.permission._runStartupCode(m,k,l)}else{l()}};plt.permission._runStartupCode=function(k,o,m){var l=plt.platform.Platform.getInstance();var r=plt.world.stimuli;var n=function(){setTimeout(function(){plt.permission.startupAllPermissions(o,m)},0)};if(i(k)){l.getLocationService().startService();l.getLocationService().addLocationChangeListener(function(u,p){r.onLocation(u,p)});n()}else{if(g(k)){n()}else{if(j(k)){n()}else{if(b(k)){l.getTiltService().startService();l.getTiltService().addOrientationChangeListener(function(u,v,p){r.onTilt(u,v,p)});l.getTiltService().addAccelerationChangeListener(function(p,v,u){r.onAcceleration(p,v,u)});n()}else{if(c(k)){l.getShakeService().startService();l.getShakeService().addListener(function(){r.onShake()});n()}else{if(h(k)){n()}else{if(d(k)){n()}else{if(e(k)){n()}else{if(f(k)){var t=permission_colon_open_dash_image_dash_url_dash_url(k);var q=new Image();var s=function(){plt.Kernel.detachEvent(q,"load",s);plt.world.Kernel.FileImage.installInstance(t,q);n()};plt.Kernel.attachEvent(q,"load",s);plt.Kernel.attachEvent(q,"error",function(){q.src="http://www.wescheme.org/images/broken.png";plt.Kernel.detachEvent(q,"load",s);n()});q.src=t}else{n()}}}}}}}}}};plt.permission.runShutdownCode=function(l){var k=plt.platform.Platform.getInstance();if(i(l)){k.getLocationService().shutdownService()}if(g(l)){}if(j(l)){}if(b(l)){k.getTiltService().shutdownService()}if(c(l)){}if(h(l)){}if(d(l)){}if(e(l)){}if(f(l)){}}})(); \ No newline at end of file support/js/runtime/compressed-runtime.js @@ -1 +1 @@ -var compile=(function(){var dl=dl||{};(function(){dl.types=dl.types||{};dl.types.Logic={TRUE:true,FALSE:false};Boolean.prototype.toWrittenString=function(){if(this.valueOf()){return"true"}return"false"};Boolean.prototype.toDisplayedString=Boolean.prototype.toWrittenString;Boolean.prototype.isEqual=function(dO){return this==dO};dl.types.Char=function(dO){this.val=dO};dl.types.Char.makeInstance=function(dO){return new dl.types.Char(dO)};dl.types.Char.prototype.toWrittenString=function(){return"#\\"+this.val};dl.types.Char.prototype.toDisplayedString=function(){return this.val};dl.types.Char.prototype.getValue=function(){return this.val};dl.types.Char.prototype.isEqual=function(dO){return dO instanceof dl.types.Char&&this.val==dO.val};dl.types.Symbol=function(dO){this.val=dO};var dH={};dl.types.Symbol.makeInstance=function(dO){if(!(dO in dH)){dH[dO]=new dl.types.Symbol(dO)}else{}return dH[dO]};dl.types.Symbol.prototype.isEqual=function(dO){return dO instanceof dl.types.Symbol&&this.val==dO.val};dl.types.Symbol.prototype.toString=function(){return this.val};dl.types.Symbol.prototype.toWrittenString=function(){return this.val};dl.types.Symbol.prototype.toDisplayedString=function(){return this.val};dl.types.Empty=function(){};dl.types.Empty.EMPTY=new dl.types.Empty();dl.types.Empty.prototype.isEqual=function(dO){return dO instanceof dl.types.Empty};dl.types.Empty.prototype.first=function(){throw new dl.Kernel.MobyRuntimeError("first can't be applied on empty.")};dl.types.Empty.prototype.rest=function(){throw new dl.Kernel.MobyRuntimeError("rest can't be applied on empty.")};dl.types.Empty.prototype.isEmpty=function(){return true};dl.types.Empty.prototype.toWrittenString=function(){return"empty"};dl.types.Empty.prototype.toDisplayedString=function(){return"empty"};dl.types.Empty.prototype.append=function(dO){return dO};dl.types.Cons=function(dP,dO){this.f=dP;this.r=dO};dl.types.Cons.makeInstance=function(dP,dO){return new dl.types.Cons(dP,dO)};dl.types.Cons.prototype.isEqual=function(dO){if(!(dO instanceof dl.types.Cons)){return dl.types.Logic.FALSE}return(dl.Kernel.equal_question_(this.first(),dO.first())&&dl.Kernel.equal_question_(this.rest(),dO.rest()))};dl.types.Cons.prototype.first=function(){return this.f};dl.types.Cons.prototype.rest=function(){return this.r};dl.types.Cons.prototype.isEmpty=function(){return false};dl.types.Cons.prototype.append=function(dP){if(dP.isEmpty()){return this}var dQ=dP;var dO=dl.Kernel.reverse(this);while(!dO.isEmpty()){dQ=dl.types.Cons.makeInstance(dO.first(),dQ);dO=dO.rest()}return dQ};dl.types.Cons.prototype.toWrittenString=function(){var dO=[];var dP=this;while(!dP.isEmpty()){dO.push(dl.Kernel.toWrittenString(dP.first()));dP=dP.rest()}return"("+dO.join(" ")+")"};dl.types.Cons.prototype.toDisplayedString=function(){var dO=[];var dP=this;while(!dP.isEmpty()){dO.push(dP.first().toDisplayedString());dP=dP.rest()}return"("+dO.join(" ")+")"};var dJ=function(dO,dP){dO.appendChild(dP)};dl.types.Cons.prototype.toDomNode=function(){var dO=document.createElement("div");dO.appendChild(document.createTextNode("("));var dP=this;while(!dP.isEmpty()){dJ(dO,dl.Kernel.toDomNode(dP.first()));dP=dP.rest();if(!dP.isEmpty()){dJ(dO,document.createTextNode(" "))}}dO.appendChild(document.createTextNode(")"));return dO};dl.types.Vector=function(dQ,dP){this.elts=new Array(dQ);if(dP){for(var dO=0;dO<dQ;dO++){this.elts[dO]=dP[dO]}}else{for(var dO=0;dO<dQ;dO++){this.elts[dO]=undefined}}};dl.types.Vector.makeInstance=function(dP,dO){return new dl.types.Vector(dP,dO)};dl.types.Vector.prototype.length=function(){return this.elts.length};dl.types.Vector.prototype.ref=function(dO){return this.elts[dO]};dl.types.Vector.prototype.set=function(dP,dO){this.elts[dP]=dO};dl.types.Vector.prototype.toWrittenString=function(){var dP=[];for(var dO=0;dO<this.length();dO++){dP.push(dl.Kernel.toWrittenString(this.ref(dO)))}return"#("+dP.join(" ")+")"};dl.types.Vector.prototype.toDisplayedString=function(){var dP=[];for(var dO=0;dO<this.length();dO++){dP.push(dl.Kernel.toDisplayedStringString(this.ref(dO)))}return"#("+dP.join(" ")+")"};dl.types.Vector.prototype.toDomNode=function(){var dP=document.createElement("div");dP.appendChild(document.createTextNode("#("));for(var dO=0;dO<this.length();dO++){dJ(dP,dl.Kernel.toDomNode(this.ref(dO)))}dP.appendChild(document.createTextNode(")"));return dP};var dL=function(dP,dO){var dQ;if(isNaN(dP)||!isFinite(dP)){throw new dl.Kernel.MobyRuntimeError("not a number: "+dP)}if(isNaN(dO)||!isFinite(dO)){throw new dl.Kernel.MobyRuntimeError("not a number: "+dO)}while(dO!=0){dQ=dP;dP=dO;dO=dQ%dO}return dP};dl.types.Rational=function(dQ,dO){if(dO==undefined){dO=1}if(dO==0){throw new dl.Kernel.MobyRuntimeError("cannot have zero denominator.")}var dP=dL(Math.abs(dQ),Math.abs(dO));this.n=dQ/dP;this.d=dO/dP};dl.types.Rational.prototype.toWrittenString=function(){if(this.d==1){return this.n+""}else{return this.n+"/"+this.d}};dl.types.Rational.prototype.toDisplayedString=dl.types.Rational.prototype.toWrittenString;dl.types.Rational.prototype.level=function(){return 0};dl.types.Rational.prototype.lift=function(dO){if(dO.level()==1){return dl.types.FloatPoint.makeInstance(this.n/this.d)}if(dO.level()==2){return dl.types.Complex.makeInstance(this,dl.types.Rational.ZERO)}throw new dl.Kernel.MobyRuntimeError("invalid level of Number")};dl.types.Rational.prototype.isFinite=function(){return true};dl.types.Rational.prototype.isEqual=function(dO){return dO instanceof dl.types.Rational&&this.n==dO.n&&this.d==dO.d};dl.types.Rational.prototype.isInteger=function(){return this.d==1};dl.types.Rational.prototype.isRational=function(){return true};dl.types.Rational.prototype.isReal=function(){return true};dl.types.Rational.prototype.add=function(dO){return dl.types.Rational.makeInstance(this.n*dO.d+this.d*dO.n,this.d*dO.d)};dl.types.Rational.prototype.subtract=function(dO){return dl.types.Rational.makeInstance((this.n*dO.d)-(this.d*dO.n),(this.d*dO.d))};dl.types.Rational.prototype.multiply=function(dO){return dl.types.Rational.makeInstance(this.n*dO.n,this.d*dO.d)};dl.types.Rational.prototype.divide=function(dO){if(this.d*dO.n==0){throw new dl.Kernel.MobyRuntimeError("division by zero")}return dl.types.Rational.makeInstance(this.n*dO.d,this.d*dO.n)};dl.types.Rational.prototype.toExact=function(){return this};dl.types.Rational.prototype.isExact=function(){return true};dl.types.Rational.prototype.toInteger=function(){return Math.floor(this.n/this.d)};dl.types.Rational.prototype.numerator=function(){return dl.types.Rational.makeInstance(this.n)};dl.types.Rational.prototype.denominator=function(){return dl.types.Rational.makeInstance(this.d)};dl.types.Rational.prototype.toFloat=function(){return this.n/this.d};dl.types.Rational.prototype.toComplex=function(){return dl.types.Complex.makeInstance(this,dl.types.Rational.ZERO)};dl.types.Rational.prototype.greaterThan=function(dO){return this.n*dO.d>this.d*dO.n};dl.types.Rational.prototype.greaterThanOrEqual=function(dO){return this.n*dO.d>=this.d*dO.n};dl.types.Rational.prototype.lessThan=function(dO){return this.n*dO.d<this.d*dO.n};dl.types.Rational.prototype.lessThanOrEqual=function(dO){return this.n*dO.d<=this.d*dO.n};dl.types.Rational.prototype.sqrt=function(){if(this.n>=0){var dP=Math.sqrt(this.n);var dO=Math.sqrt(this.d);if(Math.floor(dP)==dP&&Math.floor(dO)==dO){return dl.types.Rational.makeInstance(dP,dO)}else{return dl.types.FloatPoint.makeInstance(dP/dO)}}else{var dP=Math.sqrt(-this.n);var dO=Math.sqrt(this.d);if(Math.floor(dP)==dP&&Math.floor(dO)==dO){return dl.types.Complex.makeInstance(dl.types.Rational.ZERO,dl.types.Rational.makeInstance(dP,dO))}else{return dl.types.Complex.makeInstance(dl.types.Rational.ZERO,dl.types.FloatPoint.makeInstance(dP/dO))}}};dl.types.Rational.prototype.abs=function(){return dl.types.Rational.makeInstance(Math.abs(this.n),this.d)};dl.types.Rational.prototype.floor=function(){return dl.types.Rational.makeInstance(Math.floor(this.n/this.d),1)};dl.types.Rational.prototype.ceiling=function(){return dl.types.Rational.makeInstance(Math.ceil(this.n/this.d),1)};dl.types.Rational.prototype.conjugate=dl.types.Rational.prototype.abs;dl.types.Rational.prototype.magnitude=dl.types.Rational.prototype.abs;dl.types.Rational.prototype.log=function(){return dl.types.FloatPoint.makeInstance(Math.log(this.n/this.d))};dl.types.Rational.prototype.angle=function(){if(0==this.n){return dl.types.Rational.ZERO}if(this.n>0){return dl.types.Rational.ZERO}else{return dl.Kernel.pi}};dl.types.Rational.prototype.atan=function(){return dl.types.FloatPoint.makeInstance(Math.atan(this.n/this.d))};dl.types.Rational.prototype.cos=function(){return dl.types.FloatPoint.makeInstance(Math.cos(this.n/this.d))};dl.types.Rational.prototype.sin=function(){return dl.types.FloatPoint.makeInstance(Math.sin(this.n/this.d))};dl.types.Rational.prototype.expt=function(dO){return dl.types.FloatPoint.makeInstance(Math.pow(this.n/this.d,dO.n/dO.d))};dl.types.Rational.prototype.exp=function(){return dl.types.FloatPoint.makeInstance(Math.exp(this.n/this.d))};dl.types.Rational.prototype.acos=function(){return dl.types.FloatPoint.makeInstance(Math.acos(this.n/this.d))};dl.types.Rational.prototype.asin=function(){return dl.types.FloatPoint.makeInstance(Math.asin(this.n/this.d))};dl.types.Rational.prototype.imag_dash_part=function(){return dl.types.Rational.ZERO};dl.types.Rational.prototype.real_dash_part=function(){return this};dl.types.Rational.prototype.timesI=function(){return dl.types.Complex.makeInstance(dl.types.Rational.ZERO,this)};dl.types.Rational.prototype.round=function(){if(this.d==2){var dO=this.n/this.d;var dP=Math.floor(dO);var dQ=Math.ceil(dO);if(dP%2==0){return dl.types.Rational.makeInstance(dP)}else{return dl.types.Rational.makeInstance(dQ)}}else{return dl.types.Rational.makeInstance(Math.round(this.n/this.d))}};dl.types.Rational.prototype.half=function(){return dl.types.Rational.makeInstance(this.n,this.d*2)};dl.types.Rational.prototype.minus=function(){return dl.types.Rational.makeInstance(0-this.n,this.d)};var dK={};dl.types.Rational.makeInstance=function(dP,dO){if(dP==undefined){throw new dl.Kernel.MobyRuntimeError("n undefined")}if(dO==undefined){dO=1}if(dO<0){dP=-dP;dO=-dO}if(dO==1&&dP in dK){return dK[dP]}else{return new dl.types.Rational(dP,dO)}};dK={};(function(){var dO;for(dO=-500;dO<500;dO++){dK[dO]=new dl.types.Rational(dO,1)}})();dl.types.Rational.NEGATIVE_ONE=dK[-1];dl.types.Rational.ZERO=dK[0];dl.types.Rational.ONE=dK[1];dl.types.Rational.TWO=dK[2];dl.types.FloatPoint=function(dO){this.n=dO};dl.types.FloatPoint.makeInstance=function(dO){return new dl.types.FloatPoint(dO)};var dM=dl.types.FloatPoint.makeInstance(Number.NaN);var bf=dl.types.FloatPoint.makeInstance(Number.POSITIVE_INFINITY);var dF=dl.types.FloatPoint.makeInstance(Number.NEGATIVE_INFINITY);dl.types.FloatPoint.prototype.isFinite=function(){return isFinite(this.n)};dl.types.FloatPoint.prototype.toExact=function(){return dl.types.Rational.makeInstance(Math.floor(this.n),1)};dl.types.FloatPoint.prototype.isExact=function(){return false};dl.types.FloatPoint.prototype.level=function(){return 1};dl.types.FloatPoint.prototype.lift=function(dO){return dl.types.Complex.makeInstance(this,dl.types.Rational.ZERO)};dl.types.FloatPoint.prototype.toWrittenString=function(){if(this.n==Number.POSITIVE_INFINITY){return"+inf.0"}else{if(this.n==Number.NEGATIVE_INFINITY){return"-inf.0"}else{if(this.n==Number.NaN){return"+nan.0"}else{return this.n.toString()}}}};dl.types.FloatPoint.prototype.toDisplayedString=dl.types.FloatPoint.prototype.toWrittenString;dl.types.FloatPoint.prototype.isEqual=function(dO){return((dO instanceof dl.types.FloatPoint)&&((this.n==dO.n)||(isNaN(this.n)&&isNaN(dO.n))))};dl.types.FloatPoint.prototype.isRational=function(){return this.isFinite()&&this.n==Math.floor(this.n)};dl.types.FloatPoint.prototype.isInteger=function(){return this.isFinite()&&this.n==Math.floor(this.n)};dl.types.FloatPoint.prototype.isReal=function(){return true};var dG=function(dO){if(dl.types.NumberTower.lessThan(dO,dl.types.Rational.ZERO)){return -1}else{if(dl.types.NumberTower.greaterThan(dO,dl.types.Rational.ZERO)){return 1}else{return 0}}};dl.types.FloatPoint.prototype.add=function(dO){if(this.isFinite()&&dO.isFinite()){return dl.types.FloatPoint.makeInstance(this.n+dO.n)}else{if(isNaN(this.n)||isNaN(dO.n)){return dM}else{if(this.isFinite()&&!dO.isFinite()){return dO}else{if(!this.isFinite()&&dO.isFinite()){return this}else{return((dG(this)*dG(dO)==1)?this:dM)}}}}};dl.types.FloatPoint.prototype.subtract=function(dO){if(this.isFinite()&&dO.isFinite()){return dl.types.FloatPoint.makeInstance(this.n-dO.n)}else{if(isNaN(this.n)||isNaN(dO.n)){return dM}else{if(!this.isFinite()&&!dO.isFinite()){if(dG(this)==dG(dO)){return dM}else{return this}}else{if(this.isFinite()){return dl.types.NumberTower.multiply(dO,dl.types.Rational.NEGATIVE_ONE)}else{return this}}}}};dl.types.FloatPoint.prototype.multiply=function(dO){if(this.n==0||dO.n==0){return dl.types.Rational.ZERO}if(this.isFinite()&&dO.isFinite()){return dl.types.FloatPoint.makeInstance(this.n*dO.n)}else{if(isNaN(this.n)||isNaN(dO.n)){return dM}else{return((dG(this)*dG(dO)==1)?bf:dF)}}};dl.types.FloatPoint.prototype.divide=function(dO){if(this.isFinite()&&dO.isFinite()){if(dO.n==0){throw new dl.Kernel.MobyRuntimeError("division by zero")}return dl.types.FloatPoint.makeInstance(this.n/dO.n)}else{if(isNaN(this.n)||isNaN(dO.n)){return dM}else{if(!this.isFinite()&&!dO.isFinite()){return dM}else{if(this.isFinite()&&!dO.isFinite()){return dl.types.FloatPoint.makeInstance(0)}else{if(!this.isFinite()&&dO.isFinite()){return((dG(this)*dG(dO)==1)?bf:dF)}}}}}};dl.types.FloatPoint.prototype.toInteger=function(){return Math.floor(this.n)};dl.types.FloatPoint.prototype.numerator=function(){var dP=this.n.toString();var dO=dP.match(/^(.*)\.(.*)$/);if(dO){return dl.types.FloatPoint.makeInstance(parseFloat(dO[1]+dO[2]))}else{return this}};dl.types.FloatPoint.prototype.denominator=function(){var dP=this.n.toString();var dO=dP.match(/^(.*)\.(.*)$/);if(dO){return dl.types.FloatPoint.makeInstance(Math.pow(10,dO[2].length))}else{return dl.types.FloatPoint.makeInstance(1)}};dl.types.FloatPoint.prototype.toFloat=function(){return this.n};dl.types.FloatPoint.prototype.toComplex=function(){return dl.types.Complex.makeInstance(this,dl.types.Rational.ZERO)};dl.types.FloatPoint.prototype.floor=function(){if(!isFinite(this.n)){return this}return dl.types.Rational.makeInstance(Math.floor(this.n),1)};dl.types.FloatPoint.prototype.ceiling=function(){if(!isFinite(this.n)){return this}return dl.types.Rational.makeInstance(Math.ceil(this.n),1)};dl.types.FloatPoint.prototype.greaterThan=function(dO){return this.n>dO.n};dl.types.FloatPoint.prototype.greaterThanOrEqual=function(dO){return this.n>=dO.n};dl.types.FloatPoint.prototype.lessThan=function(dO){return this.n<dO.n};dl.types.FloatPoint.prototype.lessThanOrEqual=function(dO){return this.n<=dO.n};dl.types.FloatPoint.prototype.sqrt=function(){if(this.n<0){var dO=dl.types.Complex.makeInstance(dl.types.Rational.ZERO,dl.types.FloatPoint.makeInstance(Math.sqrt(-this.n)));return dO}else{return dl.types.FloatPoint.makeInstance(Math.sqrt(this.n))}};dl.types.FloatPoint.prototype.abs=function(){return dl.types.FloatPoint.makeInstance(Math.abs(this.n))};dl.types.FloatPoint.prototype.log=function(){if(this.n<0){return this.toComplex().log()}else{return dl.types.FloatPoint.makeInstance(Math.log(this.n))}};dl.types.FloatPoint.prototype.angle=function(){if(0==this.n){return dl.types.Rational.ZERO}if(this.n>0){return dl.types.Rational.ZERO}else{return dl.Kernel.pi}};dl.types.FloatPoint.prototype.atan=function(){return dl.types.FloatPoint.makeInstance(Math.atan(this.n))};dl.types.FloatPoint.prototype.cos=function(){return dl.types.FloatPoint.makeInstance(Math.cos(this.n))};dl.types.FloatPoint.prototype.sin=function(){return dl.types.FloatPoint.makeInstance(Math.sin(this.n))};dl.types.FloatPoint.prototype.expt=function(dO){if(this.n==1){if(dO.isFinite()){return this}else{if(isNaN(dO.n)){return this}else{return this}}}else{return dl.types.FloatPoint.makeInstance(Math.pow(this.n,dO.n))}};dl.types.FloatPoint.prototype.exp=function(){return dl.types.FloatPoint.makeInstance(Math.exp(this.n))};dl.types.FloatPoint.prototype.acos=function(){return dl.types.FloatPoint.makeInstance(Math.acos(this.n))};dl.types.FloatPoint.prototype.asin=function(){return dl.types.FloatPoint.makeInstance(Math.asin(this.n))};dl.types.FloatPoint.prototype.imag_dash_part=function(){return dl.types.Rational.ZERO};dl.types.FloatPoint.prototype.real_dash_part=function(){return this};dl.types.FloatPoint.prototype.round=function(){if(isFinite(this.n)){if(Math.abs(Math.floor(this.n)-this.n)==0.5){if(Math.floor(this.n)%2==0){return dl.types.Rational.makeInstance(Math.floor(this.n))}return dl.types.Rational.makeInstance(Math.ceil(this.n))}else{return dl.types.Rational.makeInstance(Math.round(this.n))}}else{return this}};dl.types.FloatPoint.prototype.conjugate=dl.types.FloatPoint.prototype.abs;dl.types.FloatPoint.prototype.magnitude=dl.types.FloatPoint.prototype.abs;dl.types.FloatPoint.prototype.minus=function(){return dl.types.FloatPoint.makeInstance(0-this.n)};dl.types.FloatPoint.prototype.half=function(){return dl.types.FloatPoint.makeInstance(this.n/2)};dl.types.FloatPoint.prototype.timesI=function(){return dl.types.Complex.makeInstance(dl.types.Rational.ZERO,this)};dl.types.Complex=function(dP,dO){this.r=dP;this.i=dO};dl.types.Complex.makeInstance=function(dQ,dP){if(typeof(dQ)=="number"){dQ=(dQ==Math.floor(dQ)?dl.types.Rational.makeInstance(dQ):dl.types.FloatPoint.makeInstance(dQ))}if(typeof(dP)=="number"){dP=(dP==Math.floor(dP)?dl.types.Rational.makeInstance(dP):dl.types.FloatPoint.makeInstance(dP))}var dO=new dl.types.Complex(dQ,dP);return dO};dl.types.Complex.prototype.toWrittenString=function(){if(dl.types.NumberTower.greaterThanOrEqual(this.i,dl.types.Rational.ZERO)){return dl.Kernel.toWrittenString(this.r)+"+"+dl.Kernel.toWrittenString(this.i)+"i"}else{return dl.Kernel.toWrittenString(this.r)+dl.Kernel.toWrittenString(this.i)+"i"}};dl.types.Complex.prototype.toDisplayedString=dl.types.Complex.prototype.toWrittenString;dl.types.Complex.prototype.isFinite=function(){return this.r.isFinite()&&this.i.isFinite()};dl.types.Complex.prototype.isRational=function(){return this.r.isRational()&&dl.types.NumberTower.equal(this.i,dl.types.Rational.ZERO)};dl.types.Complex.prototype.isInteger=function(){return this.r.isInteger()&&dl.types.NumberTower.equal(this.i,dl.types.Rational.ZERO)};dl.types.Complex.prototype.toExact=function(){if(!this.isReal()){throw new dl.Kernel.MobyRuntimeError("inexact->exact: expects argument of type real number")}return this.r.toExact()};dl.types.Complex.prototype.isExact=function(){return this.r.isExact()&&this.i.isExact()};dl.types.Complex.prototype.level=function(){return 2};dl.types.Complex.prototype.lift=function(dO){throw new dl.Kernel.MobyRuntimeError("Don't know how to lift Complex number")};dl.types.Complex.prototype.isEqual=function(dP){var dO=((dP instanceof dl.types.Complex)&&(dl.types.NumberTower.equal(this.r,dP.r))&&(dl.types.NumberTower.equal(this.i,dP.i)));return dO};dl.types.Complex.prototype.greaterThan=function(dO){if(!this.isReal()||!dO.isReal()){throw new dl.Kernel.MobyRuntimeError(">: expects argument of type real number")}return dl.types.NumberTower.greaterThan(this.r,dO.r)};dl.types.Complex.prototype.greaterThanOrEqual=function(dO){if(!this.isReal()||!dO.isReal()){throw new dl.Kernel.MobyRuntimeError(">: expects argument of type real number")}return dl.types.NumberTower.greaterThanOrEqual(this.r,dO.r)};dl.types.Complex.prototype.lessThan=function(dO){if(!this.isReal()||!dO.isReal()){throw new dl.Kernel.MobyRuntimeError(">: expects argument of type real number")}return dl.types.NumberTower.lessThan(this.r,dO.r)};dl.types.Complex.prototype.lessThanOrEqual=function(dO){if(!this.isReal()||!dO.isReal()){throw new dl.Kernel.MobyRuntimeError(">: expects argument of type real number")}return dl.types.NumberTower.lessThanOrEqual(this.r,dO.r)};dl.types.Complex.prototype.abs=function(){if(!dl.types.NumberTower.equal(this.i,dl.types.Rational.ZERO).valueOf()){throw new dl.Kernel.MobyRuntimeError("abs: expects argument of type real number")}return this.r.abs()};dl.types.Complex.prototype.toInteger=function(){if(!dl.types.NumberTower.equal(this.i,dl.types.Rational.ZERO).valueOf()){throw new dl.Kernel.MobyRuntimeError("toInteger: expects argument of type real number")}return this.r.toInteger()};dl.types.Complex.prototype.numerator=function(){if(!this.isReal()){throw new dl.Kernel.MobyRuntimeError("numerator: can only be applied to real number")}return this.n.numerator()};dl.types.Complex.prototype.denominator=function(){if(!this.isReal()){throw new dl.Kernel.MobyRuntimeError("floor: can only be applied to real number")}return this.n.denominator()};dl.types.Complex.prototype.toFloat=function(){if(!dl.types.NumberTower.equal(this.i,dl.types.Rational.ZERO).valueOf()){throw new dl.Kernel.MobyRuntimeError("toFloat: expects argument of type real number")}return this.r.toFloat()};dl.types.Complex.prototype.toComplex=function(){return this};dl.types.Complex.prototype.add=function(dO){return dl.types.Complex.makeInstance(dl.types.NumberTower.add(this.r,dO.r),dl.types.NumberTower.add(this.i,dO.i))};dl.types.Complex.prototype.subtract=function(dO){return dl.types.Complex.makeInstance(dl.types.NumberTower.subtract(this.r,dO.r),dl.types.NumberTower.subtract(this.i,dO.i))};dl.types.Complex.prototype.multiply=function(dO){if(dO.isReal()){return dl.types.Complex.makeInstance(dl.types.NumberTower.multiply(this.r,dO.r),dl.types.NumberTower.multiply(this.i,dO.r))}var dQ=dl.types.NumberTower.subtract(dl.types.NumberTower.multiply(this.r,dO.r),dl.types.NumberTower.multiply(this.i,dO.i));var dP=dl.types.NumberTower.add(dl.types.NumberTower.multiply(this.r,dO.i),dl.types.NumberTower.multiply(this.i,dO.r));if(dl.types.NumberTower.equal(dP,dl.types.Rational.ZERO)){return dQ}return dl.types.Complex.makeInstance(dQ,dP)};dl.types.Complex.prototype.divide=function(dQ){if(dQ.isReal()){return dl.types.Complex.makeInstance(dl.types.NumberTower.divide(this.r,dQ.r),dl.types.NumberTower.divide(this.i,dQ.r))}var dR=dQ.conjugate();var dP=dl.types.NumberTower.multiply(this,dR).toComplex();var dS=dl.types.NumberTower.multiply(dQ,dR);var dO=dl.types.Complex.makeInstance(dl.types.NumberTower.divide(dP.r,dS),dl.types.NumberTower.divide(dP.i,dS));return dO};dl.types.Complex.prototype.conjugate=function(){var dO=dl.types.Complex.makeInstance(this.r,dl.types.NumberTower.subtract(dl.types.Rational.ZERO,this.i));return dO};dl.types.Complex.prototype.magnitude=function(){var dO=dl.types.NumberTower.add(dl.types.NumberTower.multiply(this.r,this.r),dl.types.NumberTower.multiply(this.i,this.i));return dO.sqrt()};dl.types.Complex.prototype.isReal=function(){return dl.types.NumberTower.equal(this.i,dl.types.Rational.ZERO)};dl.types.Complex.prototype.sqrt=function(){if(this.isReal()){return this.r.sqrt()}var dO=dl.types.NumberTower.add(this.magnitude(),this.r);var dQ=dO.half().sqrt();var dP=dl.types.NumberTower.divide(this.i,dl.types.NumberTower.multiply(dO,dl.types.FloatPoint.makeInstance(2)).sqrt());return dl.types.Complex.makeInstance(dQ,dP)};dl.types.Complex.prototype.log=function(){var dP=this.magnitude();var dQ=this.angle();var dO=dl.types.NumberTower.add(dP.log(),dQ.timesI());return dO};dl.types.Complex.prototype.angle=function(){if(this.isReal()){return this.r.angle()}if(dl.types.NumberTower.equal(dl.types.Rational.ZERO,this.r)){var dO=dl.Kernel.pi.half();return dl.types.NumberTower.greaterThan(this.i,dl.types.Rational.ZERO)?dO:dO.minus()}else{var dO=dl.types.NumberTower.divide(this.i.abs(),this.r.abs()).atan();if(dl.types.NumberTower.greaterThan(this.r,dl.types.Rational.ZERO)){return dl.types.NumberTower.greaterThan(this.i,dl.types.Rational.ZERO)?dO:dO.minus()}else{return dl.types.NumberTower.greaterThan(this.i,dl.types.Rational.ZERO)?dl.Kernel.pi.subtract(dO):dO.subtract(dl.Kernel.pi)}}};var dI=dl.types.Complex.makeInstance(dl.types.Rational.ZERO,dl.types.Rational.ONE);var dN=dl.types.Complex.makeInstance(dl.types.Rational.ZERO,dl.types.Rational.NEGATIVE_ONE);dl.types.Complex.prototype.atan=function(){if(dl.types.NumberTower.equal(this,dI)||dl.types.NumberTower.equal(this,dN)){return dl.types.FloatPoint.makeInstance(Number.NEGATIVE_INFINITY)}return dl.types.NumberTower.multiply(dI,dl.types.NumberTower.multiply(dl.types.FloatPoint.makeInstance(0.5),(dl.types.NumberTower.divide(dl.types.NumberTower.add(dI,this),dl.types.NumberTower.add(dI,dl.types.NumberTower.subtract(dl.types.Rational.ZERO,this)))).log()))};dl.types.Complex.prototype.cos=function(){if(this.isReal()){return this.r.cos()}var dP=this.timesI();var dO=dP.minus();return dl.types.NumberTower.add(dP.exp(),dO.exp()).half()};dl.types.Complex.prototype.sin=function(){if(this.isReal()){return this.r.sin()}var dS=this.timesI();var dR=dS.minus();var dQ=dl.types.Complex.makeInstance(dl.types.Rational.ZERO,dl.types.Rational.TWO);var dP=dl.types.NumberTower.subtract(dS.exp(),dR.exp());var dO=dl.types.NumberTower.divide(dP,dQ);return dO};dl.types.Complex.prototype.expt=function(dP){var dO=dl.types.NumberTower.multiply(dP,this.log());return dO.exp()};dl.types.Complex.prototype.exp=function(){var dQ=this.r.exp();var dO=this.i.cos();var dP=this.i.sin();return dl.types.NumberTower.multiply(dQ,dl.types.NumberTower.add(dO,dP.timesI()))};dl.types.Complex.prototype.acos=function(){if(this.isReal()){return this.r.acos()}var dQ=dl.Kernel.pi.half();var dR=this.timesI();var dP=dl.types.NumberTower.subtract(dl.types.Rational.ONE,this.multiply(this)).sqrt();var dO=dl.types.NumberTower.add(dR,dP).log().timesI();return dl.types.NumberTower.add(dQ,dO)};dl.types.Complex.prototype.asin=function(){if(this.isReal()){return this.r.asin()}var dQ=this.timesI();var dO=dl.types.NumberTower.subtract(dl.types.Rational.ONE,this.multiply(this)).sqrt();var dP=dl.types.NumberTower.add(dQ,dO).log().timesI().minus();throw new dl.Kernel.MobyRuntimeError("")};dl.types.Complex.prototype.ceiling=function(){if(!this.isReal()){throw new dl.Kernel.MobyRuntimeError("ceiling: can only be applied to real number")}return this.r.ceiling()};dl.types.Complex.prototype.floor=function(){if(!this.isReal()){throw new dl.Kernel.MobyRuntimeError("floor: can only be applied to real number")}return this.r.floor()};dl.types.Complex.prototype.imag_dash_part=function(){return this.i};dl.types.Complex.prototype.real_dash_part=function(){return this.r};dl.types.Complex.prototype.round=function(){return this.r.round()};dl.types.Complex.prototype.timesI=function(){return this.multiply(dl.types.Complex.makeInstance(dl.types.Rational.ZERO,dl.types.Rational.ONE))};dl.types.Complex.prototype.minus=function(){return dl.types.Complex.makeInstance(dl.types.NumberTower.subtract(dl.types.Rational.ZERO,this.r),dl.types.NumberTower.subtract(dl.types.Rational.ZERO,this.i))};dl.types.Complex.prototype.half=function(){return dl.types.Complex.makeInstance(this.r.half(),this.i.half())};dl.types.NumberTower={};dl.types.NumberTower.toInteger=function(dO){return dO.toInteger()};dl.types.NumberTower.toFloat=function(dO){return dO.toFloat()};dl.types.NumberTower.abs=function(dO){return dO.abs()};dl.types.NumberTower.isFinite=function(dO){return dO.isFinite()};dl.types.NumberTower.toExact=function(dO){return dO.toExact()};dl.types.NumberTower.add=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}return dO.add(dP)};dl.types.NumberTower.subtract=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}return dO.subtract(dP)};dl.types.NumberTower.multiply=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}return dO.multiply(dP)};dl.types.NumberTower.divide=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}return dO.divide(dP)};dl.types.NumberTower.equal=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}return dO.isEqual(dP)};dl.types.NumberTower.approxEqual=function(dO,dQ,dP){return dl.types.NumberTower.lessThan(dl.types.NumberTower.abs(dl.types.NumberTower.subtract(dO,dQ)),dP)};dl.types.NumberTower.greaterThanOrEqual=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}if(!(dO.isReal()&&dP.isReal())){throw new dl.Kernel.MobyRuntimeError("greaterThanOrEqual: couldn't be applied to complex number")}return dO.greaterThanOrEqual(dP)};dl.types.NumberTower.lessThanOrEqual=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}if(!(dO.isReal()&&dP.isReal())){throw new dl.Kernel.MobyRuntimeError("lessThanOrEqual: couldn't be applied to complex number")}return dO.lessThanOrEqual(dP)};dl.types.NumberTower.greaterThan=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}if(!(dO.isReal()&&dP.isReal())){throw new dl.Kernel.MobyRuntimeError("greaterThan: couldn't be applied to complex number")}return dO.greaterThan(dP)};dl.types.NumberTower.lessThan=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}if(!(dO.isReal()&&dP.isReal())){throw new dl.Kernel.MobyRuntimeError("lessThan: couldn't be applied to complex number")}return dO.lessThan(dP)};dl.types.NumberTower.modulo=function(dP,dQ){var dO=dl.types.Rational.makeInstance(dP.toInteger()%dQ.toInteger(),1);if(dl.types.NumberTower.lessThan(dQ,dl.types.Rational.ZERO)){if(dl.types.NumberTower.lessThanOrEqual(dO,dl.types.Rational.ZERO)){return dO}return dl.types.NumberTower.add(dO,dQ)}else{if(dl.types.NumberTower.lessThan(dO,dl.types.Rational.ZERO)){return dl.types.NumberTower.add(dO,dQ)}return dO}};dl.types.NumberTower.sqr=function(dO){return dl.types.NumberTower.multiply(dO,dO)};dl.types.NumberTower.expt=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}return dO.expt(dP)};dl.types.String=String;dl.types.String.makeInstance=function(dO){return dO.valueOf()};dl.types.String.prototype.isEqual=function(dO){return this==dO};dl.types.String.prototype.toWrittenString=function(){return'"'+this.replace(/["\\]/g,function(dP,dQ,dO){return"\\"+dP})+'"'};dl.types.String.prototype.toDisplayedString=function(){return this}})();var dl=dl||{};(function(){if(!Array.indexOf){Array.prototype.indexOf=function(er){for(var eq=0;eq<this.length;eq++){if(this[eq]==er){return eq}}return -1}}var dI=function(es,eq,er){if(es.addEventListener){es.addEventListener(eq,er,false)}else{es.attachEvent("on"+eq,er,false)}};var dS=function(es,eq,er){if(es.addEventListener){es.removeEventListener(eq,er,false)}else{es.detachEvent("on"+eq,er,false)}};var d1=function(er){var eq=function(){};eq.prototype=er;return new eq()};var dZ=function(eq){this.msg=eq};dZ.prototype.name="MobyError";dZ.prototype.toString=function(){return this.name+": "+this.msg};var eo=function(er,eq){dZ.call(this,er);this.loc=eq};eo.prototype=d1(dZ.prototype);eo.prototype.name="MobyParserError";var ee=function(er,eq){dZ.call(this,er);this.stx=eq};ee.prototype=d1(dZ.prototype);ee.prototype.name="MobySyntaxError";var d8=function(eq){dZ.call(this,eq)};d8.prototype=d1(dZ.prototype);d8.prototype.name="MobyTypeError";var d4=function(eq){dZ.call(this,eq)};d4.prototype=d1(dZ.prototype);d4.prototype.name="MobyRuntimeError";var ei=function(eq){dZ.call(this,eq)};ei.prototype=d1(d4.prototype);ei.prototype.name="MobyTestingError";var eb=function(er,eq){while(eq!=0){var es=er;er=eq;eq=es%eq}return Math.abs(er)};var dH=function(er,eq){return Math.abs(er*eq/eb(er,eq))};var en=function(eq){return(eq!=null&&eq!=undefined&&(eq instanceof dl.types.Rational||eq instanceof dl.types.FloatPoint||eq instanceof dl.types.Complex))};var dL=function(eq){return(eq!=null&&eq!=undefined&&eq instanceof dl.types.Symbol)};var dR=function(eq){return eq!=null&&eq!=undefined&&eq instanceof dl.types.Char};var ef=function(eq){return a8(eq)};var dK=function(eq){return typeof(eq)=="string"};var d7=function(eq){return(eq==dl.types.Logic.TRUE||eq==dl.types.Logic.FALSE)};var ek=function(eq){return eq!=null&&eq!=undefined&&eq instanceof dl.types.Cons};var dU=function(eq){return eq!=null&&eq!=undefined&&eq instanceof dl.types.Empty};var em=function(eq){return(en(eq)&&eq.isReal())};var d5=function(eq){return en(eq)&&eq.isRational()};var d6=function(eq){return en(eq)};var dT=function(eq){return typeof(eq)=="function"};var dP=function(eq){return(en(eq)&&eq.isInteger())};var dN=function(eq){return en(eq)&&eq.isInteger()&&eq.toInteger()>=0};var dV=function(er){for(var eq=0;eq<er.length;eq++){if(!((er[eq]>="a"&&er[eq]<="z")||(er[eq]>="A"&&er[eq]<="Z"))){return false}}return true};var ec=(function(){var eq=new RegExp("^\\s*$");return function(er){return(er.match(eq)?true:false)}}());var dF=function(eq){return eq!=null&&eq!=undefined&&(eq instanceof dl.types.Vector)};var dJ=function(eq,es){for(var er=0;er<eq.length;er++){es.apply(eq[er],[eq[er],er])}};var ea=function(eu,et,eq,es){if(!eu(et,eq).valueOf()){return false}if(es.length==0){return true}if(!eu(eq,es[0]).valueOf()){return false}for(var er=0;er<es.length-1;er++){if(!eu(es[er],es[er+1]).valueOf()){return false}}return true};var dM=function(eq,eu,es){var er;var et=eu;for(er=0;er<es.length;er++){if(!(eq(et,es[er])).valueOf()){et=es[er]}}return et};var bf=function(eq){return eq!=null&&eq!=undefined&&((eq instanceof dl.types.Cons)||(eq instanceof dl.types.Empty))};var d2=function(eu,er,eq,et){var es=["th","st","nd","rd","th","th","th","th"];return dl.Kernel.format("~a: expects type <~a> as ~a argument, given: ~s",[eu,er,eq+es[Math.min(es.length-1,eq)],et])};var dY=function(er,eu,et,es,eq){if(!eu(er)){throw new d8(d2(et,es,eq,er))}};var d9=function(er,es,eq){if(!bf(er)){throw new d8(d2(es,"list",eq,er))}};var ej=function(er,eu,et,es,eq){if(!bf(er)){throw new d8(d2(et,"listof "+es,eq,er))}while(!er.isEmpty()){if(!eu(er.first())){throw new d8(d2(et,"listof "+es,eq,er))}er=er.rest()}};var d0=function(et,er,es,eq){return function(ew,eu,ev){dY(ew,et,eq,er,1);dY(eu,et,eq,er,2);dJ(ev,function(ex,ey){dY(ex,et,eq,er,ey+3)});return es(ew,eu,ev)}};var dO=function(er,eq){return d0(en,"number",function(eu,es,et){return ea(er,eu,es,et)},eq)};var ep=function(er,eq){return d0(dR,"char",function(eu,es,et){return ea(er,eu,es,et)},eq)};var dQ=function(er,eq){return d0(dK,"string",function(eu,es,et){return ea(er,eu,es,et)},eq)};dl.Kernel={_heir:d1,pi:dl.types.FloatPoint.makeInstance(Math.PI),e:dl.types.FloatPoint.makeInstance(Math.E),Struct:function(er,eq){this._constructorName=er;this._fields=eq},struct_question_:function(eq){return(eq!=null&&eq!=undefined&&eq instanceof dl.Kernel.Struct)},number_question_:function(eq){return en(eq)},equal_question_:function(eq,er){if(dl.Kernel.number_question_(eq)&&dl.Kernel.number_question_(er)){if("isEqual" in eq){return dl.types.NumberTower.equal(eq,er)}else{if("isEqual" in er){return dl.types.NumberTower.equal(er,eq)}else{return(eq==er)}}}else{return eq.isEqual(er)}},equal_tilde__question_:function(eq,es,er){dY(er,en,"equal~?","number",3);if(dl.Kernel.number_question_(eq).valueOf()&&dl.Kernel.number_question_(es).valueOf()){if("isEqual" in eq){return dl.types.NumberTower.approxEqual(eq,es,er)}else{if("isEqual" in es){return dl.types.NumberTower.approxEqual(es,eq,er)}else{return(eq==es)}}}else{return eq.isEqual(es)}},eq_question_:function(eq,er){return(eq==er)},eqv_question_:function(eq,er){if(en(eq)&&en(er)&&eq.level()==er.level()){return dl.types.NumberTower.equal(eq,er)}else{if(dR(eq)&&dR(er)){return eq.getValue()==er.getValue()}}return eq===er},identity:function(eq){return eq},cons:function(eq,er){d9(er,"cons",2);return dl.types.Cons.makeInstance(eq,er)},first:function(eq){d9(eq,"first",1);return eq.first()},rest:function(eq){d9(eq,"rest",1);return eq.rest()},second:function(eq){d9(eq,"second",1);return eq.rest().first()},third:function(eq){d9(eq,"third",1);return eq.rest().rest().first()},fourth:function(eq){d9(eq,"fourth",1);return eq.rest().rest().rest().first()},fifth:function(eq){d9(eq,"fifth",1);return eq.rest().rest().rest().rest().first()},random:function(eq){dY(eq,dP,"random","integer",1);return dl.types.Rational.makeInstance(Math.floor(dl.types.NumberTower.toInteger(eq)*Math.random()),1)},current_dash_seconds:function(){return dl.types.Rational.makeInstance(new Date().getMilliseconds()/1000)},floor:function(eq){dY(eq,en,"floor","number",1);return eq.floor()},ceiling:function(eq){dY(eq,en,"ceiling","number",1);return eq.ceiling()},sqrt:function(eq){dY(eq,en,"sqrt","number",1);return eq.sqrt()},integer_dash_sqrt:function(er){dY(er,dP,"integer-sqrt","integer",1);var eq=er.sqrt();if(d5(eq)){return dl.types.Rational.makeInstance(eq.toInteger())}else{if(em(eq)){return dl.types.Rational.makeInstance(eq.toInteger())}else{return dl.types.Complex.makeInstance(dl.types.Rational.makeInstance(dl.Kernel.real_dash_part(eq).toInteger()),dl.types.Rational.makeInstance(dl.Kernel.imag_dash_part(eq).toInteger()))}}},sqr:function(eq){dY(eq,en,"sqr","number",1);return dl.types.NumberTower.sqr(eq)},sin:function(eq){dY(eq,en,"sin","number",1);return eq.sin()},cos:function(eq){dY(eq,en,"cos","number",1);return eq.cos()},modulo:function(eq,er){dY(eq,en,"modulo","number",1);dY(er,en,"modulo","number",2);return dl.types.NumberTower.modulo(eq,er)},zero_question_:function(eq){dY(eq,en,"zero?","number",1);return dl.types.NumberTower.equal(eq,dl.types.Rational.ZERO)},_equal__tilde_:function(eq,es,er){dY(eq,en,"=~","number",1);dY(es,en,"=~","number",2);dY(er,en,"=~","number",3);return dl.types.NumberTower.approxEqual(eq,es,er)},abs:function(eq){dY(eq,en,"abs","number",1);return dl.types.NumberTower.abs(eq)},add1:function(eq){dY(eq,en,"add1","number",1);return dl.types.NumberTower.add(eq,dl.types.Rational.ONE)},sub1:function(eq){dY(eq,en,"sub1","number",1);return dl.types.NumberTower.subtract(eq,dl.types.Rational.ONE)},_plus_:function(eq){dJ(eq,function(et,eu){dY(et,en,"+","number",eu+1)});var er,es=dl.types.Rational.ZERO;for(er=0;er<eq.length;er++){es=dl.types.NumberTower.add(es,eq[er])}return es},_dash_:function(et,eq){dY(et,en,"-","number",1);dJ(eq,function(eu,ev){dY(eu,en,"-","number",ev+2)});if(eq.length==0){return dl.types.NumberTower.subtract(dl.types.Rational.ZERO,et)}var er,es=et;for(er=0;er<eq.length;er++){es=dl.types.NumberTower.subtract(es,eq[er])}return es},_star_:function(er){dJ(er,function(et,eu){dY(et,en,"*","number",eu+1)});var es,eq=dl.types.Rational.ONE;for(es=0;es<er.length;es++){eq=dl.types.NumberTower.multiply(eq,er[es])}return eq},_slash_:function(es,eq){dY(es,en,"/","number",1);dJ(eq,function(eu,ev){dY(eu,en,"/","number",ev+2)});var er,et=es;if(eq.length==0){return dl.types.NumberTower.divide(dl.types.Rational.ONE,et)}else{for(er=0;er<eq.length;er++){et=dl.types.NumberTower.divide(et,eq[er])}return et}},_equal_:dO(dl.types.NumberTower.equal,"="),_greaterthan__equal_:dO(dl.types.NumberTower.greaterThanOrEqual,">="),_lessthan__equal_:dO(dl.types.NumberTower.lessThanOrEqual,"<="),_greaterthan_:dO(dl.types.NumberTower.greaterThan,">"),_lessthan_:dO(dl.types.NumberTower.lessThan,"<"),min:function(er,eq){dY(er,en,"min","number",1);dJ(eq,function(es,et){dY(this,en,"min","number",et+2)});return dM(dl.types.NumberTower.lessThanOrEqual,er,eq)},max:function(er,eq){dY(er,en,"max","number",1);dJ(eq,function(es,et){dY(this,en,"max","number",et+2)});return dM(dl.types.NumberTower.greaterThanOrEqual,er,eq)},lcm:function(et,es){dY(et,dP,"lcm","number",1);dJ(es,function(eu,ev){dY(this,dP,"lcm","number",ev+2)});var eq=Math.abs(et.toInteger());if(eq==0){return dl.types.Rational.ZERO}for(var er=0;er<es.length;er++){if(es[er].toInteger()==0){return dl.types.Rational.ZERO}eq=dH(eq,es[er].toInteger())}return dl.types.Rational.makeInstance(eq)},gcd:function(et,es){dY(et,dP,"gcd","number",1);dJ(es,function(eu,ev){dY(this,dP,"gcd","number",ev+2)});var eq=Math.abs(et.toInteger());for(var er=0;er<es.length;er++){eq=eb(eq,es[er].toInteger())}return dl.types.Rational.makeInstance(eq)},exact_dash__greaterthan_inexact:function(eq){dY(eq,en,"exact->inexact","number",1);return dl.types.FloatPoint.makeInstance(eq.toFloat())},inexact_dash__greaterthan_exact:function(eq){dY(eq,en,"inexact->exact","number",1);return dl.types.NumberTower.toExact(eq)},exact_question_:function(eq){dY(eq,en,"exact?","number",1);return eq.isExact()},inexact_question_:function(eq){dY(eq,en,"inexact?","number",1);return !eq.isExact()},rational_question_:function(eq){return(dl.Kernel.number_question_(eq)&&eq.isRational())},number_dash__greaterthan_string:function(eq){dY(eq,en,"number->string","number",1);return dl.types.String.makeInstance(dl.Kernel.toWrittenString(eq))},conjugate:function(eq){dY(eq,en,"conjugate","number",1);return eq.conjugate()},magnitude:function(eq){dY(eq,en,"magnitude","number",1);return eq.magnitude()},log:function(eq){dY(eq,en,"log","number",1);return eq.log()},angle:function(eq){dY(eq,en,"angle","number",1);return eq.angle()},atan:function(eq,er){if(er.length==0){dY(eq,en,"atan","number",1);return eq.atan()}else{if(er.length==1){dY(eq,em,"atan","number",1);dY(er[0],em,"atan","number",2);return dl.types.FloatPoint.makeInstance(Math.atan2(dl.types.NumberTower.toFloat(eq),dl.types.NumberTower.toFloat(er[0])))}else{throw new d4(dl.Kernel.format("atan: expects 1 to 2 arguments, given ~a.",[dl.types.Rational.makeInstance(er.length)]))}}},expt:function(eq,er){dY(eq,en,"expt","number",1);dY(er,en,"expt","number",2);return dl.types.NumberTower.expt(eq,er)},exp:function(eq){dY(eq,en,"exp","number",1);return eq.exp()},acos:function(eq){dY(eq,en,"acos","number",1);return eq.acos()},asin:function(eq){dY(eq,en,"asin","number",1);return eq.asin()},tan:function(eq){dY(eq,en,"tan","number",1);return dl.types.NumberTower.divide(eq.sin(),eq.cos())},complex_question_:function(eq){return d6(eq)},cosh:function(eq){dY(eq,en,"cosh","number",1);return this._plus_([this.exp(eq),this.exp(eq.minus())]).half()},sinh:function(eq){dY(eq,en,"sinh","number",1);return dl.types.NumberTower.subtract(this.exp(eq),this.exp(eq.minus())).half()},denominator:function(eq){dY(eq,d5,"denominator","rational",1);return eq.denominator()},numerator:function(eq){dY(eq,d5,"numerator","rational",1);return eq.numerator()},odd_question_:function(eq){dY(eq,en,"odd?","number",1);return(Math.abs((eq.toInteger()%2))==1)},even_question_:function(eq){dY(eq,en,"even?","number",1);return(Math.abs((eq.toInteger()%2))==0)},positive_question_:function(eq){dY(eq,en,"positive?","number",1);return this._greaterthan_(eq,dl.types.Rational.ZERO,[])},negative_question_:function(eq){dY(eq,en,"negative?","number",1);return this._lessthan_(eq,dl.types.Rational.ZERO,[])},imag_dash_part:function(eq){dY(eq,en,"imag-part","number",1);return eq.imag_dash_part()},real_dash_part:function(eq){dY(eq,en,"real-part","number",1);return eq.real_dash_part()},make_dash_polar:function(es,er){if(dl.types.NumberTower.equal(er,dl.types.Rational.ZERO)){return es}var eq=dl.types.NumberTower.multiply(es,er.cos());var et=dl.types.NumberTower.multiply(es,er.sin());return dl.types.Complex.makeInstance(eq,et)},integer_question_:function(eq){return(dP(eq))},make_dash_rectangular:function(eq,er){return dl.types.Complex.makeInstance(eq,er)},quotient:function(eq,es){dY(eq,dP,"quotient","integer",1);dY(es,dP,"quotient","integer",2);var er=dl.types.NumberTower.divide(eq,es);if(dl.Kernel.positive_question_(er)){return dl.types.Rational.makeInstance(er.floor().toInteger(),1)}else{return dl.types.Rational.makeInstance(er.ceiling().toInteger(),1)}},remainder:function(eq,er){dY(eq,en,"remainder","number",1);dY(er,en,"remainder","number",2);return dl.types.Rational.makeInstance(eq.toInteger()%er.toInteger(),1)},real_question_:function(eq){return em(eq)},round:function(eq){dY(eq,en,"round","number",1);return eq.round()},sgn:function(eq){dY(eq,en,"sgn","number",1);if(this.positive_question_(eq).valueOf()){return dl.types.Rational.ONE}if(this.negative_question_(eq).valueOf()){return dl.types.Rational.NEGATIVE_ONE}else{return dl.types.Rational.ZERO}},boolean_equal__question_:function(eq,er){dY(eq,d7,"boolean=?","boolean",1);dY(er,d7,"boolean=?","boolean",2);return eq==er},boolean_question_:function(eq){return d7(eq)},false_question_:function(eq){return(eq==dl.types.Logic.FALSE)},not:function(eq){if(!eq||eq===dl.types.Logic.FALSE){return dl.types.Logic.TRUE}return dl.types.Logic.FALSE},symbol_dash__greaterthan_string:function(eq){dY(eq,dL,"symbol->string","symbol",1);return dl.types.String.makeInstance(eq.val)},symbol_equal__question_:function(eq,er){dY(eq,dL,"symbol=?","symbol",1);dY(er,dL,"symbol=?","symbol",2);return(eq.val==er.val)},symbol_question_:function(eq){return dL(eq)},append:function(et,es){d9(et,"append",1);var eq=et;var er;for(er=0;er<es.length;er++){d9(es[er],"append",er+2);eq=eq.append(es[er])}return eq},reverse:function(eq){d9(eq,"reverse",1);var er=dl.types.Empty.EMPTY;while(!eq.isEmpty()){er=dl.types.Cons.makeInstance(eq.first(),er);eq=eq.rest()}return er},assq:function(er,eq){d9(eq,"assq",2);while(!eq.isEmpty()&&!dl.Kernel.eq_question_(er,eq.first().first())){eq=eq.rest()}if(eq.isEmpty()){return dl.types.Logic.FALSE}else{return eq.first()}},caaar:function(eq){d9(eq,"caaar",1);return eq.first().first().first()},caadr:function(eq){d9(eq,"caadr",1);return eq.first().first().rest()},caar:function(eq){d9(eq,"caar",1);return eq.first().first()},cadar:function(eq){d9(eq,"cadar",1);return eq.first().rest().first()},cadddr:function(eq){d9(eq,"cadddr",1);return eq.rest().rest().rest().first()},caddr:function(eq){d9(eq,"caddr",1);return eq.rest().rest().first()},cadr:function(eq){d9(eq,"cadr",1);return eq.rest().first()},car:function(eq){d9(eq,"car",1);return eq.first()},cdaar:function(eq){d9(eq,"cdaar",1);return eq.first().first().rest()},cdadr:function(eq){d9(eq,"cdadr",1);return eq.rest().first().rest()},cdar:function(eq){d9(eq,"cdar",1);return eq.first().rest()},cddar:function(eq){d9(eq,"cddar",1);return eq.first().rest().rest()},cdddr:function(eq){d9(eq,"cdddr",1);return eq.rest().rest().rest()},cddr:function(eq){d9(eq,"cddr",1);return eq.rest().rest()},cdr:function(eq){d9(eq,"cdr",1);return eq.rest()},null_question_:function(eq){return dU(eq)},empty_question_:function(eq){return dU(eq)},pair_question_:function(eq){return ek(eq)},cons_question_:function(eq){return ek(eq)},sixth:function(eq){d9(eq,"sixth",1);return eq.rest().rest().rest().rest().rest().first()},seventh:function(eq){d9(eq,"seventh",1);return eq.rest().rest().rest().rest().rest().rest().first()},eighth:function(eq){d9(eq,"eighth",1);return eq.rest().rest().rest().rest().rest().rest().rest().first()},set_dash_car_bang_:function(eq,er){d9(eq,"set-car!",1);eq.f=er;return undefined},set_dash_cdr_bang_:function(eq,er){d9(eq,"set-cdr!",1);d9(er,"set-cdr!",2);eq.r=er;return undefined},length:function(eq){d9(eq,"length",1);var er=dl.types.Rational.ZERO;for(;!eq.isEmpty();eq=eq.rest()){er=dl.Kernel.add1(er)}return er},list:function(eq){var er=dl.types.Empty.EMPTY;for(var es=eq.length-1;es>=0;es--){er=dl.types.Cons.makeInstance(eq[es],er)}return er},list_star_:function(eq,es){var er=es.pop();if(er==undefined||!er instanceof dl.types.Cons){throw new d8("list*: "+er+" not a list")}es.unshift(eq);return dl.Kernel.append(dl.Kernel.list(es),[er])},list_dash_ref:function(er,eq){d9(er,"list-ref",1);dY(eq,dN,"list-ref","natural",2);var es=dl.types.Rational.ZERO;for(;dl.Kernel._lessthan_(es,eq,[]);es=dl.Kernel.add1(es)){if(er.isEmpty()){throw new d4("list-ref: index too small")}else{er=er.rest()}}return er.first()},remove:function(et,er){d9(er,"member",2);var es=er;var eq=dl.types.Empty.EMPTY;while(!er.isEmpty()){if(dl.Kernel.equal_question_(et,er.first()).valueOf()){return dl.Kernel.append(dl.Kernel.reverse(eq),[er.rest()])}else{eq=dl.types.Cons.makeInstance(er.first(),eq);er=er.rest()}}return es},member:function(er,eq){d9(eq,"member",2);while(!eq.isEmpty()){if(dl.Kernel.equal_question_(er,eq.first()).valueOf()){return dl.types.Logic.TRUE}eq=eq.rest()}return dl.types.Logic.FALSE},memq:function(er,eq){d9(eq,"memq",2);while(!eq.isEmpty()){if(dl.Kernel.eq_question_(er,eq.first()).valueOf()){return eq}eq=eq.rest()}return dl.types.Logic.FALSE},memv:function(er,eq){d9(eq,"memv",2);while(!eq.isEmpty()){if(dl.Kernel.eqv_question_(er,eq.first()).valueOf()){return eq}eq=eq.rest()}return dl.types.Logic.FALSE},memf:function(er,eq){dY(er,dT,"memf","function",1);d9(eq,"memf",2);while(!eq.isEmpty()){if(er([eq.first()])){return eq}eq=eq.rest()}return dl.types.Logic.FALSE},compose:function(eq){return function(er){var et=er;for(var es=eq.length-1;es>=0;es--){et=[eq[es](et)]}return et[0]}},string_dash__greaterthan_number:function(et){dY(et,dK,"string->number","string",1);try{var er=dl.reader.readSchemeExpressions(et,"");if(dl.types.NumberTower.equal(dl.Kernel.length(er),dl.types.Rational.ONE)){var eq=b2(er.first());if(en(eq)){return eq}else{return dl.types.Logic.FALSE}}else{return dl.types.Logic.FALSE}}catch(es){return dl.types.Logic.FALSE}},string_dash__greaterthan_symbol:function(eq){dY(eq,dK,"string->symbol","string",1);return dl.types.Symbol.makeInstance(eq)},string_dash__greaterthan_int:function(eq){dY(eq,dK,"string->int","string",1);return dl.types.Rational.makeInstance(eq.toString().charCodeAt(0),1)},string_dash_append:function(eq){dJ(eq,function(er,es){dY(er,dK,"string-append","string",es+1)});return dl.types.String.makeInstance(eq.join(""))},replicate:function(et,es){dY(et,dN,"replicate","natural",1);dY(es,dK,"replicate","string",2);var eq=[];for(var er=0;er<et.toInteger();er++){eq.push(es)}return dl.types.String.makeInstance(eq.join(""))},string_equal__question_:dQ(function(eq,er){return eq==er},"string=?"),string_lessthan__equal__question_:dQ(function(eq,er){return eq<=er},"string<=?"),string_lessthan__question_:dQ(function(eq,er){return eq<er},"string<?"),string_greaterthan__equal__question_:dQ(function(eq,er){return eq>=er},"string>=?"),string_greaterthan__question_:dQ(function(eq,er){return eq>er},"string>?"),string_dash_ci_equal__question_:dQ(function(eq,er){return eq.toUpperCase()==er.toUpperCase()},"string-ci=?"),string_dash_ci_lessthan__equal__question_:dQ(function(eq,er){return eq.toUpperCase()<=er.toUpperCase()},"string-ci<=?"),string_dash_ci_lessthan__question_:dQ(function(eq,er){return eq.toUpperCase()<er.toUpperCase()},"string-ci<?"),string_dash_ci_greaterthan__question_:dQ(function(eq,er){return eq.toUpperCase()>er.toUpperCase()},"string-ci>?"),string_dash_ci_greaterthan__equal__question_:dQ(function(eq,er){return eq.toUpperCase()>=er.toUpperCase()},"string-ci>=?"),string_dash_copy:function(eq){dY(eq,dK,"string-copy","string",1);return eq.substring(0,eq.length)},string_dash_length:function(eq){dY(eq,dK,"string-length","string",1);return dl.types.Rational.makeInstance(eq.length,1)},string_dash_ref:function(er,eq){dY(er,dK,"string-ref","string",1);dY(eq,dN,"string-ref","natural",2);if(eq.toInteger()>=er.length){throw new d4("string-ref: index >= length")}return dl.types.String.makeInstance(er.charAt(eq.toInteger()))},string_dash_ith:function(er,eq){dY(er,dK,"string-ith","string",1);dY(eq,dN,"string-ith","natural",2);if(eq.toInteger()>=er.length){throw new d4("string-ith: index >= string length")}return dl.types.String.makeInstance(er.substring(eq.toInteger(),eq.toInteger()+1))},int_dash__greaterthan_string:function(eq){dY(eq,dP,"int->string","integer",1);return dl.types.String.makeInstance(String.fromCharCode(eq.toInteger()))},string_question_:function(eq){return dK(eq)},substring:function(es,er,eq){dY(es,dK,"substring","string",1);dY(er,dN,"substring","natural",2);dY(eq,dN,"substring","natural",3);if(er.toInteger()>eq.toInteger()){throw new d4("substring: begin > end")}if(eq.toInteger()>es.length){throw new d4("substring: end > length")}return String.makeInstance(es.substring(er.toInteger(),eq.toInteger()))},char_question_:function(eq){return dR(eq)},char_dash__greaterthan_integer:function(eq){dY(eq,dR,"char->integer","char",1);var er=new String(eq.val);return dl.types.Rational.makeInstance(er.charCodeAt(0),1)},integer_dash__greaterthan_char:function(er){dY(er,dP,"integer->char","integer",1);var eq=String.fromCharCode(er.toInteger());return dl.types.Char.makeInstance(eq)},char_equal__question_:ep(function(eq,er){return eq.val==er.val},"char=?"),char_lessthan__question_:ep(function(eq,er){return eq.val<er.val},"char<?"),char_lessthan__equal__question_:ep(function(eq,er){return eq.val<=er.val},"char<=?"),char_greaterthan__question_:ep(function(eq,er){return eq.val>er.val},"char>?"),char_greaterthan__equal__question_:ep(function(eq,er){return eq.val>=er.val},"char>=?"),char_dash_ci_equal__question_:ep(function(eq,er){return eq.val.toUpperCase()==er.val.toUpperCase()},"char-ci=?"),char_dash_ci_lessthan__question_:ep(function(eq,er){return eq.val.toUpperCase()<er.val.toUpperCase()},"char-ci<?"),char_dash_ci_lessthan__equal__question_:ep(function(eq,er){return eq.val.toUpperCase()<=er.val.toUpperCase()},"char-ci<=?"),char_dash_ci_greaterthan__question_:ep(function(eq,er){return eq.val.toUpperCase()>er.val.toUpperCase()},"char-ci>?"),char_dash_ci_greaterthan__equal__question_:ep(function(eq,er){return eq.val.toUpperCase()>=er.val.toUpperCase()},"char-ci>=?"),char_dash_numeric_question_:function(eq){dY(eq,dR,"char-numeric?","char",1);var er=eq.val;return(er>="0"&&er<="9")},char_dash_alphabetic_question_:function(eq){dY(eq,dR,"char-alphabetic?","char",1);var er=eq.val;return dV(er)},char_dash_whitespace_question_:function(eq){dY(eq,dR,"char-whitespace?","char",1);var er=eq.val;return ec(er)},char_dash_upper_dash_case_question_:function(eq){dY(eq,dR,"char-upper-case?","char",1);return dV(eq.val)&&eq.val.toUpperCase()==eq.val},char_dash_lower_dash_case_question_:function(eq){dY(eq,dR,"char-lower-case?","char",1);return dV(eq.val)&&eq.val.toLowerCase()==eq.val},char_dash_upcase:function(eq){dY(eq,dR,"char-upcase","char",1);return dl.types.Char.makeInstance(eq.val.toUpperCase())},char_dash_downcase:function(eq){dY(eq,dR,"char-downcase","char",1);return dl.types.Char.makeInstance(eq.val.toLowerCase())},list_dash__greaterthan_string:function(eq){ej(eq,dR,"list->string","char",1);var er="";while(!eq.isEmpty()){er+=eq.first().val;eq=eq.rest()}return dl.types.String.makeInstance(er)},implode:function(eq){ej(eq,dK,"implode","string",1);var er=[];while(!eq.isEmpty()){er.push(eq.first().toString());eq=eq.rest()}return dl.types.String.makeInstance(er.join(""))},string_dash_numeric_question_:function(er){dY(er,dK,"string-numeric?","string",1);for(var eq=0;eq<er.length;eq++){if(er[eq]<"0"||er[eq]>"9"){return dl.types.Logic.FALSE}}return dl.types.Logic.TRUE},string_dash_alphabetic_question_:function(eq){dY(eq,dK,"string-alphabetic?","string",1);return dV(eq)?dl.types.Logic.TRUE:dl.types.Logic.FALSE},string_dash_whitespace_question_:function(eq){dY(eq,dK,"string-whitespace?","string",1);return ec(eq)?dl.types.Logic.TRUE:dl.types.Logic.FALSE},string_dash_upper_dash_case_question_:function(eq){dY(eq,dK,"string-upper-case?","string",1);return dV(eq)&&eq.toUpperCase()==eq},string_dash_lower_dash_case_question_:function(eq){dY(eq,dK,"string-lower-case?","string",1);return dV(eq)&&eq.toLowerCase()==eq},string:function(es){dJ(es,function(et,eu){dY(this,dR,"string","char",eu+1)});var eq=[];for(var er=0;er<es.length;er++){eq.push(es[er].val)}return String.makeInstance(eq.join(""))},make_dash_string:function(eu,es){dY(eu,dN,"make-string","natural",1);dY(es,dR,"make-string","char",2);var eq="";var et=es.val;var er=dl.types.Rational.ZERO;for(;dl.Kernel._lessthan_(er,eu,[]);er=dl.Kernel.add1(er)){eq+=et}return dl.types.String.makeInstance(eq)},string_dash__greaterthan_list:function(et){dY(et,dK,"string->list","string",1);var es=et;var eq=dl.types.Empty.EMPTY;for(var er=es.length-1;er>=0;er--){eq=dl.types.Cons.makeInstance(dl.types.Char.makeInstance(es.charAt(er)),eq)}return eq},explode:function(et){dY(et,dK,"explode","string",1);var es=et;var eq=dl.types.Empty.EMPTY;for(var er=es.length-1;er>=0;er--){eq=dl.types.Cons.makeInstance(dl.types.String.makeInstance(es.charAt(er)),eq)}return eq}};dl.Kernel._dumpKernelSymbols=function(){var eq=dl.types.Empty.EMPTY;for(var er in dl.Kernel){eq=dl.types.Cons.makeInstance(dl.types.Symbol.makeInstance(er),eq)}return eq};var dW=function(eq){this.hash=eq};dl.Kernel.openInputStx=function(eq){throw new d4("open-input-stx currently unsupported")},dl.Kernel._kernelMakeImmutableHashEq=function(eu){var er={};while(!eu.isEmpty()){var es=eu.first();var et=es.first();var eq=es.rest();er[et]=eq;eu=eu.rest()}return new dW(er)};dl.Kernel._kernelHashSet=function(eu,er,ev){var es={};var et=eu.hash;for(var eq in et){es[eq]=et[eq]}es[er]=ev;return new dW(es)};dl.Kernel._kernelHashRef=function(er,eq,es){if(eq in er.hash){return er.hash[eq]}else{if(dT(es)){return es([])}return es}};dl.Kernel._kernelHashRemove=function(eu,er){var es={};var et=eu.hash;for(var eq in et){if(eq!=er){es[eq]=et[eq]}}return new dW(es)};dl.Kernel._kernelHashMap=function(er,et){var eq=dl.types.Empty.EMPTY;var es;for(es in er.hash){var eu=er.hash[es];eq=dl.Kernel.cons(et([es,eu]),eq)}return eq};dl.Kernel.apply=function(ev,eu,eq){var et;var es=[];dY(ev,dT,"apply","function",1);if(eq.length==0){et=eu;d9(et,"apply",2);while(!et.isEmpty()){var er=et.first();es.push(er);et=et.rest()}}else{et=eq.pop();d9(et,"apply",3);while(!et.isEmpty()){var er=et.first();es.push(er);et=et.rest()}while(eq.length>0){es.unshift(eq.pop())}es.unshift(eu)}return ev(es)};dl.Kernel.map=function(et,eu){dY(et,dT,"map","function",1);dJ(eu,function(ev,ew){d9(ev,"map",ew+2)});var es=dl.types.Empty.EMPTY;while(!eu[0].isEmpty()){var eq=[];for(var er=0;er<eu.length;er++){eq.push(eu[er].first());eu[er]=eu[er].rest()}es=dl.Kernel.cons(et(eq),es)}return dl.Kernel.reverse(es)};dl.Kernel.for_dash_each=function(es,et){dY(es,dT,"for-each","function",1);dJ(et,function(eu,ev){d9(eu,"for-each",ev+2)});while(!et[0].isEmpty()){var eq=[];for(var er=0;er<et.length;er++){eq.push(et[er].first());et[er]=et[er].rest()}es(eq)}return undefined};dl.Kernel.andmap=function(es,et){dY(es,dT,"andmap","function",1);dJ(et,function(eu,ev){d9(eu,"andmap",ev+2)});while(!et[0].isEmpty()){var eq=[];for(var er=0;er<et.length;er++){eq.push(et[er].first());et[er]=et[er].rest()}if(!es(eq)){return dl.types.Logic.FALSE}}return dl.types.Logic.TRUE};dl.Kernel.ormap=function(es,et){dY(es,dT,"ormap","function",1);dJ(et,function(eu,ev){d9(eu,"ormap",ev+2)});while(!et[0].isEmpty()){var eq=[];for(var er=0;er<et.length;er++){eq.push(et[er].first());et[er]=et[er].rest()}if(es(eq)){return dl.types.Logic.TRUE}}return dl.types.Logic.FALSE};dl.Kernel.filter=function(er,es){dY(er,dT,"filter","function",1);dY(es,bf,"filter","list",2);var eq=dl.types.Empty.EMPTY;while(!es.isEmpty()){if(er([es.first()])){eq=dl.types.Cons.makeInstance(es.first(),eq)}es=es.rest()}return dl.Kernel.reverse(eq)};dl.Kernel.foldl=function(eu,et,ev){dY(eu,dT,"foldl","function",1);dJ(ev,function(ew,ex){dY(ew,bf,"foldl","list",ex+3)});var eq=et;while(!ev[0].isEmpty()){var er=[];for(var es=0;es<ev.length;es++){er.push(ev[es].first());ev[es]=ev[es].rest()}er.push(eq);eq=eu(er)}return eq};dl.Kernel.foldr=function(eu,et,ev){dY(eu,dT,"foldr","function",1);dJ(ev,function(ew,ex){dY(ew,bf,"foldr","list",ex+3)});var eq=et;for(var es=0;es<ev.length;es++){ev[es]=dl.Kernel.reverse(ev[es])}while(!ev[0].isEmpty()){var er=[];for(var es=0;es<ev.length;es++){er.push(ev[es].first());ev[es]=ev[es].rest()}er.push(eq);eq=eu(er)}return eq};dl.Kernel.argmin=function(es,eu){dY(es,dT,"argmin","function",1);dY(eu,ek,"argmin","nonempty list",2);var er=eu.first();var eq=es([eu.first()]).toFloat();eu=eu.rest();while(!eu.isEmpty()){var et=es([eu.first()]).toFloat();if(et<eq){er=eu.first();eq=et}eu=eu.rest()}return er};dl.Kernel.argmax=function(es,eu){dY(es,dT,"argmax","function",1);dY(eu,ek,"argmax","nonempty list",2);var er=eu.first();var eq=es([eu.first()]).toFloat();eu=eu.rest();while(!eu.isEmpty()){var et=es([eu.first()]).toFloat();if(et>eq){er=eu.first();eq=et}eu=eu.rest()}return er};dl.Kernel.sort=function(er,es){dY(er,bf,"sort","list",1);dY(es,dT,"sort","function",2);var eq=[];while(!er.isEmpty()){eq.push(er.first());er=er.rest()}eq.sort(function(et,eu){return es([et,eu])?-1:1});return dl.Kernel.list(eq)};dl.Kernel.quicksort=dl.Kernel.sort;dl.Kernel.build_dash_list=function(et,es){dY(et,dN,"build-list","natural",1);dY(es,dT,"build-list","function",2);var eq=dl.types.Empty.EMPTY;for(var er=0;er<et.toInteger();er++){eq=dl.Kernel.cons(es([dl.types.Rational.makeInstance(er,1)]),eq)}return dl.Kernel.reverse(eq)};dl.Kernel.build_dash_string=function(eu,et){dY(eu,dN,"build-string","natural",1);dY(et,dT,"build-string","function",2);var es=[];for(var eq=0;eq<eu.toInteger();eq++){var er=et([dl.types.Rational.makeInstance(eq,1)]);es.push(er.val)}return dl.types.String.makeInstance(es.join(""))};dl.Kernel.format=function(es,et){dY(es,dK,"format","string",1);var ev=new RegExp("~[sSaAn%~]","g");var er=et;function eu(ew){if(ew=="~~"){return"~"}else{if(ew=="~n"||ew=="~%"){return"\n"}else{if(ew=="~s"||ew=="~S"){if(er.length==0){throw new d4("format: fewer arguments passed than expected")}return dl.Kernel.toWrittenString(er.shift())}else{if(ew=="~a"||ew=="~A"){if(er.length==0){throw new d4("format: fewer arguments passed than expected")}return dl.Kernel.toDisplayedString(er.shift())}else{throw new d4("Unimplemented format "+ew)}}}}}var eq=dl.types.String.makeInstance(es.replace(ev,eu));if(er.length>0){throw new d4("format: More arguments passed than expected")}return eq};dl.Kernel.string=function(eq){var es=[];for(var er=0;er<eq.length;er++){es.push(eq[er].getValue())}return dl.types.String.makeInstance(es.join(""))};dl.Kernel.procedure_question_=function(eq){return dT(eq)};dl.Kernel.xml_dash__greaterthan_s_dash_exp=function(es){dY(es,dK,"xml->s-exp","string",1);if(es.length==0){return dl.types.String.makeInstance("")}var et;try{et=new ActiveXObject("Microsoft.XMLDOM");et.async="false";et.loadXML(es)}catch(eu){var ew=new DOMParser();et=ew.parseFromString(es,"text/xml")}var er=function(ey){var ex=dl.types.Empty.EMPTY;for(var ez=0;ez<ey.length;ez++){var eA=dl.types.Cons.makeInstance(dl.types.Symbol.makeInstance(ey.item(ez).nodeName),dl.types.Cons.makeInstance(ey.item(ez).nodeValue,dl.types.Empty.EMPTY));ex=dl.types.Cons.makeInstance(eA,ex)}return dl.types.Cons.makeInstance(dl.types.Symbol.makeInstance("@"),dl.Kernel.reverse(ex))};var ev=function(ez){if(ez.nodeType==Node.ELEMENT_NODE){var ex=dl.types.Empty.EMPTY;var eA=ez.firstChild;while(eA!=null){var ey=ev(eA);if(dK(ey)&&!ex.isEmpty()&&dK(ex.first())){ex=dl.types.Cons.makeInstance(ex.first()+ey,ex.rest())}else{ex=dl.types.Cons.makeInstance(ey,ex)}eA=eA.nextSibling}ex=dl.Kernel.reverse(ex);ex=dl.types.Cons.makeInstance(er(ez.attributes),ex);ex=dl.types.Cons.makeInstance(dl.types.Symbol.makeInstance(ez.nodeName),ex);return ex}else{if(ez.nodeType==Node.TEXT_NODE){return ez.textContent}else{if(ez.nodeType==Node.CDATA_SECTION_NODE){return ez.data}else{return dl.types.Empty.EMPTY}}}};var eq=ev(et.firstChild);return eq};dl.Kernel.split_dash_whitespace=function(eq){eq=eq.replace(/^\s+/,"");eq=eq.replace(/\s+$/,"");return dl.Kernel.list(eq.split(/\s+/))};var el=function(eq){dl.Kernel.Struct.call(this,"box",[eq])};el.prototype=d1(dl.Kernel.Struct.prototype);dl.Kernel.box=function(eq){return new el(eq)};dl.Kernel.unbox=function(eq){dY(eq,dl.Kernel.box_question_,"unbox","box",1);return eq._fields[0]};dl.Kernel.box_question_=function(eq){return eq!=null&&eq!=undefined&&eq instanceof el};dl.Kernel.set_dash_box_bang_=function(er,eq){dY(er,dl.Kernel.box_question_,"set-box!","box",1);er._fields[0]=eq;return undefined};var dX=function(eq,er){dl.Kernel.Struct.call(this,"make-posn",[eq,er])};dX.prototype=d1(dl.Kernel.Struct.prototype);var d3=function(er,eq){return new dX(er,eq)};var eh=function(eq){dY(eq,ed,"posn-x","posn",1);return eq._fields[0]};var eg=function(eq){dY(eq,ed,"posn-y","posn",1);return eq._fields[1]};var ed=function(eq){return eq!=null&&eq!=undefined&&eq instanceof dX};dl.Kernel.make_dash_posn=d3;dl.Kernel.posn_question_=ed;dl.Kernel.posn_dash_x=eh;dl.Kernel.posn_dash_y=eg;dl.Kernel.error=function(eq,er){dY(eq,dL,"error","symbol",1);dY(er,dK,"error","string",2);throw new d4(dl.Kernel.format("~a: ~a",[eq,er]).toString())};dl.Kernel.syntax_dash_error=function(er,eq){dY(er,dK,"syntax-error","string",1);dY(eq,ef,"syntax-error","stx",2);throw new ee(er,eq)};dl.Kernel.toWrittenString=function(eq){if(eq==undefined||eq==null){return"<undefined>"}if(typeof(eq)=="string"){return eq.toWrittenString()}if(typeof(eq)!="object"&&typeof(eq)!="function"){return eq.toString()}if("toWrittenString" in eq){return eq.toWrittenString()}if("toDisplayedString" in eq){return eq.toDisplayedString()}else{return eq.toString()}};dl.Kernel.toDisplayedString=function(eq){if(eq==undefined||eq==null){return"<undefined>"}if(typeof(eq)=="string"){return eq.toDisplayedString()}if(typeof(eq)!="object"&&typeof(eq)!="function"){return eq.toString()}if("toWrittenString" in eq){return eq.toWrittenString()}if("toDisplayedString" in eq){return eq.toDisplayedString()}else{return eq.toString()}};dl.Kernel.toDomNode=function(eq){if(eq==undefined||eq==null){var er=document.createTextNode("<undefined>");return er}if(typeof(eq)=="string"){var er=document.createTextNode(eq.toWrittenString());return er}if(typeof(eq)!="object"&&typeof(eq)!="function"){var er=document.createTextNode(eq.toString());return er}if(eq.nodeType){return eq}if("toDomNode" in eq){return eq.toDomNode()}if("toWrittenString" in eq){var er=document.createTextNode(eq.toWrittenString());return er}if("toDisplayedString" in eq){var er=document.createTextNode(eq.toDisplayedString());return er}else{var er=document.createTextNode(eq.toString());return er}};dl.Kernel.Struct.prototype.toWrittenString=function(){var eq=[];eq.push("(");eq.push(this._constructorName);for(var er=0;er<this._fields.length;er++){eq.push(" ");eq.push(dl.Kernel.toWrittenString(this._fields[er]))}eq.push(")");return dl.types.String.makeInstance(eq.join(""))};dl.Kernel.Struct.prototype.toDisplayedString=dl.Kernel.Struct.prototype.toWrittenString;var dG=function(eq,er){eq.appendChild(er)};dl.Kernel.Struct.prototype.toDomNode=function(){var er=document.createElement("div");er.appendChild(document.createTextNode("("));er.appendChild(document.createTextNode(this._constructorName));for(var eq=0;eq<this._fields.length;eq++){er.appendChild(document.createTextNode(" "));dG(er,dl.Kernel.toDomNode(this._fields[eq]))}er.appendChild(document.createTextNode(")"));return er};dl.Kernel.Struct.prototype.isEqual=function(eq){if(typeof(eq)!="object"){return false}if(!eq._constructorName){return false}if(eq._constructorName!=this._constructorName){return false}if(!"_fields" in eq){return false}if(this._fields.length!=eq._fields.length){return false}for(var er=0;er<this._fields.length;er++){if(!dl.Kernel.equal_question_(this._fields[er],eq._fields[er])){return false}}return true};dl.Kernel.reportError=function(er){var eq;if(typeof(console)!="undefined"&&typeof(console.log)!="undefined"){eq=(function(es){console.log(es)})}else{eq=(function(es){alert(es)})}if(typeof er=="string"){eq(er)}else{if(er.msg){eq(er.msg)}else{eq(er.toString())}}if(dl.Kernel.lastLoc){eq("Error was raised around "+dl.Kernel.lastLoc)}};dl.Kernel._void_=function(eq){return undefined};dl.Kernel.build_dash_vector=function(et,er){dY(et,dN,"build-vector","natural",1);dY(er,dT,"build-vector","function",2);var es=[];for(var eq=0;eq<et.toInteger();eq++){es[eq]=er([dl.types.Rational.makeInstance(eq,1)])}return dl.types.Vector.makeInstance(et.toInteger(),es)};dl.Kernel.make_dash_vector=function(eq){dY(eq,dN,"make-vector","natural",1);return dl.types.Vector.makeInstance(eq.toInteger())};dl.Kernel.vector=function(eq){return dl.types.Vector.makeInstance(eq.length,eq)};dl.Kernel.vector_dash_length=function(eq){dY(eq,dF,"vector-length","vector",1);return dl.types.Rational.makeInstance(eq.length())};dl.Kernel.vector_dash_ref=function(er,eq){dY(er,dF,"vector-ref","vector",1);dY(eq,function(es){return dN(es)&&es.toInteger()<er.length()},"vector-ref","natural < vector length",2);return er.ref(eq.toInteger())};dl.Kernel.vector_dash_set_bang_=function(es,er,eq){dY(es,dF,"vector-set!","vector",1);dY(er,function(et){return dN(et)&&et.toInteger()<es.length()},"vector-set!","natural < vector length",2);return es.set(er.toInteger(),eq)};dl.Kernel.vector_question_=function(eq){return dF(eq)?dl.types.Logic.TRUE:dl.types.Logic.FALSE};dl.Kernel.check_dash_expect=function(es,eq){var et=es([]);var er=eq([]);if(!dl.Kernel.equal_question_(et,er)){throw new ei(dl.Kernel.format("~s doesn't match the expected value ~s",[et,er]))}};dl.Kernel.check_dash_within=function(eu,er,et){var ev=eu([]);var es=er([]);var eq=et([]);if(!dl.Kernel._equal__tilde_(ev,es,eq)){throw new ei(dl.Kernel.format("~s doesn't match the expected value ~s within ~s",[ev,es,eq]))}};dl.Kernel.check_dash_error=function(eq,es){var eu=es([]);var et;try{et=eq([])}catch(er){if(!dl.Kernel.equal_question_(er.msg,eu)){throw new ei(dl.Kernel.format("check-error encountered the error ~s instead of the expected error ~s.",[er.msg,eu]))}else{return}}throw new ei(dl.Kernel.format("check-error expected the error ~s, but instead received the value ~s.",[eu,et]))};dl.Kernel.lastLoc=undefined;dl.Kernel.setLastLoc=function(eq){dl.Kernel.lastLoc=eq;return true};dl.Kernel.printf=function(eq,er){var es=dl.Kernel.format(eq,er);dl.Kernel.printHook(es);return undefined};dl.Kernel.printHook=function(eq){};dl.Kernel.isSymbol=dL;dl.Kernel.isChar=dR;dl.Kernel.isString=dK;dl.Kernel.isBoolean=d7;dl.Kernel.isPair=ek;dl.Kernel.isEmpty=dU;dl.Kernel.isReal=em;dl.Kernel.isRational=d5;dl.Kernel.isComplex=d6;dl.Kernel.isInteger=dP;dl.Kernel.isNatural=dN;dl.Kernel.isNumber=en;dl.Kernel.isAlphabeticString=dV;dl.Kernel.isWhitespaceString=ec;dl.Kernel.isList=bf;dl.Kernel.isVector=dF;dl.Kernel.isFunction=dT;dl.Kernel.arrayEach=dJ;dl.Kernel.check=dY;dl.Kernel.checkList=d9;dl.Kernel.checkListof=ej;dl.Kernel.MobyError=dZ;dl.Kernel.MobyParserError=eo;dl.Kernel.MobySyntaxError=ee;dl.Kernel.MobyTypeError=d8;dl.Kernel.MobyRuntimeError=d4;dl.Kernel.attachEvent=dI;dl.Kernel.detachEvent=dS})();var dr=function(bf,dF){dl.Kernel.Struct.call(this,"make-stx:atom",[bf,dF]);this.datum=bf;this.loc=dF};dr.prototype=new dl.Kernel.Struct();var bY=function(dG,bf){var dF=new dr(dG,bf);return dF};var di=function(bf){if(J(bf)){return bf.datum}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("stx_colon_atom_dash_datum: not a stx:atom: ~s",[bf]))}};var E=function(bf){if(J(bf)){return bf.loc}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("stx_colon_atom_dash_loc: not a stx:atom: ~s",[bf]))}};var B=function(dF,bf){if(J(dF)){dF.datum=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_stx_colon_atom_dash_datum_bang_: not a stx:atom: ~s",[dF]))}};var bC=function(dF,bf){if(J(dF)){dF.loc=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_stx_colon_atom_dash_loc_bang_: not a stx:atom: ~s",[dF]))}};var J=function(bf){return(bf!=null&&bf!=undefined&&bf instanceof dr)};var bM=function(bf,dF){dl.Kernel.Struct.call(this,"make-stx:list",[bf,dF]);this.elts=bf;this.loc=dF};bM.prototype=new dl.Kernel.Struct();var aw=function(dF,bf){return new bM(dF,bf)};var aH=function(bf){if(cb(bf)){return bf.elts}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("stx_colon_list_dash_elts: not a stx:list: ~s",[bf]))}};var V=function(bf){if(cb(bf)){return bf.loc}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("stx_colon_list_dash_loc: not a stx:list: ~s",[bf]))}};var aX=function(dF,bf){if(cb(dF)){dF.elts=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_stx_colon_list_dash_elts_bang_: not a stx:list: ~s",[dF]))}};var g=function(dF,bf){if(cb(dF)){dF.loc=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_stx_colon_list_dash_loc_bang_: not a stx:list: ~s",[dF]))}};var cb=function(bf){return bf!=null&&bf!=undefined&&bf instanceof bM};var v=function(dG,bf,dF,dH){dl.Kernel.Struct.call(this,"make-Loc",[dG,bf,dF,dH]);this.offset=dG;this.line=bf;this.span=dF;this.id=dH};v.prototype=new dl.Kernel.Struct();var cr=function(dH,dG,dF,bf){return new v(dH,dG,dF,bf)};var a=function(bf){if(n(bf)){return bf.offset}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("Loc_dash_offset: not a Loc: ~s",[bf]))}};var ab=function(bf){if(n(bf)){return bf.line}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("Loc_dash_line: not a Loc: ~s",[bf]))}};var W=function(bf){if(n(bf)){return bf.span}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("Loc_dash_span: not a Loc: ~s",[bf]))}};var ba=function(bf){if(n(bf)){return bf.id}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("Loc_dash_id: not a Loc: ~s",[bf]))}};var c0=function(dF,bf){if(n(dF)){dF.offset=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_Loc_dash_offset_bang_: not a Loc: ~s",[dF]))}};var d=function(dF,bf){if(n(dF)){dF.line=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_Loc_dash_line_bang_: not a Loc: ~s",[dF]))}};var dn=function(dF,bf){if(n(dF)){dF.span=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_Loc_dash_span_bang_: not a Loc: ~s",[dF]))}};var b=function(dF,bf){if(n(dF)){dF.id=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_Loc_dash_id_bang_: not a Loc: ~s",[dF]))}};var n=function(bf){return bf!=null&&bf!=undefined&&bf instanceof v};var bH=function(bf){return(dl.Kernel.setLastLoc('offset=284 line=14 span=154 id="stx.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("offset=~a line=~a span=~a id=~s")),[(dl.Kernel.setLastLoc('offset=337 line=15 span=18 id="stx.ss"')&&a(bf)),(dl.Kernel.setLastLoc('offset=367 line=16 span=16 id="stx.ss"')&&ab(bf)),(dl.Kernel.setLastLoc('offset=395 line=17 span=16 id="stx.ss"')&&W(bf)),(dl.Kernel.setLastLoc('offset=423 line=18 span=14 id="stx.ss"')&&ba(bf))]))};var a8=function(bf){return((dl.Kernel.setLastLoc('offset=489 line=23 span=13 id="stx.ss"')&&J(bf))||(dl.Kernel.setLastLoc('offset=509 line=24 span=13 id="stx.ss"')&&cb(bf)))};var b2=function(bf){return((dl.Kernel.setLastLoc('offset=635 line=31 span=17 id="stx.ss"')&&J(bf))?(dl.Kernel.setLastLoc('offset=658 line=32 span=22 id="stx.ss"')&&di(bf)):((dl.Kernel.setLastLoc('offset=687 line=33 span=17 id="stx.ss"')&&cb(bf))?(dl.Kernel.setLastLoc('offset=710 line=34 span=21 id="stx.ss"')&&aH(bf)):(dl.Kernel.setLastLoc('offset=624 line=30 span=109 id="stx.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=624 line=30 span=109 id=\\"stx.ss\\""'))))))};var t=function(bf){return((dl.Kernel.setLastLoc('offset=797 line=40 span=17 id="stx.ss"')&&J(bf))?(dl.Kernel.setLastLoc('offset=820 line=41 span=20 id="stx.ss"')&&E(bf)):((dl.Kernel.setLastLoc('offset=847 line=42 span=17 id="stx.ss"')&&cb(bf))?(dl.Kernel.setLastLoc('offset=870 line=43 span=20 id="stx.ss"')&&V(bf)):(dl.Kernel.setLastLoc('offset=786 line=39 span=106 id="stx.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=786 line=39 span=106 id=\\"stx.ss\\""'))))))};var X=function(dF,bf){return((dl.Kernel.setLastLoc('offset=991 line=49 span=17 id="stx.ss"')&&J(dF))?dl.types.Logic.FALSE:((dl.Kernel.setLastLoc('offset=1023 line=51 span=17 id="stx.ss"')&&cb(dF))?((dl.Kernel.setLastLoc('offset=1051 line=52 span=36 id="stx.ss"')&&dl.Kernel.not((dl.Kernel.setLastLoc('offset=1056 line=52 span=30 id="stx.ss"')&&dl.Kernel.empty_question_((dl.Kernel.setLastLoc('offset=1064 line=52 span=21 id="stx.ss"')&&aH(dF))))))&&(dl.Kernel.setLastLoc('offset=1098 line=53 span=47 id="stx.ss"')&&dl.Kernel.symbol_question_((dl.Kernel.setLastLoc('offset=1107 line=53 span=37 id="stx.ss"')&&b2((dl.Kernel.setLastLoc('offset=1114 line=53 span=29 id="stx.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=1121 line=53 span=21 id="stx.ss"')&&aH(dF))))))))&&(dl.Kernel.setLastLoc('offset=1156 line=54 span=74 id="stx.ss"')&&dl.Kernel.symbol_equal__question_((dl.Kernel.setLastLoc('offset=1166 line=54 span=37 id="stx.ss"')&&b2((dl.Kernel.setLastLoc('offset=1173 line=54 span=29 id="stx.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=1180 line=54 span=21 id="stx.ss"')&&aH(dF)))))),bf))):(dl.Kernel.setLastLoc('offset=980 line=48 span=253 id="stx.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=980 line=48 span=253 id=\\"stx.ss\\""'))))))};var dC=function(bf,dF){return((dl.Kernel.setLastLoc('offset=1461 line=65 span=14 id="stx.ss"')&&a8(bf))?bf:(((dl.Kernel.setLastLoc('offset=1499 line=67 span=15 id="stx.ss"')&&dl.Kernel.pair_question_(bf))||(dl.Kernel.setLastLoc('offset=1515 line=67 span=16 id="stx.ss"')&&dl.Kernel.empty_question_(bf)))?(dl.Kernel.setLastLoc('offset=1538 line=68 span=89 id="stx.ss"')&&aw((dl.Kernel.setLastLoc('offset=1553 line=68 span=47 id="stx.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=1558 line=68 span=33 id="stx.ss"');var dG=(function(dI){var dH=dI[0];return(dl.Kernel.setLastLoc('offset=1570 line=68 span=20 id="stx.ss"')&&dC(dH,dF))});dG.toWrittenString=function(){return"<function:lambda>"};dG.toDisplayedString=dG.toWrittenString;return dG})()),[bf])),dF)):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=1644 line=71 span=29 id="stx.ss"')&&bY(bf,dF)):(dl.Kernel.setLastLoc('offset=1450 line=64 span=225 id="stx.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=1450 line=64 span=225 id=\\"stx.ss\\""')))))))};var ah=function(bf){return((dl.Kernel.setLastLoc('offset=1787 line=84 span=17 id="stx.ss"')&&J(bf))?(dl.Kernel.setLastLoc('offset=1810 line=85 span=22 id="stx.ss"')&&di(bf)):((dl.Kernel.setLastLoc('offset=1839 line=86 span=17 id="stx.ss"')&&cb(bf))?(dl.Kernel.setLastLoc('offset=1862 line=87 span=38 id="stx.ss"')&&dl.Kernel.map((function(){var dF=(function(dG){return ah(dG[0])});dF.toWrittenString=function(){return"<function:stx->datum>"};dF.toDisplayedString=function(){return"<function:stx->datum>"};return dF})(),[(dl.Kernel.setLastLoc('offset=1878 line=87 span=21 id="stx.ss"')&&aH(bf))])):(dl.Kernel.setLastLoc('offset=1776 line=83 span=126 id="stx.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=1776 line=83 span=126 id=\\"stx.ss\\""'))))))};(function(){((function(bf){}))(arguments[0]||dl.Kernel.identity)})();var dl=dl||{};dl.reader={};(function(){var dG=function(dJ){return dJ.replace(/\\./g,function(dL,dM,dK){switch(dL){case"\\b":return"\b";case"\\f":return"\f";case"\\n":return"\n";case"\\r":return"\r";case"\\t":return"\t";case"\\v":return"\v";default:return dL.substring(1)}})};var bf=function(dK){var dJ;var dL=0;for(dJ=0;dJ<dK.length;dJ++){if(dK[dJ]=="\n"){dL++}}return dL};var dF=[["whitespace",/^(\s+)/],["#;",/^([#][;])/],["comment",new RegExp("^([#][|](?:(?:\\|[^\\#])|[^\\|])*[|][#])")],["comment",/(^;[^\n]*)/],["(",/^($|\[|\{)/],[")",/^($|\]|\})/],["'",/^(\')/],["`",/^(`)/],[",@",/^(,@)/],[",",/^(,)/],["char",/^\#\\(newline|backspace)/],["char",/^\#\\(.)/],["complex",/^((?:\#[ei])?[+\-]?(?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+)?[+\-](?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+)i)/],["number",/^((?:\#[ei])?[+-]inf.0)/],["number",/^((?:\#[ei])?[+-]nan.0)/],["number",/^((?:\#[ei])?[+\-]?(?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+))/],["string",new RegExp('^"((?:([^\\\\"]|(\\\\.)))*)"')],["symbol",/^([a-zA-Z\:\+\=\~\_\?\!\@\#\$\%\^\&\*\-\/\.\>\<][\w\:\+\=\~\_\?\!\@\#\$\%\^\&\*\-\/\.\>\<]*)/]];var dI=function(dR,dJ){var dK=0;var dS=1;var dP=[];if(!dJ){dJ=""}while(true){var dN=false;for(var dL=0;dL<dF.length;dL++){var dM=dF[dL][0];var dO=dF[dL][1];var dQ=dR.match(dO);if(dQ!=null){if(dM=="string"){dQ[1]=dG(dQ[1])}if(dM!="whitespace"&&dM!="comment"){dP.push([dM,dQ[1],new v(dK,dS,dQ[0].length,dJ)])}dK=dK+dQ[0].length;dS=dS+bf(dQ[0]);dR=dR.substring(dQ[0].length);dN=true;break}}if(!dN){break}}return[dP,dR]};var dH=function(dW,d0){var dZ=aw;var d2=bY;var dK=dI(dW,d0);var dX=dK[0];var d1=undefined;if(dK[1].length>0){throw new dl.Kernel.MobyParserError("Error while tokenizing: the rest of the stream is: "+dK[1],new v(dW.length-dK[1].length,bf(dW.substring(0,dW.length-dK[1].length)),dK[1].length,d0))}var dT=dl.types.Symbol.makeInstance("quote");var dJ=dl.types.Symbol.makeInstance("quasiquote");var dY=dl.types.Symbol.makeInstance("unquote");var dL=dl.types.Symbol.makeInstance("unquote-splicing");var dQ=dl.types.Empty.EMPTY;var dN=function(d3){return(dX.length>0&&dX[0][0]==d3)};var dR=function(d4){if(dX.length==0){if(d1){throw new dl.Kernel.MobyParserError("token stream exhausted while trying to eat "+d4,d1[2])}else{throw new dl.Kernel.MobyParserError("token stream exhausted while trying to eat "+d4,new v(0,0,dW.length,d0))}}var d3=dX.shift();d1=d3;if(d3[0]==d4){return d3}else{throw new dl.Kernel.MobyParserError("Unexpected token "+d3,d3[2])}};var dP;var dU;var dM;dM=function(d4,d6){var d3=dR(d4);var d5=dP();return dZ(dl.Kernel.cons(d2(d6,d3[2]),dl.Kernel.cons(d5,dQ)),new v(d3[2].offset,d3[2].line,(d5.loc.offset-d3[2].offset+d5.loc.span),""))};var dO=function(d3){switch(d3){case"(":return")";case"[":return"]";case"{":return"}";default:throw new Error()}};var dV=function(d6,d5){var d4=d6.match(/([+\-]?\d+)\/(\d+)/);if(d6=="+inf.0"){return dl.types.FloatPoint.makeInstance(Number.POSITIVE_INFINITY)}else{if(d6=="-inf.0"){return dl.types.FloatPoint.makeInstance(Number.NEGATIVE_INFINITY)}else{if(d6=="+nan.0"||d6=="-nan.0"){return dl.types.FloatPoint.makeInstance(Number.NaN)}else{if(d6.match(/\./)){if(d5){var d3=d6.match("^(.*)[.](.*)$");return dl.types.NumberTower.add(dl.types.Rational.makeInstance(parseInt(d3[1]||"0")),dl.types.Rational.makeInstance(parseInt(d3[2]),Math.pow(10,d3[2].length)))}else{return dl.types.FloatPoint.makeInstance(parseFloat(d6))}}else{if(d4){if(d5){return dl.types.Rational.makeInstance(parseInt(d4[1]),parseInt(d4[2]))}else{return dl.types.FloatPoint.makeInstance(parseInt(d4[1])/parseInt(d4[2]))}}else{if(d5){return dl.types.Rational.makeInstance(parseInt(d6),1)}else{return dl.types.FloatPoint.makeInstance(parseInt(d6))}}}}}}};dP=function(){if(dX.length==0){if(d1){throw new dl.Kernel.MobyParserError("Parse broke with empty token stream",d1[2])}else{throw new dl.Kernel.MobyParserError("Parse broke with empty token stream",new v(0,0,dW.length,d0))}}switch(dX[0][0]){case"(":var ee=dR("(");var ea=ee[1];var d8=dO(ee[1]);var eg=dU();if(dX.length==0){throw new dl.Kernel.MobyParserError("Expected a "+d8+" to close "+ea,ee[2])}else{if(dX[0][1]!=d8){throw new dl.Kernel.MobyParserError("Expected a "+d8+" to close "+ea,dX[0][2])}}var ec=dR(")");return aw(eg,new v(ee[2].offset,ee[2].line,ec[2].offset-ee[2].offset+1,""));case"#;":var d7=dR("#;");var d6=dP();return dP();case"'":return dM("'",dT);case"`":return dM("`",dJ);case",":return dM(",",dY);case",@":return dM(",@",dL);case"number":var ef=dR("number");var ed=ef[1].match(/^(\#[ie])(.+)$/);if(ed){if(ed[1]=="#i"){return d2(dV(ed[2],false),ef[2])}else{return d2(dV(ed[2],true),ef[2])}}else{return d2(dV(ef[1],true),ef[2])}case"complex":var ef=dR("complex");var d5=ef[1].match(/^((?:\#[ei])?)([+\-]?(?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+)?)([+\-](?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+))i/);var d4=(d5[1]=="#i"?false:true);var eb=(d5[2]!=""?dV(d5[2],d4):dl.types.Rational.ZERO);var d9=dV(d5[3],d4);var d3=d2(dl.types.Complex.makeInstance(eb,d9));return d3;case"string":var ef=dR("string");return d2(dl.types.String.makeInstance(ef[1]),ef[2]);case"char":var ef=dR("char");if(ef[1]=="newline"){return d2(dl.types.Char.makeInstance("\n"),ef[2])}else{if(ef[1]=="backspace"){return d2(dl.types.Char.makeInstance(String.fromCharCode(8)),ef[2])}else{return d2(dl.types.Char.makeInstance(ef[1]),ef[2])}}case"symbol":var ef=dR("symbol");if(ef[1]=="."){throw new dl.Kernel.MobyParserError("Dotted pairs are not currently accepted by Moby",ef[2])}return d2(dl.types.Symbol.makeInstance(ef[1]),ef[2]);default:throw new dl.Kernel.MobyParserError("Parse broke with token stream "+dX,dX[0][2])}};dU=function(){var d3=dl.types.Empty.EMPTY;while(true){if(dX.length==0||dN(")")){break}else{if(dN("#;")){dR("#;");var d4=dP()}else{var d5=dP();d3=dl.types.Cons.makeInstance(d5,d3)}}}return dl.Kernel.reverse(d3)};var dS=dU();if(dX.length>0){throw new dl.Kernel.MobyParserError("More elements in the program's token stream than expected: the next unconsumed token is: "+dX[0][1],dX[0][2])}return dS};dl.reader.tokenize=dI;dl.reader.readSchemeExpressions=dH}());var cv=function(){dl.Kernel.Struct.call(this,"make-permission:location",[])};cv.prototype=new dl.Kernel.Struct();var S=function(){return new cv()};var cs=function(bf){return bf!=null&&bf!=undefined&&bf instanceof cv};var bB=function(){dl.Kernel.Struct.call(this,"make-permission:send-sms",[])};bB.prototype=new dl.Kernel.Struct();var cX=function(){return new bB()};var a7=function(bf){return bf!=null&&bf!=undefined&&bf instanceof bB};var s=function(){dl.Kernel.Struct.call(this,"make-permission:receive-sms",[])};s.prototype=new dl.Kernel.Struct();var cI=function(){return new s()};var I=function(bf){return bf!=null&&bf!=undefined&&bf instanceof s};var ce=function(){dl.Kernel.Struct.call(this,"make-permission:tilt",[])};ce.prototype=new dl.Kernel.Struct();var aO=function(){return new ce()};var Y=function(bf){return bf!=null&&bf!=undefined&&bf instanceof ce};var bu=function(){dl.Kernel.Struct.call(this,"make-permission:shake",[])};bu.prototype=new dl.Kernel.Struct();var c1=function(){return new bu()};var aT=function(bf){return bf!=null&&bf!=undefined&&bf instanceof bu};var dv=function(){dl.Kernel.Struct.call(this,"make-permission:internet",[])};dv.prototype=new dl.Kernel.Struct();var aS=function(){return new dv()};var dx=function(bf){return bf!=null&&bf!=undefined&&bf instanceof dv};var b9=function(){dl.Kernel.Struct.call(this,"make-permission:telephony",[])};b9.prototype=new dl.Kernel.Struct();var bm=function(){return new b9()};var bn=function(bf){return bf!=null&&bf!=undefined&&bf instanceof b9};var by=function(){dl.Kernel.Struct.call(this,"make-permission:wake-lock",[])};by.prototype=new dl.Kernel.Struct();var u=function(){return new by()};var de=function(bf){return bf!=null&&bf!=undefined&&bf instanceof by};var cy=function(bf){dl.Kernel.Struct.call(this,"make-permission:open-image-url",[bf]);this.url=bf};cy.prototype=new dl.Kernel.Struct();var bK=function(bf){return new cy(bf)};var bL=function(bf){if(c(bf)){return bf.url}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("permission:open-image-url-url: not a permission:open-image-url: ~s",[bf]))}};var aA=function(dF,bf){if(c(dF)){dF.url=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_permission_colon_open_dash_image_dash_url_dash_url_bang_: not a permission:open-image-url: ~s",[dF]))}};var c=function(bf){return bf!=null&&bf!=undefined&&bf instanceof cy};var an=function(bf){return((dl.Kernel.setLastLoc('offset=512 line=17 span=28 id="permission.ss"')&&cs(bf))||(dl.Kernel.setLastLoc('offset=547 line=18 span=28 id="permission.ss"')&&a7(bf))||(dl.Kernel.setLastLoc('offset=582 line=19 span=31 id="permission.ss"')&&I(bf))||(dl.Kernel.setLastLoc('offset=620 line=20 span=24 id="permission.ss"')&&Y(bf))||(dl.Kernel.setLastLoc('offset=651 line=21 span=25 id="permission.ss"')&&aT(bf))||(dl.Kernel.setLastLoc('offset=683 line=22 span=28 id="permission.ss"')&&dx(bf))||(dl.Kernel.setLastLoc('offset=718 line=23 span=29 id="permission.ss"')&&bn(bf))||(dl.Kernel.setLastLoc('offset=754 line=24 span=29 id="permission.ss"')&&de(bf))||(dl.Kernel.setLastLoc('offset=790 line=25 span=34 id="permission.ss"')&&c(bf)))};var ds;var cV;var N;var bA;var H;var R;var bb;var cS;var A=function(bf){return((dl.Kernel.setLastLoc('offset=1465 line=42 span=35 id="permission.ss"')&&cs(bf))?(dl.types.String.makeInstance("PERMISSION:LOCATION")):((dl.Kernel.setLastLoc('offset=1534 line=44 span=35 id="permission.ss"')&&a7(bf))?(dl.types.String.makeInstance("PERMISSION:SEND-SMS")):((dl.Kernel.setLastLoc('offset=1603 line=46 span=38 id="permission.ss"')&&I(bf))?(dl.types.String.makeInstance("PERMISSION:RECEIVE-SMS")):((dl.Kernel.setLastLoc('offset=1678 line=48 span=31 id="permission.ss"')&&Y(bf))?(dl.types.String.makeInstance("PERMISSION:TILT")):((dl.Kernel.setLastLoc('offset=1739 line=50 span=32 id="permission.ss"')&&aT(bf))?(dl.types.String.makeInstance("PERMISSION:SHAKE")):((dl.Kernel.setLastLoc('offset=1802 line=52 span=35 id="permission.ss"')&&dx(bf))?(dl.types.String.makeInstance("PERMISSION:INTERNET")):((dl.Kernel.setLastLoc('offset=1871 line=54 span=36 id="permission.ss"')&&bn(bf))?(dl.types.String.makeInstance("PERMISSION:TELEPHONY")):((dl.Kernel.setLastLoc('offset=1942 line=56 span=36 id="permission.ss"')&&de(bf))?(dl.types.String.makeInstance("PERMISSION:WAKE-LOCK")):((dl.Kernel.setLastLoc('offset=2013 line=58 span=41 id="permission.ss"')&&c(bf))?(dl.Kernel.setLastLoc('offset=2060 line=59 span=84 id="permission.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL ~a")),[(dl.Kernel.setLastLoc('offset=2099 line=59 span=44 id="permission.ss"')&&bL(bf))])):(dl.Kernel.setLastLoc('offset=1454 line=41 span=692 id="permission.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=1454 line=41 span=692 id=\\"permission.ss\\""')))))))))))))};var bs=function(bf){return((dl.Kernel.setLastLoc('offset=2242 line=65 span=38 id="permission.ss"')&&dl.Kernel.string_equal__question_(bf,(dl.types.String.makeInstance("PERMISSION:LOCATION")),[]))?ds:((dl.Kernel.setLastLoc('offset=2312 line=67 span=38 id="permission.ss"')&&dl.Kernel.string_equal__question_(bf,(dl.types.String.makeInstance("PERMISSION:SEND-SMS")),[]))?cV:((dl.Kernel.setLastLoc('offset=2387 line=69 span=41 id="permission.ss"')&&dl.Kernel.string_equal__question_(bf,(dl.types.String.makeInstance("PERMISSION:RECEIVE-SMS")),[]))?N:((dl.Kernel.setLastLoc('offset=2463 line=71 span=34 id="permission.ss"')&&dl.Kernel.string_equal__question_(bf,(dl.types.String.makeInstance("PERMISSION:TILT")),[]))?bA:((dl.Kernel.setLastLoc('offset=2525 line=73 span=35 id="permission.ss"')&&dl.Kernel.string_equal__question_(bf,(dl.types.String.makeInstance("PERMISSION:SHAKE")),[]))?H:((dl.Kernel.setLastLoc('offset=2589 line=75 span=38 id="permission.ss"')&&dl.Kernel.string_equal__question_(bf,(dl.types.String.makeInstance("PERMISSION:INTERNET")),[]))?R:((dl.Kernel.setLastLoc('offset=2659 line=77 span=39 id="permission.ss"')&&dl.Kernel.string_equal__question_(bf,(dl.types.String.makeInstance("PERMISSION:TELEPHONY")),[]))?bb:((dl.Kernel.setLastLoc('offset=2731 line=79 span=39 id="permission.ss"')&&dl.Kernel.string_equal__question_(bf,(dl.types.String.makeInstance("PERMISSION:WAKE-LOCK")),[]))?cS:(((dl.Kernel.setLastLoc('offset=2808 line=81 span=82 id="permission.ss"')&&dl.Kernel._greaterthan_((dl.Kernel.setLastLoc('offset=2811 line=81 span=21 id="permission.ss"')&&dl.Kernel.string_dash_length(bf)),(dl.Kernel.setLastLoc('offset=2846 line=82 span=43 id="permission.ss"')&&dl.Kernel.string_dash_length((dl.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL")))),[]))&&(dl.Kernel.setLastLoc('offset=2901 line=83 span=122 id="permission.ss"')&&dl.Kernel.string_equal__question_((dl.Kernel.setLastLoc('offset=2911 line=83 span=63 id="permission.ss"')&&dl.Kernel.substring(bf,(dl.types.Rational.makeInstance(0,1)),(dl.Kernel.setLastLoc('offset=2930 line=83 span=43 id="permission.ss"')&&dl.Kernel.string_dash_length((dl.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL")))))),(dl.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL")),[])))?(dl.Kernel.setLastLoc('offset=3030 line=85 span=220 id="permission.ss"')&&bK((dl.Kernel.setLastLoc('offset=3062 line=85 span=187 id="permission.ss"')&&dl.Kernel.substring(bf,(dl.Kernel.setLastLoc('offset=3128 line=86 span=50 id="permission.ss"')&&dl.Kernel.add1((dl.Kernel.setLastLoc('offset=3134 line=86 span=43 id="permission.ss"')&&dl.Kernel.string_dash_length((dl.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL")))))),(dl.Kernel.setLastLoc('offset=3227 line=87 span=21 id="permission.ss"')&&dl.Kernel.string_dash_length(bf)))))):(dl.Kernel.setLastLoc('offset=2231 line=64 span=1021 id="permission.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=2231 line=64 span=1021 id=\\"permission.ss\\""')))))))))))))};var O=function(bf){return((dl.Kernel.setLastLoc('offset=3392 line=95 span=35 id="permission.ss"')&&cs(bf))?(dl.Kernel.setLastLoc('offset=3433 line=96 span=103 id="permission.ss"')&&dl.Kernel.list([(dl.types.String.makeInstance("android.permission.ACCESS_COARSE_LOCATION")),(dl.types.String.makeInstance("android.permission.ACCESS_FINE_LOCATION"))])):((dl.Kernel.setLastLoc('offset=3543 line=98 span=35 id="permission.ss"')&&a7(bf))?(dl.Kernel.setLastLoc('offset=3584 line=99 span=36 id="permission.ss"')&&dl.Kernel.list([(dl.types.String.makeInstance("android.permission.SEND_SMS"))])):((dl.Kernel.setLastLoc('offset=3627 line=100 span=38 id="permission.ss"')&&I(bf))?(dl.Kernel.setLastLoc('offset=3671 line=101 span=39 id="permission.ss"')&&dl.Kernel.list([(dl.types.String.makeInstance("android.permission.RECEIVE_SMS"))])):((dl.Kernel.setLastLoc('offset=3717 line=102 span=31 id="permission.ss"')&&Y(bf))?(dl.Kernel.setLastLoc('offset=3754 line=103 span=6 id="permission.ss"')&&dl.Kernel.list([])):((dl.Kernel.setLastLoc('offset=3767 line=104 span=32 id="permission.ss"')&&aT(bf))?(dl.Kernel.setLastLoc('offset=3805 line=105 span=6 id="permission.ss"')&&dl.Kernel.list([])):((dl.Kernel.setLastLoc('offset=3818 line=106 span=35 id="permission.ss"')&&dx(bf))?(dl.Kernel.setLastLoc('offset=3859 line=107 span=36 id="permission.ss"')&&dl.Kernel.list([(dl.types.String.makeInstance("android.permission.INTERNET"))])):((dl.Kernel.setLastLoc('offset=3902 line=108 span=36 id="permission.ss"')&&bn(bf))?(dl.Kernel.setLastLoc('offset=3944 line=109 span=49 id="permission.ss"')&&dl.Kernel.list([(dl.types.String.makeInstance("android.permission.ACCESS_COARSE_UPDATES"))])):((dl.Kernel.setLastLoc('offset=4000 line=110 span=36 id="permission.ss"')&&de(bf))?(dl.Kernel.setLastLoc('offset=4042 line=111 span=37 id="permission.ss"')&&dl.Kernel.list([(dl.types.String.makeInstance("android.permission.WAKE_LOCK"))])):((dl.Kernel.setLastLoc('offset=4086 line=112 span=41 id="permission.ss"')&&c(bf))?(dl.Kernel.setLastLoc('offset=4133 line=113 span=6 id="permission.ss"')&&dl.Kernel.list([])):(dl.Kernel.setLastLoc('offset=3381 line=94 span=760 id="permission.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=3381 line=94 span=760 id=\\"permission.ss\\""')))))))))))))};var aZ=function(bf){return((dl.Kernel.setLastLoc('offset=4258 line=119 span=35 id="permission.ss"')&&cs(bf))?(dl.types.String.makeInstance("plt.platform.Platform.getInstance().getLocationService().startService();\n plt.platform.Platform.getInstance().getLocationService().addLocationChangeListener(listener);")):((dl.Kernel.setLastLoc('offset=4480 line=122 span=35 id="permission.ss"')&&a7(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=4530 line=124 span=38 id="permission.ss"')&&I(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=4583 line=126 span=31 id="permission.ss"')&&Y(bf))?(dl.types.String.makeInstance("plt.platform.Platform.getInstance().getTiltService().startService();\n plt.platform.Platform.getInstance().getTiltService().addOrientationChangeListener(listener);\n plt.platform.Platform.getInstance().getTiltService().addAccelerationChangeListener(listener);\n plt.platform.Platform.getInstance().getTiltService().addShakeListener(listener);")):((dl.Kernel.setLastLoc('offset=4988 line=132 span=32 id="permission.ss"')&&aT(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5042 line=135 span=35 id="permission.ss"')&&dx(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5092 line=137 span=36 id="permission.ss"')&&bn(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5143 line=139 span=36 id="permission.ss"')&&de(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5194 line=141 span=41 id="permission.ss"')&&c(bf))?(dl.types.String.makeInstance("")):(dl.Kernel.setLastLoc('offset=4247 line=118 span=998 id="permission.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=4247 line=118 span=998 id=\\"permission.ss\\""')))))))))))))};var bg=function(bf){return((dl.Kernel.setLastLoc('offset=5362 line=148 span=35 id="permission.ss"')&&cs(bf))?(dl.types.String.makeInstance("plt.platform.Platform.getInstance().getLocationService().shutdownService();")):((dl.Kernel.setLastLoc('offset=5487 line=150 span=35 id="permission.ss"')&&a7(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5537 line=152 span=38 id="permission.ss"')&&I(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5590 line=154 span=31 id="permission.ss"')&&Y(bf))?(dl.types.String.makeInstance("plt.platform.Platform.getInstance().getTiltService().shutdownService();")):((dl.Kernel.setLastLoc('offset=5707 line=156 span=32 id="permission.ss"')&&aT(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5754 line=158 span=35 id="permission.ss"')&&dx(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5804 line=160 span=36 id="permission.ss"')&&bn(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5855 line=162 span=36 id="permission.ss"')&&de(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5906 line=164 span=41 id="permission.ss"')&&c(bf))?(dl.types.String.makeInstance("")):(dl.Kernel.setLastLoc('offset=5351 line=147 span=606 id="permission.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=5351 line=147 span=606 id=\\"permission.ss\\""')))))))))))))};var cu=function(bf){return((dl.Kernel.setLastLoc('offset=6078 line=171 span=35 id="permission.ss"')&&cs(bf))?(dl.types.String.makeInstance("plt.platform.Platform.getInstance().getLocationService().shutdownService();")):((dl.Kernel.setLastLoc('offset=6203 line=173 span=35 id="permission.ss"')&&a7(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=6253 line=175 span=38 id="permission.ss"')&&I(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=6306 line=177 span=31 id="permission.ss"')&&Y(bf))?(dl.types.String.makeInstance("plt.platform.Platform.getInstance().getTiltService().shutdownService();")):((dl.Kernel.setLastLoc('offset=6423 line=179 span=32 id="permission.ss"')&&aT(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=6470 line=181 span=35 id="permission.ss"')&&dx(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=6520 line=183 span=36 id="permission.ss"')&&bn(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=6571 line=185 span=36 id="permission.ss"')&&de(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=6622 line=187 span=41 id="permission.ss"')&&c(bf))?(dl.types.String.makeInstance("")):(dl.Kernel.setLastLoc('offset=6067 line=170 span=606 id="permission.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=6067 line=170 span=606 id=\\"permission.ss\\""')))))))))))))};var aW=function(bf,dF,dH,dG,dI){dl.Kernel.Struct.call(this,"make-rbtree",[bf,dF,dH,dG,dI]);this.color=bf;this.key=dF;this.value=dH;this.lkid=dG;this.rkid=dI};aW.prototype=new dl.Kernel.Struct();var D=function(dI,dH,dG,dF,bf){return new aW(dI,dH,dG,dF,bf)};var G=function(bf){if(a2(bf)){return bf.color}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("rbtree-color: not a rbtree: ~s",[bf]))}};var bQ=function(bf){if(a2(bf)){return bf.key}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("rbtree-key: not a rbtree: ~s",[bf]))}};var az=function(bf){if(a2(bf)){return bf.value}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("rbtree-value: not a rbtree: ~s",[bf]))}};var dz=function(bf){if(a2(bf)){return bf.lkid}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("rbtree-lkid: not a rbtree: ~s",[bf]))}};var ar=function(bf){if(a2(bf)){return bf.rkid}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("rbtree-rkid: not a rbtree: ~s",[bf]))}};var c9=function(dF,bf){if(a2(dF)){dF.color=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_rbtree_dash_color_bang_: not a rbtree: ~s",[dF]))}};var bE=function(dF,bf){if(a2(dF)){dF.key=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_rbtree_dash_key_bang_: not a rbtree: ~s",[dF]))}};var m=function(dF,bf){if(a2(dF)){dF.value=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_rbtree_dash_value_bang_: not a rbtree: ~s",[dF]))}};var cY=function(dF,bf){if(a2(dF)){dF.lkid=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_rbtree_dash_lkid_bang_: not a rbtree: ~s",[dF]))}};var be=function(dF,bf){if(a2(dF)){dF.rkid=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_rbtree_dash_rkid_bang_: not a rbtree: ~s",[dF]))}};var a2=function(bf){return bf!=null&&bf!=undefined&&bf instanceof aW};var bc;var a1=function(bf){return(dl.Kernel.setLastLoc('offset=335 line=13 span=20 id="rbtree.ss"')&&dl.Kernel.eq_question_(bf,bc))};var b6=function(bf){return(dl.Kernel.setLastLoc('offset=417 line=17 span=12 id="rbtree.ss"')&&dl.Kernel.eq_question_(bf,(dl.types.Symbol.makeInstance("red"))))};var db=function(bf){return(dl.Kernel.setLastLoc('offset=495 line=21 span=14 id="rbtree.ss"')&&dl.Kernel.eq_question_(bf,(dl.types.Symbol.makeInstance("black"))))};var aR=function(dG,dF,bf){return((dl.Kernel.setLastLoc('offset=631 line=26 span=17 id="rbtree.ss"')&&a1(dF))?dl.types.Logic.FALSE:((dl.Kernel.setLastLoc('offset=672 line=28 span=22 id="rbtree.ss"')&&dG.apply(null,[[bf,(dl.Kernel.setLastLoc('offset=679 line=28 span=14 id="rbtree.ss"')&&bQ(dF))]]))?(dl.Kernel.setLastLoc('offset=705 line=29 span=37 id="rbtree.ss"')&&aR(dG,(dl.Kernel.setLastLoc('offset=724 line=29 span=15 id="rbtree.ss"')&&dz(dF)),bf)):((dl.Kernel.setLastLoc('offset=753 line=30 span=22 id="rbtree.ss"')&&dG.apply(null,[[(dl.Kernel.setLastLoc('offset=758 line=30 span=14 id="rbtree.ss"')&&bQ(dF)),bf]]))?(dl.Kernel.setLastLoc('offset=785 line=31 span=37 id="rbtree.ss"')&&aR(dG,(dl.Kernel.setLastLoc('offset=804 line=31 span=15 id="rbtree.ss"')&&ar(dF)),bf)):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=848 line=33 span=38 id="rbtree.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=854 line=33 span=14 id="rbtree.ss"')&&bQ(dF)),(dl.Kernel.setLastLoc('offset=869 line=33 span=16 id="rbtree.ss"')&&az(dF))])):(dl.Kernel.setLastLoc('offset=624 line=26 span=264 id="rbtree.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=624 line=26 span=264 id=\\"rbtree.ss\\""'))))))))};var o=function(dH,dG,dF,bf){return((function(){var dI=function(dJ){return((dl.Kernel.setLastLoc('offset=1039 line=39 span=17 id="rbtree.ss"')&&a1(dJ))?(dl.Kernel.setLastLoc('offset=1057 line=39 span=48 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("red")),dF,bf,bc,bc)):((dl.Kernel.setLastLoc('offset=1126 line=40 span=22 id="rbtree.ss"')&&dH.apply(null,[[dF,(dl.Kernel.setLastLoc('offset=1133 line=40 span=14 id="rbtree.ss"')&&bQ(dJ))]]))?(dl.Kernel.setLastLoc('offset=1168 line=41 span=103 id="rbtree.ss"')&&dj((dl.Kernel.setLastLoc('offset=1184 line=41 span=16 id="rbtree.ss"')&&G(dJ)),(dl.Kernel.setLastLoc('offset=1201 line=41 span=14 id="rbtree.ss"')&&bQ(dJ)),(dl.Kernel.setLastLoc('offset=1216 line=41 span=16 id="rbtree.ss"')&&az(dJ)),(dl.Kernel.setLastLoc('offset=1233 line=41 span=21 id="rbtree.ss"')&&dI((dl.Kernel.setLastLoc('offset=1238 line=41 span=15 id="rbtree.ss"')&&dz(dJ)))),(dl.Kernel.setLastLoc('offset=1255 line=41 span=15 id="rbtree.ss"')&&ar(dJ)))):((dl.Kernel.setLastLoc('offset=1292 line=42 span=22 id="rbtree.ss"')&&dH.apply(null,[[(dl.Kernel.setLastLoc('offset=1297 line=42 span=14 id="rbtree.ss"')&&bQ(dJ)),dF]]))?(dl.Kernel.setLastLoc('offset=1334 line=43 span=103 id="rbtree.ss"')&&dj((dl.Kernel.setLastLoc('offset=1350 line=43 span=16 id="rbtree.ss"')&&G(dJ)),(dl.Kernel.setLastLoc('offset=1367 line=43 span=14 id="rbtree.ss"')&&bQ(dJ)),(dl.Kernel.setLastLoc('offset=1382 line=43 span=16 id="rbtree.ss"')&&az(dJ)),(dl.Kernel.setLastLoc('offset=1399 line=43 span=15 id="rbtree.ss"')&&dz(dJ)),(dl.Kernel.setLastLoc('offset=1415 line=43 span=21 id="rbtree.ss"')&&dI((dl.Kernel.setLastLoc('offset=1420 line=43 span=15 id="rbtree.ss"')&&ar(dJ)))))):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=1482 line=45 span=66 id="rbtree.ss"')&&D((dl.Kernel.setLastLoc('offset=1495 line=45 span=16 id="rbtree.ss"')&&G(dJ)),dF,bf,(dl.Kernel.setLastLoc('offset=1516 line=45 span=15 id="rbtree.ss"')&&dz(dJ)),(dl.Kernel.setLastLoc('offset=1532 line=45 span=15 id="rbtree.ss"')&&ar(dJ)))):(dl.Kernel.setLastLoc('offset=1032 line=39 span=518 id="rbtree.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=1032 line=39 span=518 id=\\"rbtree.ss\\""'))))))))};(function(dJ){})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=1557 line=46 span=110 id="rbtree.ss"')&&(((function(){dl.Kernel.setLastLoc('offset=1557 line=46 span=110 id="rbtree.ss"');var dJ=(function(dL){var dK=dL[0];return(dl.Kernel.setLastLoc('offset=1582 line=47 span=84 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("black")),(dl.Kernel.setLastLoc('offset=1602 line=47 span=14 id="rbtree.ss"')&&bQ(dK)),(dl.Kernel.setLastLoc('offset=1617 line=47 span=16 id="rbtree.ss"')&&az(dK)),(dl.Kernel.setLastLoc('offset=1634 line=47 span=15 id="rbtree.ss"')&&dz(dK)),(dl.Kernel.setLastLoc('offset=1650 line=47 span=15 id="rbtree.ss"')&&ar(dK))))});dJ.toWrittenString=function(){return"<function:lambda>"};dJ.toDisplayedString=dJ.toWrittenString;return dJ})())).apply(null,[[(dl.Kernel.setLastLoc('offset=1566 line=46 span=7 id="rbtree.ss"')&&dI(dG))]]))})())};var dj=function(dI,dG,dF,bf,dH){return(((dl.Kernel.setLastLoc('offset=1792 line=52 span=23 id="rbtree.ss"')&&db(dI))&&(dl.Kernel.setLastLoc('offset=1816 line=52 span=36 id="rbtree.ss"')&&b6((dl.Kernel.setLastLoc('offset=1835 line=52 span=16 id="rbtree.ss"')&&G(bf))))&&(dl.Kernel.setLastLoc('offset=1853 line=52 span=50 id="rbtree.ss"')&&b6((dl.Kernel.setLastLoc('offset=1872 line=52 span=30 id="rbtree.ss"')&&G((dl.Kernel.setLastLoc('offset=1886 line=52 span=15 id="rbtree.ss"')&&dz(bf)))))))?(dl.Kernel.setLastLoc('offset=1914 line=53 span=305 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("red")),(dl.Kernel.setLastLoc('offset=1932 line=53 span=14 id="rbtree.ss"')&&bQ(bf)),(dl.Kernel.setLastLoc('offset=1947 line=53 span=16 id="rbtree.ss"')&&az(bf)),(dl.Kernel.setLastLoc('offset=1984 line=54 span=171 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("black")),(dl.Kernel.setLastLoc('offset=2004 line=54 span=28 id="rbtree.ss"')&&bQ((dl.Kernel.setLastLoc('offset=2016 line=54 span=15 id="rbtree.ss"')&&dz(bf)))),(dl.Kernel.setLastLoc('offset=2033 line=54 span=30 id="rbtree.ss"')&&az((dl.Kernel.setLastLoc('offset=2047 line=54 span=15 id="rbtree.ss"')&&dz(bf)))),(dl.Kernel.setLastLoc('offset=2095 line=55 span=29 id="rbtree.ss"')&&dz((dl.Kernel.setLastLoc('offset=2108 line=55 span=15 id="rbtree.ss"')&&dz(bf)))),(dl.Kernel.setLastLoc('offset=2125 line=55 span=29 id="rbtree.ss"')&&ar((dl.Kernel.setLastLoc('offset=2138 line=55 span=15 id="rbtree.ss"')&&dz(bf)))))),(dl.Kernel.setLastLoc('offset=2176 line=56 span=42 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("black")),dG,dF,(dl.Kernel.setLastLoc('offset=2200 line=56 span=15 id="rbtree.ss"')&&ar(bf)),dH)))):(((dl.Kernel.setLastLoc('offset=2235 line=57 span=23 id="rbtree.ss"')&&db(dI))&&(dl.Kernel.setLastLoc('offset=2259 line=57 span=36 id="rbtree.ss"')&&b6((dl.Kernel.setLastLoc('offset=2278 line=57 span=16 id="rbtree.ss"')&&G(bf))))&&(dl.Kernel.setLastLoc('offset=2296 line=57 span=50 id="rbtree.ss"')&&b6((dl.Kernel.setLastLoc('offset=2315 line=57 span=30 id="rbtree.ss"')&&G((dl.Kernel.setLastLoc('offset=2329 line=57 span=15 id="rbtree.ss"')&&ar(bf)))))))?(dl.Kernel.setLastLoc('offset=2357 line=58 span=274 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("red")),(dl.Kernel.setLastLoc('offset=2375 line=58 span=28 id="rbtree.ss"')&&bQ((dl.Kernel.setLastLoc('offset=2387 line=58 span=15 id="rbtree.ss"')&&ar(bf)))),(dl.Kernel.setLastLoc('offset=2404 line=58 span=30 id="rbtree.ss"')&&az((dl.Kernel.setLastLoc('offset=2418 line=58 span=15 id="rbtree.ss"')&&ar(bf)))),(dl.Kernel.setLastLoc('offset=2455 line=59 span=98 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("black")),(dl.Kernel.setLastLoc('offset=2475 line=59 span=14 id="rbtree.ss"')&&bQ(bf)),(dl.Kernel.setLastLoc('offset=2490 line=59 span=16 id="rbtree.ss"')&&az(bf)),(dl.Kernel.setLastLoc('offset=2507 line=59 span=15 id="rbtree.ss"')&&dz(bf)),(dl.Kernel.setLastLoc('offset=2523 line=59 span=29 id="rbtree.ss"')&&dz((dl.Kernel.setLastLoc('offset=2536 line=59 span=15 id="rbtree.ss"')&&ar(bf)))))),(dl.Kernel.setLastLoc('offset=2574 line=60 span=56 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("black")),dG,dF,(dl.Kernel.setLastLoc('offset=2598 line=60 span=29 id="rbtree.ss"')&&ar((dl.Kernel.setLastLoc('offset=2611 line=60 span=15 id="rbtree.ss"')&&ar(bf)))),dH)))):(((dl.Kernel.setLastLoc('offset=2647 line=61 span=23 id="rbtree.ss"')&&db(dI))&&(dl.Kernel.setLastLoc('offset=2671 line=61 span=36 id="rbtree.ss"')&&b6((dl.Kernel.setLastLoc('offset=2690 line=61 span=16 id="rbtree.ss"')&&G(dH))))&&(dl.Kernel.setLastLoc('offset=2708 line=61 span=50 id="rbtree.ss"')&&b6((dl.Kernel.setLastLoc('offset=2727 line=61 span=30 id="rbtree.ss"')&&G((dl.Kernel.setLastLoc('offset=2741 line=61 span=15 id="rbtree.ss"')&&dz(dH)))))))?(dl.Kernel.setLastLoc('offset=2769 line=62 span=274 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("red")),(dl.Kernel.setLastLoc('offset=2787 line=62 span=28 id="rbtree.ss"')&&bQ((dl.Kernel.setLastLoc('offset=2799 line=62 span=15 id="rbtree.ss"')&&dz(dH)))),(dl.Kernel.setLastLoc('offset=2816 line=62 span=30 id="rbtree.ss"')&&az((dl.Kernel.setLastLoc('offset=2830 line=62 span=15 id="rbtree.ss"')&&dz(dH)))),(dl.Kernel.setLastLoc('offset=2867 line=63 span=56 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("black")),dG,dF,bf,(dl.Kernel.setLastLoc('offset=2893 line=63 span=29 id="rbtree.ss"')&&dz((dl.Kernel.setLastLoc('offset=2906 line=63 span=15 id="rbtree.ss"')&&dz(dH)))))),(dl.Kernel.setLastLoc('offset=2944 line=64 span=98 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("black")),(dl.Kernel.setLastLoc('offset=2964 line=64 span=14 id="rbtree.ss"')&&bQ(dH)),(dl.Kernel.setLastLoc('offset=2979 line=64 span=16 id="rbtree.ss"')&&az(dH)),(dl.Kernel.setLastLoc('offset=2996 line=64 span=29 id="rbtree.ss"')&&ar((dl.Kernel.setLastLoc('offset=3009 line=64 span=15 id="rbtree.ss"')&&dz(dH)))),(dl.Kernel.setLastLoc('offset=3026 line=64 span=15 id="rbtree.ss"')&&ar(dH)))))):(((dl.Kernel.setLastLoc('offset=3059 line=65 span=23 id="rbtree.ss"')&&db(dI))&&(dl.Kernel.setLastLoc('offset=3083 line=65 span=36 id="rbtree.ss"')&&b6((dl.Kernel.setLastLoc('offset=3102 line=65 span=16 id="rbtree.ss"')&&G(dH))))&&(dl.Kernel.setLastLoc('offset=3120 line=65 span=50 id="rbtree.ss"')&&b6((dl.Kernel.setLastLoc('offset=3139 line=65 span=30 id="rbtree.ss"')&&G((dl.Kernel.setLastLoc('offset=3153 line=65 span=15 id="rbtree.ss"')&&ar(dH)))))))?(dl.Kernel.setLastLoc('offset=3181 line=66 span=305 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("red")),(dl.Kernel.setLastLoc('offset=3199 line=66 span=14 id="rbtree.ss"')&&bQ(dH)),(dl.Kernel.setLastLoc('offset=3214 line=66 span=16 id="rbtree.ss"')&&az(dH)),(dl.Kernel.setLastLoc('offset=3251 line=67 span=42 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("black")),dG,dF,bf,(dl.Kernel.setLastLoc('offset=3277 line=67 span=15 id="rbtree.ss"')&&dz(dH)))),(dl.Kernel.setLastLoc('offset=3314 line=68 span=171 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("black")),(dl.Kernel.setLastLoc('offset=3334 line=68 span=28 id="rbtree.ss"')&&bQ((dl.Kernel.setLastLoc('offset=3346 line=68 span=15 id="rbtree.ss"')&&ar(dH)))),(dl.Kernel.setLastLoc('offset=3363 line=68 span=30 id="rbtree.ss"')&&az((dl.Kernel.setLastLoc('offset=3377 line=68 span=15 id="rbtree.ss"')&&ar(dH)))),(dl.Kernel.setLastLoc('offset=3425 line=69 span=29 id="rbtree.ss"')&&dz((dl.Kernel.setLastLoc('offset=3438 line=69 span=15 id="rbtree.ss"')&&ar(dH)))),(dl.Kernel.setLastLoc('offset=3455 line=69 span=29 id="rbtree.ss"')&&ar((dl.Kernel.setLastLoc('offset=3468 line=69 span=15 id="rbtree.ss"')&&ar(dH)))))))):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=3502 line=70 span=23 id="rbtree.ss"')&&D(dI,dG,dF,bf,dH)):(dl.Kernel.setLastLoc('offset=1780 line=52 span=1747 id="rbtree.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=1780 line=52 span=1747 id=\\"rbtree.ss\\""')))))))))};var bh=function(bf){return((function(){var dF=function(dH,dG){return((dl.Kernel.setLastLoc('offset=3660 line=76 span=17 id="rbtree.ss"')&&a1(dH))?dG:(((dl.Kernel.setLastLoc('offset=3706 line=77 span=31 id="rbtree.ss"')&&a1((dl.Kernel.setLastLoc('offset=3721 line=77 span=15 id="rbtree.ss"')&&dz(dH))))&&(dl.Kernel.setLastLoc('offset=3738 line=77 span=31 id="rbtree.ss"')&&a1((dl.Kernel.setLastLoc('offset=3753 line=77 span=15 id="rbtree.ss"')&&ar(dH)))))?(dl.Kernel.setLastLoc('offset=3790 line=78 span=48 id="rbtree.ss"')&&dl.Kernel.cons((dl.Kernel.setLastLoc('offset=3796 line=78 span=38 id="rbtree.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=3802 line=78 span=14 id="rbtree.ss"')&&bQ(dH)),(dl.Kernel.setLastLoc('offset=3817 line=78 span=16 id="rbtree.ss"')&&az(dH))])),dG)):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=3864 line=79 span=168 id="rbtree.ss"')&&dF((dl.Kernel.setLastLoc('offset=3872 line=79 span=15 id="rbtree.ss"')&&dz(dH)),(dl.Kernel.setLastLoc('offset=3920 line=80 span=111 id="rbtree.ss"')&&dl.Kernel.cons((dl.Kernel.setLastLoc('offset=3926 line=80 span=38 id="rbtree.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=3932 line=80 span=14 id="rbtree.ss"')&&bQ(dH)),(dl.Kernel.setLastLoc('offset=3947 line=80 span=16 id="rbtree.ss"')&&az(dH))])),(dl.Kernel.setLastLoc('offset=4003 line=81 span=27 id="rbtree.ss"')&&dF((dl.Kernel.setLastLoc('offset=4011 line=81 span=15 id="rbtree.ss"')&&ar(dH)),dG)))))):(dl.Kernel.setLastLoc('offset=3653 line=76 span=381 id="rbtree.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=3653 line=76 span=381 id=\\"rbtree.ss\\""')))))))};(function(dG){})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=4041 line=82 span=16 id="rbtree.ss"')&&dF(bf,dl.types.Empty.EMPTY))})())};var Z=function(bf){return((dl.Kernel.setLastLoc('offset=128 line=7 span=14 id="helpers.ss"')&&dl.Kernel.empty_question_(bf))||((dl.Kernel.setLastLoc('offset=161 line=9 span=13 id="helpers.ss"')&&dl.Kernel.pair_question_(bf))&&(dl.Kernel.setLastLoc('offset=182 line=10 span=20 id="helpers.ss"')&&Z((dl.Kernel.setLastLoc('offset=189 line=10 span=12 id="helpers.ss"')&&dl.Kernel.rest(bf))))))};var aF=function(bf,dF){return(dl.Kernel.setLastLoc('offset=269 line=15 span=60 id="helpers.ss"')&&dl.Kernel.string_lessthan__question_((dl.Kernel.setLastLoc('offset=279 line=15 span=18 id="helpers.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(bf)),(dl.Kernel.setLastLoc('offset=310 line=16 span=18 id="helpers.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(dF)),[]))};var bq=function(bf){return((dl.Kernel.setLastLoc('offset=435 line=22 span=13 id="helpers.ss"')&&Z(bf))&&(dl.Kernel.setLastLoc('offset=456 line=23 span=190 id="helpers.ss"')&&dl.Kernel.andmap(((function(){dl.Kernel.setLastLoc('offset=464 line=23 span=160 id="helpers.ss"');var dF=(function(dH){var dG=dH[0];return((dl.Kernel.setLastLoc('offset=498 line=24 span=9 id="helpers.ss"')&&dc(dG))||(dl.Kernel.setLastLoc('offset=529 line=25 span=15 id="helpers.ss"')&&ca(dG))||(dl.Kernel.setLastLoc('offset=566 line=26 span=14 id="helpers.ss"')&&a5(dG))||(dl.Kernel.setLastLoc('offset=602 line=27 span=20 id="helpers.ss"')&&bd(dG)))});dF.toWrittenString=function(){return"<function:lambda>"};dF.toDisplayedString=dF.toWrittenString;return dF})()),[bf])))};var ca=function(bf){return((dl.Kernel.setLastLoc('offset=766 line=34 span=21 id="helpers.ss"')&&dl.Kernel.not((dl.Kernel.setLastLoc('offset=771 line=34 span=15 id="helpers.ss"')&&dc(bf))))&&(dl.Kernel.setLastLoc('offset=795 line=35 span=26 id="helpers.ss"')&&dl.Kernel.not((dl.Kernel.setLastLoc('offset=800 line=35 span=20 id="helpers.ss"')&&a5(bf))))&&(dl.Kernel.setLastLoc('offset=829 line=36 span=32 id="helpers.ss"')&&dl.Kernel.not((dl.Kernel.setLastLoc('offset=834 line=36 span=26 id="helpers.ss"')&&bd(bf)))))};var dc=function(bf){return((dl.Kernel.setLastLoc('offset=928 line=42 span=34 id="helpers.ss"')&&X(bf,(dl.types.Symbol.makeInstance("define"))))?dl.types.Logic.TRUE:((dl.Kernel.setLastLoc('offset=979 line=44 span=41 id="helpers.ss"')&&X(bf,(dl.types.Symbol.makeInstance("define-struct"))))?dl.types.Logic.TRUE:(dl.types.Logic.TRUE?dl.types.Logic.FALSE:(dl.Kernel.setLastLoc('offset=917 line=41 span=137 id="helpers.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=917 line=41 span=137 id=\\"helpers.ss\\""')))))))};var w=function(bf,dF){return((dl.Kernel.setLastLoc('offset=1153 line=53 span=13 id="helpers.ss"')&&dl.Kernel.empty_question_(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=1181 line=55 span=20 id="helpers.ss"')&&dl.Kernel.empty_question_((dl.Kernel.setLastLoc('offset=1189 line=55 span=11 id="helpers.ss"')&&dl.Kernel.rest(bf))))?(dl.Kernel.setLastLoc('offset=1207 line=56 span=12 id="helpers.ss"')&&dl.Kernel.first(bf)):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=1236 line=58 span=84 id="helpers.ss"')&&dl.Kernel.string_dash_append([(dl.Kernel.setLastLoc('offset=1257 line=59 span=12 id="helpers.ss"')&&dl.Kernel.first(bf)),dF,(dl.Kernel.setLastLoc('offset=1288 line=61 span=31 id="helpers.ss"')&&w((dl.Kernel.setLastLoc('offset=1301 line=61 span=11 id="helpers.ss"')&&dl.Kernel.rest(bf)),dF))])):(dl.Kernel.setLastLoc('offset=1142 line=52 span=180 id="helpers.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=1142 line=52 span=180 id=\\"helpers.ss\\""')))))))};var a5=function(bf){return((dl.Kernel.setLastLoc('offset=1392 line=67 span=40 id="helpers.ss"')&&X(bf,(dl.types.Symbol.makeInstance("check-expect"))))||(dl.Kernel.setLastLoc('offset=1439 line=68 span=40 id="helpers.ss"')&&X(bf,(dl.types.Symbol.makeInstance("check-within"))))||(dl.Kernel.setLastLoc('offset=1486 line=69 span=39 id="helpers.ss"')&&X(bf,(dl.types.Symbol.makeInstance("check-error")))))};var bd=function(bf){return(dl.Kernel.setLastLoc('offset=1604 line=75 span=35 id="helpers.ss"')&&X(bf,(dl.types.Symbol.makeInstance("require"))))};var c3;var bO=function(bf){return((dl.Kernel.setLastLoc('offset=2475 line=98 span=15 id="helpers.ss"')&&dl.Kernel.char_equal__question_(bf,(dl.types.Char.makeInstance(String.fromCharCode(45))),[]))?(dl.types.String.makeInstance("_dash_")):((dl.Kernel.setLastLoc('offset=2511 line=100 span=15 id="helpers.ss"')&&dl.Kernel.char_equal__question_(bf,(dl.types.Char.makeInstance(String.fromCharCode(95))),[]))?(dl.types.String.makeInstance("_underline_")):((dl.Kernel.setLastLoc('offset=2552 line=102 span=15 id="helpers.ss"')&&dl.Kernel.char_equal__question_(bf,(dl.types.Char.makeInstance(String.fromCharCode(63))),[]))?(dl.types.String.makeInstance("_question_")):((dl.Kernel.setLastLoc('offset=2592 line=104 span=15 id="helpers.ss"')&&dl.Kernel.char_equal__question_(bf,(dl.types.Char.makeInstance(String.fromCharCode(33))),[]))?(dl.types.String.makeInstance("_bang_")):((dl.Kernel.setLastLoc('offset=2628 line=106 span=15 id="helpers.ss"')&&dl.Kernel.char_equal__question_(bf,(dl.types.Char.makeInstance(String.fromCharCode(46))),[]))?(dl.types.String.makeInstance("_dot_")):((dl.Kernel.setLastLoc('offset=2663 line=108 span=15 id="helpers.ss"')&&dl.Kernel.char_equal__question_(bf,(dl.types.Char.makeInstance(String.fromCharCode(58))),[]))?(dl.types.String.makeInstance("_colon_")):((dl.Kernel.setLastLoc('offset=2700 line=110 span=15 id="helpers.ss"')&&dl.Kernel.char_equal__question_(bf,(dl.types.Char.makeInstance(String.fromCharCode(61))),[]))?(dl.types.String.makeInstance("_equal_")):((dl.Kernel.setLastLoc('offset=2737 line=112 span=15 id="helpers.ss"')&&dl.Kernel.char_equal__question_(bf,(dl.types.Char.makeInstance(String.fromCharCode(35))),[]))?(dl.types.String.makeInstance("_pound_")):((dl.Kernel.setLastLoc('offset=2774 line=114 span=15 id="helpers.ss"')&&dl.Kernel.char_equal__question_(bf,(dl.types.Char.makeInstance(String.fromCharCode(36))),[]))?(dl.types.String.makeInstance("_dollar_")):((dl.Kernel.setLastLoc('offset=2812 line=116 span=15 id="helpers.ss"')&&dl.Kernel.char_equal__question_(bf,(dl.types.Char.makeInstance(String.fromCharCode(37))),[]))?(dl.types.String.makeInstance("_percent_")):((dl.Kernel.setLastLoc('offset=2851 line=118 span=15 id="helpers.ss"')&&dl.Kernel.char_equal__question_(bf,(dl.types.Char.makeInstance(String.fromCharCode(94))),[]))?(dl.types.String.makeInstance("_tilde_")):((dl.Kernel.setLastLoc('offset=2888 line=120 span=15 id="helpers.ss"')&&dl.Kernel.char_equal__question_(bf,(dl.types.Char.makeInstance(String.fromCharCode(38))),[]))?(dl.types.String.makeInstance("_and_")):((dl.Kernel.setLastLoc('offset=2923 line=122 span=15 id="helpers.ss"')&&dl.Kernel.char_equal__question_(bf,(dl.types.Char.makeInstance(String.fromCharCode(42))),[]))?(dl.types.String.makeInstance("_star_")):((dl.Kernel.setLastLoc('offset=2959 line=124 span=15 id="helpers.ss"')&&dl.Kernel.char_equal__question_(bf,(dl.types.Char.makeInstance(String.fromCharCode(43))),[]))?(dl.types.String.makeInstance("_plus_")):((dl.Kernel.setLastLoc('offset=2995 line=126 span=15 id="helpers.ss"')&&dl.Kernel.char_equal__question_(bf,(dl.types.Char.makeInstance(String.fromCharCode(42))),[]))?(dl.types.String.makeInstance("_star_")):((dl.Kernel.setLastLoc('offset=3031 line=128 span=15 id="helpers.ss"')&&dl.Kernel.char_equal__question_(bf,(dl.types.Char.makeInstance(String.fromCharCode(47))),[]))?(dl.types.String.makeInstance("_slash_")):((dl.Kernel.setLastLoc('offset=3068 line=130 span=15 id="helpers.ss"')&&dl.Kernel.char_equal__question_(bf,(dl.types.Char.makeInstance(String.fromCharCode(60))),[]))?(dl.types.String.makeInstance("_lessthan_")):((dl.Kernel.setLastLoc('offset=3108 line=132 span=15 id="helpers.ss"')&&dl.Kernel.char_equal__question_(bf,(dl.types.Char.makeInstance(String.fromCharCode(62))),[]))?(dl.types.String.makeInstance("_greaterthan_")):((dl.Kernel.setLastLoc('offset=3151 line=134 span=15 id="helpers.ss"')&&dl.Kernel.char_equal__question_(bf,(dl.types.Char.makeInstance(String.fromCharCode(126))),[]))?(dl.types.String.makeInstance("_tilde_")):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=3198 line=137 span=11 id="helpers.ss"')&&dl.Kernel.string([bf])):(dl.Kernel.setLastLoc('offset=2464 line=97 span=747 id="helpers.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=2464 line=97 span=747 id=\\"helpers.ss\\""'))))))))))))))))))))))))};var h=function(bf){return((dl.Kernel.setLastLoc('offset=3335 line=143 span=31 id="helpers.ss"')&&dl.Kernel.member(bf,c3))?(dl.Kernel.setLastLoc('offset=3372 line=144 span=63 id="helpers.ss"')&&dl.Kernel.string_dash__greaterthan_symbol((dl.Kernel.setLastLoc('offset=3388 line=144 span=46 id="helpers.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("_")),(dl.Kernel.setLastLoc('offset=3407 line=144 span=22 id="helpers.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(bf)),(dl.types.String.makeInstance("_"))])))):(dl.types.Logic.TRUE?((function(){var dG;var dF;var dH;(function(dI){dG=(dl.Kernel.setLastLoc('offset=3474 line=146 span=37 id="helpers.ss"')&&dl.Kernel.string_dash__greaterthan_list((dl.Kernel.setLastLoc('offset=3488 line=146 span=22 id="helpers.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(bf))));dF=(dl.Kernel.setLastLoc('offset=3568 line=148 span=39 id="helpers.ss"')&&dl.Kernel.map((function(){var dJ=(function(dK){return bO(dK[0])});dJ.toWrittenString=function(){return"<function:translate-special-character>"};dJ.toDisplayedString=function(){return"<function:translate-special-character>"};return dJ})(),[dG]));dH=(dl.Kernel.setLastLoc('offset=3659 line=150 span=67 id="helpers.ss"')&&dl.Kernel.string_dash__greaterthan_symbol((dl.Kernel.setLastLoc('offset=3691 line=151 span=34 id="helpers.ss"')&&w(dF,(dl.types.String.makeInstance(""))))))})(dl.Kernel.identity);return dH})()):(dl.Kernel.setLastLoc('offset=3324 line=142 span=428 id="helpers.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=3324 line=142 span=428 id=\\"helpers.ss\\""'))))))};var cq=function(bf){return((dl.Kernel.setLastLoc('offset=3934 line=161 span=14 id="helpers.ss"')&&dl.Kernel.empty_question_(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=3963 line=163 span=32 id="helpers.ss"')&&dl.Kernel.char_dash_whitespace_question_((dl.Kernel.setLastLoc('offset=3981 line=163 span=13 id="helpers.ss"')&&dl.Kernel.first(bf))))?(dl.Kernel.setLastLoc('offset=4001 line=164 span=45 id="helpers.ss"')&&cq((dl.Kernel.setLastLoc('offset=4033 line=164 span=12 id="helpers.ss"')&&dl.Kernel.rest(bf)))):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=4063 line=166 span=20 id="helpers.ss"')&&dl.Kernel.list_dash__greaterthan_string(bf)):(dl.Kernel.setLastLoc('offset=3923 line=160 span=162 id="helpers.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=3923 line=160 span=162 id=\\"helpers.ss\\""')))))))};var ao=function(bf){return(dl.Kernel.setLastLoc('offset=4234 line=172 span=53 id="helpers.ss"')&&cq((dl.Kernel.setLastLoc('offset=4266 line=172 span=20 id="helpers.ss"')&&dl.Kernel.string_dash__greaterthan_list(bf))))};var cQ=function(bf,dF){return((dl.Kernel.setLastLoc('offset=4423 line=179 span=7 id="helpers.ss"')&&dl.Kernel._equal_(dF,(dl.types.Rational.makeInstance(0,1)),[]))?dl.types.Empty.EMPTY:(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=4458 line=182 span=62 id="helpers.ss"')&&dl.Kernel.cons((dl.Kernel.setLastLoc('offset=4464 line=182 span=14 id="helpers.ss"')&&dl.Kernel.first(bf)),(dl.Kernel.setLastLoc('offset=4490 line=183 span=29 id="helpers.ss"')&&cQ((dl.Kernel.setLastLoc('offset=4496 line=183 span=13 id="helpers.ss"')&&dl.Kernel.rest(bf)),(dl.Kernel.setLastLoc('offset=4510 line=183 span=8 id="helpers.ss"')&&dl.Kernel.sub1(dF)))))):(dl.Kernel.setLastLoc('offset=4412 line=178 span=110 id="helpers.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=4412 line=178 span=110 id=\\"helpers.ss\\""'))))))};var bZ=function(bf,dF){return((dl.Kernel.setLastLoc('offset=4667 line=190 span=7 id="helpers.ss"')&&dl.Kernel._equal_(dF,(dl.types.Rational.makeInstance(0,1)),[]))?bf:(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=4703 line=193 span=50 id="helpers.ss"')&&bZ((dl.Kernel.setLastLoc('offset=4714 line=193 span=13 id="helpers.ss"')&&dl.Kernel.rest(bf)),(dl.Kernel.setLastLoc('offset=4744 line=194 span=8 id="helpers.ss"')&&dl.Kernel.sub1(dF)))):(dl.Kernel.setLastLoc('offset=4656 line=189 span=99 id="helpers.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=4656 line=189 span=99 id=\\"helpers.ss\\""'))))))};var av=function(bf){return((dl.Kernel.setLastLoc('offset=4864 line=201 span=7 id="helpers.ss"')&&dl.Kernel._equal_(bf,(dl.types.Rational.makeInstance(0,1)),[]))?dl.types.Empty.EMPTY:(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=4899 line=204 span=54 id="helpers.ss"')&&dl.Kernel.append((dl.Kernel.setLastLoc('offset=4907 line=204 span=16 id="helpers.ss"')&&av((dl.Kernel.setLastLoc('offset=4914 line=204 span=8 id="helpers.ss"')&&dl.Kernel.sub1(bf)))),[(dl.Kernel.setLastLoc('offset=4937 line=205 span=15 id="helpers.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=4943 line=205 span=8 id="helpers.ss"')&&dl.Kernel.sub1(bf))]))])):(dl.Kernel.setLastLoc('offset=4853 line=200 span=102 id="helpers.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=4853 line=200 span=102 id=\\"helpers.ss\\""'))))))};var bW=function(dF,dG,dH,bf){return(((dl.Kernel.setLastLoc('offset=5393 line=216 span=39 id="helpers.ss"')&&X(dF,(dl.types.Symbol.makeInstance("define"))))&&(dl.Kernel.setLastLoc('offset=5443 line=217 span=35 id="helpers.ss"')&&dl.Kernel._equal_((dl.Kernel.setLastLoc('offset=5446 line=217 span=29 id="helpers.ss"')&&dl.Kernel.length((dl.Kernel.setLastLoc('offset=5454 line=217 span=20 id="helpers.ss"')&&b2(dF)))),(dl.types.Rational.makeInstance(3,1)),[]))&&(dl.Kernel.setLastLoc('offset=5489 line=218 span=41 id="helpers.ss"')&&cb((dl.Kernel.setLastLoc('offset=5500 line=218 span=29 id="helpers.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=5508 line=218 span=20 id="helpers.ss"')&&b2(dF)))))))?((function(){var dK;var dJ;var dI;(function(dL){dK=(dl.Kernel.setLastLoc('offset=5556 line=219 span=45 id="helpers.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=5563 line=219 span=37 id="helpers.ss"')&&b2((dl.Kernel.setLastLoc('offset=5570 line=219 span=29 id="helpers.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=5578 line=219 span=20 id="helpers.ss"')&&b2(dF))))))));dJ=(dl.Kernel.setLastLoc('offset=5629 line=220 span=44 id="helpers.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=5635 line=220 span=37 id="helpers.ss"')&&b2((dl.Kernel.setLastLoc('offset=5642 line=220 span=29 id="helpers.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=5650 line=220 span=20 id="helpers.ss"')&&b2(dF))))))));dI=(dl.Kernel.setLastLoc('offset=5701 line=221 span=28 id="helpers.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=5708 line=221 span=20 id="helpers.ss"')&&b2(dF))))})(dl.Kernel.identity);return(function(){(dl.Kernel.setLastLoc('offset=5748 line=223 span=72 id="helpers.ss"')&&P((dl.Kernel.setLastLoc('offset=5772 line=223 span=34 id="helpers.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=5778 line=223 span=27 id="helpers.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=5784 line=223 span=20 id="helpers.ss"')&&b2(dF)))))),dF));return(dl.Kernel.setLastLoc('offset=5823 line=224 span=25 id="helpers.ss"')&&dG.apply(null,[[dK,dJ,dI]]))})()})()):(((dl.Kernel.setLastLoc('offset=5908 line=228 span=39 id="helpers.ss"')&&X(dF,(dl.types.Symbol.makeInstance("define"))))&&(dl.Kernel.setLastLoc('offset=5958 line=229 span=35 id="helpers.ss"')&&dl.Kernel._equal_((dl.Kernel.setLastLoc('offset=5961 line=229 span=29 id="helpers.ss"')&&dl.Kernel.length((dl.Kernel.setLastLoc('offset=5969 line=229 span=20 id="helpers.ss"')&&b2(dF)))),(dl.types.Rational.makeInstance(3,1)),[]))&&(dl.Kernel.setLastLoc('offset=6004 line=230 span=47 id="helpers.ss"')&&dl.Kernel.symbol_question_((dl.Kernel.setLastLoc('offset=6013 line=230 span=37 id="helpers.ss"')&&b2((dl.Kernel.setLastLoc('offset=6020 line=230 span=29 id="helpers.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=6028 line=230 span=20 id="helpers.ss"')&&b2(dF))))))))&&(dl.Kernel.setLastLoc('offset=6062 line=231 span=55 id="helpers.ss"')&&X((dl.Kernel.setLastLoc('offset=6080 line=231 span=28 id="helpers.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=6087 line=231 span=20 id="helpers.ss"')&&b2(dF)))),(dl.types.Symbol.makeInstance("lambda")))))?((function(){var dK;var dJ;var dI;(function(dL){dK=(dl.Kernel.setLastLoc('offset=6143 line=232 span=29 id="helpers.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=6151 line=232 span=20 id="helpers.ss"')&&b2(dF))));dJ=(dl.Kernel.setLastLoc('offset=6200 line=233 span=53 id="helpers.ss"')&&b2((dl.Kernel.setLastLoc('offset=6207 line=233 span=45 id="helpers.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=6215 line=233 span=36 id="helpers.ss"')&&b2((dl.Kernel.setLastLoc('offset=6222 line=233 span=28 id="helpers.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=6229 line=233 span=20 id="helpers.ss"')&&b2(dF))))))))));dI=(dl.Kernel.setLastLoc('offset=6281 line=234 span=44 id="helpers.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=6288 line=234 span=36 id="helpers.ss"')&&b2((dl.Kernel.setLastLoc('offset=6295 line=234 span=28 id="helpers.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=6302 line=234 span=20 id="helpers.ss"')&&b2(dF))))))))})(dl.Kernel.identity);return(function(){(dl.Kernel.setLastLoc('offset=6344 line=236 span=88 id="helpers.ss"')&&P((dl.Kernel.setLastLoc('offset=6368 line=236 span=50 id="helpers.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=6374 line=236 span=43 id="helpers.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=6380 line=236 span=36 id="helpers.ss"')&&b2((dl.Kernel.setLastLoc('offset=6387 line=236 span=28 id="helpers.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=6394 line=236 span=20 id="helpers.ss"')&&b2(dF)))))))))),dF));return(dl.Kernel.setLastLoc('offset=6435 line=237 span=25 id="helpers.ss"')&&dG.apply(null,[[dK,dJ,dI]]))})()})()):(((dl.Kernel.setLastLoc('offset=6503 line=240 span=39 id="helpers.ss"')&&X(dF,(dl.types.Symbol.makeInstance("define"))))&&(dl.Kernel.setLastLoc('offset=6553 line=241 span=35 id="helpers.ss"')&&dl.Kernel._equal_((dl.Kernel.setLastLoc('offset=6556 line=241 span=29 id="helpers.ss"')&&dl.Kernel.length((dl.Kernel.setLastLoc('offset=6564 line=241 span=20 id="helpers.ss"')&&b2(dF)))),(dl.types.Rational.makeInstance(3,1)),[]))&&(dl.Kernel.setLastLoc('offset=6599 line=242 span=47 id="helpers.ss"')&&dl.Kernel.symbol_question_((dl.Kernel.setLastLoc('offset=6608 line=242 span=37 id="helpers.ss"')&&b2((dl.Kernel.setLastLoc('offset=6615 line=242 span=29 id="helpers.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=6623 line=242 span=20 id="helpers.ss"')&&b2(dF))))))))&&(dl.Kernel.setLastLoc('offset=6657 line=243 span=61 id="helpers.ss"')&&dl.Kernel.not((dl.Kernel.setLastLoc('offset=6662 line=243 span=55 id="helpers.ss"')&&X((dl.Kernel.setLastLoc('offset=6680 line=243 span=28 id="helpers.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=6687 line=243 span=20 id="helpers.ss"')&&b2(dF)))),(dl.types.Symbol.makeInstance("lambda")))))))?((function(){var dJ;var dI;(function(dK){dJ=(dl.Kernel.setLastLoc('offset=6744 line=244 span=29 id="helpers.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=6752 line=244 span=20 id="helpers.ss"')&&b2(dF))));dI=(dl.Kernel.setLastLoc('offset=6801 line=245 span=28 id="helpers.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=6808 line=245 span=20 id="helpers.ss"')&&b2(dF))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=6839 line=246 span=30 id="helpers.ss"')&&dH.apply(null,[[dJ,dI]]))})()):(((dl.Kernel.setLastLoc('offset=6928 line=249 span=46 id="helpers.ss"')&&X(dF,(dl.types.Symbol.makeInstance("define-struct"))))&&(dl.Kernel.setLastLoc('offset=6985 line=250 span=35 id="helpers.ss"')&&dl.Kernel._equal_((dl.Kernel.setLastLoc('offset=6988 line=250 span=29 id="helpers.ss"')&&dl.Kernel.length((dl.Kernel.setLastLoc('offset=6996 line=250 span=20 id="helpers.ss"')&&b2(dF)))),(dl.types.Rational.makeInstance(3,1)),[]))&&(dl.Kernel.setLastLoc('offset=7031 line=251 span=47 id="helpers.ss"')&&dl.Kernel.symbol_question_((dl.Kernel.setLastLoc('offset=7040 line=251 span=37 id="helpers.ss"')&&b2((dl.Kernel.setLastLoc('offset=7047 line=251 span=29 id="helpers.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=7055 line=251 span=20 id="helpers.ss"')&&b2(dF))))))))&&((dl.Kernel.setLastLoc('offset=7093 line=252 span=45 id="helpers.ss"')&&dl.Kernel.empty_question_((dl.Kernel.setLastLoc('offset=7101 line=252 span=36 id="helpers.ss"')&&b2((dl.Kernel.setLastLoc('offset=7108 line=252 span=28 id="helpers.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=7115 line=252 span=20 id="helpers.ss"')&&b2(dF))))))))||(dl.Kernel.setLastLoc('offset=7153 line=253 span=44 id="helpers.ss"')&&dl.Kernel.pair_question_((dl.Kernel.setLastLoc('offset=7160 line=253 span=36 id="helpers.ss"')&&b2((dl.Kernel.setLastLoc('offset=7167 line=253 span=28 id="helpers.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=7174 line=253 span=20 id="helpers.ss"')&&b2(dF))))))))))?((function(){var dJ;var dI;(function(dK){dJ=(dl.Kernel.setLastLoc('offset=7224 line=254 span=29 id="helpers.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=7232 line=254 span=20 id="helpers.ss"')&&b2(dF))));dI=(dl.Kernel.setLastLoc('offset=7283 line=255 span=36 id="helpers.ss"')&&b2((dl.Kernel.setLastLoc('offset=7290 line=255 span=28 id="helpers.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=7297 line=255 span=20 id="helpers.ss"')&&b2(dF))))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=7329 line=256 span=27 id="helpers.ss"')&&bf.apply(null,[[dJ,dI]]))})()):((dl.Kernel.setLastLoc('offset=7469 line=261 span=39 id="helpers.ss"')&&X(dF,(dl.types.Symbol.makeInstance("define"))))?(dl.Kernel.setLastLoc('offset=7514 line=262 span=108 id="helpers.ss"')&&dl.Kernel.syntax_dash_error((dl.types.String.makeInstance("define expects an identifier and a body. e.g. (define answer 42)")),dF)):((dl.Kernel.setLastLoc('offset=7629 line=265 span=46 id="helpers.ss"')&&X(dF,(dl.types.Symbol.makeInstance("define-struct"))))?(dl.Kernel.setLastLoc('offset=7681 line=266 span=150 id="helpers.ss"')&&dl.Kernel.syntax_dash_error((dl.types.String.makeInstance("define-struct expects an identifier and a list of fields. i.e. (define-struct pizza (dough sauce toppings))")),dF)):(dl.Kernel.setLastLoc('offset=5342 line=214 span=2491 id="helpers.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=5342 line=214 span=2491 id=\\"helpers.ss\\""'))))))))))};var dB=function(bf){return((dl.Kernel.setLastLoc('offset=7951 line=275 span=8 id="helpers.ss"')&&a8(bf))&&(dl.Kernel.setLastLoc('offset=7967 line=276 span=19 id="helpers.ss"')&&dl.Kernel.symbol_question_((dl.Kernel.setLastLoc('offset=7976 line=276 span=9 id="helpers.ss"')&&b2(bf)))))};var dp=function(bf){return((function(){var dF=function(dH,dG){return((dl.Kernel.setLastLoc('offset=8219 line=286 span=12 id="helpers.ss"')&&dl.Kernel.empty_question_(dH))?(dl.Kernel.setLastLoc('offset=8247 line=287 span=6 id="helpers.ss"')&&dl.Kernel._void_([])):(dl.types.Logic.TRUE?((dl.Kernel.setLastLoc('offset=8297 line=289 span=38 id="helpers.ss"')&&dl.Kernel.member((dl.Kernel.setLastLoc('offset=8305 line=289 span=19 id="helpers.ss"')&&b2((dl.Kernel.setLastLoc('offset=8312 line=289 span=11 id="helpers.ss"')&&dl.Kernel.first(dH)))),dG))?(dl.Kernel.setLastLoc('offset=8358 line=290 span=68 id="helpers.ss"')&&dl.Kernel.syntax_dash_error((dl.types.String.makeInstance("found a name that's used more than once")),(dl.Kernel.setLastLoc('offset=8414 line=290 span=11 id="helpers.ss"')&&dl.Kernel.first(dH)))):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=8477 line=292 span=118 id="helpers.ss"')&&dF((dl.Kernel.setLastLoc('offset=8483 line=292 span=10 id="helpers.ss"')&&dl.Kernel.rest(dH)),(dl.Kernel.setLastLoc('offset=8523 line=293 span=71 id="helpers.ss"')&&dl.Kernel.cons((dl.Kernel.setLastLoc('offset=8529 line=293 span=19 id="helpers.ss"')&&b2((dl.Kernel.setLastLoc('offset=8536 line=293 span=11 id="helpers.ss"')&&dl.Kernel.first(dH)))),dG)))):(dl.Kernel.setLastLoc('offset=8290 line=289 span=307 id="helpers.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=8290 line=289 span=307 id=\\"helpers.ss\\""')))))):(dl.Kernel.setLastLoc('offset=8198 line=285 span=401 id="helpers.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=8198 line=285 span=401 id=\\"helpers.ss\\""'))))))};(function(dG){})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=8606 line=295 span=16 id="helpers.ss"')&&dF(bf,dl.types.Empty.EMPTY))})())};var P=function(dF,bf){return((dl.Kernel.setLastLoc('offset=8744 line=302 span=13 id="helpers.ss"')&&dl.Kernel.empty_question_(dF))?(dl.Kernel.setLastLoc('offset=8763 line=303 span=73 id="helpers.ss"')&&dl.Kernel.syntax_dash_error((dl.types.String.makeInstance("There must be a single body expression")),bf)):((dl.Kernel.setLastLoc('offset=8843 line=305 span=26 id="helpers.ss"')&&dl.Kernel.not((dl.Kernel.setLastLoc('offset=8848 line=305 span=20 id="helpers.ss"')&&dl.Kernel.empty_question_((dl.Kernel.setLastLoc('offset=8856 line=305 span=11 id="helpers.ss"')&&dl.Kernel.rest(dF))))))?(dl.Kernel.setLastLoc('offset=8875 line=306 span=73 id="helpers.ss"')&&dl.Kernel.syntax_dash_error((dl.types.String.makeInstance("There must be a single body expression")),bf)):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=8965 line=309 span=6 id="helpers.ss"')&&dl.Kernel._void_([])):(dl.Kernel.setLastLoc('offset=8733 line=301 span=240 id="helpers.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=8733 line=301 span=240 id=\\"helpers.ss\\""')))))))};var aN=function(bf){dl.Kernel.Struct.call(this,"make-env",[bf]);this.bindings=bf};aN.prototype=new dl.Kernel.Struct();var f=function(bf){return new aN(bf)};var bx=function(bf){if(cf(bf)){return bf.bindings}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("env-bindings: not a env: ~s",[bf]))}};var cU=function(dF,bf){if(cf(dF)){dF.bindings=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_env_dash_bindings_bang_: not a env: ~s",[dF]))}};var cf=function(bf){return bf!=null&&bf!=undefined&&bf instanceof aN};var U;var ax=function(bf){return((dl.Kernel.setLastLoc('offset=320 line=16 span=25 id="env.ss"')&&cJ(bf))||(dl.Kernel.setLastLoc('offset=352 line=17 span=25 id="env.ss"')&&ci(bf)))};var k=function(bf,dF,dG){dl.Kernel.Struct.call(this,"make-binding:constant",[bf,dF,dG]);this.name=bf;this.java_dash_string=dF;this.permissions=dG};k.prototype=new dl.Kernel.Struct();var aM=function(dG,dF,bf){return new k(dG,dF,bf)};var bT=function(bf){if(cJ(bf)){return bf.name}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("binding:constant-name: not a binding:constant: ~s",[bf]))}};var aU=function(bf){if(cJ(bf)){return bf.java_dash_string}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("binding:constant-java-string: not a binding:constant: ~s",[bf]))}};var bw=function(bf){if(cJ(bf)){return bf.permissions}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("binding:constant-permissions: not a binding:constant: ~s",[bf]))}};var cj=function(dF,bf){if(cJ(dF)){dF.name=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_binding_colon_constant_dash_name_bang_: not a binding:constant: ~s",[dF]))}};var b7=function(dF,bf){if(cJ(dF)){dF.java_dash_string=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_binding_colon_constant_dash_java_dash_string_bang_: not a binding:constant: ~s",[dF]))}};var bz=function(dF,bf){if(cJ(dF)){dF.permissions=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_binding_colon_constant_dash_permissions_bang_: not a binding:constant: ~s",[dF]))}};var cJ=function(bf){return bf!=null&&bf!=undefined&&bf instanceof k};var T=function(dF,bf,dK,dJ,dG,dH,dI){dl.Kernel.Struct.call(this,"make-binding:function",[dF,bf,dK,dJ,dG,dH,dI]);this.name=dF;this.module_dash_source=bf;this.min_dash_arity=dK;this.var_dash_arity_question_=dJ;this.java_dash_string=dG;this.permissions=dH;this.cps_question_=dI};T.prototype=new dl.Kernel.Struct();var bl=function(dK,dJ,dI,dH,dG,dF,bf){return new T(dK,dJ,dI,dH,dG,dF,bf)};var br=function(bf){if(ci(bf)){return bf.name}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("binding:function-name: not a binding:function: ~s",[bf]))}};var a9=function(bf){if(ci(bf)){return bf.module_dash_source}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("binding:function-module-source: not a binding:function: ~s",[bf]))}};var dA=function(bf){if(ci(bf)){return bf.min_dash_arity}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("binding:function-min-arity: not a binding:function: ~s",[bf]))}};var bp=function(bf){if(ci(bf)){return bf.var_dash_arity_question_}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("binding:function-var-arity?: not a binding:function: ~s",[bf]))}};var bv=function(bf){if(ci(bf)){return bf.java_dash_string}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("binding:function-java-string: not a binding:function: ~s",[bf]))}};var bk=function(bf){if(ci(bf)){return bf.permissions}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("binding:function-permissions: not a binding:function: ~s",[bf]))}};var cw=function(bf){if(ci(bf)){return bf.cps_question_}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("binding:function-cps?: not a binding:function: ~s",[bf]))}};var cl=function(dF,bf){if(ci(dF)){dF.name=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_binding_colon_function_dash_name_bang_: not a binding:function: ~s",[dF]))}};var bF=function(dF,bf){if(ci(dF)){dF.module_dash_source=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_binding_colon_function_dash_module_dash_source_bang_: not a binding:function: ~s",[dF]))}};var ag=function(dF,bf){if(ci(dF)){dF.min_dash_arity=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_binding_colon_function_dash_min_dash_arity_bang_: not a binding:function: ~s",[dF]))}};var ct=function(dF,bf){if(ci(dF)){dF.var_dash_arity_question_=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_binding_colon_function_dash_var_dash_arity_question__bang_: not a binding:function: ~s",[dF]))}};var cR=function(dF,bf){if(ci(dF)){dF.java_dash_string=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_binding_colon_function_dash_java_dash_string_bang_: not a binding:function: ~s",[dF]))}};var F=function(dF,bf){if(ci(dF)){dF.permissions=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_binding_colon_function_dash_permissions_bang_: not a binding:function: ~s",[dF]))}};var cp=function(dF,bf){if(ci(dF)){dF.cps_question_=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_binding_colon_function_dash_cps_question__bang_: not a binding:function: ~s",[dF]))}};var ci=function(bf){return bf!=null&&bf!=undefined&&bf instanceof T};var Q=function(bf){return((dl.Kernel.setLastLoc('offset=1085 line=41 span=29 id="env.ss"')&&cJ(bf))?(dl.Kernel.setLastLoc('offset=1120 line=42 span=33 id="env.ss"')&&bT(bf)):((dl.Kernel.setLastLoc('offset=1160 line=43 span=29 id="env.ss"')&&ci(bf))?(dl.Kernel.setLastLoc('offset=1195 line=44 span=33 id="env.ss"')&&br(bf)):(dl.Kernel.setLastLoc('offset=1074 line=40 span=156 id="env.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=1074 line=40 span=156 id=\\"env.ss\\""'))))))};var bN=function(bf,dF){return(dl.Kernel.setLastLoc('offset=1312 line=51 span=93 id="env.ss"')&&f((dl.Kernel.setLastLoc('offset=1322 line=51 span=82 id="env.ss"')&&o((function(){var dG=(function(dH){return aF(dH[0],dH[1])});dG.toWrittenString=function(){return"<function:symbol<>"};dG.toDisplayedString=function(){return"<function:symbol<>"};return dG})(),(dl.Kernel.setLastLoc('offset=1345 line=51 span=21 id="env.ss"')&&bx(bf)),(dl.Kernel.setLastLoc('offset=1367 line=51 span=24 id="env.ss"')&&Q(dF)),dF))))};var ac=function(bf,dF){return((function(){var dG;(function(dH){dG=(dl.Kernel.setLastLoc('offset=1518 line=57 span=50 id="env.ss"')&&aR((function(){var dI=(function(dJ){return aF(dJ[0],dJ[1])});dI.toWrittenString=function(){return"<function:symbol<>"};dI.toDisplayedString=function(){return"<function:symbol<>"};return dI})(),(dl.Kernel.setLastLoc('offset=1541 line=57 span=21 id="env.ss"')&&bx(bf)),dF))})(dl.Kernel.identity);return((dl.Kernel.setLastLoc('offset=1582 line=58 span=14 id="env.ss"')&&dl.Kernel.pair_question_(dG))?(dl.Kernel.setLastLoc('offset=1608 line=59 span=15 id="env.ss"')&&dl.Kernel.second(dG)):(dl.types.Logic.TRUE?dl.types.Logic.FALSE:(dl.Kernel.setLastLoc('offset=1575 line=58 span=84 id="env.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=1575 line=58 span=84 id=\\"env.ss\\""'))))))})())};var j=function(bf,dF){return(dl.Kernel.setLastLoc('offset=1868 line=70 span=35 id="env.ss"')&&ax((dl.Kernel.setLastLoc('offset=1878 line=70 span=24 id="env.ss"')&&ac(bf,dF))))};var cP=function(bf){return(dl.Kernel.setLastLoc('offset=2017 line=77 span=48 id="env.ss"')&&dl.Kernel.map((function(){var dF=(function(dG){return dl.Kernel.first(dG[0])});dF.toWrittenString=function(){return"<function:first>"};dF.toDisplayedString=function(){return"<function:first>"};return dF})(),[(dl.Kernel.setLastLoc('offset=2028 line=77 span=36 id="env.ss"')&&bh((dl.Kernel.setLastLoc('offset=2042 line=77 span=21 id="env.ss"')&&bx(bf))))]))};var z=function(bf,dG,dF){return(dl.Kernel.setLastLoc('offset=2230 line=85 span=78 id="env.ss"')&&bN(bf,(dl.Kernel.setLastLoc('offset=2263 line=86 span=44 id="env.ss"')&&aM(dG,dF,dl.types.Empty.EMPTY))))};var ae=function(dF,dJ,bf,dI,dH,dG){return(dl.Kernel.setLastLoc('offset=2542 line=92 span=343 id="env.ss"')&&bN(dF,(dl.Kernel.setLastLoc('offset=2575 line=93 span=309 id="env.ss"')&&bl(dJ,bf,dI,dH,dG,dl.types.Empty.EMPTY,dl.types.Logic.FALSE))))};var du=function(bf){return((function(){var dH;var dI=function(dL,dK,dM,dN){return(dl.Kernel.setLastLoc('offset=869 line=24 span=443 id="toplevel.ss"')&&ae(dL,dK,(dl.types.String.makeInstance("moby/toplevel")),dM,dN,(dl.Kernel.setLastLoc('offset=1100 line=29 span=211 id="toplevel.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("plt.Kernel.")),(dl.Kernel.setLastLoc('offset=1198 line=31 span=112 id="toplevel.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=1214 line=31 span=95 id="toplevel.ss"')&&h(dK))))]))))};var dJ=function(dM,dK,dN,dL){return(dl.Kernel.setLastLoc('offset=1490 line=37 span=239 id="toplevel.ss"')&&ae(dM,dK,(dl.types.String.makeInstance("moby/toplevel")),dN,dl.types.Logic.FALSE,dL))};var dG;var dF;(function(dK){dH=(dl.Kernel.setLastLoc('offset=246 line=11 span=484 id="toplevel.ss"')&&dl.Kernel.foldl(((function(){dl.Kernel.setLastLoc('offset=253 line=11 span=102 id="toplevel.ss"');var dL=(function(dN){var dO=dN[0];var dM=dN[1];return(dl.Kernel.setLastLoc('offset=296 line=12 span=58 id="toplevel.ss"')&&z(dM,(dl.Kernel.setLastLoc('offset=321 line=12 span=15 id="toplevel.ss"')&&dl.Kernel.first(dO)),(dl.Kernel.setLastLoc('offset=337 line=12 span=16 id="toplevel.ss"')&&dl.Kernel.second(dO))))});dL.toWrittenString=function(){return"<function:lambda>"};dL.toDisplayedString=dL.toWrittenString;return dL})()),U,[(dl.Kernel.list([(dl.Kernel.list([(dl.types.Symbol.makeInstance("null")),(dl.types.String.makeInstance("plt.types.Empty.EMPTY"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("empty")),(dl.types.String.makeInstance("plt.types.Empty.EMPTY"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("true")),(dl.types.String.makeInstance("plt.types.Logic.TRUE"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("false")),(dl.types.String.makeInstance("plt.types.Logic.FALSE"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("eof")),(dl.types.String.makeInstance("plt.types.EofObject.EOF"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("pi")),(dl.types.String.makeInstance("plt.Kernel.pi"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("e")),(dl.types.String.makeInstance("plt.Kernel.e"))]))]))]));dG=(dl.Kernel.setLastLoc('offset=1782 line=45 span=9759 id="toplevel.ss"')&&dl.Kernel.foldl(((function(){dl.Kernel.setLastLoc('offset=1789 line=45 span=518 id="toplevel.ss"');var dL=(function(dO){var dM=dO[0];var dN=dO[1];return((dl.Kernel.setLastLoc('offset=1865 line=47 span=25 id="toplevel.ss"')&&dl.Kernel._equal_((dl.Kernel.setLastLoc('offset=1868 line=47 span=19 id="toplevel.ss"')&&dl.Kernel.length(dM)),(dl.types.Rational.makeInstance(2,1)),[]))?(dl.Kernel.setLastLoc('offset=1915 line=48 span=134 id="toplevel.ss"')&&dI(dN,(dl.Kernel.setLastLoc('offset=1950 line=49 span=18 id="toplevel.ss"')&&dl.Kernel.first(dM)),(dl.Kernel.setLastLoc('offset=1996 line=50 span=19 id="toplevel.ss"')&&dl.Kernel.second(dM)),dl.types.Logic.FALSE)):((dl.Kernel.setLastLoc('offset=2075 line=52 span=25 id="toplevel.ss"')&&dl.Kernel._equal_((dl.Kernel.setLastLoc('offset=2078 line=52 span=19 id="toplevel.ss"')&&dl.Kernel.length(dM)),(dl.types.Rational.makeInstance(3,1)),[]))?(dl.Kernel.setLastLoc('offset=2125 line=53 span=179 id="toplevel.ss"')&&dI(dN,(dl.Kernel.setLastLoc('offset=2159 line=54 span=18 id="toplevel.ss"')&&dl.Kernel.first(dM)),(dl.Kernel.setLastLoc('offset=2205 line=55 span=19 id="toplevel.ss"')&&dl.Kernel.second(dM)),((dl.Kernel.setLastLoc('offset=2256 line=56 span=35 id="toplevel.ss"')&&dl.Kernel.symbol_equal__question_((dl.Kernel.setLastLoc('offset=2266 line=56 span=18 id="toplevel.ss"')&&dl.Kernel.third(dM)),(dl.types.Symbol.makeInstance("true"))))?dl.types.Logic.TRUE:dl.types.Logic.FALSE))):(dl.Kernel.setLastLoc('offset=1835 line=46 span=471 id="toplevel.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=1835 line=46 span=471 id=\\"toplevel.ss\\""'))))))});dL.toWrittenString=function(){return"<function:lambda>"};dL.toDisplayedString=dL.toWrittenString;return dL})()),dH,[(dl.Kernel.list([(dl.Kernel.list([(dl.types.Symbol.makeInstance("<")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("<=")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("=")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance(">")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance(">=")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("=~")),(dl.types.Rational.makeInstance(3,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("number->string")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("even?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("odd?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("positive?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("negative?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("number?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("rational?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("quotient")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("remainder")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("numerator")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("denominator")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("integer?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("real?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("abs")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("acos")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("add1")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("angle")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("asin")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("atan")),(dl.types.Rational.makeInstance(1,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("ceiling")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("complex?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("conjugate")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("cos")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("cosh")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("denominator")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("even?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("exact->inexact")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("exact?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("exp")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("expt")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("floor")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("gcd")),(dl.types.Rational.makeInstance(1,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("imag-part")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("inexact->exact")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("inexact?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("integer->char")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("integer-sqrt")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("integer?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("lcm")),(dl.types.Rational.makeInstance(1,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("log")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("magnitude")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("make-polar")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("make-rectangular")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("max")),(dl.types.Rational.makeInstance(1,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("min")),(dl.types.Rational.makeInstance(1,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("modulo")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("negative?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("number?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("numerator")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("odd?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("positive?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("random")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("rational?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("real-part")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("real?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("round")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("sgn")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("sin")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("sinh")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("sqr")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("sqrt")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("sub1")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("tan")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("zero?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("+")),(dl.types.Rational.makeInstance(0,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("-")),(dl.types.Rational.makeInstance(1,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("*")),(dl.types.Rational.makeInstance(0,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("/")),(dl.types.Rational.makeInstance(1,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("not")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("false?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("boolean?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("boolean=?")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("symbol->string")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("symbol=?")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("symbol?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("append")),(dl.types.Rational.makeInstance(1,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("assq")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("caaar")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("caadr")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("caar")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("cadar")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("cadddr")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("caddr")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("cadr")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("car")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("cddar")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("cdddr")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("cddr")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("cdr")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("cdaar")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("cdadr")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("cdar")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("cons?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("cons")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("empty?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("length")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("list")),(dl.types.Rational.makeInstance(0,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("list*")),(dl.types.Rational.makeInstance(1,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("list-ref")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("remove")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("member")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("memq")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("memv")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("null?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("pair?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("rest")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("reverse")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("first")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("second")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("third")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("fourth")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("fifth")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("sixth")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("seventh")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("eighth")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("box")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("unbox")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("set-box!")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("box?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("make-posn")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("posn-x")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("posn-y")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("posn?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("char->integer")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("char-alphabetic?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("char-ci<=?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("char-ci<?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("char-ci=?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("char-ci>=?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("char-ci>?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("char-downcase")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("char-lower-case?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("char-numeric?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("char-upcase")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("char-upper-case?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("char-whitespace?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("char<=?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("char<?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("char=?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("char>=?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("char>?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("char?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("format")),(dl.types.Rational.makeInstance(1,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("list->string")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("make-string")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("replicate")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string")),(dl.types.Rational.makeInstance(0,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string->list")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string->number")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string->symbol")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string-alphabetic?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string-append")),(dl.types.Rational.makeInstance(0,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string-ci<=?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string-ci<?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string-ci=?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string-ci>=?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string-ci>?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string-copy")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string-length")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string-lower-case?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string-numeric?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string-ref")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string-upper-case?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string-whitespace?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string<=?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string<?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string=?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string>=?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string>?")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("substring")),(dl.types.Rational.makeInstance(3,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string-ith")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("int->string")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("string->int")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("explode")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("implode")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("eof-object?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("=~")),(dl.types.Rational.makeInstance(3,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("eq?")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("equal?")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("equal~?")),(dl.types.Rational.makeInstance(3,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("eqv?")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("error")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("syntax-error")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("identity")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("struct?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("current-seconds")),(dl.types.Rational.makeInstance(0,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("andmap")),(dl.types.Rational.makeInstance(1,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("apply")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("argmax")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("argmin")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("build-list")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("build-string")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("compose")),(dl.types.Rational.makeInstance(0,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("filter")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("foldl")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("foldr")),(dl.types.Rational.makeInstance(2,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("map")),(dl.types.Rational.makeInstance(1,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("for-each")),(dl.types.Rational.makeInstance(1,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("memf")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("ormap")),(dl.types.Rational.makeInstance(1,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("procedure?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("quicksort")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("sort")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("void")),(dl.types.Rational.makeInstance(0,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("xml->s-exp")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("build-vector")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("make-vector")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("vector")),(dl.types.Rational.makeInstance(0,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("vector-length")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("vector-ref")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("vector-set!")),(dl.types.Rational.makeInstance(3,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("vector?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("printf")),(dl.types.Rational.makeInstance(1,1)),(dl.types.Symbol.makeInstance("true"))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("check-expect")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("check-within")),(dl.types.Rational.makeInstance(3,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("check-error")),(dl.types.Rational.makeInstance(2,1))]))]))]));dF=(dl.Kernel.setLastLoc('offset=11677 line=326 span=1573 id="toplevel.ss"')&&dl.Kernel.foldl(((function(){dl.Kernel.setLastLoc('offset=11684 line=326 span=125 id="toplevel.ss"');var dL=(function(dO){var dM=dO[0];var dN=dO[1];return(dl.Kernel.setLastLoc('offset=11733 line=327 span=75 id="toplevel.ss"')&&dJ(dN,(dl.Kernel.setLastLoc('offset=11741 line=327 span=21 id="toplevel.ss"')&&dl.Kernel.first(dM)),(dl.Kernel.setLastLoc('offset=11763 line=327 span=22 id="toplevel.ss"')&&dl.Kernel.second(dM)),(dl.Kernel.setLastLoc('offset=11786 line=327 span=21 id="toplevel.ss"')&&dl.Kernel.third(dM))))});dL.toWrittenString=function(){return"<function:lambda>"};dL.toDisplayedString=dL.toWrittenString;return dL})()),dG,[(dl.Kernel.setLastLoc('offset=11858 line=329 span=1391 id="toplevel.ss"')&&dl.Kernel.append((dl.Kernel.list([(dl.Kernel.list([(dl.types.Symbol.makeInstance("open-input-stx")),(dl.types.Rational.makeInstance(1,1)),(dl.types.String.makeInstance("plt.Kernel.openInputStx"))]))])),[(dl.Kernel.setLastLoc('offset=12474 line=339 span=774 id="toplevel.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=12479 line=339 span=280 id="toplevel.ss"');var dL=(function(dM){var dN=dM[0];return(dl.Kernel.setLastLoc('offset=12532 line=340 span=226 id="toplevel.ss"')&&dl.Kernel.append(dN,[(dl.Kernel.setLastLoc('offset=12592 line=341 span=165 id="toplevel.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=12642 line=342 span=114 id="toplevel.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=12702 line=343 span=53 id="toplevel.ss"')&&h((dl.Kernel.setLastLoc('offset=12738 line=343 span=16 id="toplevel.ss"')&&dl.Kernel.first(dN))))))]))]))});dL.toWrittenString=function(){return"<function:lambda>"};dL.toDisplayedString=dL.toWrittenString;return dL})()),[(dl.Kernel.list([(dl.Kernel.list([(dl.types.Symbol.makeInstance("stx-begins-with?")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("stx-e")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("stx?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("stx:list?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("stx:atom?")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("make-stx:list")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("make-stx:atom")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("stx-loc")),(dl.types.Rational.makeInstance(1,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("datum->stx")),(dl.types.Rational.makeInstance(2,1))])),(dl.Kernel.list([(dl.types.Symbol.makeInstance("Loc->string")),(dl.types.Rational.makeInstance(1,1))]))]))]))]))]))})(dl.Kernel.identity);return dF})())};var bj=function(bf,dF,dG){dl.Kernel.Struct.call(this,"make-module-binding",[bf,dF,dG]);this.name=bf;this.source=dF;this.bindings=dG};bj.prototype=new dl.Kernel.Struct();var bi=function(dG,dF,bf){return new bj(dG,dF,bf)};var bP=function(bf){if(c8(bf)){return bf.name}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("module-binding-name: not a module-binding: ~s",[bf]))}};var bR=function(bf){if(c8(bf)){return bf.source}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("module-binding-source: not a module-binding: ~s",[bf]))}};var cW=function(bf){if(c8(bf)){return bf.bindings}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("module-binding-bindings: not a module-binding: ~s",[bf]))}};var ay=function(dF,bf){if(c8(dF)){dF.name=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_module_dash_binding_dash_name_bang_: not a module-binding: ~s",[dF]))}};var ck=function(dF,bf){if(c8(dF)){dF.source=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_module_dash_binding_dash_source_bang_: not a module-binding: ~s",[dF]))}};var x=function(dF,bf){if(c8(dF)){dF.bindings=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_module_dash_binding_dash_bindings_bang_: not a module-binding: ~s",[dF]))}};var c8=function(bf){return bf!=null&&bf!=undefined&&bf instanceof bj};var aa;var cd;var cc=function(bf){return((function(){var dF=function(dG,dJ,dI,dK,dH){return(dl.Kernel.setLastLoc('offset=8573 line=163 span=80 id="modules.ss"')&&bl(dG,dJ,dI,dK,dH,dl.types.Empty.EMPTY,dl.types.Logic.FALSE))};(function(dG){})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=8660 line=164 span=2168 id="modules.ss"')&&bi((dl.types.Symbol.makeInstance("world")),bf,(dl.Kernel.setLastLoc('offset=8746 line=166 span=2081 id="modules.ss"')&&dl.Kernel.append((dl.Kernel.setLastLoc('offset=8754 line=166 span=47 id="modules.ss"')&&cW(cd)),[(dl.Kernel.setLastLoc('offset=8833 line=167 span=46 id="modules.ss"')&&cW(aa)),(dl.Kernel.setLastLoc('offset=8911 line=168 span=1915 id="modules.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=8917 line=168 span=60 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("big-bang")),bf,(dl.types.Rational.makeInstance(3,1)),dl.types.Logic.TRUE,(dl.types.String.makeInstance("plt.world.Kernel.bigBang")))),(dl.Kernel.setLastLoc('offset=9007 line=171 span=59 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("image?")),bf,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.Kernel.isImage")))),(dl.Kernel.setLastLoc('offset=9076 line=172 span=76 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("image=?")),bf,(dl.types.Rational.makeInstance(2,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.Kernel.image_equal__question__")))),(dl.Kernel.setLastLoc('offset=9191 line=174 span=108 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("empty-scene")),bf,(dl.types.Rational.makeInstance(2,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.Kernel.emptyScene")))),(dl.Kernel.setLastLoc('offset=9337 line=176 span=108 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("place-image")),bf,(dl.types.Rational.makeInstance(4,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.Kernel.placeImage")))),(dl.Kernel.setLastLoc('offset=9483 line=178 span=99 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("circle")),bf,(dl.types.Rational.makeInstance(3,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.Kernel.circle")))),(dl.Kernel.setLastLoc('offset=9620 line=180 span=110 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("nw:rectangle")),bf,(dl.types.Rational.makeInstance(4,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.Kernel.nwRectangle")))),(dl.Kernel.setLastLoc('offset=9768 line=182 span=105 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("rectangle")),bf,(dl.types.Rational.makeInstance(4,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.Kernel.rectangle")))),(dl.Kernel.setLastLoc('offset=9949 line=185 span=102 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("key=?")),bf,(dl.types.Rational.makeInstance(2,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.Kernel.isKeyEqual")))),(dl.Kernel.setLastLoc('offset=10089 line=187 span=95 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("text")),bf,(dl.types.Rational.makeInstance(3,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.Kernel.text")))),(dl.Kernel.setLastLoc('offset=10194 line=189 span=113 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("open-image-url")),bf,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.Kernel.openImageUrl")))),(dl.Kernel.setLastLoc('offset=10345 line=191 span=108 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("image-width")),bf,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.Kernel.imageWidth")))),(dl.Kernel.setLastLoc('offset=10491 line=193 span=110 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("image-height")),bf,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.Kernel.imageHeight")))),(dl.Kernel.setLastLoc('offset=10639 line=195 span=110 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("image-rotate")),bf,(dl.types.Rational.makeInstance(2,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.Kernel.imageRotate"))))]))]))))})())};var aP;var c5;var dD;var dk;var am;var aG;var au;var dm;var at;var aC;var c6=function(bf,dF){return((function(){var dG=function(dH,dI){return((dl.Kernel.setLastLoc('offset=19331 line=398 span=17 id="modules.ss"')&&dl.Kernel.empty_question_(dI))?dH:(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=19407 line=401 span=80 id="modules.ss"')&&dG((dl.Kernel.setLastLoc('offset=19413 line=401 span=36 id="modules.ss"')&&bN(dH,(dl.Kernel.setLastLoc('offset=19432 line=401 span=16 id="modules.ss"')&&dl.Kernel.first(dI)))),(dl.Kernel.setLastLoc('offset=19471 line=402 span=15 id="modules.ss"')&&dl.Kernel.rest(dI)))):(dl.Kernel.setLastLoc('offset=19310 line=397 span=179 id="modules.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=19310 line=397 span=179 id=\\"modules.ss\\""'))))))};(function(dH){})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=19496 line=403 span=56 id="modules.ss"')&&dG(bf,(dl.Kernel.setLastLoc('offset=19509 line=403 span=42 id="modules.ss"')&&cW(dF))))})())};var ak;var bS=function(dG,bf,dI,dH,dF){dl.Kernel.Struct.call(this,"make-pinfo",[dG,bf,dI,dH,dF]);this.env=dG;this.modules=bf;this.used_dash_bindings_dash_hash=dI;this.gensym_dash_counter=dH;this.enduring_dash_names=dF};bS.prototype=new dl.Kernel.Struct();var aq=function(dI,dH,dG,dF,bf){return new bS(dI,dH,dG,dF,bf)};var cD=function(bf){if(bD(bf)){return bf.env}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("pinfo-env: not a pinfo: ~s",[bf]))}};var cN=function(bf){if(bD(bf)){return bf.modules}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("pinfo-modules: not a pinfo: ~s",[bf]))}};var aE=function(bf){if(bD(bf)){return bf.used_dash_bindings_dash_hash}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("pinfo-used-bindings-hash: not a pinfo: ~s",[bf]))}};var af=function(bf){if(bD(bf)){return bf.gensym_dash_counter}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("pinfo-gensym-counter: not a pinfo: ~s",[bf]))}};var c7=function(bf){if(bD(bf)){return bf.enduring_dash_names}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("pinfo-enduring-names: not a pinfo: ~s",[bf]))}};var C=function(dF,bf){if(bD(dF)){dF.env=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_pinfo_dash_env_bang_: not a pinfo: ~s",[dF]))}};var i=function(dF,bf){if(bD(dF)){dF.modules=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_pinfo_dash_modules_bang_: not a pinfo: ~s",[dF]))}};var y=function(dF,bf){if(bD(dF)){dF.used_dash_bindings_dash_hash=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_pinfo_dash_used_dash_bindings_dash_hash_bang_: not a pinfo: ~s",[dF]))}};var aI=function(dF,bf){if(bD(dF)){dF.gensym_dash_counter=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_pinfo_dash_gensym_dash_counter_bang_: not a pinfo: ~s",[dF]))}};var aQ=function(dF,bf){if(bD(dF)){dF.enduring_dash_names=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_pinfo_dash_enduring_dash_names_bang_: not a pinfo: ~s",[dF]))}};var bD=function(bf){return bf!=null&&bf!=undefined&&bf instanceof bS};var b1;var a4=function(bf){return(dl.Kernel.setLastLoc('offset=1177 line=40 span=62 id="pinfo.ss"')&&dl.Kernel.map((function(){var dF=(function(dG){return dl.Kernel.second(dG[0])});dF.toWrittenString=function(){return"<function:second>"};dF.toDisplayedString=function(){return"<function:second>"};return dF})(),[(dl.Kernel.setLastLoc('offset=1189 line=40 span=49 id="pinfo.ss"')&&bh((dl.Kernel.setLastLoc('offset=1203 line=40 span=34 id="pinfo.ss"')&&aE(bf))))]))};var r=function(bf){return(dl.Kernel.setLastLoc('offset=1291 line=45 span=184 id="pinfo.ss"')&&aq((dl.Kernel.setLastLoc('offset=1303 line=45 span=19 id="pinfo.ss"')&&cD(bf)),(dl.Kernel.setLastLoc('offset=1337 line=46 span=23 id="pinfo.ss"')&&cN(bf)),(dl.Kernel.setLastLoc('offset=1375 line=47 span=34 id="pinfo.ss"')&&aE(bf)),(dl.Kernel.setLastLoc('offset=1424 line=48 span=30 id="pinfo.ss"')&&af(bf)),dl.types.Empty.EMPTY))};var cZ=function(dF,bf){return(dl.Kernel.setLastLoc('offset=1594 line=55 span=155 id="pinfo.ss"')&&aq(bf,(dl.Kernel.setLastLoc('offset=1619 line=57 span=23 id="pinfo.ss"')&&cN(dF)),(dl.Kernel.setLastLoc('offset=1646 line=58 span=34 id="pinfo.ss"')&&aE(dF)),(dl.Kernel.setLastLoc('offset=1684 line=59 span=30 id="pinfo.ss"')&&af(dF)),(dl.Kernel.setLastLoc('offset=1718 line=60 span=30 id="pinfo.ss"')&&c7(dF))))};var dt=function(bf,dF){return(dl.Kernel.setLastLoc('offset=1900 line=66 span=191 id="pinfo.ss"')&&aq((dl.Kernel.setLastLoc('offset=1915 line=67 span=42 id="pinfo.ss"')&&bN((dl.Kernel.setLastLoc('offset=1927 line=67 span=19 id="pinfo.ss"')&&cD(dF)),bf)),(dl.Kernel.setLastLoc('offset=1961 line=68 span=23 id="pinfo.ss"')&&cN(dF)),(dl.Kernel.setLastLoc('offset=1988 line=69 span=34 id="pinfo.ss"')&&aE(dF)),(dl.Kernel.setLastLoc('offset=2026 line=70 span=30 id="pinfo.ss"')&&af(dF)),(dl.Kernel.setLastLoc('offset=2060 line=71 span=30 id="pinfo.ss"')&&c7(dF))))};var ad=function(dF,bf){return(dl.Kernel.setLastLoc('offset=2259 line=77 span=67 id="pinfo.ss"')&&dl.Kernel.foldl((function(){var dG=(function(dH){return dt(dH[0],dH[1])});dG.toWrittenString=function(){return"<function:pinfo-accumulate-binding>"};dG.toDisplayedString=function(){return"<function:pinfo-accumulate-binding>"};return dG})(),bf,[dF]))};var b8=function(bf,dF){return(dl.Kernel.setLastLoc('offset=2478 line=85 span=225 id="pinfo.ss"')&&aq((dl.Kernel.setLastLoc('offset=2490 line=85 span=19 id="pinfo.ss"')&&cD(dF)),(dl.Kernel.setLastLoc('offset=2524 line=86 span=39 id="pinfo.ss"')&&dl.Kernel.cons(bf,(dl.Kernel.setLastLoc('offset=2539 line=86 span=23 id="pinfo.ss"')&&cN(dF)))),(dl.Kernel.setLastLoc('offset=2578 line=87 span=34 id="pinfo.ss"')&&aE(dF)),(dl.Kernel.setLastLoc('offset=2627 line=88 span=30 id="pinfo.ss"')&&af(dF)),(dl.Kernel.setLastLoc('offset=2672 line=89 span=30 id="pinfo.ss"')&&c7(dF))))};var aV=function(bf,dF){return(dl.Kernel.setLastLoc('offset=2864 line=95 span=353 id="pinfo.ss"')&&aq((dl.Kernel.setLastLoc('offset=2876 line=95 span=19 id="pinfo.ss"')&&cD(dF)),(dl.Kernel.setLastLoc('offset=2910 line=96 span=23 id="pinfo.ss"')&&cN(dF)),(dl.Kernel.setLastLoc('offset=2948 line=97 span=178 id="pinfo.ss"')&&o((function(){var dG=(function(dH){return aF(dH[0],dH[1])});dG.toWrittenString=function(){return"<function:symbol<>"};dG.toDisplayedString=function(){return"<function:symbol<>"};return dG})(),(dl.Kernel.setLastLoc('offset=3000 line=98 span=34 id="pinfo.ss"')&&aE(dF)),(dl.Kernel.setLastLoc('offset=3064 line=99 span=22 id="pinfo.ss"')&&Q(bf)),bf)),(dl.Kernel.setLastLoc('offset=3141 line=101 span=30 id="pinfo.ss"')&&af(dF)),(dl.Kernel.setLastLoc('offset=3186 line=102 span=30 id="pinfo.ss"')&&c7(dF))))};var cG=function(dF,bf){return(dl.Kernel.setLastLoc('offset=3345 line=108 span=395 id="pinfo.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=3351 line=108 span=240 id="pinfo.ss"')&&aq((dl.Kernel.setLastLoc('offset=3363 line=108 span=19 id="pinfo.ss"')&&cD(dF)),(dl.Kernel.setLastLoc('offset=3403 line=109 span=23 id="pinfo.ss"')&&cN(dF)),(dl.Kernel.setLastLoc('offset=3447 line=110 span=34 id="pinfo.ss"')&&aE(dF)),(dl.Kernel.setLastLoc('offset=3502 line=111 span=37 id="pinfo.ss"')&&dl.Kernel.add1((dl.Kernel.setLastLoc('offset=3508 line=111 span=30 id="pinfo.ss"')&&af(dF)))),(dl.Kernel.setLastLoc('offset=3560 line=112 span=30 id="pinfo.ss"')&&c7(dF)))),(dl.Kernel.setLastLoc('offset=3601 line=114 span=138 id="pinfo.ss"')&&dl.Kernel.string_dash__greaterthan_symbol((dl.Kernel.setLastLoc('offset=3626 line=115 span=112 id="pinfo.ss"')&&dl.Kernel.string_dash_append([(dl.Kernel.setLastLoc('offset=3641 line=115 span=24 id="pinfo.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(bf)),(dl.Kernel.setLastLoc('offset=3690 line=116 span=47 id="pinfo.ss"')&&dl.Kernel.number_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=3706 line=116 span=30 id="pinfo.ss"')&&af(dF))))]))))]))};var M=function(bf){return((function(){var dG=function(dH){return((dl.Kernel.setLastLoc('offset=3983 line=126 span=12 id="pinfo.ss"')&&dl.Kernel.empty_question_(dH))?dl.types.Empty.EMPTY:((dl.Kernel.setLastLoc('offset=4041 line=128 span=60 id="pinfo.ss"')&&dF((dl.Kernel.setLastLoc('offset=4050 line=128 span=11 id="pinfo.ss"')&&dl.Kernel.first(dH)),(dl.Kernel.setLastLoc('offset=4090 line=129 span=10 id="pinfo.ss"')&&dl.Kernel.rest(dH))))?(dl.Kernel.setLastLoc('offset=4121 line=130 span=19 id="pinfo.ss"')&&dG((dl.Kernel.setLastLoc('offset=4129 line=130 span=10 id="pinfo.ss"')&&dl.Kernel.rest(dH)))):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=4185 line=132 span=63 id="pinfo.ss"')&&dl.Kernel.cons((dl.Kernel.setLastLoc('offset=4191 line=132 span=11 id="pinfo.ss"')&&dl.Kernel.first(dH)),(dl.Kernel.setLastLoc('offset=4228 line=133 span=19 id="pinfo.ss"')&&dG((dl.Kernel.setLastLoc('offset=4236 line=133 span=10 id="pinfo.ss"')&&dl.Kernel.rest(dH)))))):(dl.Kernel.setLastLoc('offset=3976 line=126 span=274 id="pinfo.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=3976 line=126 span=274 id=\\"pinfo.ss\\""')))))))};var dF=function(dI,dH){return((dl.Kernel.setLastLoc('offset=4365 line=137 span=12 id="pinfo.ss"')&&dl.Kernel.empty_question_(dH))?dl.types.Logic.FALSE:((dl.Kernel.setLastLoc('offset=4415 line=139 span=19 id="pinfo.ss"')&&dl.Kernel.eq_question_((dl.Kernel.setLastLoc('offset=4420 line=139 span=11 id="pinfo.ss"')&&dl.Kernel.first(dH)),dI))?dl.types.Logic.TRUE:(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=4491 line=142 span=22 id="pinfo.ss"')&&dF(dI,(dl.Kernel.setLastLoc('offset=4502 line=142 span=10 id="pinfo.ss"')&&dl.Kernel.rest(dH)))):(dl.Kernel.setLastLoc('offset=4344 line=136 span=171 id="pinfo.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=4344 line=136 span=171 id=\\"pinfo.ss\\""')))))))};(function(dH){})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=4522 line=143 span=443 id="pinfo.ss"')&&dG((dl.Kernel.setLastLoc('offset=4535 line=144 span=429 id="pinfo.ss"')&&dl.Kernel.foldl(((function(){dl.Kernel.setLastLoc('offset=4542 line=144 span=361 id="pinfo.ss"');var dH=(function(dI){var dK=dI[0];var dJ=dI[1];return((dl.Kernel.setLastLoc('offset=4595 line=145 span=29 id="pinfo.ss"')&&ci(dK))?(dl.Kernel.setLastLoc('offset=4646 line=146 span=90 id="pinfo.ss"')&&dl.Kernel.append((dl.Kernel.setLastLoc('offset=4654 line=146 span=40 id="pinfo.ss"')&&bk(dK)),[dJ])):((dl.Kernel.setLastLoc('offset=4759 line=148 span=29 id="pinfo.ss"')&&cJ(dK))?(dl.Kernel.setLastLoc('offset=4810 line=149 span=90 id="pinfo.ss"')&&dl.Kernel.append((dl.Kernel.setLastLoc('offset=4818 line=149 span=40 id="pinfo.ss"')&&bw(dK)),[dJ])):(dl.Kernel.setLastLoc('offset=4588 line=145 span=314 id="pinfo.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=4588 line=145 span=314 id=\\"pinfo.ss\\""'))))))});dH.toWrittenString=function(){return"<function:lambda>"};dH.toDisplayedString=dH.toWrittenString;return dH})()),dl.types.Empty.EMPTY,[(dl.Kernel.setLastLoc('offset=4934 line=152 span=29 id="pinfo.ss"')&&a4(bf))]))))})())};var aJ=function(bf){return((dl.Kernel.setLastLoc('offset=5170 line=163 span=25 id="pinfo.ss"')&&dl.Kernel.symbol_equal__question_(bf,(dl.types.Symbol.makeInstance("moby"))))?(dl.Kernel.setLastLoc('offset=5201 line=164 span=179 id="pinfo.ss"')&&cZ(b1,(dl.Kernel.setLastLoc('offset=5254 line=165 span=125 id="pinfo.ss"')&&c6((dl.Kernel.setLastLoc('offset=5281 line=165 span=27 id="pinfo.ss"')&&du(bf)),aC)))):((dl.Kernel.setLastLoc('offset=5387 line=167 span=25 id="pinfo.ss"')&&dl.Kernel.symbol_equal__question_(bf,(dl.types.Symbol.makeInstance("base"))))?(dl.Kernel.setLastLoc('offset=5418 line=168 span=81 id="pinfo.ss"')&&cZ(b1,(dl.Kernel.setLastLoc('offset=5471 line=169 span=27 id="pinfo.ss"')&&du(bf)))):(dl.Kernel.setLastLoc('offset=5159 line=162 span=342 id="pinfo.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=5159 line=162 span=342 id=\\"pinfo.ss\\""'))))))};var cT=function(bf){return(dl.Kernel.setLastLoc('offset=513 line=21 span=56 id="analyzer.ss"')&&c4(bf,(dl.Kernel.setLastLoc('offset=546 line=21 span=22 id="analyzer.ss"')&&aJ((dl.types.Symbol.makeInstance("base"))))))};var c4=function(bf,dF){return((function(){var dG;(function(dH){dG=(dl.Kernel.setLastLoc('offset=659 line=26 span=53 id="analyzer.ss"')&&cC(bf,dF))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=719 line=27 span=40 id="analyzer.ss"')&&aL(bf,dG))})())};var cC=function(bf,dF){return((dl.Kernel.setLastLoc('offset=1113 line=37 span=18 id="analyzer.ss"')&&dl.Kernel.empty_question_(bf))?dF:(dl.types.Logic.TRUE?((function(){var dG;(function(dH){dG=((dl.Kernel.setLastLoc('offset=1227 line=41 span=25 id="analyzer.ss"')&&dc((dl.Kernel.setLastLoc('offset=1234 line=41 span=17 id="analyzer.ss"')&&dl.Kernel.first(bf))))?(dl.Kernel.setLastLoc('offset=1279 line=42 span=64 id="analyzer.ss"')&&L((dl.Kernel.setLastLoc('offset=1319 line=42 span=17 id="analyzer.ss"')&&dl.Kernel.first(bf)),dF)):((dl.Kernel.setLastLoc('offset=1371 line=43 span=30 id="analyzer.ss"')&&a5((dl.Kernel.setLastLoc('offset=1383 line=43 span=17 id="analyzer.ss"')&&dl.Kernel.first(bf))))?dF:((dl.Kernel.setLastLoc('offset=1461 line=45 span=36 id="analyzer.ss"')&&bd((dl.Kernel.setLastLoc('offset=1479 line=45 span=17 id="analyzer.ss"')&&dl.Kernel.first(bf))))?(dl.Kernel.setLastLoc('offset=1524 line=46 span=58 id="analyzer.ss"')&&q((dl.Kernel.setLastLoc('offset=1541 line=46 span=34 id="analyzer.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=1549 line=46 span=25 id="analyzer.ss"')&&b2((dl.Kernel.setLastLoc('offset=1556 line=46 span=17 id="analyzer.ss"')&&dl.Kernel.first(bf)))))),dF)):((dl.Kernel.setLastLoc('offset=1610 line=47 span=31 id="analyzer.ss"')&&ca((dl.Kernel.setLastLoc('offset=1623 line=47 span=17 id="analyzer.ss"')&&dl.Kernel.first(bf))))?dF:(dl.Kernel.setLastLoc('offset=1220 line=41 span=455 id="analyzer.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=1220 line=41 span=455 id=\\"analyzer.ss\\""'))))))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=1689 line=49 span=116 id="analyzer.ss"')&&cC((dl.Kernel.setLastLoc('offset=1726 line=49 span=16 id="analyzer.ss"')&&dl.Kernel.rest(bf)),dG))})()):(dl.Kernel.setLastLoc('offset=1106 line=37 span=702 id="analyzer.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=1106 line=37 span=702 id=\\"analyzer.ss\\""'))))))};var aL=function(bf,dF){return((dl.Kernel.setLastLoc('offset=1974 line=57 span=18 id="analyzer.ss"')&&dl.Kernel.empty_question_(bf))?dF:(dl.types.Logic.TRUE?((function(){var dG;(function(dH){dG=((dl.Kernel.setLastLoc('offset=2088 line=61 span=25 id="analyzer.ss"')&&dc((dl.Kernel.setLastLoc('offset=2095 line=61 span=17 id="analyzer.ss"')&&dl.Kernel.first(bf))))?(dl.Kernel.setLastLoc('offset=2140 line=62 span=49 id="analyzer.ss"')&&bG((dl.Kernel.setLastLoc('offset=2165 line=62 span=17 id="analyzer.ss"')&&dl.Kernel.first(bf)),dF)):((dl.Kernel.setLastLoc('offset=2217 line=63 span=30 id="analyzer.ss"')&&a5((dl.Kernel.setLastLoc('offset=2229 line=63 span=17 id="analyzer.ss"')&&dl.Kernel.first(bf))))?dF:((dl.Kernel.setLastLoc('offset=2307 line=65 span=36 id="analyzer.ss"')&&bd((dl.Kernel.setLastLoc('offset=2325 line=65 span=17 id="analyzer.ss"')&&dl.Kernel.first(bf))))?dF:((dl.Kernel.setLastLoc('offset=2403 line=67 span=31 id="analyzer.ss"')&&ca((dl.Kernel.setLastLoc('offset=2416 line=67 span=17 id="analyzer.ss"')&&dl.Kernel.first(bf))))?(dl.Kernel.setLastLoc('offset=2461 line=68 span=170 id="analyzer.ss"')&&cz((dl.Kernel.setLastLoc('offset=2486 line=68 span=17 id="analyzer.ss"')&&dl.Kernel.first(bf)),dF,(dl.Kernel.setLastLoc('offset=2613 line=70 span=17 id="analyzer.ss"')&&cD(dF)))):(dl.Kernel.setLastLoc('offset=2081 line=61 span=552 id="analyzer.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=2081 line=61 span=552 id=\\"analyzer.ss\\""'))))))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=2647 line=71 span=86 id="analyzer.ss"')&&aL((dl.Kernel.setLastLoc('offset=2669 line=71 span=16 id="analyzer.ss"')&&dl.Kernel.rest(bf)),dG))})()):(dl.Kernel.setLastLoc('offset=1967 line=57 span=769 id="analyzer.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=1967 line=57 span=769 id=\\"analyzer.ss\\""'))))))};var cL=function(bf,dH,dG,dI,dF){return(dl.Kernel.setLastLoc('offset=2880 line=77 span=80 id="analyzer.ss"')&&bl(bf,dH,dG,dI,dF,dl.types.Empty.EMPTY,dl.types.Logic.FALSE))};var L=function(bf,dF){return(dl.Kernel.setLastLoc('offset=3177 line=83 span=1092 id="analyzer.ss"')&&bW(bf,((function(){dl.Kernel.setLastLoc('offset=3246 line=87 span=377 id="analyzer.ss"');var dG=(function(dJ){var dK=dJ[0];var dI=dJ[1];var dH=dJ[2];return(dl.Kernel.setLastLoc('offset=3274 line=88 span=348 id="analyzer.ss"')&&dt((dl.Kernel.setLastLoc('offset=3300 line=88 span=284 id="analyzer.ss"')&&cL((dl.Kernel.setLastLoc('offset=3304 line=88 span=10 id="analyzer.ss"')&&b2(dK)),dl.types.Logic.FALSE,(dl.Kernel.setLastLoc('offset=3391 line=90 span=13 id="analyzer.ss"')&&dl.Kernel.length(dI)),dl.types.Logic.FALSE,(dl.Kernel.setLastLoc('offset=3483 line=92 span=100 id="analyzer.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=3535 line=93 span=47 id="analyzer.ss"')&&h((dl.Kernel.setLastLoc('offset=3571 line=93 span=10 id="analyzer.ss"')&&b2(dK)))))))),dF))});dG.toWrittenString=function(){return"<function:lambda>"};dG.toDisplayedString=dG.toWrittenString;return dG})()),((function(){dl.Kernel.setLastLoc('offset=3660 line=97 span=357 id="analyzer.ss"');var dG=(function(dI){var dJ=dI[0];var dH=dI[1];return(dl.Kernel.setLastLoc('offset=3683 line=98 span=333 id="analyzer.ss"')&&dt((dl.Kernel.setLastLoc('offset=3709 line=98 span=269 id="analyzer.ss"')&&aM((dl.Kernel.setLastLoc('offset=3732 line=98 span=10 id="analyzer.ss"')&&b2(dJ)),(dl.Kernel.setLastLoc('offset=3797 line=99 span=120 id="analyzer.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=3869 line=100 span=47 id="analyzer.ss"')&&h((dl.Kernel.setLastLoc('offset=3905 line=100 span=10 id="analyzer.ss"')&&b2(dJ)))))),dl.types.Empty.EMPTY)),dF))});dG.toWrittenString=function(){return"<function:lambda>"};dG.toDisplayedString=dG.toWrittenString;return dG})()),((function(){dl.Kernel.setLastLoc('offset=4057 line=105 span=211 id="analyzer.ss"');var dG=(function(dI){var dJ=dI[0];var dH=dI[1];return(dl.Kernel.setLastLoc('offset=4082 line=106 span=185 id="analyzer.ss"')&&ad((dl.Kernel.setLastLoc('offset=4109 line=106 span=119 id="analyzer.ss"')&&dh((dl.Kernel.setLastLoc('offset=4137 line=106 span=10 id="analyzer.ss"')&&b2(dJ)),(dl.Kernel.setLastLoc('offset=4209 line=107 span=18 id="analyzer.ss"')&&dl.Kernel.map((function(){var dK=(function(dL){return b2(dL[0])});dK.toWrittenString=function(){return"<function:stx-e>"};dK.toDisplayedString=function(){return"<function:stx-e>"};return dK})(),[dH])))),dF))});dG.toWrittenString=function(){return"<function:lambda>"};dG.toDisplayedString=dG.toWrittenString;return dG})())))};var dh=function(dF,bf){return((function(){var dJ;var dL;var dG;var dM;var dH;var dI;var dK;var dN;(function(dO){dJ=(dl.Kernel.setLastLoc('offset=4515 line=117 span=60 id="analyzer.ss"')&&dl.Kernel.string_dash__greaterthan_symbol((dl.Kernel.setLastLoc('offset=4531 line=117 span=43 id="analyzer.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("make-")),(dl.Kernel.setLastLoc('offset=4554 line=117 span=19 id="analyzer.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(dF))]))));dL=(dl.Kernel.setLastLoc('offset=4628 line=119 span=149 id="analyzer.ss"')&&cL(dJ,dl.types.Logic.FALSE,(dl.Kernel.setLastLoc('offset=4653 line=119 span=15 id="analyzer.ss"')&&dl.Kernel.length(bf)),dl.types.Logic.FALSE,(dl.Kernel.setLastLoc('offset=4691 line=120 span=85 id="analyzer.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=4724 line=121 span=51 id="analyzer.ss"')&&h(dJ))))));dG=(dl.Kernel.setLastLoc('offset=4822 line=123 span=56 id="analyzer.ss"')&&dl.Kernel.string_dash__greaterthan_symbol((dl.Kernel.setLastLoc('offset=4838 line=123 span=39 id="analyzer.ss"')&&dl.Kernel.string_dash_append([(dl.Kernel.setLastLoc('offset=4853 line=123 span=19 id="analyzer.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(dF)),(dl.types.String.makeInstance("?"))]))));dM=(dl.Kernel.setLastLoc('offset=4928 line=125 span=131 id="analyzer.ss"')&&cL(dG,dl.types.Logic.FALSE,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.Kernel.setLastLoc('offset=4975 line=126 span=83 id="analyzer.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=5008 line=127 span=49 id="analyzer.ss"')&&h(dG))))));dH=(dl.Kernel.setLastLoc('offset=5104 line=129 span=137 id="analyzer.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=5109 line=129 span=107 id="analyzer.ss"');var dP=(function(dQ){var dR=dQ[0];return(dl.Kernel.setLastLoc('offset=5140 line=130 span=75 id="analyzer.ss"')&&dl.Kernel.string_dash__greaterthan_symbol((dl.Kernel.setLastLoc('offset=5156 line=130 span=58 id="analyzer.ss"')&&dl.Kernel.string_dash_append([(dl.Kernel.setLastLoc('offset=5171 line=130 span=19 id="analyzer.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(dF)),(dl.types.String.makeInstance("-")),(dl.Kernel.setLastLoc('offset=5195 line=130 span=18 id="analyzer.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(dR))]))))});dP.toWrittenString=function(){return"<function:lambda>"};dP.toDisplayedString=dP.toWrittenString;return dP})()),[bf]));dI=(dl.Kernel.setLastLoc('offset=5291 line=133 span=208 id="analyzer.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=5296 line=133 span=172 id="analyzer.ss"');var dP=(function(dR){var dQ=dR[0];return(dl.Kernel.setLastLoc('offset=5333 line=134 span=134 id="analyzer.ss"')&&cL(dQ,dl.types.Logic.FALSE,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.Kernel.setLastLoc('offset=5382 line=135 span=84 id="analyzer.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=5422 line=136 span=43 id="analyzer.ss"')&&h(dQ))))))});dP.toWrittenString=function(){return"<function:lambda>"};dP.toDisplayedString=dP.toWrittenString;return dP})()),[dH]));dK=(dl.Kernel.setLastLoc('offset=5543 line=139 span=148 id="analyzer.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=5548 line=139 span=118 id="analyzer.ss"');var dP=(function(dQ){var dR=dQ[0];return(dl.Kernel.setLastLoc('offset=5579 line=140 span=86 id="analyzer.ss"')&&dl.Kernel.string_dash__greaterthan_symbol((dl.Kernel.setLastLoc('offset=5595 line=140 span=69 id="analyzer.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("set-")),(dl.Kernel.setLastLoc('offset=5617 line=140 span=19 id="analyzer.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(dF)),(dl.types.String.makeInstance("-")),(dl.Kernel.setLastLoc('offset=5641 line=140 span=18 id="analyzer.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(dR)),(dl.types.String.makeInstance("!"))]))))});dP.toWrittenString=function(){return"<function:lambda>"};dP.toDisplayedString=dP.toWrittenString;return dP})()),[bf]));dN=(dl.Kernel.setLastLoc('offset=5740 line=143 span=181 id="analyzer.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=5745 line=143 span=146 id="analyzer.ss"');var dP=(function(dR){var dQ=dR[0];return(dl.Kernel.setLastLoc('offset=5781 line=144 span=109 id="analyzer.ss"')&&cL(dQ,dl.types.Logic.FALSE,(dl.types.Rational.makeInstance(2,1)),dl.types.Logic.FALSE,(dl.Kernel.setLastLoc('offset=5829 line=145 span=60 id="analyzer.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=5845 line=145 span=43 id="analyzer.ss"')&&h(dQ))))))});dP.toWrittenString=function(){return"<function:lambda>"};dP.toDisplayedString=dP.toWrittenString;return dP})()),[dK]))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=5928 line=147 span=95 id="analyzer.ss"')&&dl.Kernel.append((dl.Kernel.setLastLoc('offset=5936 line=147 span=26 id="analyzer.ss"')&&dl.Kernel.list([dL])),[(dl.Kernel.setLastLoc('offset=5963 line=147 span=24 id="analyzer.ss"')&&dl.Kernel.list([dM])),dI,dN]))})())};var bG=function(bf,dF){return(dl.Kernel.setLastLoc('offset=6198 line=156 span=604 id="analyzer.ss"')&&bW(bf,((function(){dl.Kernel.setLastLoc('offset=6263 line=157 span=182 id="analyzer.ss"');var dG=(function(dI){var dK=dI[0];var dJ=dI[1];var dH=dI[2];return(dl.Kernel.setLastLoc('offset=6391 line=159 span=53 id="analyzer.ss"')&&ch(dK,dJ,dH,dF))});dG.toWrittenString=function(){return"<function:lambda>"};dG.toDisplayedString=dG.toWrittenString;return dG})()),((function(){dl.Kernel.setLastLoc('offset=6473 line=160 span=176 id="analyzer.ss"');var dG=(function(dH){var dJ=dH[0];var dI=dH[1];return(dl.Kernel.setLastLoc('offset=6594 line=162 span=54 id="analyzer.ss"')&&cz(dI,dF,(dl.Kernel.setLastLoc('offset=6630 line=162 span=17 id="analyzer.ss"')&&cD(dF))))});dG.toWrittenString=function(){return"<function:lambda>"};dG.toDisplayedString=dG.toWrittenString;return dG})()),((function(){dl.Kernel.setLastLoc('offset=6677 line=163 span=124 id="analyzer.ss"');var dG=(function(dI){var dJ=dI[0];var dH=dI[1];return dF});dG.toWrittenString=function(){return"<function:lambda>"};dG.toDisplayedString=dG.toWrittenString;return dG})())))};var ch=function(dF,dG,bf,dH){return((function(){var dJ;var dI;(function(dK){dJ=(dl.Kernel.setLastLoc('offset=6980 line=170 span=17 id="analyzer.ss"')&&cD(dH));dI=(dl.Kernel.setLastLoc('offset=7036 line=172 span=161 id="analyzer.ss"')&&bN(dJ,(dl.Kernel.setLastLoc('offset=7054 line=172 span=142 id="analyzer.ss"')&&cL((dl.Kernel.setLastLoc('offset=7058 line=172 span=11 id="analyzer.ss"')&&b2(dF)),dl.types.Logic.FALSE,(dl.Kernel.setLastLoc('offset=7076 line=172 span=13 id="analyzer.ss"')&&dl.Kernel.length(dG)),dl.types.Logic.FALSE,(dl.Kernel.setLastLoc('offset=7130 line=173 span=65 id="analyzer.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=7146 line=173 span=48 id="analyzer.ss"')&&h((dl.Kernel.setLastLoc('offset=7182 line=173 span=11 id="analyzer.ss"')&&b2(dF))))))))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=7204 line=174 span=73 id="analyzer.ss"')&&bJ(dG,bf,(dl.Kernel.setLastLoc('offset=7246 line=174 span=30 id="analyzer.ss"')&&cZ(dH,dI))))})())};var bJ=function(dF,bf,dG){return((function(){var dI;var dH;(function(dJ){dI=(dl.Kernel.setLastLoc('offset=7445 line=180 span=17 id="analyzer.ss"')&&cD(dG));dH=(dl.Kernel.setLastLoc('offset=7500 line=182 span=375 id="analyzer.ss"')&&dl.Kernel.foldl(((function(){dl.Kernel.setLastLoc('offset=7507 line=182 span=318 id="analyzer.ss"');var dK=(function(dM){var dN=dM[0];var dL=dM[1];return(dl.Kernel.setLastLoc('offset=7550 line=183 span=274 id="analyzer.ss"')&&bN(dL,(dl.Kernel.setLastLoc('offset=7566 line=183 span=257 id="analyzer.ss"')&&aM((dl.Kernel.setLastLoc('offset=7589 line=183 span=14 id="analyzer.ss"')&&b2(dN)),(dl.Kernel.setLastLoc('offset=7664 line=184 span=92 id="analyzer.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=7741 line=185 span=14 id="analyzer.ss"')&&b2(dN)))),dl.types.Empty.EMPTY))))});dK.toWrittenString=function(){return"<function:lambda>"};dK.toDisplayedString=dK.toWrittenString;return dK})()),dI,[dF]))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=7882 line=189 span=42 id="analyzer.ss"')&&cz(bf,dG,dH))})())};var cz=function(bf,dG,dF){return((dl.Kernel.setLastLoc('offset=8127 line=200 span=39 id="analyzer.ss"')&&X(bf,(dl.types.Symbol.makeInstance("local"))))?(dl.Kernel.setLastLoc('offset=8172 line=201 span=55 id="analyzer.ss"')&&co(bf,dG,dF)):((dl.Kernel.setLastLoc('offset=8239 line=203 span=39 id="analyzer.ss"')&&X(bf,(dl.types.Symbol.makeInstance("begin"))))?(dl.Kernel.setLastLoc('offset=8284 line=204 span=55 id="analyzer.ss"')&&dE(bf,dG,dF)):((dl.Kernel.setLastLoc('offset=8351 line=206 span=36 id="analyzer.ss"')&&X(bf,(dl.types.Symbol.makeInstance("if"))))?(dl.Kernel.setLastLoc('offset=8393 line=207 span=52 id="analyzer.ss"')&&aD(bf,dG,dF)):((dl.Kernel.setLastLoc('offset=8457 line=209 span=37 id="analyzer.ss"')&&X(bf,(dl.types.Symbol.makeInstance("and"))))?((function(){var dH;(function(dI){dH=(dl.Kernel.setLastLoc('offset=8522 line=210 span=28 id="analyzer.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=8528 line=210 span=21 id="analyzer.ss"')&&b2(bf))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=8560 line=211 span=97 id="analyzer.ss"')&&dl.Kernel.foldl(((function(){dl.Kernel.setLastLoc('offset=8567 line=211 span=48 id="analyzer.ss"');var dI=(function(dJ){var dL=dJ[0];var dK=dJ[1];return(dl.Kernel.setLastLoc('offset=8581 line=211 span=33 id="analyzer.ss"')&&cz(dL,dK,dF))});dI.toWrittenString=function(){return"<function:lambda>"};dI.toDisplayedString=dI.toWrittenString;return dI})()),dG,[dH]))})()):((dl.Kernel.setLastLoc('offset=8670 line=215 span=36 id="analyzer.ss"')&&X(bf,(dl.types.Symbol.makeInstance("or"))))?((function(){var dH;(function(dI){dH=(dl.Kernel.setLastLoc('offset=8734 line=216 span=28 id="analyzer.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=8740 line=216 span=21 id="analyzer.ss"')&&b2(bf))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=8772 line=217 span=97 id="analyzer.ss"')&&dl.Kernel.foldl(((function(){dl.Kernel.setLastLoc('offset=8779 line=217 span=48 id="analyzer.ss"');var dI=(function(dJ){var dL=dJ[0];var dK=dJ[1];return(dl.Kernel.setLastLoc('offset=8793 line=217 span=33 id="analyzer.ss"')&&cz(dL,dK,dF))});dI.toWrittenString=function(){return"<function:lambda>"};dI.toDisplayedString=dI.toWrittenString;return dI})()),dG,[dH]))})()):((dl.Kernel.setLastLoc('offset=8882 line=221 span=40 id="analyzer.ss"')&&X(bf,(dl.types.Symbol.makeInstance("lambda"))))?((function(){var dI;var dH;(function(dJ){dI=(dl.Kernel.setLastLoc('offset=8949 line=222 span=38 id="analyzer.ss"')&&b2((dl.Kernel.setLastLoc('offset=8956 line=222 span=30 id="analyzer.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=8964 line=222 span=21 id="analyzer.ss"')&&b2(bf))))));dH=(dl.Kernel.setLastLoc('offset=9015 line=223 span=29 id="analyzer.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=9022 line=223 span=21 id="analyzer.ss"')&&b2(bf))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=9054 line=224 span=48 id="analyzer.ss"')&&bJ(dI,dH,dG))})()):((dl.Kernel.setLastLoc('offset=9130 line=227 span=31 id="analyzer.ss"')&&dl.Kernel.number_question_((dl.Kernel.setLastLoc('offset=9139 line=227 span=21 id="analyzer.ss"')&&b2(bf))))?dG:((dl.Kernel.setLastLoc('offset=9199 line=231 span=31 id="analyzer.ss"')&&dl.Kernel.string_question_((dl.Kernel.setLastLoc('offset=9208 line=231 span=21 id="analyzer.ss"')&&b2(bf))))?dG:((dl.Kernel.setLastLoc('offset=9277 line=235 span=32 id="analyzer.ss"')&&dl.Kernel.boolean_question_((dl.Kernel.setLastLoc('offset=9287 line=235 span=21 id="analyzer.ss"')&&b2(bf))))?dG:((dl.Kernel.setLastLoc('offset=9350 line=239 span=29 id="analyzer.ss"')&&dl.Kernel.char_question_((dl.Kernel.setLastLoc('offset=9357 line=239 span=21 id="analyzer.ss"')&&b2(bf))))?dG:((dl.Kernel.setLastLoc('offset=9421 line=243 span=31 id="analyzer.ss"')&&dl.Kernel.symbol_question_((dl.Kernel.setLastLoc('offset=9430 line=243 span=21 id="analyzer.ss"')&&b2(bf))))?((dl.Kernel.setLastLoc('offset=9472 line=245 span=41 id="analyzer.ss"')&&j(dF,(dl.Kernel.setLastLoc('offset=9491 line=245 span=21 id="analyzer.ss"')&&b2(bf))))?(dl.Kernel.setLastLoc('offset=9522 line=246 span=75 id="analyzer.ss"')&&aV((dl.Kernel.setLastLoc('offset=9552 line=246 span=38 id="analyzer.ss"')&&ac(dF,(dl.Kernel.setLastLoc('offset=9568 line=246 span=21 id="analyzer.ss"')&&b2(bf)))),dG)):(dl.types.Logic.TRUE?dG:(dl.Kernel.setLastLoc('offset=9458 line=244 span=169 id="analyzer.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=9458 line=244 span=169 id=\\"analyzer.ss\\""')))))):((dl.Kernel.setLastLoc('offset=9661 line=251 span=39 id="analyzer.ss"')&&X(bf,(dl.types.Symbol.makeInstance("quote"))))?dG:((dl.Kernel.setLastLoc('offset=9769 line=255 span=29 id="analyzer.ss"')&&dl.Kernel.pair_question_((dl.Kernel.setLastLoc('offset=9776 line=255 span=21 id="analyzer.ss"')&&b2(bf))))?(dl.Kernel.setLastLoc('offset=9804 line=256 span=61 id="analyzer.ss"')&&l(bf,dG,dF)):(dl.Kernel.setLastLoc('offset=8111 line=198 span=1756 id="analyzer.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=8111 line=198 span=1756 id=\\"analyzer.ss\\""')))))))))))))))))};var co=function(bf,dG,dF){return((function(){var dJ;var dI;var dH;(function(dK){dJ=(dl.Kernel.setLastLoc('offset=10017 line=262 span=38 id="analyzer.ss"')&&b2((dl.Kernel.setLastLoc('offset=10024 line=262 span=30 id="analyzer.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=10032 line=262 span=21 id="analyzer.ss"')&&b2(bf))))));dI=(dl.Kernel.setLastLoc('offset=10080 line=263 span=29 id="analyzer.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=10087 line=263 span=21 id="analyzer.ss"')&&b2(bf))));dH=(dl.Kernel.setLastLoc('offset=10142 line=264 span=202 id="analyzer.ss"')&&dl.Kernel.foldl(((function(){dl.Kernel.setLastLoc('offset=10149 line=264 span=106 id="analyzer.ss"');var dL=(function(dM){var dN=dM[0];var dO=dM[1];return(dl.Kernel.setLastLoc('offset=10214 line=265 span=40 id="analyzer.ss"')&&bG(dN,dO))});dL.toWrittenString=function(){return"<function:lambda>"};dL.toDisplayedString=dL.toWrittenString;return dL})()),dG,[dJ]))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=10351 line=268 span=176 id="analyzer.ss"')&&cZ((dl.Kernel.setLastLoc('offset=10375 line=269 span=128 id="analyzer.ss"')&&cz(dI,dH,(dl.Kernel.setLastLoc('offset=10478 line=271 span=24 id="analyzer.ss"')&&cD(dH)))),(dl.Kernel.setLastLoc('offset=10509 line=272 span=17 id="analyzer.ss"')&&cD(dG))))})())};var dE=function(bf,dG,dF){return(dl.Kernel.setLastLoc('offset=10662 line=277 span=120 id="analyzer.ss"')&&dl.Kernel.foldl(((function(){dl.Kernel.setLastLoc('offset=10669 line=277 span=59 id="analyzer.ss"');var dH=(function(dI){var dK=dI[0];var dJ=dI[1];return(dl.Kernel.setLastLoc('offset=10694 line=278 span=33 id="analyzer.ss"')&&cz(dK,dJ,dF))});dH.toWrittenString=function(){return"<function:lambda>"};dH.toDisplayedString=dH.toWrittenString;return dH})()),dG,[(dl.Kernel.setLastLoc('offset=10753 line=280 span=28 id="analyzer.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=10759 line=280 span=21 id="analyzer.ss"')&&b2(bf))))]))};var aD=function(bf,dG,dF){return((function(){var dJ;var dI;var dH;(function(dK){dJ=(dl.Kernel.setLastLoc('offset=10872 line=286 span=30 id="analyzer.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=10880 line=286 span=21 id="analyzer.ss"')&&b2(bf))));dI=(dl.Kernel.setLastLoc('offset=10933 line=287 span=29 id="analyzer.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=10940 line=287 span=21 id="analyzer.ss"')&&b2(bf))));dH=(dl.Kernel.setLastLoc('offset=10994 line=288 span=30 id="analyzer.ss"')&&dl.Kernel.fourth((dl.Kernel.setLastLoc('offset=11002 line=288 span=21 id="analyzer.ss"')&&b2(bf))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=11031 line=289 span=120 id="analyzer.ss"')&&dl.Kernel.foldl(((function(){dl.Kernel.setLastLoc('offset=11038 line=289 span=48 id="analyzer.ss"');var dK=(function(dN){var dM=dN[0];var dL=dN[1];return(dl.Kernel.setLastLoc('offset=11052 line=289 span=33 id="analyzer.ss"')&&cz(dM,dL,dF))});dK.toWrittenString=function(){return"<function:lambda>"};dK.toDisplayedString=dK.toWrittenString;return dK})()),dG,[(dl.Kernel.setLastLoc('offset=11116 line=291 span=34 id="analyzer.ss"')&&dl.Kernel.list([dJ,dI,dH]))]))})())};var l=function(bf,dG,dF){return((function(){var dH;var dI=function(dL,dK,dJ){return(((dl.Kernel.setLastLoc('offset=11731 line=306 span=39 id="analyzer.ss"')&&X(dL,(dl.types.Symbol.makeInstance("open-image-url"))))&&(dl.Kernel.setLastLoc('offset=11791 line=307 span=16 id="analyzer.ss"')&&cb(dL))&&(dl.Kernel.setLastLoc('offset=11828 line=308 span=27 id="analyzer.ss"')&&dl.Kernel._equal_((dl.Kernel.setLastLoc('offset=11831 line=308 span=21 id="analyzer.ss"')&&dl.Kernel.length((dl.Kernel.setLastLoc('offset=11839 line=308 span=12 id="analyzer.ss"')&&b2(dL)))),(dl.types.Rational.makeInstance(2,1)),[]))&&(dl.Kernel.setLastLoc('offset=11876 line=309 span=39 id="analyzer.ss"')&&dl.Kernel.string_question_((dl.Kernel.setLastLoc('offset=11885 line=309 span=29 id="analyzer.ss"')&&b2((dl.Kernel.setLastLoc('offset=11892 line=309 span=21 id="analyzer.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=11900 line=309 span=12 id="analyzer.ss"')&&b2(dL))))))))&&(dl.Kernel.setLastLoc('offset=11936 line=310 span=35 id="analyzer.ss"')&&j(dJ,(dl.types.Symbol.makeInstance("open-image-url"))))&&(dl.Kernel.setLastLoc('offset=11992 line=311 span=52 id="analyzer.ss"')&&ci((dl.Kernel.setLastLoc('offset=12011 line=311 span=32 id="analyzer.ss"')&&ac(dJ,(dl.types.Symbol.makeInstance("open-image-url"))))))&&(dl.Kernel.setLastLoc('offset=12065 line=312 span=136 id="analyzer.ss"')&&dl.Kernel.string_equal__question_((dl.Kernel.setLastLoc('offset=12075 line=312 span=63 id="analyzer.ss"')&&bv((dl.Kernel.setLastLoc('offset=12105 line=312 span=32 id="analyzer.ss"')&&ac(dJ,(dl.types.Symbol.makeInstance("open-image-url")))))),(dl.types.String.makeInstance("plt.world.Kernel.openImageUrl")),[])))?((function(){var dM;(function(dN){dM=(dl.Kernel.setLastLoc('offset=12236 line=314 span=32 id="analyzer.ss"')&&ac(dJ,(dl.types.Symbol.makeInstance("open-image-url"))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=12288 line=315 span=1074 id="analyzer.ss"')&&aV((dl.Kernel.setLastLoc('offset=12318 line=315 span=988 id="analyzer.ss"')&&bl((dl.Kernel.setLastLoc('offset=12341 line=315 span=239 id="analyzer.ss"')&&dl.Kernel.string_dash__greaterthan_symbol((dl.Kernel.setLastLoc('offset=12428 line=316 span=151 id="analyzer.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("~a-~a")),[(dl.Kernel.setLastLoc('offset=12444 line=316 span=25 id="analyzer.ss"')&&br(dM)),(dl.Kernel.setLastLoc('offset=12549 line=317 span=29 id="analyzer.ss"')&&b2((dl.Kernel.setLastLoc('offset=12556 line=317 span=21 id="analyzer.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=12564 line=317 span=12 id="analyzer.ss"')&&b2(dL))))))])))),(dl.Kernel.setLastLoc('offset=12651 line=318 span=34 id="analyzer.ss"')&&a9(dM)),(dl.Kernel.setLastLoc('offset=12756 line=319 span=30 id="analyzer.ss"')&&dA(dM)),(dl.Kernel.setLastLoc('offset=12858 line=320 span=31 id="analyzer.ss"')&&bp(dM)),(dl.Kernel.setLastLoc('offset=12960 line=321 span=32 id="analyzer.ss"')&&bv(dM)),(dl.Kernel.setLastLoc('offset=13063 line=322 span=146 id="analyzer.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=13069 line=322 span=139 id="analyzer.ss"')&&bK((dl.Kernel.setLastLoc('offset=13178 line=323 span=29 id="analyzer.ss"')&&b2((dl.Kernel.setLastLoc('offset=13185 line=323 span=21 id="analyzer.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=13193 line=323 span=12 id="analyzer.ss"')&&b2(dL))))))))])),(dl.Kernel.setLastLoc('offset=13280 line=324 span=25 id="analyzer.ss"')&&cw(dM)))),dK))})()):(dl.types.Logic.TRUE?dK:(dl.Kernel.setLastLoc('offset=11705 line=305 span=1689 id="analyzer.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=11705 line=305 span=1689 id=\\"analyzer.ss\\""'))))))};(function(dJ){dH=(dl.Kernel.setLastLoc('offset=11270 line=296 span=143 id="analyzer.ss"')&&dl.Kernel.foldl(((function(){dl.Kernel.setLastLoc('offset=11277 line=296 span=69 id="analyzer.ss"');var dK=(function(dN){var dM=dN[0];var dL=dN[1];return(dl.Kernel.setLastLoc('offset=11312 line=297 span=33 id="analyzer.ss"')&&cz(dM,dL,dF))});dK.toWrittenString=function(){return"<function:lambda>"};dK.toDisplayedString=dK.toWrittenString;return dK})()),dG,[(dl.Kernel.setLastLoc('offset=11391 line=299 span=21 id="analyzer.ss"')&&b2(bf))]))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=13401 line=327 span=57 id="analyzer.ss"')&&dI(bf,dH,dF))})())};var q=function(bf,dF){return((function(){var dG=function(dH){return((dl.Kernel.setLastLoc('offset=13717 line=349 span=16 id="analyzer.ss"')&&dl.Kernel.empty_question_(dH))?(dl.Kernel.setLastLoc('offset=13749 line=350 span=163 id="analyzer.ss"')&&dl.Kernel.syntax_dash_error((dl.Kernel.setLastLoc('offset=13763 line=350 span=106 id="analyzer.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("Moby doesn't know about module ~s yet")),[(dl.Kernel.setLastLoc('offset=13848 line=351 span=20 id="analyzer.ss"')&&b2(bf))])),bf)):((dl.Kernel.setLastLoc('offset=13929 line=353 span=96 id="analyzer.ss"')&&dl.Kernel.string_equal__question_((dl.Kernel.setLastLoc('offset=13939 line=353 span=20 id="analyzer.ss"')&&b2(bf)),(dl.Kernel.setLastLoc('offset=13985 line=354 span=39 id="analyzer.ss"')&&bR((dl.Kernel.setLastLoc('offset=14008 line=354 span=15 id="analyzer.ss"')&&dl.Kernel.first(dH)))),[]))?(dl.Kernel.setLastLoc('offset=14041 line=355 span=184 id="analyzer.ss"')&&b8((dl.Kernel.setLastLoc('offset=14083 line=356 span=15 id="analyzer.ss"')&&dl.Kernel.first(dH)),(dl.Kernel.setLastLoc('offset=14115 line=357 span=109 id="analyzer.ss"')&&ad((dl.Kernel.setLastLoc('offset=14159 line=358 span=41 id="analyzer.ss"')&&cW((dl.Kernel.setLastLoc('offset=14184 line=358 span=15 id="analyzer.ss"')&&dl.Kernel.first(dH)))),dF)))):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=14262 line=361 span=21 id="analyzer.ss"')&&dG((dl.Kernel.setLastLoc('offset=14268 line=361 span=14 id="analyzer.ss"')&&dl.Kernel.rest(dH)))):(dl.Kernel.setLastLoc('offset=13696 line=348 span=589 id="analyzer.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=13696 line=348 span=589 id=\\"analyzer.ss\\""')))))))};(function(dH){})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=14292 line=362 span=20 id="analyzer.ss"')&&dG(ak))})())};var cH=function(dF,bf){return((function(){var dP=function(dS,dR,dQ){return((dl.Kernel.setLastLoc('offset=576 line=18 span=18 id="desugar.ss"')&&dl.Kernel.empty_question_(dS))?(dl.Kernel.setLastLoc('offset=610 line=19 span=50 id="desugar.ss"')&&dl.Kernel.append((dl.Kernel.setLastLoc('offset=618 line=19 span=21 id="desugar.ss"')&&dl.Kernel.reverse(dR)),[(dl.Kernel.setLastLoc('offset=640 line=19 span=19 id="desugar.ss"')&&dl.Kernel.reverse(dQ))])):((dl.Kernel.setLastLoc('offset=677 line=20 span=30 id="desugar.ss"')&&a5((dl.Kernel.setLastLoc('offset=689 line=20 span=17 id="desugar.ss"')&&dl.Kernel.first(dS))))?(dl.Kernel.setLastLoc('offset=723 line=21 span=204 id="desugar.ss"')&&dP((dl.Kernel.setLastLoc('offset=745 line=21 span=16 id="desugar.ss"')&&dl.Kernel.rest(dS)),dR,(dl.Kernel.setLastLoc('offset=849 line=23 span=77 id="desugar.ss"')&&dl.Kernel.cons((dl.Kernel.setLastLoc('offset=855 line=23 span=17 id="desugar.ss"')&&dl.Kernel.first(dS)),dQ)))):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=964 line=26 span=160 id="desugar.ss"')&&dP((dl.Kernel.setLastLoc('offset=986 line=26 span=16 id="desugar.ss"')&&dl.Kernel.rest(dS)),(dl.Kernel.setLastLoc('offset=1040 line=27 span=36 id="desugar.ss"')&&dl.Kernel.cons((dl.Kernel.setLastLoc('offset=1046 line=27 span=17 id="desugar.ss"')&&dl.Kernel.first(dS)),dR)),dQ)):(dl.Kernel.setLastLoc('offset=555 line=17 span=571 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=555 line=17 span=571 id=\\"desugar.ss\\""')))))))};var dN=function(dR,dQ){return((dl.Kernel.setLastLoc('offset=1336 line=33 span=18 id="desugar.ss"')&&dc(dR))?(dl.Kernel.setLastLoc('offset=1370 line=34 span=33 id="desugar.ss"')&&dL(dR,dQ)):((dl.Kernel.setLastLoc('offset=1420 line=35 span=38 id="desugar.ss"')&&X(dR,(dl.types.Symbol.makeInstance("include"))))?(dl.Kernel.setLastLoc('offset=1474 line=36 span=36 id="desugar.ss"')&&b3(dR,dQ)):((dl.Kernel.setLastLoc('offset=1527 line=37 span=23 id="desugar.ss"')&&a5(dR))?(dl.Kernel.setLastLoc('offset=1566 line=38 span=38 id="desugar.ss"')&&dH(dR,dQ)):((dl.Kernel.setLastLoc('offset=1621 line=39 span=24 id="desugar.ss"')&&ca(dR))?((function(){var dS;(function(dT){dS=(dl.Kernel.setLastLoc('offset=1688 line=40 span=39 id="desugar.ss"')&&dI(dR,dQ))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=1747 line=41 span=75 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=1753 line=41 span=25 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=1759 line=41 span=18 id="desugar.ss"')&&dl.Kernel.first(dS))])),(dl.Kernel.setLastLoc('offset=1802 line=42 span=19 id="desugar.ss"')&&dl.Kernel.second(dS))]))})()):(dl.Kernel.setLastLoc('offset=1315 line=32 span=510 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=1315 line=32 span=510 id=\\"desugar.ss\\""'))))))))};var dL=function(dQ,dR){return((function(){var dS;(function(dT){dS=(dl.Kernel.setLastLoc('offset=2004 line=47 span=22 id="desugar.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=2011 line=47 span=14 id="desugar.ss"')&&b2(dQ))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=2043 line=48 span=1647 id="desugar.ss"')&&bW(dQ,((function(){dl.Kernel.setLastLoc('offset=2114 line=49 span=695 id="desugar.ss"');var dT=(function(dW){var dX=dW[0];var dV=dW[1];var dU=dW[2];return((function(){var dY;(function(dZ){dY=(dl.Kernel.setLastLoc('offset=2209 line=50 span=33 id="desugar.ss"')&&dI(dU,dR))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=2288 line=51 span=519 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=2294 line=51 span=440 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=2300 line=51 span=433 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=2315 line=51 span=330 id="desugar.ss"')&&dl.Kernel.list([dS,(dl.Kernel.setLastLoc('offset=2408 line=52 span=138 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=2423 line=52 span=14 id="desugar.ss"')&&dl.Kernel.cons(dX,dV)),(dl.Kernel.setLastLoc('offset=2529 line=53 span=16 id="desugar.ss"')&&t(dQ)))),(dl.Kernel.setLastLoc('offset=2623 line=54 span=21 id="desugar.ss"')&&dl.Kernel.first(dY))])),(dl.Kernel.setLastLoc('offset=2716 line=55 span=16 id="desugar.ss"')&&t(dQ))))])),(dl.Kernel.setLastLoc('offset=2784 line=56 span=22 id="desugar.ss"')&&dl.Kernel.second(dY))]))})())});dT.toWrittenString=function(){return"<function:lambda>"};dT.toDisplayedString=dT.toWrittenString;return dT})()),((function(){dl.Kernel.setLastLoc('offset=2849 line=57 span=554 id="desugar.ss"');var dT=(function(dV){var dW=dV[0];var dU=dV[1];return((function(){var dX;(function(dY){dX=(dl.Kernel.setLastLoc('offset=2939 line=58 span=33 id="desugar.ss"')&&dI(dU,dR))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=3018 line=59 span=383 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=3024 line=59 span=304 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=3030 line=59 span=297 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=3045 line=59 span=194 id="desugar.ss"')&&dl.Kernel.list([dS,dW,(dl.Kernel.setLastLoc('offset=3217 line=61 span=21 id="desugar.ss"')&&dl.Kernel.first(dX))])),(dl.Kernel.setLastLoc('offset=3310 line=62 span=16 id="desugar.ss"')&&t(dQ))))])),(dl.Kernel.setLastLoc('offset=3378 line=63 span=22 id="desugar.ss"')&&dl.Kernel.second(dX))]))})())});dT.toWrittenString=function(){return"<function:lambda>"};dT.toDisplayedString=dT.toWrittenString;return dT})()),((function(){dl.Kernel.setLastLoc('offset=3443 line=64 span=246 id="desugar.ss"');var dT=(function(dW){var dV=dW[0];var dU=dW[1];return(dl.Kernel.setLastLoc('offset=3660 line=67 span=28 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=3666 line=67 span=13 id="desugar.ss"')&&dl.Kernel.list([dQ])),dR]))});dT.toWrittenString=function(){return"<function:lambda>"};dT.toDisplayedString=dT.toWrittenString;return dT})())))})())};var dK=function(dR,dQ){return((dl.Kernel.setLastLoc('offset=3884 line=73 span=14 id="desugar.ss"')&&dl.Kernel.empty_question_(dR))?(dl.Kernel.setLastLoc('offset=3914 line=74 span=18 id="desugar.ss"')&&dl.Kernel.list([dl.types.Empty.EMPTY,dQ])):(dl.types.Logic.TRUE?((function(){var dT;var dS;(function(dU){dT=(dl.Kernel.setLastLoc('offset=4033 line=77 span=40 id="desugar.ss"')&&dI((dl.Kernel.setLastLoc('offset=4053 line=77 span=13 id="desugar.ss"')&&dl.Kernel.first(dR)),dQ));dS=(dl.Kernel.setLastLoc('offset=4153 line=79 span=112 id="desugar.ss"')&&dK((dl.Kernel.setLastLoc('offset=4174 line=79 span=12 id="desugar.ss"')&&dl.Kernel.rest(dR)),(dl.Kernel.setLastLoc('offset=4234 line=80 span=30 id="desugar.ss"')&&dl.Kernel.second(dT))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=4285 line=81 span=154 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=4291 line=81 span=94 id="desugar.ss"')&&dl.Kernel.cons((dl.Kernel.setLastLoc('offset=4297 line=81 span=29 id="desugar.ss"')&&dl.Kernel.first(dT)),(dl.Kernel.setLastLoc('offset=4356 line=82 span=28 id="desugar.ss"')&&dl.Kernel.first(dS)))),(dl.Kernel.setLastLoc('offset=4409 line=83 span=29 id="desugar.ss"')&&dl.Kernel.second(dS))]))})()):(dl.Kernel.setLastLoc('offset=3863 line=72 span=579 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=3863 line=72 span=579 id=\\"desugar.ss\\""'))))))};var dG=function(dQ){return(dl.Kernel.setLastLoc('offset=4600 line=89 span=112 id="desugar.ss"')&&dC((dl.Kernel.setLastLoc('offset=4612 line=89 span=58 id="desugar.ss"')&&dl.Kernel.list([(dl.types.Symbol.makeInstance("lambda")),(dl.Kernel.setLastLoc('offset=4626 line=89 span=6 id="desugar.ss"')&&dl.Kernel.list([])),dQ])),(dl.Kernel.setLastLoc('offset=4695 line=91 span=16 id="desugar.ss"')&&t(dQ))))};var dJ=function(dR,dS,dQ){return((dl.Kernel.setLastLoc('offset=4845 line=96 span=32 id="desugar.ss"')&&dl.Kernel.not((dl.Kernel.setLastLoc('offset=4850 line=96 span=26 id="desugar.ss"')&&dl.Kernel._equal_(dS,(dl.Kernel.setLastLoc('offset=4855 line=96 span=20 id="desugar.ss"')&&dl.Kernel.length((dl.Kernel.setLastLoc('offset=4863 line=96 span=11 id="desugar.ss"')&&b2(dR)))),[]))))?(dl.Kernel.setLastLoc('offset=4897 line=97 span=28 id="desugar.ss"')&&dl.Kernel.syntax_dash_error(dQ,dR)):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=4970 line=99 span=6 id="desugar.ss"')&&dl.Kernel._void_([])):(dl.Kernel.setLastLoc('offset=4838 line=96 span=140 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=4838 line=96 span=140 id=\\"desugar.ss\\""'))))))};var dH=function(dR,dQ){return((function(){var dU;var dT;var dS;(function(dV){dU=(dl.Kernel.setLastLoc('offset=5443 line=107 span=27 id="desugar.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=5450 line=107 span=19 id="desugar.ss"')&&b2(dR))));dT=(dl.Kernel.setLastLoc('offset=5511 line=108 span=45 id="desugar.ss"')&&dl.Kernel.map((function(){var dW=(function(dX){return dG(dX[0])});dW.toWrittenString=function(){return"<function:thunkify-stx>"};dW.toDisplayedString=function(){return"<function:thunkify-stx>"};return dW})(),[(dl.Kernel.setLastLoc('offset=5529 line=108 span=26 id="desugar.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=5535 line=108 span=19 id="desugar.ss"')&&b2(dR))))]));dS=(dl.Kernel.setLastLoc('offset=5629 line=110 span=40 id="desugar.ss"')&&dK(dT,dQ))})(dl.Kernel.identity);return(function(){((dl.Kernel.setLastLoc('offset=5716 line=112 span=44 id="desugar.ss"')&&X(dR,(dl.types.Symbol.makeInstance("check-expect"))))?(dl.Kernel.setLastLoc('offset=5784 line=113 span=143 id="desugar.ss"')&&dJ(dR,(dl.types.Rational.makeInstance(3,1)),(dl.types.String.makeInstance("check-expect requires two expressions. Try (check-expect test expected).")))):((dl.Kernel.setLastLoc('offset=5952 line=115 span=44 id="desugar.ss"')&&X(dR,(dl.types.Symbol.makeInstance("check-within"))))?(dl.Kernel.setLastLoc('offset=6020 line=116 span=151 id="desugar.ss"')&&dJ(dR,(dl.types.Rational.makeInstance(4,1)),(dl.types.String.makeInstance("check-within requires three expressions. Try (check-within test expected range).")))):((dl.Kernel.setLastLoc('offset=6196 line=118 span=43 id="desugar.ss"')&&X(dR,(dl.types.Symbol.makeInstance("check-error"))))?(dl.Kernel.setLastLoc('offset=6263 line=119 span=140 id="desugar.ss"')&&dJ(dR,(dl.types.Rational.makeInstance(3,1)),(dl.types.String.makeInstance("check-error requires two expressions. Try (check-error test message).")))):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=6456 line=122 span=6 id="desugar.ss"')&&dl.Kernel._void_([])):(dl.Kernel.setLastLoc('offset=5709 line=112 span=755 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=5709 line=112 span=755 id=\\"desugar.ss\\""'))))))));return(dl.Kernel.setLastLoc('offset=6498 line=124 span=249 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=6504 line=124 span=189 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=6510 line=124 span=182 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=6525 line=124 span=101 id="desugar.ss"')&&dl.Kernel.cons(dU,(dl.Kernel.setLastLoc('offset=6596 line=125 span=29 id="desugar.ss"')&&dl.Kernel.first(dS)))),(dl.Kernel.setLastLoc('offset=6670 line=126 span=21 id="desugar.ss"')&&t(dR))))])),(dl.Kernel.setLastLoc('offset=6716 line=127 span=30 id="desugar.ss"')&&dl.Kernel.second(dS))]))})()})())};var dM=function(dQ){return(dl.Kernel.setLastLoc('offset=6929 line=132 span=91 id="desugar.ss"')&&dI((dl.Kernel.setLastLoc('offset=6949 line=132 span=18 id="desugar.ss"')&&dl.Kernel.first(dQ)),(dl.Kernel.setLastLoc('offset=7000 line=133 span=19 id="desugar.ss"')&&dl.Kernel.second(dQ))))};var dI=function(dQ,dR){return((dl.Kernel.setLastLoc('offset=7235 line=141 span=29 id="desugar.ss"')&&X(dQ,(dl.types.Symbol.makeInstance("cond"))))?(dl.Kernel.setLastLoc('offset=7280 line=142 span=57 id="desugar.ss"')&&dM((dl.Kernel.setLastLoc('offset=7311 line=142 span=25 id="desugar.ss"')&&aY(dQ,dR)))):((dl.Kernel.setLastLoc('offset=7425 line=145 span=29 id="desugar.ss"')&&X(dQ,(dl.types.Symbol.makeInstance("case"))))?(dl.Kernel.setLastLoc('offset=7470 line=146 span=57 id="desugar.ss"')&&dM((dl.Kernel.setLastLoc('offset=7501 line=146 span=25 id="desugar.ss"')&&K(dQ,dR)))):((dl.Kernel.setLastLoc('offset=7601 line=149 span=28 id="desugar.ss"')&&X(dQ,(dl.types.Symbol.makeInstance("let"))))?(dl.Kernel.setLastLoc('offset=7645 line=150 span=56 id="desugar.ss"')&&dM((dl.Kernel.setLastLoc('offset=7676 line=150 span=24 id="desugar.ss"')&&cK(dQ,dR)))):((dl.Kernel.setLastLoc('offset=7776 line=153 span=29 id="desugar.ss"')&&X(dQ,(dl.types.Symbol.makeInstance("let*"))))?(dl.Kernel.setLastLoc('offset=7821 line=154 span=57 id="desugar.ss"')&&dM((dl.Kernel.setLastLoc('offset=7852 line=154 span=25 id="desugar.ss"')&&c2(dQ,dR)))):((dl.Kernel.setLastLoc('offset=7953 line=157 span=31 id="desugar.ss"')&&X(dQ,(dl.types.Symbol.makeInstance("letrec"))))?(dl.Kernel.setLastLoc('offset=8000 line=158 span=59 id="desugar.ss"')&&dM((dl.Kernel.setLastLoc('offset=8031 line=158 span=27 id="desugar.ss"')&&bV(dQ,dR)))):(((dl.Kernel.setLastLoc('offset=8127 line=161 span=35 id="desugar.ss"')&&X(dQ,(dl.types.Symbol.makeInstance("quasiquote"))))||(dl.Kernel.setLastLoc('offset=8182 line=162 span=32 id="desugar.ss"')&&X(dQ,(dl.types.Symbol.makeInstance("unquote"))))||(dl.Kernel.setLastLoc('offset=8234 line=163 span=35 id="desugar.ss"')&&X(dQ,(dl.types.Symbol.makeInstance("quasiquote")))))?(dl.Kernel.setLastLoc('offset=8286 line=164 span=63 id="desugar.ss"')&&dM((dl.Kernel.setLastLoc('offset=8317 line=164 span=31 id="desugar.ss"')&&ap(dQ,dR)))):((dl.Kernel.setLastLoc('offset=8430 line=167 span=30 id="desugar.ss"')&&X(dQ,(dl.types.Symbol.makeInstance("local"))))?((function(){var dT;var dU;var dS;var dW;var dV;(function(dX){dT=(dl.Kernel.setLastLoc('offset=8509 line=168 span=20 id="desugar.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=8516 line=168 span=12 id="desugar.ss"')&&b2(dQ))));dU=(dl.Kernel.setLastLoc('offset=8568 line=169 span=29 id="desugar.ss"')&&b2((dl.Kernel.setLastLoc('offset=8575 line=169 span=21 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=8583 line=169 span=12 id="desugar.ss"')&&b2(dQ))))));dS=(dl.Kernel.setLastLoc('offset=8635 line=170 span=20 id="desugar.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=8642 line=170 span=12 id="desugar.ss"')&&b2(dQ))));dW=(dl.Kernel.setLastLoc('offset=8734 line=172 span=29 id="desugar.ss"')&&cH(dU,dR));dV=(dl.Kernel.setLastLoc('offset=8817 line=173 span=56 id="desugar.ss"')&&dI(dS,(dl.Kernel.setLastLoc('offset=8842 line=173 span=30 id="desugar.ss"')&&dl.Kernel.second(dW))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=8893 line=174 span=484 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=8899 line=174 span=346 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=8914 line=174 span=277 id="desugar.ss"')&&dl.Kernel.list([dT,(dl.Kernel.setLastLoc('offset=8981 line=175 span=136 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=8996 line=175 span=29 id="desugar.ss"')&&dl.Kernel.first(dW)),(dl.Kernel.setLastLoc('offset=9085 line=176 span=31 id="desugar.ss"')&&t((dl.Kernel.setLastLoc('offset=9094 line=176 span=21 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=9102 line=176 span=12 id="desugar.ss"')&&b2(dQ)))))))),(dl.Kernel.setLastLoc('offset=9162 line=177 span=28 id="desugar.ss"')&&dl.Kernel.first(dV))])),(dl.Kernel.setLastLoc('offset=9230 line=178 span=14 id="desugar.ss"')&&t(dQ)))),(dl.Kernel.setLastLoc('offset=9269 line=179 span=107 id="desugar.ss"')&&cZ((dl.Kernel.setLastLoc('offset=9287 line=179 span=29 id="desugar.ss"')&&dl.Kernel.second(dV)),(dl.Kernel.setLastLoc('offset=9358 line=180 span=17 id="desugar.ss"')&&cD(dR))))]))})()):((dl.Kernel.setLastLoc('offset=9439 line=183 span=30 id="desugar.ss"')&&X(dQ,(dl.types.Symbol.makeInstance("begin"))))?((function(){var dS;var dU;var dT;(function(dV){dS=(dl.Kernel.setLastLoc('offset=9518 line=184 span=20 id="desugar.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=9525 line=184 span=12 id="desugar.ss"')&&b2(dQ))));dU=(dl.Kernel.setLastLoc('offset=9577 line=185 span=19 id="desugar.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=9583 line=185 span=12 id="desugar.ss"')&&b2(dQ))));dT=(dl.Kernel.setLastLoc('offset=9651 line=186 span=33 id="desugar.ss"')&&dK(dU,dR))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=9704 line=187 span=227 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=9710 line=187 span=166 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=9725 line=187 span=97 id="desugar.ss"')&&dl.Kernel.cons(dS,(dl.Kernel.setLastLoc('offset=9792 line=188 span=29 id="desugar.ss"')&&dl.Kernel.first(dT)))),(dl.Kernel.setLastLoc('offset=9861 line=189 span=14 id="desugar.ss"')&&t(dQ)))),(dl.Kernel.setLastLoc('offset=9900 line=190 span=30 id="desugar.ss"')&&dl.Kernel.second(dT))]))})()):((dl.Kernel.setLastLoc('offset=10005 line=193 span=29 id="desugar.ss"')&&X(dQ,(dl.types.Symbol.makeInstance("set!"))))?((function(){var dU;var dV;var dT;var dS;(function(dW){dU=(dl.Kernel.setLastLoc('offset=10081 line=194 span=20 id="desugar.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=10088 line=194 span=12 id="desugar.ss"')&&b2(dQ))));dV=(dl.Kernel.setLastLoc('offset=10137 line=195 span=21 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=10145 line=195 span=12 id="desugar.ss"')&&b2(dQ))));dT=(dl.Kernel.setLastLoc('offset=10197 line=196 span=20 id="desugar.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=10204 line=196 span=12 id="desugar.ss"')&&b2(dQ))));dS=(dl.Kernel.setLastLoc('offset=10272 line=197 span=32 id="desugar.ss"')&&dI(dT,dR))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=10324 line=198 span=272 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=10330 line=198 span=211 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=10345 line=198 span=142 id="desugar.ss"')&&dl.Kernel.list([dU,dV,(dl.Kernel.setLastLoc('offset=10457 line=200 span=29 id="desugar.ss"')&&dl.Kernel.first(dS))])),(dl.Kernel.setLastLoc('offset=10526 line=201 span=14 id="desugar.ss"')&&t(dQ)))),(dl.Kernel.setLastLoc('offset=10565 line=202 span=30 id="desugar.ss"')&&dl.Kernel.second(dS))]))})()):((dl.Kernel.setLastLoc('offset=10694 line=206 span=27 id="desugar.ss"')&&X(dQ,(dl.types.Symbol.makeInstance("if"))))?((function(){var dS;var dU;var dT;(function(dV){dS=(dl.Kernel.setLastLoc('offset=10767 line=207 span=20 id="desugar.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=10774 line=207 span=12 id="desugar.ss"')&&b2(dQ))));dU=(dl.Kernel.setLastLoc('offset=10826 line=208 span=19 id="desugar.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=10832 line=208 span=12 id="desugar.ss"')&&b2(dQ))));dT=(dl.Kernel.setLastLoc('offset=10900 line=209 span=33 id="desugar.ss"')&&dK(dU,dR))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=10953 line=210 span=224 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=10959 line=210 span=163 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=10974 line=210 span=94 id="desugar.ss"')&&dl.Kernel.cons(dS,(dl.Kernel.setLastLoc('offset=11038 line=211 span=29 id="desugar.ss"')&&dl.Kernel.first(dT)))),(dl.Kernel.setLastLoc('offset=11107 line=212 span=14 id="desugar.ss"')&&t(dQ)))),(dl.Kernel.setLastLoc('offset=11146 line=213 span=30 id="desugar.ss"')&&dl.Kernel.second(dT))]))})()):((dl.Kernel.setLastLoc('offset=11258 line=217 span=28 id="desugar.ss"')&&X(dQ,(dl.types.Symbol.makeInstance("and"))))?((function(){var dS;var dU;var dT;(function(dV){dS=(dl.Kernel.setLastLoc('offset=11333 line=218 span=20 id="desugar.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=11340 line=218 span=12 id="desugar.ss"')&&b2(dQ))));dU=(dl.Kernel.setLastLoc('offset=11392 line=219 span=19 id="desugar.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=11398 line=219 span=12 id="desugar.ss"')&&b2(dQ))));dT=(dl.Kernel.setLastLoc('offset=11466 line=220 span=33 id="desugar.ss"')&&dK(dU,dR))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=11519 line=221 span=225 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=11525 line=221 span=164 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=11540 line=221 span=95 id="desugar.ss"')&&dl.Kernel.cons(dS,(dl.Kernel.setLastLoc('offset=11605 line=222 span=29 id="desugar.ss"')&&dl.Kernel.first(dT)))),(dl.Kernel.setLastLoc('offset=11674 line=223 span=14 id="desugar.ss"')&&t(dQ)))),(dl.Kernel.setLastLoc('offset=11713 line=224 span=30 id="desugar.ss"')&&dl.Kernel.second(dT))]))})()):((dl.Kernel.setLastLoc('offset=11809 line=227 span=27 id="desugar.ss"')&&X(dQ,(dl.types.Symbol.makeInstance("or"))))?((function(){var dS;var dU;var dT;(function(dV){dS=(dl.Kernel.setLastLoc('offset=11882 line=228 span=20 id="desugar.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=11889 line=228 span=12 id="desugar.ss"')&&b2(dQ))));dU=(dl.Kernel.setLastLoc('offset=11941 line=229 span=19 id="desugar.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=11947 line=229 span=12 id="desugar.ss"')&&b2(dQ))));dT=(dl.Kernel.setLastLoc('offset=12015 line=230 span=33 id="desugar.ss"')&&dK(dU,dR))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=12068 line=231 span=224 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=12074 line=231 span=163 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=12089 line=231 span=94 id="desugar.ss"')&&dl.Kernel.cons(dS,(dl.Kernel.setLastLoc('offset=12153 line=232 span=29 id="desugar.ss"')&&dl.Kernel.first(dT)))),(dl.Kernel.setLastLoc('offset=12222 line=233 span=14 id="desugar.ss"')&&t(dQ)))),(dl.Kernel.setLastLoc('offset=12261 line=234 span=30 id="desugar.ss"')&&dl.Kernel.second(dT))]))})()):((dl.Kernel.setLastLoc('offset=12367 line=237 span=31 id="desugar.ss"')&&X(dQ,(dl.types.Symbol.makeInstance("lambda"))))?((function(){var dV;var dT;var dS;var dU;(function(dW){dV=(dl.Kernel.setLastLoc('offset=12448 line=238 span=20 id="desugar.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=12455 line=238 span=12 id="desugar.ss"')&&b2(dQ))));dT=(dl.Kernel.setLastLoc('offset=12506 line=239 span=21 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=12514 line=239 span=12 id="desugar.ss"')&&b2(dQ))));dS=(dl.Kernel.setLastLoc('offset=12565 line=240 span=20 id="desugar.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=12572 line=240 span=12 id="desugar.ss"')&&b2(dQ))));dU=(dl.Kernel.setLastLoc('offset=12639 line=241 span=31 id="desugar.ss"')&&dI(dS,dR))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=12690 line=242 span=373 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=12696 line=242 span=215 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=12711 line=242 span=146 id="desugar.ss"')&&dl.Kernel.list([dV,dT,(dl.Kernel.setLastLoc('offset=12828 line=244 span=28 id="desugar.ss"')&&dl.Kernel.first(dU))])),(dl.Kernel.setLastLoc('offset=12896 line=245 span=14 id="desugar.ss"')&&t(dQ)))),(dl.Kernel.setLastLoc('offset=13033 line=247 span=29 id="desugar.ss"')&&dl.Kernel.second(dU))]))})()):((dl.Kernel.setLastLoc('offset=13121 line=250 span=22 id="desugar.ss"')&&dl.Kernel.number_question_((dl.Kernel.setLastLoc('offset=13130 line=250 span=12 id="desugar.ss"')&&b2(dQ))))?(dl.Kernel.setLastLoc('offset=13159 line=251 span=17 id="desugar.ss"')&&dl.Kernel.list([dQ,dR])):((dl.Kernel.setLastLoc('offset=13233 line=254 span=22 id="desugar.ss"')&&dl.Kernel.string_question_((dl.Kernel.setLastLoc('offset=13242 line=254 span=12 id="desugar.ss"')&&b2(dQ))))?(dl.Kernel.setLastLoc('offset=13271 line=255 span=17 id="desugar.ss"')&&dl.Kernel.list([dQ,dR])):((dl.Kernel.setLastLoc('offset=13354 line=258 span=23 id="desugar.ss"')&&dl.Kernel.boolean_question_((dl.Kernel.setLastLoc('offset=13364 line=258 span=12 id="desugar.ss"')&&b2(dQ))))?(dl.Kernel.setLastLoc('offset=13393 line=259 span=17 id="desugar.ss"')&&dl.Kernel.list([dQ,dR])):((dl.Kernel.setLastLoc('offset=13470 line=262 span=20 id="desugar.ss"')&&dl.Kernel.char_question_((dl.Kernel.setLastLoc('offset=13477 line=262 span=12 id="desugar.ss"')&&b2(dQ))))?(dl.Kernel.setLastLoc('offset=13506 line=263 span=17 id="desugar.ss"')&&dl.Kernel.list([dQ,dR])):((dl.Kernel.setLastLoc('offset=13584 line=266 span=22 id="desugar.ss"')&&dl.Kernel.symbol_question_((dl.Kernel.setLastLoc('offset=13593 line=266 span=12 id="desugar.ss"')&&b2(dQ))))?(dl.Kernel.setLastLoc('offset=13622 line=267 span=17 id="desugar.ss"')&&dl.Kernel.list([dQ,dR])):((dl.Kernel.setLastLoc('offset=13702 line=270 span=30 id="desugar.ss"')&&X(dQ,(dl.types.Symbol.makeInstance("quote"))))?(dl.Kernel.setLastLoc('offset=13748 line=271 span=17 id="desugar.ss"')&&dl.Kernel.list([dQ,dR])):((dl.Kernel.setLastLoc('offset=13853 line=274 span=20 id="desugar.ss"')&&dl.Kernel.pair_question_((dl.Kernel.setLastLoc('offset=13860 line=274 span=12 id="desugar.ss"')&&b2(dQ))))?((function(){var dT;var dS;(function(dU){dT=(dl.Kernel.setLastLoc('offset=13911 line=275 span=12 id="desugar.ss"')&&b2(dQ));dS=(dl.Kernel.setLastLoc('offset=13978 line=276 span=33 id="desugar.ss"')&&dK(dT,dR))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=14031 line=277 span=159 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=14037 line=277 span=98 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=14052 line=277 span=29 id="desugar.ss"')&&dl.Kernel.first(dS)),(dl.Kernel.setLastLoc('offset=14120 line=278 span=14 id="desugar.ss"')&&t(dQ)))),(dl.Kernel.setLastLoc('offset=14159 line=279 span=30 id="desugar.ss"')&&dl.Kernel.second(dS))]))})()):(dl.Kernel.setLastLoc('offset=7171 line=138 span=7022 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=7171 line=138 span=7022 id=\\"desugar.ss\\""'))))))))))))))))))))))))};var dO=function(dR,dQ){return((dl.Kernel.setLastLoc('offset=14362 line=284 span=18 id="desugar.ss"')&&dl.Kernel.empty_question_(dR))?(dl.Kernel.setLastLoc('offset=14396 line=285 span=20 id="desugar.ss"')&&dl.Kernel.list([dl.types.Empty.EMPTY,dQ])):(dl.types.Logic.TRUE?((function(){var dT;var dS;(function(dU){dT=(dl.Kernel.setLastLoc('offset=14515 line=288 span=51 id="desugar.ss"')&&dN((dl.Kernel.setLastLoc('offset=14540 line=288 span=17 id="desugar.ss"')&&dl.Kernel.first(dR)),dQ));dS=(dl.Kernel.setLastLoc('offset=14645 line=290 span=64 id="desugar.ss"')&&dO((dl.Kernel.setLastLoc('offset=14662 line=290 span=16 id="desugar.ss"')&&dl.Kernel.rest(dR)),(dl.Kernel.setLastLoc('offset=14679 line=290 span=29 id="desugar.ss"')&&dl.Kernel.second(dT))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=14729 line=291 span=157 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=14735 line=291 span=97 id="desugar.ss"')&&dl.Kernel.append((dl.Kernel.setLastLoc('offset=14743 line=291 span=28 id="desugar.ss"')&&dl.Kernel.first(dT)),[(dl.Kernel.setLastLoc('offset=14803 line=292 span=28 id="desugar.ss"')&&dl.Kernel.first(dS))])),(dl.Kernel.setLastLoc('offset=14856 line=293 span=29 id="desugar.ss"')&&dl.Kernel.second(dS))]))})()):(dl.Kernel.setLastLoc('offset=14340 line=283 span=549 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=14340 line=283 span=549 id=\\"desugar.ss\\""'))))))};(function(dQ){})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=14901 line=295 span=91 id="desugar.ss"')&&dO((dl.Kernel.setLastLoc('offset=14918 line=295 span=44 id="desugar.ss"')&&dP(dF,dl.types.Empty.EMPTY,dl.types.Empty.EMPTY)),bf))})())};var b3=function(bf,dF){return((dl.Kernel.setLastLoc('offset=15114 line=302 span=41 id="desugar.ss"')&&dl.Kernel.not((dl.Kernel.setLastLoc('offset=15119 line=302 span=35 id="desugar.ss"')&&dl.Kernel._equal_((dl.Kernel.setLastLoc('offset=15122 line=302 span=29 id="desugar.ss"')&&dl.Kernel.length((dl.Kernel.setLastLoc('offset=15130 line=302 span=20 id="desugar.ss"')&&b2(bf)))),(dl.types.Rational.makeInstance(2,1)),[]))))?(dl.Kernel.setLastLoc('offset=15161 line=303 span=106 id="desugar.ss"')&&dl.Kernel.syntax_dash_error((dl.types.String.makeInstance("Usage: (include file-path), where file-path is a string.")),bf)):((dl.Kernel.setLastLoc('offset=15274 line=305 span=53 id="desugar.ss"')&&dl.Kernel.not((dl.Kernel.setLastLoc('offset=15279 line=305 span=47 id="desugar.ss"')&&dl.Kernel.string_question_((dl.Kernel.setLastLoc('offset=15288 line=305 span=37 id="desugar.ss"')&&b2((dl.Kernel.setLastLoc('offset=15295 line=305 span=29 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=15303 line=305 span=20 id="desugar.ss"')&&b2(bf))))))))))?(dl.Kernel.setLastLoc('offset=15333 line=306 span=73 id="desugar.ss"')&&dl.Kernel.syntax_dash_error((dl.types.String.makeInstance("file-path must be a string")),(dl.Kernel.setLastLoc('offset=15376 line=306 span=29 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=15384 line=306 span=20 id="desugar.ss"')&&b2(bf)))))):(dl.types.Logic.TRUE?((function(){var dG;var dH;(function(dI){dG=(dl.Kernel.setLastLoc('offset=15455 line=309 span=37 id="desugar.ss"')&&b2((dl.Kernel.setLastLoc('offset=15462 line=309 span=29 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=15470 line=309 span=20 id="desugar.ss"')&&b2(bf))))));dH=(dl.Kernel.setLastLoc('offset=15520 line=310 span=26 id="desugar.ss"')&&dl.Kernel.openInputStx(dG))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=15556 line=311 span=28 id="desugar.ss"')&&cH(dH,dF))})()):(dl.Kernel.setLastLoc('offset=15103 line=301 span=484 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=15103 line=301 span=484 id=\\"desugar.ss\\""')))))))};var K=function(dF,bf){return((function(){var dI;var dH;var dN;var dL;var dM;var dK;var dG;var dJ=function(dP,dR,dO,dQ){return((dl.Kernel.setLastLoc('offset=16789 line=345 span=22 id="desugar.ss"')&&dl.Kernel.empty_question_(dP))?(((dl.Kernel.setLastLoc('offset=16831 line=346 span=28 id="desugar.ss"')&&dl.Kernel.symbol_question_((dl.Kernel.setLastLoc('offset=16840 line=346 span=18 id="desugar.ss"')&&b2(dO))))&&(dl.Kernel.setLastLoc('offset=16860 line=346 span=35 id="desugar.ss"')&&dl.Kernel.symbol_equal__question_((dl.types.Symbol.makeInstance("else")),(dl.Kernel.setLastLoc('offset=16876 line=346 span=18 id="desugar.ss"')&&b2(dO)))))?dQ:(dl.Kernel.setLastLoc('offset=16937 line=348 span=850 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=16952 line=348 span=787 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=16958 line=348 span=37 id="desugar.ss"')&&bY((dl.types.Symbol.makeInstance("if")),(dl.Kernel.setLastLoc('offset=16977 line=348 span=17 id="desugar.ss"')&&t(dF)))),(dl.Kernel.setLastLoc('offset=17031 line=349 span=494 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=17046 line=349 span=410 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=17052 line=349 span=40 id="desugar.ss"')&&bY((dl.types.Symbol.makeInstance("ormap")),(dl.Kernel.setLastLoc('offset=17074 line=349 span=17 id="desugar.ss"')&&t(dF)))),dG,(dl.Kernel.setLastLoc('offset=17215 line=351 span=240 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=17230 line=351 span=135 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=17236 line=351 span=40 id="desugar.ss"')&&bY((dl.types.Symbol.makeInstance("quote")),(dl.Kernel.setLastLoc('offset=17258 line=351 span=17 id="desugar.ss"')&&t(dF)))),dO])),(dl.Kernel.setLastLoc('offset=17437 line=353 span=17 id="desugar.ss"')&&t(dF))))])),(dl.Kernel.setLastLoc('offset=17507 line=354 span=17 id="desugar.ss"')&&t(dF)))),dQ,(dl.Kernel.setLastLoc('offset=17608 line=356 span=130 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=17623 line=356 span=46 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=17629 line=356 span=39 id="desugar.ss"')&&bY((dl.types.Symbol.makeInstance("void")),(dl.Kernel.setLastLoc('offset=17650 line=356 span=17 id="desugar.ss"')&&t(dF))))])),(dl.Kernel.setLastLoc('offset=17720 line=357 span=17 id="desugar.ss"')&&t(dF))))])),(dl.Kernel.setLastLoc('offset=17769 line=358 span=17 id="desugar.ss"')&&t(dF))))):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=17815 line=360 span=875 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=17830 line=360 span=816 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=17836 line=360 span=37 id="desugar.ss"')&&bY((dl.types.Symbol.makeInstance("if")),(dl.Kernel.setLastLoc('offset=17855 line=360 span=17 id="desugar.ss"')&&t(dF)))),(dl.Kernel.setLastLoc('offset=17905 line=361 span=485 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=17920 line=361 span=405 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=17926 line=361 span=40 id="desugar.ss"')&&bY((dl.types.Symbol.makeInstance("ormap")),(dl.Kernel.setLastLoc('offset=17948 line=361 span=17 id="desugar.ss"')&&t(dF)))),dG,(dl.Kernel.setLastLoc('offset=18081 line=363 span=243 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=18096 line=363 span=142 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=18102 line=363 span=40 id="desugar.ss"')&&bY((dl.types.Symbol.makeInstance("quote")),(dl.Kernel.setLastLoc('offset=18124 line=363 span=17 id="desugar.ss"')&&t(dF)))),(dl.Kernel.setLastLoc('offset=18216 line=364 span=21 id="desugar.ss"')&&dl.Kernel.first(dP))])),(dl.Kernel.setLastLoc('offset=18306 line=365 span=17 id="desugar.ss"')&&t(dF))))])),(dl.Kernel.setLastLoc('offset=18372 line=366 span=17 id="desugar.ss"')&&t(dF)))),(dl.Kernel.setLastLoc('offset=18422 line=367 span=15 id="desugar.ss"')&&dl.Kernel.first(dR)),(dl.Kernel.setLastLoc('offset=18469 line=368 span=176 id="desugar.ss"')&&dJ((dl.Kernel.setLastLoc('offset=18475 line=368 span=20 id="desugar.ss"')&&dl.Kernel.rest(dP)),(dl.Kernel.setLastLoc('offset=18533 line=369 span=14 id="desugar.ss"')&&dl.Kernel.rest(dR)),dO,dQ))])),(dl.Kernel.setLastLoc('offset=18672 line=372 span=17 id="desugar.ss"')&&t(dF)))):(dl.Kernel.setLastLoc('offset=16773 line=344 span=1919 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=16773 line=344 span=1919 id=\\"desugar.ss\\""'))))))};(function(dO){dI=(dl.Kernel.setLastLoc('offset=16088 line=327 span=25 id="desugar.ss"')&&cG(bf,(dl.types.Symbol.makeInstance("val"))));dH=(dl.Kernel.setLastLoc('offset=16144 line=328 span=21 id="desugar.ss"')&&dl.Kernel.first(dI));dN=(dl.Kernel.setLastLoc('offset=16188 line=329 span=56 id="desugar.ss"')&&bY((dl.Kernel.setLastLoc('offset=16203 line=329 span=22 id="desugar.ss"')&&dl.Kernel.second(dI)),(dl.Kernel.setLastLoc('offset=16226 line=329 span=17 id="desugar.ss"')&&t(dF))));dL=(dl.Kernel.setLastLoc('offset=16277 line=331 span=33 id="desugar.ss"')&&cG(dH,(dl.types.Symbol.makeInstance("x"))));dM=(dl.Kernel.setLastLoc('offset=16341 line=332 span=19 id="desugar.ss"')&&dl.Kernel.first(dL));dK=(dl.Kernel.setLastLoc('offset=16381 line=333 span=54 id="desugar.ss"')&&bY((dl.Kernel.setLastLoc('offset=16396 line=333 span=20 id="desugar.ss"')&&dl.Kernel.second(dL)),(dl.Kernel.setLastLoc('offset=16417 line=333 span=17 id="desugar.ss"')&&t(dF))));dG=(dl.Kernel.setLastLoc('offset=16501 line=337 span=131 id="desugar.ss"')&&dC((dl.Kernel.setLastLoc('offset=16513 line=337 span=81 id="desugar.ss"')&&dl.Kernel.list([(dl.types.Symbol.makeInstance("lambda")),(dl.Kernel.setLastLoc('offset=16527 line=337 span=12 id="desugar.ss"')&&dl.Kernel.list([dK])),(dl.Kernel.setLastLoc('offset=16565 line=338 span=28 id="desugar.ss"')&&dl.Kernel.list([(dl.types.Symbol.makeInstance("equal?")),dK,dN]))])),(dl.Kernel.setLastLoc('offset=16614 line=339 span=17 id="desugar.ss"')&&t(dF))))})(dl.Kernel.identity);return((dl.Kernel.setLastLoc('offset=18712 line=374 span=32 id="desugar.ss"')&&X(dF,(dl.types.Symbol.makeInstance("case"))))?(dl.Kernel.setLastLoc('offset=18752 line=375 span=633 id="desugar.ss"')&&aj((dl.Kernel.setLastLoc('offset=18783 line=375 span=29 id="desugar.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=18789 line=375 span=22 id="desugar.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=18795 line=375 span=15 id="desugar.ss"')&&b2(dF)))))),((function(){dl.Kernel.setLastLoc('offset=18851 line=376 span=68 id="desugar.ss"');var dO=(function(dQ){var dP=dQ[0];return dP});dO.toWrittenString=function(){return"<function:lambda>"};dO.toDisplayedString=dO.toWrittenString;return dO})()),((function(){dl.Kernel.setLastLoc('offset=18958 line=378 span=426 id="desugar.ss"');var dO=(function(dP){var dR=dP[0];var dT=dP[1];var dS=dP[2];var dQ=dP[3];return(dl.Kernel.setLastLoc('offset=19052 line=379 span=331 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=19058 line=379 span=262 id="desugar.ss"')&&dC((dl.Kernel.setLastLoc('offset=19070 line=379 span=173 id="desugar.ss"')&&dl.Kernel.list([(dl.types.Symbol.makeInstance("let")),(dl.Kernel.setLastLoc('offset=19081 line=379 span=46 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=19087 line=379 span=39 id="desugar.ss"')&&dl.Kernel.list([dN,(dl.Kernel.setLastLoc('offset=19101 line=379 span=24 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=19109 line=379 span=15 id="desugar.ss"')&&b2(dF))))]))])),(dl.Kernel.setLastLoc('offset=19192 line=380 span=50 id="desugar.ss"')&&dJ(dR,dT,dS,dQ))])),(dl.Kernel.setLastLoc('offset=19302 line=381 span=17 id="desugar.ss"')&&t(dF)))),dM]))});dO.toWrittenString=function(){return"<function:lambda>"};dO.toDisplayedString=dO.toWrittenString;return dO})()))):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=19406 line=384 span=92 id="desugar.ss"')&&dl.Kernel.syntax_dash_error((dl.Kernel.setLastLoc('offset=19420 line=384 span=48 id="desugar.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("Not a case clause: ~s")),[(dl.Kernel.setLastLoc('offset=19452 line=384 span=15 id="desugar.ss"')&&b2(dF))])),dF)):(dl.Kernel.setLastLoc('offset=18699 line=373 span=801 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=18699 line=373 span=801 id=\\"desugar.ss\\""'))))))})())};var aY=function(dF,bf){return((function(){var dG=function(dI,dK,dJ,dH){return((dl.Kernel.setLastLoc('offset=19773 line=396 span=18 id="desugar.ss"')&&dl.Kernel.empty_question_(dI))?(dl.Kernel.setLastLoc('offset=19802 line=397 span=277 id="desugar.ss"')&&dC((dl.Kernel.setLastLoc('offset=19814 line=397 span=224 id="desugar.ss"')&&dl.Kernel.list([(dl.types.Symbol.makeInstance("if")),dJ,dH,(dl.Kernel.setLastLoc('offset=19907 line=399 span=130 id="desugar.ss"')&&dl.Kernel.list([(dl.types.Symbol.makeInstance("error")),(dl.Kernel.list([(dl.types.Symbol.makeInstance("quote")),(dl.types.Symbol.makeInstance("cond"))])),(dl.Kernel.setLastLoc('offset=19961 line=400 span=75 id="desugar.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("cond: fell out of cond around ~s")),[(dl.Kernel.setLastLoc('offset=20004 line=400 span=31 id="desugar.ss"')&&bH((dl.Kernel.setLastLoc('offset=20017 line=400 span=17 id="desugar.ss"')&&t(dF))))]))]))])),(dl.Kernel.setLastLoc('offset=20061 line=401 span=17 id="desugar.ss"')&&t(dF)))):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=20116 line=404 span=406 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=20131 line=404 span=347 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=20137 line=404 span=37 id="desugar.ss"')&&bY((dl.types.Symbol.makeInstance("if")),(dl.Kernel.setLastLoc('offset=20156 line=404 span=17 id="desugar.ss"')&&t(dF)))),(dl.Kernel.setLastLoc('offset=20206 line=405 span=17 id="desugar.ss"')&&dl.Kernel.first(dI)),(dl.Kernel.setLastLoc('offset=20255 line=406 span=15 id="desugar.ss"')&&dl.Kernel.first(dK)),(dl.Kernel.setLastLoc('offset=20302 line=407 span=175 id="desugar.ss"')&&dG((dl.Kernel.setLastLoc('offset=20308 line=407 span=16 id="desugar.ss"')&&dl.Kernel.rest(dI)),(dl.Kernel.setLastLoc('offset=20362 line=408 span=14 id="desugar.ss"')&&dl.Kernel.rest(dK)),dJ,dH))])),(dl.Kernel.setLastLoc('offset=20504 line=411 span=17 id="desugar.ss"')&&t(dF)))):(dl.Kernel.setLastLoc('offset=19757 line=395 span=767 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=19757 line=395 span=767 id=\\"desugar.ss\\""'))))))};(function(dH){})(dl.Kernel.identity);return((dl.Kernel.setLastLoc('offset=20544 line=413 span=32 id="desugar.ss"')&&X(dF,(dl.types.Symbol.makeInstance("cond"))))?(dl.Kernel.setLastLoc('offset=20584 line=414 span=436 id="desugar.ss"')&&aj((dl.Kernel.setLastLoc('offset=20615 line=414 span=22 id="desugar.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=20621 line=414 span=15 id="desugar.ss"')&&b2(dF)))),((function(){dl.Kernel.setLastLoc('offset=20676 line=415 span=100 id="desugar.ss"');var dH=(function(dJ){var dI=dJ[0];return(dl.Kernel.setLastLoc('offset=20735 line=416 span=40 id="desugar.ss"')&&bY((dl.types.Symbol.makeInstance("true")),(dl.Kernel.setLastLoc('offset=20756 line=416 span=18 id="desugar.ss"')&&t(dI))))});dH.toWrittenString=function(){return"<function:lambda>"};dH.toDisplayedString=dH.toWrittenString;return dH})()),((function(){dl.Kernel.setLastLoc('offset=20815 line=417 span=204 id="desugar.ss"');var dH=(function(dL){var dJ=dL[0];var dM=dL[1];var dK=dL[2];var dI=dL[3];return(dl.Kernel.setLastLoc('offset=20909 line=418 span=109 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=20915 line=418 span=50 id="desugar.ss"')&&dG(dJ,dM,dK,dI)),bf]))});dH.toWrittenString=function(){return"<function:lambda>"};dH.toDisplayedString=dH.toWrittenString;return dH})()))):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=21041 line=421 span=92 id="desugar.ss"')&&dl.Kernel.syntax_dash_error((dl.Kernel.setLastLoc('offset=21055 line=421 span=48 id="desugar.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("Not a cond clause: ~s")),[(dl.Kernel.setLastLoc('offset=21087 line=421 span=15 id="desugar.ss"')&&b2(dF))])),dF)):(dl.Kernel.setLastLoc('offset=20531 line=412 span=604 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=20531 line=412 span=604 id=\\"desugar.ss\\""'))))))})())};var aj=function(dF,dG,bf){return((function(){var dH=function(dK,dJ,dI){return((dl.Kernel.setLastLoc('offset=21606 line=433 span=40 id="desugar.ss"')&&X((dl.Kernel.setLastLoc('offset=21624 line=433 span=15 id="desugar.ss"')&&dl.Kernel.first(dK)),(dl.types.Symbol.makeInstance("else"))))?((dl.Kernel.setLastLoc('offset=21661 line=434 span=29 id="desugar.ss"')&&dl.Kernel.not((dl.Kernel.setLastLoc('offset=21666 line=434 span=23 id="desugar.ss"')&&dl.Kernel.empty_question_((dl.Kernel.setLastLoc('offset=21674 line=434 span=14 id="desugar.ss"')&&dl.Kernel.rest(dK))))))?(dl.Kernel.setLastLoc('offset=21705 line=435 span=100 id="desugar.ss"')&&dl.Kernel.syntax_dash_error((dl.types.String.makeInstance("else clause should be the last, but there's another clause after it")),(dl.Kernel.setLastLoc('offset=21789 line=435 span=15 id="desugar.ss"')&&dl.Kernel.first(dK)))):(dl.Kernel.setLastLoc('offset=21820 line=436 span=188 id="desugar.ss"')&&bf.apply(null,[[(dl.Kernel.setLastLoc('offset=21823 line=436 span=23 id="desugar.ss"')&&dl.Kernel.reverse(dJ)),(dl.Kernel.setLastLoc('offset=21865 line=437 span=21 id="desugar.ss"')&&dl.Kernel.reverse(dI)),(dl.Kernel.setLastLoc('offset=21905 line=438 span=52 id="desugar.ss"')&&dG.apply(null,[[(dl.Kernel.setLastLoc('offset=21925 line=438 span=31 id="desugar.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=21932 line=438 span=23 id="desugar.ss"')&&b2((dl.Kernel.setLastLoc('offset=21939 line=438 span=15 id="desugar.ss"')&&dl.Kernel.first(dK))))))]])),(dl.Kernel.setLastLoc('offset=21975 line=439 span=32 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=21983 line=439 span=23 id="desugar.ss"')&&b2((dl.Kernel.setLastLoc('offset=21990 line=439 span=15 id="desugar.ss"')&&dl.Kernel.first(dK))))))]]))):((dl.Kernel.setLastLoc('offset=22031 line=441 span=23 id="desugar.ss"')&&dl.Kernel.empty_question_((dl.Kernel.setLastLoc('offset=22039 line=441 span=14 id="desugar.ss"')&&dl.Kernel.rest(dK))))?(dl.Kernel.setLastLoc('offset=22065 line=442 span=154 id="desugar.ss"')&&bf.apply(null,[[(dl.Kernel.setLastLoc('offset=22068 line=442 span=23 id="desugar.ss"')&&dl.Kernel.reverse(dJ)),(dl.Kernel.setLastLoc('offset=22105 line=443 span=21 id="desugar.ss"')&&dl.Kernel.reverse(dI)),(dl.Kernel.setLastLoc('offset=22141 line=444 span=31 id="desugar.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=22148 line=444 span=23 id="desugar.ss"')&&b2((dl.Kernel.setLastLoc('offset=22155 line=444 span=15 id="desugar.ss"')&&dl.Kernel.first(dK)))))),(dl.Kernel.setLastLoc('offset=22186 line=445 span=32 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=22194 line=445 span=23 id="desugar.ss"')&&b2((dl.Kernel.setLastLoc('offset=22201 line=445 span=15 id="desugar.ss"')&&dl.Kernel.first(dK))))))]])):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=22246 line=447 span=192 id="desugar.ss"')&&dH((dl.Kernel.setLastLoc('offset=22263 line=447 span=14 id="desugar.ss"')&&dl.Kernel.rest(dK)),(dl.Kernel.setLastLoc('offset=22305 line=448 span=52 id="desugar.ss"')&&dl.Kernel.cons((dl.Kernel.setLastLoc('offset=22311 line=448 span=31 id="desugar.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=22318 line=448 span=23 id="desugar.ss"')&&b2((dl.Kernel.setLastLoc('offset=22325 line=448 span=15 id="desugar.ss"')&&dl.Kernel.first(dK)))))),dJ)),(dl.Kernel.setLastLoc('offset=22386 line=449 span=51 id="desugar.ss"')&&dl.Kernel.cons((dl.Kernel.setLastLoc('offset=22392 line=449 span=32 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=22400 line=449 span=23 id="desugar.ss"')&&b2((dl.Kernel.setLastLoc('offset=22407 line=449 span=15 id="desugar.ss"')&&dl.Kernel.first(dK)))))),dI)))):(dl.Kernel.setLastLoc('offset=21590 line=432 span=850 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=21590 line=432 span=850 id=\\"desugar.ss\\""')))))))};(function(dI){})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=22447 line=450 span=37 id="desugar.ss"')&&dH(dF,dl.types.Empty.EMPTY,dl.types.Empty.EMPTY))})())};var cK=function(bf,dF){return((function(){var dI;var dG;var dH;var dJ;var dK;(function(dL){dI=(dl.Kernel.setLastLoc('offset=22696 line=459 span=22 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=22704 line=459 span=13 id="desugar.ss"')&&b2(bf))));dG=(dl.Kernel.setLastLoc('offset=22747 line=460 span=21 id="desugar.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=22754 line=460 span=13 id="desugar.ss"')&&b2(bf))));dH=(dl.Kernel.setLastLoc('offset=22792 line=461 span=122 id="desugar.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=22797 line=461 span=69 id="desugar.ss"');var dM=(function(dN){var dO=dN[0];return(dl.Kernel.setLastLoc('offset=22843 line=462 span=22 id="desugar.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=22850 line=462 span=14 id="desugar.ss"')&&b2(dO))))});dM.toWrittenString=function(){return"<function:lambda>"};dM.toDisplayedString=dM.toWrittenString;return dM})()),[(dl.Kernel.setLastLoc('offset=22894 line=463 span=19 id="desugar.ss"')&&b2(dI))]));dJ=(dl.Kernel.setLastLoc('offset=22939 line=464 span=125 id="desugar.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=22944 line=464 span=71 id="desugar.ss"');var dM=(function(dN){var dO=dN[0];return(dl.Kernel.setLastLoc('offset=22991 line=465 span=23 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=22999 line=465 span=14 id="desugar.ss"')&&b2(dO))))});dM.toWrittenString=function(){return"<function:lambda>"};dM.toDisplayedString=dM.toWrittenString;return dM})()),[(dl.Kernel.setLastLoc('offset=23044 line=466 span=19 id="desugar.ss"')&&b2(dI))]));dK=(dl.Kernel.setLastLoc('offset=23122 line=469 span=216 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=23137 line=469 span=157 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=23143 line=469 span=39 id="desugar.ss"')&&bY((dl.types.Symbol.makeInstance("lambda")),(dl.Kernel.setLastLoc('offset=23166 line=469 span=15 id="desugar.ss"')&&t(bf)))),(dl.Kernel.setLastLoc('offset=23216 line=470 span=35 id="desugar.ss"')&&aw(dH,(dl.Kernel.setLastLoc('offset=23235 line=470 span=15 id="desugar.ss"')&&t(bf)))),dG])),(dl.Kernel.setLastLoc('offset=23322 line=472 span=15 id="desugar.ss"')&&t(bf))))})(dl.Kernel.identity);return(function(){(dl.Kernel.setLastLoc('offset=23362 line=474 span=58 id="desugar.ss"')&&P((dl.Kernel.setLastLoc('offset=23386 line=474 span=27 id="desugar.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=23392 line=474 span=20 id="desugar.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=23398 line=474 span=13 id="desugar.ss"')&&b2(bf)))))),bf));(dl.Kernel.setLastLoc('offset=23427 line=475 span=185 id="desugar.ss"')&&dp((dl.Kernel.setLastLoc('offset=23457 line=475 span=154 id="desugar.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=23462 line=475 span=87 id="desugar.ss"');var dL=(function(dM){var dN=dM[0];return(dl.Kernel.setLastLoc('offset=23524 line=476 span=24 id="desugar.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=23531 line=476 span=16 id="desugar.ss"')&&b2(dN))))});dL.toWrittenString=function(){return"<function:lambda>"};dL.toDisplayedString=dL.toWrittenString;return dL})()),[(dl.Kernel.setLastLoc('offset=23591 line=477 span=19 id="desugar.ss"')&&b2(dI))]))));return(dl.Kernel.setLastLoc('offset=23625 line=478 span=110 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=23631 line=478 span=85 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=23646 line=478 span=26 id="desugar.ss"')&&dl.Kernel.cons(dK,dJ)),(dl.Kernel.setLastLoc('offset=23700 line=479 span=15 id="desugar.ss"')&&t(bf)))),dF]))})()})())};var c2=function(bf,dF){return((function(){var dI;var dH;var dG=function(dJ){return((dl.Kernel.setLastLoc('offset=24091 line=492 span=16 id="desugar.ss"')&&dl.Kernel.empty_question_(dJ))?dH:(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=24168 line=495 span=335 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=24183 line=495 span=263 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=24189 line=495 span=46 id="desugar.ss"')&&bY((dl.types.Symbol.makeInstance("let")),(dl.Kernel.setLastLoc('offset=24209 line=495 span=25 id="desugar.ss"')&&t((dl.Kernel.setLastLoc('offset=24218 line=495 span=15 id="desugar.ss"')&&dl.Kernel.first(dJ)))))),(dl.Kernel.setLastLoc('offset=24272 line=496 span=115 id="desugar.ss"')&&aw((dl.Kernel.setLastLoc('offset=24287 line=496 span=22 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=24293 line=496 span=15 id="desugar.ss"')&&dl.Kernel.first(dJ))])),(dl.Kernel.setLastLoc('offset=24361 line=497 span=25 id="desugar.ss"')&&t((dl.Kernel.setLastLoc('offset=24370 line=497 span=15 id="desugar.ss"')&&dl.Kernel.first(dJ)))))),(dl.Kernel.setLastLoc('offset=24424 line=498 span=21 id="desugar.ss"')&&dG((dl.Kernel.setLastLoc('offset=24430 line=498 span=14 id="desugar.ss"')&&dl.Kernel.rest(dJ))))])),(dl.Kernel.setLastLoc('offset=24477 line=499 span=25 id="desugar.ss"')&&t((dl.Kernel.setLastLoc('offset=24486 line=499 span=15 id="desugar.ss"')&&dl.Kernel.first(dJ)))))):(dl.Kernel.setLastLoc('offset=24070 line=491 span=435 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=24070 line=491 span=435 id=\\"desugar.ss\\""'))))))};(function(dJ){dI=(dl.Kernel.setLastLoc('offset=23901 line=486 span=22 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=23909 line=486 span=13 id="desugar.ss"')&&b2(bf))));dH=(dl.Kernel.setLastLoc('offset=23952 line=487 span=21 id="desugar.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=23959 line=487 span=13 id="desugar.ss"')&&b2(bf))))})(dl.Kernel.identity);return(function(){(dl.Kernel.setLastLoc('offset=24529 line=501 span=58 id="desugar.ss"')&&P((dl.Kernel.setLastLoc('offset=24553 line=501 span=27 id="desugar.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=24559 line=501 span=20 id="desugar.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=24565 line=501 span=13 id="desugar.ss"')&&b2(bf)))))),bf));return(dl.Kernel.setLastLoc('offset=24594 line=502 span=51 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=24600 line=502 span=26 id="desugar.ss"')&&dG((dl.Kernel.setLastLoc('offset=24606 line=502 span=19 id="desugar.ss"')&&b2(dI)))),dF]))})()})())};var bV=function(bf,dF){return((function(){var dH;var dG;var dI;(function(dJ){dH=(dl.Kernel.setLastLoc('offset=24807 line=509 span=22 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=24815 line=509 span=13 id="desugar.ss"')&&b2(bf))));dG=(dl.Kernel.setLastLoc('offset=24858 line=510 span=21 id="desugar.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=24865 line=510 span=13 id="desugar.ss"')&&b2(bf))));dI=(dl.Kernel.setLastLoc('offset=24926 line=512 span=306 id="desugar.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=24931 line=512 span=263 id="desugar.ss"');var dK=(function(dL){var dM=dL[0];return((function(){var dN;var dO;(function(dP){dN=(dl.Kernel.setLastLoc('offset=24990 line=513 span=24 id="desugar.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=24997 line=513 span=16 id="desugar.ss"')&&b2(dM))));dO=(dl.Kernel.setLastLoc('offset=25055 line=514 span=25 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=25063 line=514 span=16 id="desugar.ss"')&&b2(dM))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=25104 line=515 span=88 id="desugar.ss"')&&dC((dl.Kernel.setLastLoc('offset=25116 line=515 span=23 id="desugar.ss"')&&dl.Kernel.list([(dl.types.Symbol.makeInstance("define")),dN,dO])),(dl.Kernel.setLastLoc('offset=25173 line=516 span=18 id="desugar.ss"')&&t(dM))))})())});dK.toWrittenString=function(){return"<function:lambda>"};dK.toDisplayedString=dK.toWrittenString;return dK})()),[(dl.Kernel.setLastLoc('offset=25212 line=517 span=19 id="desugar.ss"')&&b2(dH))]))})(dl.Kernel.identity);return(function(){(dl.Kernel.setLastLoc('offset=25252 line=519 span=58 id="desugar.ss"')&&P((dl.Kernel.setLastLoc('offset=25276 line=519 span=27 id="desugar.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=25282 line=519 span=20 id="desugar.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=25288 line=519 span=13 id="desugar.ss"')&&b2(bf)))))),bf));(dl.Kernel.setLastLoc('offset=25317 line=520 span=142 id="desugar.ss"')&&dp((dl.Kernel.setLastLoc('offset=25347 line=520 span=111 id="desugar.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=25352 line=520 span=44 id="desugar.ss"');var dJ=(function(dL){var dK=dL[0];return(dl.Kernel.setLastLoc('offset=25371 line=520 span=24 id="desugar.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=25378 line=520 span=16 id="desugar.ss"')&&b2(dK))))});dJ.toWrittenString=function(){return"<function:lambda>"};dJ.toDisplayedString=dJ.toWrittenString;return dJ})()),[(dl.Kernel.setLastLoc('offset=25438 line=521 span=19 id="desugar.ss"')&&b2(dH))]))));return(dl.Kernel.setLastLoc('offset=25466 line=522 span=115 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=25472 line=522 span=90 id="desugar.ss"')&&dC((dl.Kernel.setLastLoc('offset=25484 line=522 span=37 id="desugar.ss"')&&dl.Kernel.list([(dl.types.Symbol.makeInstance("local")),dI,dG])),(dl.Kernel.setLastLoc('offset=25546 line=523 span=15 id="desugar.ss"')&&t(bf)))),dF]))})()})())};var ap=function(bf,dF){return((function(){var dG=function(dH,dI){return((dl.Kernel.setLastLoc('offset=25805 line=532 span=17 id="desugar.ss"')&&cb(dH))?((dl.Kernel.setLastLoc('offset=25845 line=533 span=36 id="desugar.ss"')&&X(dH,(dl.types.Symbol.makeInstance("quasiquote"))))?(function(){(dl.Kernel.setLastLoc('offset=25936 line=535 span=51 id="desugar.ss"')&&P((dl.Kernel.setLastLoc('offset=25960 line=535 span=20 id="desugar.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=25966 line=535 span=13 id="desugar.ss"')&&b2(dH)))),dH));return((dl.Kernel.setLastLoc('offset=26045 line=537 span=11 id="desugar.ss"')&&dl.Kernel._greaterthan_(dI,(dl.types.Rational.makeInstance(0,1)),[]))?(dl.Kernel.setLastLoc('offset=26084 line=538 span=273 id="desugar.ss"')&&dC((dl.Kernel.setLastLoc('offset=26096 line=538 span=205 id="desugar.ss"')&&dl.Kernel.list([(dl.types.Symbol.makeInstance("list")),(dl.Kernel.setLastLoc('offset=26108 line=538 span=35 id="desugar.ss"')&&dl.Kernel.list([(dl.types.Symbol.makeInstance("quote")),(dl.Kernel.setLastLoc('offset=26121 line=538 span=21 id="desugar.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=26128 line=538 span=13 id="desugar.ss"')&&b2(dH))))])),(dl.Kernel.setLastLoc('offset=26189 line=539 span=111 id="desugar.ss"')&&dG((dl.Kernel.setLastLoc('offset=26204 line=539 span=22 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=26212 line=539 span=13 id="desugar.ss"')&&b2(dH)))),(dl.Kernel.setLastLoc('offset=26287 line=540 span=12 id="desugar.ss"')&&dl.Kernel.add1(dI))))])),(dl.Kernel.setLastLoc('offset=26341 line=541 span=15 id="desugar.ss"')&&t(dH)))):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=26418 line=543 span=173 id="desugar.ss"')&&dC((dl.Kernel.setLastLoc('offset=26430 line=543 span=105 id="desugar.ss"')&&dG((dl.Kernel.setLastLoc('offset=26445 line=543 span=22 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=26453 line=543 span=13 id="desugar.ss"')&&b2(dH)))),(dl.Kernel.setLastLoc('offset=26522 line=544 span=12 id="desugar.ss"')&&dl.Kernel.add1(dI)))),(dl.Kernel.setLastLoc('offset=26575 line=545 span=15 id="desugar.ss"')&&t(dH)))):(dl.Kernel.setLastLoc('offset=26012 line=536 span=581 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=26012 line=536 span=581 id=\\"desugar.ss\\""'))))))})():((dl.Kernel.setLastLoc('offset=26640 line=547 span=33 id="desugar.ss"')&&X(dH,(dl.types.Symbol.makeInstance("unquote"))))?(function(){(dl.Kernel.setLastLoc('offset=26727 line=549 span=51 id="desugar.ss"')&&P((dl.Kernel.setLastLoc('offset=26751 line=549 span=20 id="desugar.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=26757 line=549 span=13 id="desugar.ss"')&&b2(dH)))),dH));return((dl.Kernel.setLastLoc('offset=26836 line=551 span=11 id="desugar.ss"')&&dl.Kernel._greaterthan_(dI,(dl.types.Rational.makeInstance(1,1)),[]))?(dl.Kernel.setLastLoc('offset=26875 line=552 span=274 id="desugar.ss"')&&dC((dl.Kernel.setLastLoc('offset=26887 line=552 span=206 id="desugar.ss"')&&dl.Kernel.list([(dl.types.Symbol.makeInstance("list")),(dl.Kernel.setLastLoc('offset=26899 line=552 span=35 id="desugar.ss"')&&dl.Kernel.list([(dl.types.Symbol.makeInstance("quote")),(dl.Kernel.setLastLoc('offset=26912 line=552 span=21 id="desugar.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=26919 line=552 span=13 id="desugar.ss"')&&b2(dH))))])),(dl.Kernel.setLastLoc('offset=26980 line=553 span=112 id="desugar.ss"')&&dG((dl.Kernel.setLastLoc('offset=26995 line=553 span=22 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=27003 line=553 span=13 id="desugar.ss"')&&b2(dH)))),(dl.Kernel.setLastLoc('offset=27079 line=554 span=12 id="desugar.ss"')&&dl.Kernel.sub1(dI))))])),(dl.Kernel.setLastLoc('offset=27133 line=555 span=15 id="desugar.ss"')&&t(dH)))):((dl.Kernel.setLastLoc('offset=27178 line=556 span=11 id="desugar.ss"')&&dl.Kernel._equal_(dI,(dl.types.Rational.makeInstance(1,1)),[]))?(dl.Kernel.setLastLoc('offset=27217 line=557 span=22 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=27225 line=557 span=13 id="desugar.ss"')&&b2(dH)))):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=27300 line=559 span=88 id="desugar.ss"')&&dl.Kernel.syntax_dash_error((dl.types.String.makeInstance("misuse of a comma or 'unquote, not under a quasiquoting backquote")),dH)):(dl.Kernel.setLastLoc('offset=26803 line=550 span=587 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=26803 line=550 span=587 id=\\"desugar.ss\\""')))))))})():((dl.Kernel.setLastLoc('offset=27437 line=561 span=42 id="desugar.ss"')&&X(dH,(dl.types.Symbol.makeInstance("unquote-splicing"))))?((dl.Kernel.setLastLoc('offset=27533 line=563 span=11 id="desugar.ss"')&&dl.Kernel._greaterthan_(dI,(dl.types.Rational.makeInstance(1,1)),[]))?(dl.Kernel.setLastLoc('offset=27570 line=564 span=268 id="desugar.ss"')&&dC((dl.Kernel.setLastLoc('offset=27582 line=564 span=202 id="desugar.ss"')&&dl.Kernel.list([(dl.types.Symbol.makeInstance("list")),(dl.Kernel.setLastLoc('offset=27594 line=564 span=35 id="desugar.ss"')&&dl.Kernel.list([(dl.types.Symbol.makeInstance("quote")),(dl.Kernel.setLastLoc('offset=27607 line=564 span=21 id="desugar.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=27614 line=564 span=13 id="desugar.ss"')&&b2(dH))))])),(dl.Kernel.setLastLoc('offset=27673 line=565 span=110 id="desugar.ss"')&&dG((dl.Kernel.setLastLoc('offset=27688 line=565 span=22 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=27696 line=565 span=13 id="desugar.ss"')&&b2(dH)))),(dl.Kernel.setLastLoc('offset=27770 line=566 span=12 id="desugar.ss"')&&dl.Kernel.sub1(dI))))])),(dl.Kernel.setLastLoc('offset=27822 line=567 span=15 id="desugar.ss"')&&t(dH)))):((dl.Kernel.setLastLoc('offset=27865 line=568 span=11 id="desugar.ss"')&&dl.Kernel._equal_(dI,(dl.types.Rational.makeInstance(1,1)),[]))?(dl.Kernel.setLastLoc('offset=27902 line=569 span=87 id="desugar.ss"')&&dl.Kernel.syntax_dash_error((dl.types.String.makeInstance("misuse of ,@ or unquote-splicing within a quasiquoting backquote")),dH)):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=28071 line=572 span=93 id="desugar.ss"')&&dl.Kernel.syntax_dash_error((dl.types.String.makeInstance("misuse of a ,@ or unquote-splicing, not under a quasiquoting backquote")),dH)):(dl.Kernel.setLastLoc('offset=27502 line=562 span=664 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=27502 line=562 span=664 id=\\"desugar.ss\\""'))))))):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=28239 line=575 span=1761 id="desugar.ss"')&&dC((dl.Kernel.setLastLoc('offset=28251 line=575 span=1698 id="desugar.ss"')&&dl.Kernel.cons((dl.types.Symbol.makeInstance("append")),(dl.Kernel.setLastLoc('offset=28306 line=576 span=1642 id="desugar.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=28419 line=578 span=1473 id="desugar.ss"');var dJ=(function(dL){var dK=dL[0];return((dl.Kernel.setLastLoc('offset=28527 line=580 span=32 id="desugar.ss"')&&X(dK,(dl.types.Symbol.makeInstance("quasiquote"))))?(dl.Kernel.setLastLoc('offset=28606 line=581 span=36 id="desugar.ss"')&&dl.Kernel.list([(dl.types.Symbol.makeInstance("list")),(dl.Kernel.setLastLoc('offset=28618 line=581 span=23 id="desugar.ss"')&&dG(dK,dI))])):((dl.Kernel.setLastLoc('offset=28736 line=583 span=29 id="desugar.ss"')&&X(dK,(dl.types.Symbol.makeInstance("unquote"))))?(dl.Kernel.setLastLoc('offset=28812 line=584 span=36 id="desugar.ss"')&&dl.Kernel.list([(dl.types.Symbol.makeInstance("list")),(dl.Kernel.setLastLoc('offset=28824 line=584 span=23 id="desugar.ss"')&&dG(dK,dI))])):((dl.Kernel.setLastLoc('offset=28942 line=586 span=38 id="desugar.ss"')&&X(dK,(dl.types.Symbol.makeInstance("unquote-splicing"))))?((dl.Kernel.setLastLoc('offset=29082 line=588 span=11 id="desugar.ss"')&&dl.Kernel._greaterthan_(dI,(dl.types.Rational.makeInstance(1,1)),[]))?(dl.Kernel.setLastLoc('offset=29143 line=589 span=36 id="desugar.ss"')&&dl.Kernel.list([(dl.types.Symbol.makeInstance("list")),(dl.Kernel.setLastLoc('offset=29155 line=589 span=23 id="desugar.ss"')&&dG(dK,dI))])):((dl.Kernel.setLastLoc('offset=29230 line=590 span=11 id="desugar.ss"')&&dl.Kernel._equal_(dI,(dl.types.Rational.makeInstance(1,1)),[]))?(function(){(dl.Kernel.setLastLoc('offset=29349 line=592 span=43 id="desugar.ss"')&&P((dl.Kernel.setLastLoc('offset=29373 line=592 span=16 id="desugar.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=29379 line=592 span=9 id="desugar.ss"')&&b2(dK)))),dK));return(dl.Kernel.setLastLoc('offset=29444 line=593 span=18 id="desugar.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=29452 line=593 span=9 id="desugar.ss"')&&b2(dK))))})():(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=29568 line=595 span=138 id="desugar.ss"')&&dl.Kernel.syntax_dash_error((dl.types.String.makeInstance("misuse of ,@ or unquote-splicing within a quasiquoting backquote")),dH)):(dl.Kernel.setLastLoc('offset=29027 line=587 span=681 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=29027 line=587 span=681 id=\\"desugar.ss\\""'))))))):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=29853 line=599 span=36 id="desugar.ss"')&&dl.Kernel.list([(dl.types.Symbol.makeInstance("list")),(dl.Kernel.setLastLoc('offset=29865 line=599 span=23 id="desugar.ss"')&&dG(dK,dI))])):(dl.Kernel.setLastLoc('offset=28475 line=579 span=1416 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=28475 line=579 span=1416 id=\\"desugar.ss\\""'))))))))});dJ.toWrittenString=function(){return"<function:lambda>"};dJ.toDisplayedString=dJ.toWrittenString;return dJ})()),[(dl.Kernel.setLastLoc('offset=29934 line=600 span=13 id="desugar.ss"')&&b2(dH))])))),(dl.Kernel.setLastLoc('offset=29984 line=601 span=15 id="desugar.ss"')&&t(dH)))):(dl.Kernel.setLastLoc('offset=25838 line=533 span=4164 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=25838 line=533 span=4164 id=\\"desugar.ss\\""')))))))):(dl.types.Logic.TRUE?((dl.Kernel.setLastLoc('offset=30063 line=604 span=11 id="desugar.ss"')&&dl.Kernel._greaterthan_(dI,(dl.types.Rational.makeInstance(0,1)),[]))?(dl.Kernel.setLastLoc('offset=30093 line=605 span=48 id="desugar.ss"')&&dC((dl.Kernel.setLastLoc('offset=30105 line=605 span=19 id="desugar.ss"')&&dl.Kernel.list([(dl.types.Symbol.makeInstance("quote")),dH])),(dl.Kernel.setLastLoc('offset=30125 line=605 span=15 id="desugar.ss"')&&t(dH)))):(dl.types.Logic.TRUE?dH:(dl.Kernel.setLastLoc('offset=30039 line=603 span=152 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=30039 line=603 span=152 id=\\"desugar.ss\\""')))))):(dl.Kernel.setLastLoc('offset=25784 line=531 span=4409 id="desugar.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=25784 line=531 span=4409 id=\\"desugar.ss\\""'))))))};(function(dH){})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=30205 line=609 span=47 id="desugar.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=30211 line=609 span=23 id="desugar.ss"')&&dG(bf,(dl.types.Rational.makeInstance(0,1)))),dF]))})())};var bt=function(dF,bf,dG){dl.Kernel.Struct.call(this,"make-compiled-program",[dF,bf,dG]);this.defns=dF;this.toplevel_dash_exprs=bf;this.pinfo=dG};bt.prototype=new dl.Kernel.Struct();var aB=function(dG,dF,bf){return new bt(dG,dF,bf)};var cn=function(bf){if(cM(bf)){return bf.defns}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("compiled-program-defns: not a compiled-program: ~s",[bf]))}};var aK=function(bf){if(cM(bf)){return bf.toplevel_dash_exprs}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("compiled-program-toplevel-exprs: not a compiled-program: ~s",[bf]))}};var cA=function(bf){if(cM(bf)){return bf.pinfo}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("compiled-program-pinfo: not a compiled-program: ~s",[bf]))}};var dg=function(dF,bf){if(cM(dF)){dF.defns=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_compiled_dash_program_dash_defns_bang_: not a compiled-program: ~s",[dF]))}};var al=function(dF,bf){if(cM(dF)){dF.toplevel_dash_exprs=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_compiled_dash_program_dash_toplevel_dash_exprs_bang_: not a compiled-program: ~s",[dF]))}};var bo=function(dF,bf){if(cM(dF)){dF.pinfo=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_compiled_dash_program_dash_pinfo_bang_: not a compiled-program: ~s",[dF]))}};var cM=function(bf){return bf!=null&&bf!=undefined&&bf instanceof bt};var b0=function(bf){return(dl.Kernel.setLastLoc('offset=640 line=27 span=343 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("(function() { ")),(dl.Kernel.setLastLoc('offset=689 line=28 span=43 id="beginner-to-javascript.ss"')&&cn(bf)),(dl.types.String.makeInstance("\n")),(dl.types.String.makeInstance("return (function() { \n")),(dl.types.String.makeInstance(" (")),(dl.Kernel.setLastLoc('offset=839 line=32 span=52 id="beginner-to-javascript.ss"')&&aK(bf)),(dl.types.String.makeInstance(" )(arguments[0] || plt.Kernel.identity);\n")),(dl.types.String.makeInstance("}); })()"))]))};var cE=function(bf){return(dl.Kernel.setLastLoc('offset=1132 line=38 span=299 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.Kernel.setLastLoc('offset=1147 line=38 span=43 id="beginner-to-javascript.ss"')&&cn(bf)),(dl.types.String.makeInstance("\n")),(dl.types.String.makeInstance("(function() { \n")),(dl.types.String.makeInstance(" (")),(dl.Kernel.setLastLoc('offset=1290 line=42 span=52 id="beginner-to-javascript.ss"')&&aK(bf)),(dl.types.String.makeInstance(" )(arguments[0] || plt.Kernel.identity);\n")),(dl.types.String.makeInstance("})();"))]))};var b5=function(bf){return(dl.Kernel.setLastLoc('offset=1761 line=56 span=100 id="beginner-to-javascript.ss"')&&dq(bf,(dl.Kernel.setLastLoc('offset=1838 line=57 span=22 id="beginner-to-javascript.ss"')&&aJ((dl.types.Symbol.makeInstance("base"))))))};var dq=function(bf,dF){return((function(){var dI;var dL;var dH;var dK;var dJ;var dG=function(dM,dN,dP,dO){return((dl.Kernel.setLastLoc('offset=2578 line=73 span=16 id="beginner-to-javascript.ss"')&&dl.Kernel.empty_question_(dM))?(dl.Kernel.setLastLoc('offset=2614 line=74 span=482 id="beginner-to-javascript.ss"')&&aB(dN,(dl.Kernel.setLastLoc('offset=2686 line=75 span=358 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("(function (")),(dl.Kernel.setLastLoc('offset=2773 line=76 span=195 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=2847 line=77 span=120 id="beginner-to-javascript.ss"')&&h(dL)))),(dl.types.String.makeInstance(") { ")),dP,(dl.types.String.makeInstance(" })"))])),dO)):(dl.types.Logic.TRUE?((dl.Kernel.setLastLoc('offset=3148 line=82 span=23 id="beginner-to-javascript.ss"')&&dc((dl.Kernel.setLastLoc('offset=3155 line=82 span=15 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dM))))?((function(){var dQ;(function(dR){dQ=(dl.Kernel.setLastLoc('offset=3280 line=84 span=185 id="beginner-to-javascript.ss"')&&da((dl.Kernel.setLastLoc('offset=3351 line=85 span=15 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dM)),dJ,dO))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=3525 line=89 span=487 id="beginner-to-javascript.ss"')&&dG((dl.Kernel.setLastLoc('offset=3531 line=89 span=14 id="beginner-to-javascript.ss"')&&dl.Kernel.rest(dM)),(dl.Kernel.setLastLoc('offset=3580 line=90 span=162 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([dN,(dl.types.String.makeInstance("\n")),(dl.Kernel.setLastLoc('offset=3704 line=92 span=37 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dQ))])),(dl.Kernel.setLastLoc('offset=3777 line=93 span=162 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([dP,(dl.types.String.makeInstance("\n")),(dl.Kernel.setLastLoc('offset=3900 line=95 span=38 id="beginner-to-javascript.ss"')&&dl.Kernel.second(dQ))])),(dl.Kernel.setLastLoc('offset=3974 line=96 span=37 id="beginner-to-javascript.ss"')&&dl.Kernel.third(dQ))))})()):((dl.Kernel.setLastLoc('offset=4093 line=99 span=34 id="beginner-to-javascript.ss"')&&bd((dl.Kernel.setLastLoc('offset=4111 line=99 span=15 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dM))))?(dl.Kernel.setLastLoc('offset=4154 line=100 span=280 id="beginner-to-javascript.ss"')&&dG((dl.Kernel.setLastLoc('offset=4160 line=100 span=14 id="beginner-to-javascript.ss"')&&dl.Kernel.rest(dM)),(dl.Kernel.setLastLoc('offset=4207 line=101 span=149 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([dN,(dl.types.String.makeInstance("\n")),(dl.types.String.makeInstance("// Module require erased\n"))])),dP,dO)):(((dl.Kernel.setLastLoc('offset=4493 line=107 span=28 id="beginner-to-javascript.ss"')&&a5((dl.Kernel.setLastLoc('offset=4505 line=107 span=15 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dM))))||(dl.Kernel.setLastLoc('offset=4552 line=108 span=29 id="beginner-to-javascript.ss"')&&ca((dl.Kernel.setLastLoc('offset=4565 line=108 span=15 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dM)))))?((function(){var dQ;(function(dR){dQ=(dl.Kernel.setLastLoc('offset=4685 line=110 span=181 id="beginner-to-javascript.ss"')&&cO((dl.Kernel.setLastLoc('offset=4754 line=111 span=15 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dM)),dJ,dO))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=4926 line=115 span=1109 id="beginner-to-javascript.ss"')&&dG((dl.Kernel.setLastLoc('offset=4932 line=115 span=14 id="beginner-to-javascript.ss"')&&dl.Kernel.rest(dM)),dN,(dl.Kernel.setLastLoc('offset=5021 line=117 span=946 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([dP,(dl.types.String.makeInstance("\n")),(dl.Kernel.setLastLoc('offset=5598 line=124 span=180 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=5665 line=125 span=112 id="beginner-to-javascript.ss"')&&h(dL)))),(dl.types.String.makeInstance("(")),(dl.Kernel.setLastLoc('offset=5881 line=128 span=31 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dQ)),(dl.types.String.makeInstance(");"))])),(dl.Kernel.setLastLoc('offset=6002 line=130 span=32 id="beginner-to-javascript.ss"')&&dl.Kernel.second(dQ))))})()):(dl.Kernel.setLastLoc('offset=3141 line=82 span=2897 id="beginner-to-javascript.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=3141 line=82 span=2897 id=\\"beginner-to-javascript.ss\\""'))))))):(dl.Kernel.setLastLoc('offset=2571 line=73 span=3469 id="beginner-to-javascript.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=2571 line=73 span=3469 id=\\"beginner-to-javascript.ss\\""'))))))};(function(dM){dI=(dl.Kernel.setLastLoc('offset=2030 line=62 span=52 id="beginner-to-javascript.ss"')&&cG(dF,(dl.types.Symbol.makeInstance("toplevel-expression-show"))));dL=(dl.Kernel.setLastLoc('offset=2127 line=63 span=23 id="beginner-to-javascript.ss"')&&dl.Kernel.second(dI));dH=(dl.Kernel.setLastLoc('offset=2205 line=65 span=48 id="beginner-to-javascript.ss"')&&cH(bf,(dl.Kernel.setLastLoc('offset=2230 line=65 span=22 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dI))));dK=(dl.Kernel.setLastLoc('offset=2292 line=67 span=137 id="beginner-to-javascript.ss"')&&c4((dl.Kernel.setLastLoc('offset=2315 line=67 span=31 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dH)),(dl.Kernel.setLastLoc('offset=2396 line=68 span=32 id="beginner-to-javascript.ss"')&&dl.Kernel.second(dH))));dJ=(dl.Kernel.setLastLoc('offset=2462 line=69 span=19 id="beginner-to-javascript.ss"')&&cD(dK))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=6052 line=132 span=52 id="beginner-to-javascript.ss"')&&dG((dl.Kernel.setLastLoc('offset=6058 line=132 span=31 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dH)),(dl.types.String.makeInstance("")),(dl.types.String.makeInstance("")),dK))})())};var da=function(dF,bf,dG){return(dl.Kernel.setLastLoc('offset=6531 line=145 span=307 id="beginner-to-javascript.ss"')&&bW(dF,((function(){dl.Kernel.setLastLoc('offset=6568 line=147 span=90 id="beginner-to-javascript.ss"');var dH=(function(dL){var dJ=dL[0];var dK=dL[1];var dI=dL[2];return(dl.Kernel.setLastLoc('offset=6597 line=148 span=60 id="beginner-to-javascript.ss"')&&dy(dJ,dK,dI,bf,dG))});dH.toWrittenString=function(){return"<function:lambda>"};dH.toDisplayedString=dH.toWrittenString;return dH})()),((function(){dl.Kernel.setLastLoc('offset=6662 line=149 span=85 id="beginner-to-javascript.ss"');var dH=(function(dJ){var dK=dJ[0];var dI=dJ[1];return(dl.Kernel.setLastLoc('offset=6685 line=150 span=61 id="beginner-to-javascript.ss"')&&cm(dK,dI,bf,dG))});dH.toWrittenString=function(){return"<function:lambda>"};dH.toDisplayedString=dH.toWrittenString;return dH})()),((function(){dl.Kernel.setLastLoc('offset=6751 line=151 span=86 id="beginner-to-javascript.ss"');var dH=(function(dJ){var dK=dJ[0];var dI=dJ[1];return(dl.Kernel.setLastLoc('offset=6776 line=152 span=60 id="beginner-to-javascript.ss"')&&a3(dK,dI,bf,dG))});dH.toWrittenString=function(){return"<function:lambda>"};dH.toDisplayedString=dH.toWrittenString;return dH})())))};var dy=function(dF,dG,bf,dH,dI){return((function(){var dN;var dP;var dK;var dM;var dO;var dL;var dJ;(function(dQ){dN=(dl.Kernel.setLastLoc('offset=7177 line=162 span=48 id="beginner-to-javascript.ss"')&&h((dl.Kernel.setLastLoc('offset=7213 line=162 span=11 id="beginner-to-javascript.ss"')&&b2(dF))));dP=(dl.Kernel.setLastLoc('offset=7272 line=164 span=89 id="beginner-to-javascript.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=7277 line=164 span=61 id="beginner-to-javascript.ss"');var dR=(function(dS){var dT=dS[0];return(dl.Kernel.setLastLoc('offset=7290 line=164 span=47 id="beginner-to-javascript.ss"')&&h((dl.Kernel.setLastLoc('offset=7326 line=164 span=10 id="beginner-to-javascript.ss"')&&b2(dT))))});dR.toWrittenString=function(){return"<function:lambda>"};dR.toDisplayedString=dR.toWrittenString;return dR})()),[dG]));dK=(dl.Kernel.setLastLoc('offset=7402 line=167 span=127 id="beginner-to-javascript.ss"')&&ae(dH,(dl.Kernel.setLastLoc('offset=7427 line=167 span=11 id="beginner-to-javascript.ss"')&&b2(dF)),dl.types.Logic.FALSE,(dl.Kernel.setLastLoc('offset=7445 line=167 span=13 id="beginner-to-javascript.ss"')&&dl.Kernel.length(dG)),dl.types.Logic.FALSE,(dl.Kernel.setLastLoc('offset=7498 line=168 span=30 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(dN))));dM=(dl.Kernel.setLastLoc('offset=7583 line=170 span=476 id="beginner-to-javascript.ss"')&&dl.Kernel.foldl(((function(){dl.Kernel.setLastLoc('offset=7590 line=170 span=417 id="beginner-to-javascript.ss"');var dR=(function(dU){var dT=dU[0];var dS=dU[1];return(dl.Kernel.setLastLoc('offset=7633 line=171 span=373 id="beginner-to-javascript.ss"')&&bN(dS,(dl.Kernel.setLastLoc('offset=7649 line=171 span=356 id="beginner-to-javascript.ss"')&&aM((dl.Kernel.setLastLoc('offset=7672 line=171 span=14 id="beginner-to-javascript.ss"')&&b2(dT)),(dl.Kernel.setLastLoc('offset=7747 line=172 span=191 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=7824 line=173 span=113 id="beginner-to-javascript.ss"')&&h((dl.Kernel.setLastLoc('offset=7922 line=174 span=14 id="beginner-to-javascript.ss"')&&b2(dT)))))),dl.types.Empty.EMPTY))))});dR.toWrittenString=function(){return"<function:lambda>"};dR.toDisplayedString=dR.toWrittenString;return dR})()),dK,[dG]));dO=(dl.Kernel.setLastLoc('offset=8121 line=180 span=66 id="beginner-to-javascript.ss"')&&cO(bf,dM,dI));dL=(dl.Kernel.setLastLoc('offset=8219 line=181 span=25 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dO));dJ=(dl.Kernel.setLastLoc('offset=8278 line=182 span=26 id="beginner-to-javascript.ss"')&&dl.Kernel.second(dO))})(dl.Kernel.identity);return(function(){(dl.Kernel.setLastLoc('offset=8324 line=184 span=46 id="beginner-to-javascript.ss"')&&dp((dl.Kernel.setLastLoc('offset=8354 line=184 span=15 id="beginner-to-javascript.ss"')&&dl.Kernel.cons(dF,dG))));return(dl.Kernel.setLastLoc('offset=8377 line=185 span=413 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=8391 line=186 span=367 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("var ")),(dl.Kernel.setLastLoc('offset=8413 line=186 span=30 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(dN)),(dl.types.String.makeInstance(" = function(")),(dl.Kernel.setLastLoc('offset=8481 line=187 span=198 id="beginner-to-javascript.ss"')&&w((dl.Kernel.setLastLoc('offset=8494 line=187 span=144 id="beginner-to-javascript.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=8499 line=187 span=83 id="beginner-to-javascript.ss"');var dQ=(function(dR){var dS=dR[0];return(dl.Kernel.setLastLoc('offset=8558 line=188 span=23 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(dS))});dQ.toWrittenString=function(){return"<function:lambda>"};dQ.toDisplayedString=dQ.toWrittenString;return dQ})()),[dP])),(dl.types.String.makeInstance(", ")))),(dl.types.String.makeInstance(") { return ")),dL,(dl.types.String.makeInstance("; };"))])),(dl.types.String.makeInstance("")),dJ]))})()})())};var cm=function(dH,bf,dF,dG){return((function(){var dJ;var dK;var dI;(function(dL){dJ=(dl.Kernel.setLastLoc('offset=9105 line=201 span=47 id="beginner-to-javascript.ss"')&&h((dl.Kernel.setLastLoc('offset=9141 line=201 span=10 id="beginner-to-javascript.ss"')&&b2(dH))));dK=(dl.Kernel.setLastLoc('offset=9180 line=202 span=241 id="beginner-to-javascript.ss"')&&bN(dF,(dl.Kernel.setLastLoc('offset=9235 line=203 span=185 id="beginner-to-javascript.ss"')&&aM((dl.Kernel.setLastLoc('offset=9298 line=204 span=10 id="beginner-to-javascript.ss"')&&b2(dH)),(dl.Kernel.setLastLoc('offset=9348 line=205 span=26 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(dJ)),dl.types.Empty.EMPTY))));dI=(dl.Kernel.setLastLoc('offset=9447 line=207 span=52 id="beginner-to-javascript.ss"')&&cO(bf,dK,dG))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=9506 line=208 span=299 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=9512 line=208 span=104 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("var ")),(dl.Kernel.setLastLoc('offset=9559 line=209 span=26 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(dJ)),(dl.types.String.makeInstance("; "))])),(dl.Kernel.setLastLoc('offset=9638 line=212 span=141 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.Kernel.setLastLoc('offset=9653 line=212 span=26 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(dJ)),(dl.types.String.makeInstance(" = ")),(dl.Kernel.setLastLoc('offset=9736 line=214 span=13 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dI)),(dl.types.String.makeInstance(";"))])),(dl.Kernel.setLastLoc('offset=9790 line=216 span=14 id="beginner-to-javascript.ss"')&&dl.Kernel.second(dI))]))})())};var a3=function(dH,bf,dF,dG){return((function(){var dN=function(dP,dQ){return(dl.Kernel.setLastLoc('offset=10209 line=227 span=162 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash__greaterthan_symbol((dl.Kernel.setLastLoc('offset=10238 line=228 span=132 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.Kernel.setLastLoc('offset=10253 line=228 span=28 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(dP)),(dl.types.String.makeInstance("-")),(dl.Kernel.setLastLoc('offset=10342 line=230 span=27 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(dQ))]))))};var dK;var dI;var dM;var dO=function(dP){return(dl.Kernel.setLastLoc('offset=10930 line=244 span=84 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.Kernel.setLastLoc('offset=10945 line=244 span=27 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=10961 line=244 span=10 id="beginner-to-javascript.ss"')&&b2(dH)))),(dl.types.String.makeInstance("-")),(dl.Kernel.setLastLoc('offset=10989 line=246 span=24 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(dP))]))};var dL=function(dP){return(dl.Kernel.setLastLoc('offset=11126 line=250 span=143 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=11155 line=251 span=113 id="beginner-to-javascript.ss"')&&h((dl.Kernel.setLastLoc('offset=11205 line=252 span=62 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash__greaterthan_symbol((dl.Kernel.setLastLoc('offset=11229 line=253 span=37 id="beginner-to-javascript.ss"')&&dO(dP))))))))};var dJ=function(dP){return(dl.Kernel.setLastLoc('offset=11389 line=257 span=65 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("set_dash_")),(dl.Kernel.setLastLoc('offset=11416 line=257 span=28 id="beginner-to-javascript.ss"')&&dL(dP)),(dl.types.String.makeInstance("_bang_"))]))};(function(dP){dK=(dl.Kernel.setLastLoc('offset=10421 line=233 span=41 id="beginner-to-javascript.ss"')&&cG(dG,(dl.types.Symbol.makeInstance("fresh-struct-name"))));dI=(dl.Kernel.setLastLoc('offset=10496 line=234 span=22 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dK));dM=(dl.Kernel.setLastLoc('offset=10613 line=238 span=208 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=10629 line=238 span=191 id="beginner-to-javascript.ss"')&&h((dl.Kernel.setLastLoc('offset=10695 line=239 span=124 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash__greaterthan_symbol((dl.Kernel.setLastLoc('offset=10711 line=239 span=107 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.Kernel.setLastLoc('offset=10726 line=239 span=27 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=10742 line=239 span=10 id="beginner-to-javascript.ss"')&&b2(dH)))),(dl.types.String.makeInstance("?"))]))))))))})(dl.Kernel.identity);return(function(){(dl.Kernel.setLastLoc('offset=11474 line=259 span=37 id="beginner-to-javascript.ss"')&&dp(bf));return(dl.Kernel.setLastLoc('offset=11518 line=260 span=5598 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=11524 line=260 span=5499 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.Kernel.setLastLoc('offset=11602 line=263 span=2137 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("var ")),(dl.Kernel.setLastLoc('offset=11623 line=263 span=64 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=11639 line=263 span=47 id="beginner-to-javascript.ss"')&&h((dl.Kernel.setLastLoc('offset=11675 line=263 span=10 id="beginner-to-javascript.ss"')&&b2(dH)))))),(dl.types.String.makeInstance(" = function (")),(dl.Kernel.setLastLoc('offset=11760 line=265 span=314 id="beginner-to-javascript.ss"')&&w((dl.Kernel.setLastLoc('offset=11773 line=265 span=255 id="beginner-to-javascript.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=11778 line=265 span=196 id="beginner-to-javascript.ss"');var dP=(function(dR){var dQ=dR[0];return(dl.Kernel.setLastLoc('offset=11790 line=265 span=183 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=11865 line=266 span=107 id="beginner-to-javascript.ss"')&&h((dl.Kernel.setLastLoc('offset=11962 line=267 span=9 id="beginner-to-javascript.ss"')&&b2(dQ))))))});dP.toWrittenString=function(){return"<function:lambda>"};dP.toDisplayedString=dP.toWrittenString;return dP})()),[bf])),(dl.types.String.makeInstance(",")))),(dl.types.String.makeInstance(") { ")),(dl.Kernel.setLastLoc('offset=12138 line=271 span=520 id="beginner-to-javascript.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("plt.Kernel.Struct.call(this, ~s, [~a]);")),[(dl.Kernel.setLastLoc('offset=12224 line=272 span=51 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("make-")),(dl.Kernel.setLastLoc('offset=12247 line=272 span=27 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=12263 line=272 span=10 id="beginner-to-javascript.ss"')&&b2(dH))))])),(dl.Kernel.setLastLoc('offset=12312 line=273 span=345 id="beginner-to-javascript.ss"')&&w((dl.Kernel.setLastLoc('offset=12325 line=273 span=278 id="beginner-to-javascript.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=12330 line=273 span=211 id="beginner-to-javascript.ss"');var dP=(function(dR){var dQ=dR[0];return(dl.Kernel.setLastLoc('offset=12342 line=273 span=198 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=12425 line=274 span=114 id="beginner-to-javascript.ss"')&&h((dl.Kernel.setLastLoc('offset=12529 line=275 span=9 id="beginner-to-javascript.ss"')&&b2(dQ))))))});dP.toWrittenString=function(){return"<function:lambda>"};dP.toDisplayedString=dP.toWrittenString;return dP})()),[bf])),(dl.types.String.makeInstance(","))))])),(dl.Kernel.setLastLoc('offset=12687 line=278 span=736 id="beginner-to-javascript.ss"')&&w((dl.Kernel.setLastLoc('offset=12700 line=278 span=675 id="beginner-to-javascript.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=12705 line=278 span=616 id="beginner-to-javascript.ss"');var dP=(function(dR){var dQ=dR[0];return(dl.Kernel.setLastLoc('offset=12717 line=278 span=603 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("this.")),(dl.Kernel.setLastLoc('offset=12813 line=279 span=138 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=12904 line=280 span=46 id="beginner-to-javascript.ss"')&&h((dl.Kernel.setLastLoc('offset=12940 line=280 span=9 id="beginner-to-javascript.ss"')&&b2(dQ)))))),(dl.types.String.makeInstance(" = ")),(dl.Kernel.setLastLoc('offset=13104 line=282 span=138 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=13195 line=283 span=46 id="beginner-to-javascript.ss"')&&h((dl.Kernel.setLastLoc('offset=13231 line=283 span=9 id="beginner-to-javascript.ss"')&&b2(dQ)))))),(dl.types.String.makeInstance(";"))]))});dP.toWrittenString=function(){return"<function:lambda>"};dP.toDisplayedString=dP.toWrittenString;return dP})()),[bf])),(dl.types.String.makeInstance("\n")))),(dl.types.String.makeInstance(" };\n")),(dl.Kernel.setLastLoc('offset=13546 line=290 span=64 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=13562 line=290 span=47 id="beginner-to-javascript.ss"')&&h((dl.Kernel.setLastLoc('offset=13598 line=290 span=10 id="beginner-to-javascript.ss"')&&b2(dH)))))),(dl.types.String.makeInstance(".prototype = new plt.Kernel.Struct();\n"))])),(dl.types.String.makeInstance("\n")),(dl.Kernel.setLastLoc('offset=13804 line=299 span=1022 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("var ")),((function(){var dP;(function(dQ){dP=(dl.Kernel.setLastLoc('offset=13850 line=299 span=129 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash__greaterthan_symbol((dl.Kernel.setLastLoc('offset=13927 line=300 span=51 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("make-")),(dl.Kernel.setLastLoc('offset=13950 line=300 span=27 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=13966 line=300 span=10 id="beginner-to-javascript.ss"')&&b2(dH))))]))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=14019 line=301 span=61 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=14035 line=301 span=44 id="beginner-to-javascript.ss"')&&h(dP))))})()),(dl.types.String.makeInstance(" = function ")),(dl.types.String.makeInstance("(")),(dl.Kernel.setLastLoc('offset=14157 line=303 span=220 id="beginner-to-javascript.ss"')&&w((dl.Kernel.setLastLoc('offset=14170 line=303 span=157 id="beginner-to-javascript.ss"')&&dl.Kernel.build_dash_list((dl.Kernel.setLastLoc('offset=14182 line=303 span=15 id="beginner-to-javascript.ss"')&&dl.Kernel.length(bf)),((function(){dl.Kernel.setLastLoc('offset=14198 line=303 span=128 id="beginner-to-javascript.ss"');var dP=(function(dQ){var dR=dQ[0];return(dl.Kernel.setLastLoc('offset=14286 line=304 span=39 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("id")),(dl.Kernel.setLastLoc('offset=14306 line=304 span=18 id="beginner-to-javascript.ss"')&&dl.Kernel.number_dash__greaterthan_string(dR))]))});dP.toWrittenString=function(){return"<function:lambda>"};dP.toDisplayedString=dP.toWrittenString;return dP})()))),(dl.types.String.makeInstance(",")))),(dl.types.String.makeInstance(") { return new ")),(dl.Kernel.setLastLoc('offset=14452 line=307 span=64 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=14468 line=307 span=47 id="beginner-to-javascript.ss"')&&h((dl.Kernel.setLastLoc('offset=14504 line=307 span=10 id="beginner-to-javascript.ss"')&&b2(dH)))))),(dl.types.String.makeInstance("(")),(dl.Kernel.setLastLoc('offset=14577 line=309 span=212 id="beginner-to-javascript.ss"')&&w((dl.Kernel.setLastLoc('offset=14590 line=309 span=153 id="beginner-to-javascript.ss"')&&dl.Kernel.build_dash_list((dl.Kernel.setLastLoc('offset=14602 line=309 span=15 id="beginner-to-javascript.ss"')&&dl.Kernel.length(bf)),((function(){dl.Kernel.setLastLoc('offset=14618 line=309 span=124 id="beginner-to-javascript.ss"');var dP=(function(dQ){var dR=dQ[0];return(dl.Kernel.setLastLoc('offset=14702 line=310 span=39 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("id")),(dl.Kernel.setLastLoc('offset=14722 line=310 span=18 id="beginner-to-javascript.ss"')&&dl.Kernel.number_dash__greaterthan_string(dR))]))});dP.toWrittenString=function(){return"<function:lambda>"};dP.toDisplayedString=dP.toWrittenString;return dP})()))),(dl.types.String.makeInstance(",")))),(dl.types.String.makeInstance("); };"))])),(dl.types.String.makeInstance("\n")),(dl.Kernel.setLastLoc('offset=14912 line=317 span=816 id="beginner-to-javascript.ss"')&&w((dl.Kernel.setLastLoc('offset=14940 line=318 span=768 id="beginner-to-javascript.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=14945 line=318 span=736 id="beginner-to-javascript.ss"');var dP=(function(dQ){var dR=dQ[0];return(dl.Kernel.setLastLoc('offset=14984 line=319 span=696 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("var ")),(dl.Kernel.setLastLoc('offset=15006 line=319 span=36 id="beginner-to-javascript.ss"')&&dL((dl.Kernel.setLastLoc('offset=15026 line=319 span=15 id="beginner-to-javascript.ss"')&&b2(dR)))),(dl.types.String.makeInstance(" = function(obj) {\n")),(dl.types.String.makeInstance(" if (")),dM,(dl.types.String.makeInstance(" (obj)) {\n")),(dl.types.String.makeInstance(" return obj.")),(dl.Kernel.setLastLoc('offset=15200 line=321 span=69 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=15216 line=321 span=52 id="beginner-to-javascript.ss"')&&h((dl.Kernel.setLastLoc('offset=15252 line=321 span=15 id="beginner-to-javascript.ss"')&&b2(dR)))))),(dl.types.String.makeInstance(";\n")),(dl.types.String.makeInstance(" } else {\n")),(dl.types.String.makeInstance(" throw new plt.Kernel.MobyRuntimeError(")),(dl.types.String.makeInstance(" plt.Kernel.format('")),(dl.Kernel.setLastLoc('offset=15485 line=324 span=45 id="beginner-to-javascript.ss"')&&dO((dl.Kernel.setLastLoc('offset=15514 line=324 span=15 id="beginner-to-javascript.ss"')&&b2(dR)))),(dl.types.String.makeInstance(": not a ")),(dl.Kernel.setLastLoc('offset=15542 line=324 span=27 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=15558 line=324 span=10 id="beginner-to-javascript.ss"')&&b2(dH)))),(dl.types.String.makeInstance(": ~s', [obj]));\n")),(dl.types.String.makeInstance(" }\n")),(dl.types.String.makeInstance("};\n"))]))});dP.toWrittenString=function(){return"<function:lambda>"};dP.toDisplayedString=dP.toWrittenString;return dP})()),[bf])),(dl.types.String.makeInstance("\n")))),(dl.types.String.makeInstance("\n")),(dl.Kernel.setLastLoc('offset=15813 line=333 span=805 id="beginner-to-javascript.ss"')&&w((dl.Kernel.setLastLoc('offset=15841 line=334 span=757 id="beginner-to-javascript.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=15846 line=334 span=725 id="beginner-to-javascript.ss"');var dP=(function(dQ){var dR=dQ[0];return(dl.Kernel.setLastLoc('offset=15885 line=335 span=685 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("var ")),(dl.Kernel.setLastLoc('offset=15907 line=335 span=35 id="beginner-to-javascript.ss"')&&dJ((dl.Kernel.setLastLoc('offset=15926 line=335 span=15 id="beginner-to-javascript.ss"')&&b2(dR)))),(dl.types.String.makeInstance(" = function(obj,newVal) {\n")),(dl.types.String.makeInstance(" if (")),dM,(dl.types.String.makeInstance(" (obj)) {\n")),(dl.types.String.makeInstance(" obj.")),(dl.Kernel.setLastLoc('offset=16091 line=337 span=69 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=16107 line=337 span=52 id="beginner-to-javascript.ss"')&&h((dl.Kernel.setLastLoc('offset=16143 line=337 span=15 id="beginner-to-javascript.ss"')&&b2(dR)))))),(dl.types.String.makeInstance(" = newVal;\n")),(dl.types.String.makeInstance(" } else {\n")),(dl.types.String.makeInstance(" throw new plt.Kernel.MobyRuntimeError(")),(dl.types.String.makeInstance(" plt.Kernel.format('")),(dl.Kernel.setLastLoc('offset=16385 line=340 span=35 id="beginner-to-javascript.ss"')&&dJ((dl.Kernel.setLastLoc('offset=16404 line=340 span=15 id="beginner-to-javascript.ss"')&&b2(dR)))),(dl.types.String.makeInstance(": not a ")),(dl.Kernel.setLastLoc('offset=16432 line=340 span=27 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=16448 line=340 span=10 id="beginner-to-javascript.ss"')&&b2(dH)))),(dl.types.String.makeInstance(": ~s', [obj]));\n")),(dl.types.String.makeInstance(" }\n")),(dl.types.String.makeInstance("};\n"))]))});dP.toWrittenString=function(){return"<function:lambda>"};dP.toDisplayedString=dP.toWrittenString;return dP})()),[bf])),(dl.types.String.makeInstance("\n")))),(dl.types.String.makeInstance("\n")),(dl.Kernel.setLastLoc('offset=16714 line=349 span=308 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("var ")),dM,(dl.types.String.makeInstance(" = function(obj) { \n return obj != null && obj != undefined && obj instanceof ")),(dl.Kernel.setLastLoc('offset=16873 line=351 span=111 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=16889 line=351 span=94 id="beginner-to-javascript.ss"')&&h((dl.Kernel.setLastLoc('offset=16972 line=352 span=10 id="beginner-to-javascript.ss"')&&b2(dH)))))),(dl.types.String.makeInstance("; };\n"))]))])),(dl.types.String.makeInstance("")),dI]))})()})())};var cO=function(dG,bf,dF){return((dl.Kernel.setLastLoc('offset=17501 line=368 span=30 id="beginner-to-javascript.ss"')&&X(dG,(dl.types.Symbol.makeInstance("local"))))?((function(){var dI;var dH;(function(dJ){dI=(dl.Kernel.setLastLoc('offset=17559 line=369 span=29 id="beginner-to-javascript.ss"')&&b2((dl.Kernel.setLastLoc('offset=17566 line=369 span=21 id="beginner-to-javascript.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=17574 line=369 span=12 id="beginner-to-javascript.ss"')&&b2(dG))))));dH=(dl.Kernel.setLastLoc('offset=17616 line=370 span=20 id="beginner-to-javascript.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=17623 line=370 span=12 id="beginner-to-javascript.ss"')&&b2(dG))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=17646 line=371 span=60 id="beginner-to-javascript.ss"')&&a0(dI,dH,bf,dF))})()):((dl.Kernel.setLastLoc('offset=17738 line=374 span=30 id="beginner-to-javascript.ss"')&&X(dG,(dl.types.Symbol.makeInstance("begin"))))?((function(){var dH;(function(dI){dH=(dl.Kernel.setLastLoc('offset=17796 line=375 span=19 id="beginner-to-javascript.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=17802 line=375 span=12 id="beginner-to-javascript.ss"')&&b2(dG))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=17825 line=376 span=58 id="beginner-to-javascript.ss"')&&ai(dG,dH,bf,dF))})()):((dl.Kernel.setLastLoc('offset=17987 line=380 span=29 id="beginner-to-javascript.ss"')&&X(dG,(dl.types.Symbol.makeInstance("set!"))))?((function(){var dI;var dH;(function(dJ){dI=(dl.Kernel.setLastLoc('offset=18041 line=381 span=21 id="beginner-to-javascript.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=18049 line=381 span=12 id="beginner-to-javascript.ss"')&&b2(dG))));dH=(dl.Kernel.setLastLoc('offset=18091 line=382 span=20 id="beginner-to-javascript.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=18098 line=382 span=12 id="beginner-to-javascript.ss"')&&b2(dG))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=18121 line=383 span=57 id="beginner-to-javascript.ss"')&&dw(dI,dH,bf,dF))})()):((dl.Kernel.setLastLoc('offset=18236 line=387 span=27 id="beginner-to-javascript.ss"')&&X(dG,(dl.types.Symbol.makeInstance("if"))))?((function(){var dJ;var dI;var dH;(function(dK){dJ=(dl.Kernel.setLastLoc('offset=18290 line=388 span=21 id="beginner-to-javascript.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=18298 line=388 span=12 id="beginner-to-javascript.ss"')&&b2(dG))));dI=(dl.Kernel.setLastLoc('offset=18345 line=389 span=20 id="beginner-to-javascript.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=18352 line=389 span=12 id="beginner-to-javascript.ss"')&&b2(dG))));dH=(dl.Kernel.setLastLoc('offset=18400 line=390 span=21 id="beginner-to-javascript.ss"')&&dl.Kernel.fourth((dl.Kernel.setLastLoc('offset=18408 line=390 span=12 id="beginner-to-javascript.ss"')&&b2(dG))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=18431 line=391 span=74 id="beginner-to-javascript.ss"')&&cx(dJ,dI,dH,bf,dF))})()):((dl.Kernel.setLastLoc('offset=18546 line=395 span=28 id="beginner-to-javascript.ss"')&&X(dG,(dl.types.Symbol.makeInstance("and"))))?((function(){var dH;(function(dI){dH=(dl.Kernel.setLastLoc('offset=18602 line=396 span=19 id="beginner-to-javascript.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=18608 line=396 span=12 id="beginner-to-javascript.ss"')&&b2(dG))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=18631 line=397 span=57 id="beginner-to-javascript.ss"')&&cB((dl.types.String.makeInstance("&&")),dH,bf,dF))})()):((dl.Kernel.setLastLoc('offset=18723 line=400 span=27 id="beginner-to-javascript.ss"')&&X(dG,(dl.types.Symbol.makeInstance("or"))))?((function(){var dH;(function(dI){dH=(dl.Kernel.setLastLoc('offset=18778 line=401 span=19 id="beginner-to-javascript.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=18784 line=401 span=12 id="beginner-to-javascript.ss"')&&b2(dG))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=18807 line=402 span=57 id="beginner-to-javascript.ss"')&&cB((dl.types.String.makeInstance("||")),dH,bf,dF))})()):((dl.Kernel.setLastLoc('offset=18909 line=405 span=31 id="beginner-to-javascript.ss"')&&X(dG,(dl.types.Symbol.makeInstance("lambda"))))?((function(){var dI;var dH;(function(dJ){dI=(dl.Kernel.setLastLoc('offset=18967 line=406 span=29 id="beginner-to-javascript.ss"')&&b2((dl.Kernel.setLastLoc('offset=18974 line=406 span=21 id="beginner-to-javascript.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=18982 line=406 span=12 id="beginner-to-javascript.ss"')&&b2(dG))))));dH=(dl.Kernel.setLastLoc('offset=19024 line=407 span=20 id="beginner-to-javascript.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=19031 line=407 span=12 id="beginner-to-javascript.ss"')&&b2(dG))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=19054 line=408 span=65 id="beginner-to-javascript.ss"')&&p(dG,dI,dH,bf,dF))})()):((dl.Kernel.setLastLoc('offset=19147 line=411 span=22 id="beginner-to-javascript.ss"')&&dl.Kernel.number_question_((dl.Kernel.setLastLoc('offset=19156 line=411 span=12 id="beginner-to-javascript.ss"')&&b2(dG))))?(dl.Kernel.setLastLoc('offset=19175 line=412 span=72 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=19187 line=413 span=45 id="beginner-to-javascript.ss"')&&b4((dl.Kernel.setLastLoc('offset=19214 line=413 span=12 id="beginner-to-javascript.ss"')&&b2(dG)),dG)),dF])):((dl.Kernel.setLastLoc('offset=19274 line=417 span=22 id="beginner-to-javascript.ss"')&&dl.Kernel.string_question_((dl.Kernel.setLastLoc('offset=19283 line=417 span=12 id="beginner-to-javascript.ss"')&&b2(dG))))?(dl.Kernel.setLastLoc('offset=19302 line=418 span=66 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=19308 line=418 span=40 id="beginner-to-javascript.ss"')&&bU((dl.Kernel.setLastLoc('offset=19335 line=418 span=12 id="beginner-to-javascript.ss"')&&b2(dG)))),dF])):((dl.Kernel.setLastLoc('offset=19404 line=422 span=23 id="beginner-to-javascript.ss"')&&dl.Kernel.boolean_question_((dl.Kernel.setLastLoc('offset=19414 line=422 span=12 id="beginner-to-javascript.ss"')&&b2(dG))))?(dl.Kernel.setLastLoc('offset=19433 line=423 span=289 id="beginner-to-javascript.ss"')&&cO(((dl.Kernel.setLastLoc('offset=19468 line=423 span=12 id="beginner-to-javascript.ss"')&&b2(dG))?(dl.Kernel.setLastLoc('offset=19522 line=424 span=36 id="beginner-to-javascript.ss"')&&bY((dl.types.Symbol.makeInstance("true")),(dl.Kernel.setLastLoc('offset=19543 line=424 span=14 id="beginner-to-javascript.ss"')&&t(dG)))):(dl.Kernel.setLastLoc('offset=19599 line=425 span=37 id="beginner-to-javascript.ss"')&&bY((dl.types.Symbol.makeInstance("false")),(dl.Kernel.setLastLoc('offset=19621 line=425 span=14 id="beginner-to-javascript.ss"')&&t(dG))))),bf,dF)):((dl.Kernel.setLastLoc('offset=19747 line=429 span=20 id="beginner-to-javascript.ss"')&&dl.Kernel.char_question_((dl.Kernel.setLastLoc('offset=19754 line=429 span=12 id="beginner-to-javascript.ss"')&&b2(dG))))?(dl.Kernel.setLastLoc('offset=19773 line=430 span=64 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=19779 line=430 span=38 id="beginner-to-javascript.ss"')&&a6((dl.Kernel.setLastLoc('offset=19804 line=430 span=12 id="beginner-to-javascript.ss"')&&b2(dG)))),dF])):((dl.Kernel.setLastLoc('offset=19868 line=434 span=22 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_question_((dl.Kernel.setLastLoc('offset=19877 line=434 span=12 id="beginner-to-javascript.ss"')&&b2(dG))))?(dl.Kernel.setLastLoc('offset=19896 line=435 span=78 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=19908 line=436 span=51 id="beginner-to-javascript.ss"')&&df(dG,bf)),dF])):((dl.Kernel.setLastLoc('offset=20007 line=440 span=30 id="beginner-to-javascript.ss"')&&X(dG,(dl.types.Symbol.makeInstance("quote"))))?(dl.Kernel.setLastLoc('offset=20043 line=441 span=85 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=20049 line=441 span=59 id="beginner-to-javascript.ss"')&&bI((dl.Kernel.setLastLoc('offset=20086 line=441 span=21 id="beginner-to-javascript.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=20094 line=441 span=12 id="beginner-to-javascript.ss"')&&b2(dG)))))),dF])):((dl.Kernel.setLastLoc('offset=20186 line=445 span=20 id="beginner-to-javascript.ss"')&&dl.Kernel.pair_question_((dl.Kernel.setLastLoc('offset=20193 line=445 span=12 id="beginner-to-javascript.ss"')&&b2(dG))))?((function(){var dH;var dI;(function(dJ){dH=(dl.Kernel.setLastLoc('offset=20237 line=446 span=20 id="beginner-to-javascript.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=20244 line=446 span=12 id="beginner-to-javascript.ss"')&&b2(dG))));dI=(dl.Kernel.setLastLoc('offset=20289 line=447 span=19 id="beginner-to-javascript.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=20295 line=447 span=12 id="beginner-to-javascript.ss"')&&b2(dG))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=20318 line=448 span=78 id="beginner-to-javascript.ss"')&&dd(dG,dH,dI,bf,dF))})()):(dl.Kernel.setLastLoc('offset=17451 line=366 span=2948 id="beginner-to-javascript.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=17451 line=366 span=2948 id=\\"beginner-to-javascript.ss\\""'))))))))))))))))))};var cF=function(dF,bf,dG){return((function(){var dH;(function(dI){dH=(dl.Kernel.setLastLoc('offset=20730 line=457 span=390 id="beginner-to-javascript.ss"')&&dl.Kernel.foldl(((function(){dl.Kernel.setLastLoc('offset=20737 line=457 span=311 id="beginner-to-javascript.ss"');var dJ=(function(dK){var dM=dK[0];var dL=dK[1];return((function(){var dN;(function(dO){dN=(dl.Kernel.setLastLoc('offset=20835 line=459 span=51 id="beginner-to-javascript.ss"')&&cO(dM,bf,(dl.Kernel.setLastLoc('offset=20872 line=459 span=13 id="beginner-to-javascript.ss"')&&dl.Kernel.second(dL))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=20912 line=460 span=134 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=20918 line=460 span=76 id="beginner-to-javascript.ss"')&&dl.Kernel.cons((dl.Kernel.setLastLoc('offset=20924 line=460 span=20 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dN)),(dl.Kernel.setLastLoc('offset=20981 line=461 span=12 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dL)))),(dl.Kernel.setLastLoc('offset=21024 line=462 span=21 id="beginner-to-javascript.ss"')&&dl.Kernel.second(dN))]))})())});dJ.toWrittenString=function(){return"<function:lambda>"};dJ.toDisplayedString=dJ.toWrittenString;return dJ})()),(dl.Kernel.setLastLoc('offset=21068 line=463 span=20 id="beginner-to-javascript.ss"')&&dl.Kernel.list([dl.types.Empty.EMPTY,dG])),[dF]))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=21127 line=465 span=79 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=21133 line=465 span=35 id="beginner-to-javascript.ss"')&&dl.Kernel.reverse((dl.Kernel.setLastLoc('offset=21142 line=465 span=25 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dH)))),(dl.Kernel.setLastLoc('offset=21179 line=466 span=26 id="beginner-to-javascript.ss"')&&dl.Kernel.second(dH))]))})())};var dw=function(dG,dF,bf,dH){return((dl.Kernel.setLastLoc('offset=21389 line=472 span=30 id="beginner-to-javascript.ss"')&&dl.Kernel.not((dl.Kernel.setLastLoc('offset=21394 line=472 span=24 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_question_((dl.Kernel.setLastLoc('offset=21403 line=472 span=14 id="beginner-to-javascript.ss"')&&b2(dG))))))?(dl.Kernel.setLastLoc('offset=21426 line=473 span=85 id="beginner-to-javascript.ss"')&&dl.Kernel.syntax_dash_error((dl.types.String.makeInstance("expected an identifier in the first argument of 'set!', got: ")),dG)):(dl.types.Logic.TRUE?((function(){var dJ;var dK;var dI;(function(dL){dJ=(dl.Kernel.setLastLoc('offset=21564 line=476 span=167 id="beginner-to-javascript.ss"')&&cF((dl.Kernel.setLastLoc('offset=21597 line=476 span=24 id="beginner-to-javascript.ss"')&&dl.Kernel.list([dG,dF])),bf,dH));dK=(dl.Kernel.setLastLoc('offset=21781 line=480 span=20 id="beginner-to-javascript.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=21788 line=480 span=12 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dJ))));dI=(dl.Kernel.setLastLoc('offset=21838 line=481 span=21 id="beginner-to-javascript.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=21846 line=481 span=12 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dJ))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=21869 line=482 span=220 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=21875 line=482 span=186 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("(function(){ \n")),dK,(dl.types.String.makeInstance(" = ")),dI,(dl.types.String.makeInstance(";})()"))])),(dl.Kernel.setLastLoc('offset=22075 line=487 span=13 id="beginner-to-javascript.ss"')&&dl.Kernel.second(dJ))]))})()):(dl.Kernel.setLastLoc('offset=21378 line=471 span=714 id="beginner-to-javascript.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=21378 line=471 span=714 id=\\"beginner-to-javascript.ss\\""'))))))};var ai=function(dG,dH,bf,dF){return((dl.Kernel.setLastLoc('offset=22282 line=493 span=14 id="beginner-to-javascript.ss"')&&dl.Kernel.empty_question_(dH))?(dl.Kernel.setLastLoc('offset=22302 line=494 span=118 id="beginner-to-javascript.ss"')&&dl.Kernel.syntax_dash_error((dl.types.String.makeInstance("expected a sequence of expressions after `begin', but nothing's there")),dG)):(dl.types.Logic.TRUE?((function(){var dJ=function(dL){return(dl.Kernel.setLastLoc('offset=22644 line=500 span=79 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=22650 line=500 span=29 id="beginner-to-javascript.ss"')&&dl.Kernel.reverse((dl.Kernel.setLastLoc('offset=22659 line=500 span=19 id="beginner-to-javascript.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=22665 line=500 span=12 id="beginner-to-javascript.ss"')&&dl.Kernel.reverse(dL)))))),(dl.Kernel.setLastLoc('offset=22702 line=501 span=20 id="beginner-to-javascript.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=22709 line=501 span=12 id="beginner-to-javascript.ss"')&&dl.Kernel.reverse(dL))))]))};var dK;var dI;(function(dL){dK=(dl.Kernel.setLastLoc('offset=22789 line=504 span=51 id="beginner-to-javascript.ss"')&&cF(dH,bf,dF));dI=(dl.Kernel.setLastLoc('offset=22908 line=507 span=42 id="beginner-to-javascript.ss"')&&dJ((dl.Kernel.setLastLoc('offset=22928 line=507 span=21 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dK))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=22960 line=508 span=309 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=22966 line=508 span=266 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("(function(){")),(dl.Kernel.setLastLoc('offset=23024 line=509 span=43 id="beginner-to-javascript.ss"')&&w((dl.Kernel.setLastLoc('offset=23037 line=509 span=23 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dI)),(dl.types.String.makeInstance(";\n")))),(dl.types.String.makeInstance(";\n")),(dl.types.String.makeInstance("return ")),(dl.Kernel.setLastLoc('offset=23168 line=512 span=24 id="beginner-to-javascript.ss"')&&dl.Kernel.second(dI)),(dl.types.String.makeInstance(";")),(dl.types.String.makeInstance("})()"))])),(dl.Kernel.setLastLoc('offset=23246 line=514 span=22 id="beginner-to-javascript.ss"')&&dl.Kernel.second(dK))]))})()):(dl.Kernel.setLastLoc('offset=22271 line=492 span=1001 id="beginner-to-javascript.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=22271 line=492 span=1001 id=\\"beginner-to-javascript.ss\\""'))))))};var cx=function(dI,dG,bf,dF,dH){return((function(){var dM;var dL;var dK;var dJ;(function(dN){dM=(dl.Kernel.setLastLoc('offset=23483 line=521 span=171 id="beginner-to-javascript.ss"')&&cF((dl.Kernel.setLastLoc('offset=23516 line=521 span=34 id="beginner-to-javascript.ss"')&&dl.Kernel.list([dI,dG,bf])),dF,dH));dL=(dl.Kernel.setLastLoc('offset=23677 line=524 span=20 id="beginner-to-javascript.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=23684 line=524 span=12 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dM))));dK=(dl.Kernel.setLastLoc('offset=23720 line=525 span=21 id="beginner-to-javascript.ss"')&&dl.Kernel.second((dl.Kernel.setLastLoc('offset=23728 line=525 span=12 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dM))));dJ=(dl.Kernel.setLastLoc('offset=23764 line=526 span=20 id="beginner-to-javascript.ss"')&&dl.Kernel.third((dl.Kernel.setLastLoc('offset=23771 line=526 span=12 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dM))))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=23791 line=527 span=79 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=23802 line=528 span=48 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("(")),dL,(dl.types.String.makeInstance(" ?\n ")),dK,(dl.types.String.makeInstance(" :\n ")),dJ,(dl.types.String.makeInstance(")"))])),(dl.Kernel.setLastLoc('offset=23856 line=529 span=13 id="beginner-to-javascript.ss"')&&dl.Kernel.second(dM))]))})())};var bI=function(bf){return((dl.Kernel.setLastLoc('offset=23994 line=535 span=21 id="beginner-to-javascript.ss"')&&dl.Kernel.empty_question_((dl.Kernel.setLastLoc('offset=24002 line=535 span=12 id="beginner-to-javascript.ss"')&&b2(bf))))?(dl.types.String.makeInstance("plt.types.Empty.EMPTY")):((dl.Kernel.setLastLoc('offset=24056 line=538 span=20 id="beginner-to-javascript.ss"')&&dl.Kernel.pair_question_((dl.Kernel.setLastLoc('offset=24063 line=538 span=12 id="beginner-to-javascript.ss"')&&b2(bf))))?(dl.Kernel.setLastLoc('offset=24082 line=539 span=198 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("(plt.Kernel.list([")),(dl.Kernel.setLastLoc('offset=24138 line=540 span=115 id="beginner-to-javascript.ss"')&&w((dl.Kernel.setLastLoc('offset=24173 line=541 span=54 id="beginner-to-javascript.ss"')&&dl.Kernel.map((function(){var dF=(function(dG){return bI(dG[0])});dF.toWrittenString=function(){return"<function:quote-expression->javascript-string>"};dF.toDisplayedString=function(){return"<function:quote-expression->javascript-string>"};return dF})(),[(dl.Kernel.setLastLoc('offset=24214 line=541 span=12 id="beginner-to-javascript.ss"')&&b2(bf))])),(dl.types.String.makeInstance(",")))),(dl.types.String.makeInstance("]))"))])):((dl.Kernel.setLastLoc('offset=24292 line=545 span=22 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_question_((dl.Kernel.setLastLoc('offset=24301 line=545 span=12 id="beginner-to-javascript.ss"')&&b2(bf))))?(dl.Kernel.setLastLoc('offset=24320 line=546 span=128 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance('(plt.types.Symbol.makeInstance("')),(dl.Kernel.setLastLoc('offset=24391 line=547 span=29 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=24407 line=547 span=12 id="beginner-to-javascript.ss"')&&b2(bf)))),(dl.types.String.makeInstance('"))'))])):((dl.Kernel.setLastLoc('offset=24475 line=551 span=22 id="beginner-to-javascript.ss"')&&dl.Kernel.number_question_((dl.Kernel.setLastLoc('offset=24484 line=551 span=12 id="beginner-to-javascript.ss"')&&b2(bf))))?(dl.Kernel.setLastLoc('offset=24503 line=552 span=45 id="beginner-to-javascript.ss"')&&b4((dl.Kernel.setLastLoc('offset=24530 line=552 span=12 id="beginner-to-javascript.ss"')&&b2(bf)),bf)):((dl.Kernel.setLastLoc('offset=24575 line=555 span=22 id="beginner-to-javascript.ss"')&&dl.Kernel.string_question_((dl.Kernel.setLastLoc('offset=24584 line=555 span=12 id="beginner-to-javascript.ss"')&&b2(bf))))?(dl.Kernel.setLastLoc('offset=24603 line=556 span=40 id="beginner-to-javascript.ss"')&&bU((dl.Kernel.setLastLoc('offset=24630 line=556 span=12 id="beginner-to-javascript.ss"')&&b2(bf)))):((dl.Kernel.setLastLoc('offset=24673 line=559 span=20 id="beginner-to-javascript.ss"')&&dl.Kernel.char_question_((dl.Kernel.setLastLoc('offset=24680 line=559 span=12 id="beginner-to-javascript.ss"')&&b2(bf))))?(dl.Kernel.setLastLoc('offset=24699 line=560 span=38 id="beginner-to-javascript.ss"')&&a6((dl.Kernel.setLastLoc('offset=24724 line=560 span=12 id="beginner-to-javascript.ss"')&&b2(bf)))):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=24759 line=563 span=78 id="beginner-to-javascript.ss"')&&dl.Kernel.syntax_dash_error((dl.types.String.makeInstance("Unknown quoted expression encountered")),bf)):(dl.Kernel.setLastLoc('offset=23983 line=534 span=856 id="beginner-to-javascript.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=23983 line=534 span=856 id=\\"beginner-to-javascript.ss\\""')))))))))))};var cB=function(bf,dH,dF,dG){return((function(){var dI;(function(dJ){dI=(dl.Kernel.setLastLoc('offset=25047 line=571 span=51 id="beginner-to-javascript.ss"')&&cF(dH,dF,dG))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=25105 line=572 span=106 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=25111 line=572 span=66 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("(")),(dl.Kernel.setLastLoc('offset=25130 line=572 span=42 id="beginner-to-javascript.ss"')&&w((dl.Kernel.setLastLoc('offset=25143 line=572 span=21 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dI)),bf)),(dl.types.String.makeInstance(")"))])),(dl.Kernel.setLastLoc('offset=25188 line=573 span=22 id="beginner-to-javascript.ss"')&&dl.Kernel.second(dI))]))})())};var a0=function(dF,bf,dG,dH){return((function(){var dL;var dK;var dJ;var dI;(function(dM){dL=(dl.Kernel.setLastLoc('offset=25432 line=580 span=115 id="beginner-to-javascript.ss"')&&dq(dF,(dl.Kernel.setLastLoc('offset=25516 line=581 span=30 id="beginner-to-javascript.ss"')&&cZ(dH,dG))));dK=(dl.Kernel.setLastLoc('offset=25603 line=583 span=184 id="beginner-to-javascript.ss"')&&cO(bf,(dl.Kernel.setLastLoc('offset=25666 line=585 span=59 id="beginner-to-javascript.ss"')&&cD((dl.Kernel.setLastLoc('offset=25677 line=585 span=47 id="beginner-to-javascript.ss"')&&cA(dL)))),(dl.Kernel.setLastLoc('offset=25739 line=586 span=47 id="beginner-to-javascript.ss"')&&cA(dL))));dJ=(dl.Kernel.setLastLoc('offset=25836 line=588 span=31 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dK));dI=(dl.Kernel.setLastLoc('offset=25901 line=589 span=32 id="beginner-to-javascript.ss"')&&dl.Kernel.second(dK))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=25940 line=590 span=508 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=25946 line=590 span=438 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("((function() { \n")),(dl.Kernel.setLastLoc('offset=26006 line=591 span=47 id="beginner-to-javascript.ss"')&&cn(dL)),(dl.types.String.makeInstance("\n")),(dl.Kernel.setLastLoc('offset=26196 line=594 span=56 id="beginner-to-javascript.ss"')&&aK(dL)),(dl.types.String.makeInstance("(plt.Kernel.identity)")),(dl.types.String.makeInstance("\n")),(dl.types.String.makeInstance("return ")),dJ,(dl.types.String.makeInstance(";\n })())"))])),(dl.Kernel.setLastLoc('offset=26395 line=598 span=52 id="beginner-to-javascript.ss"')&&cZ(dI,(dl.Kernel.setLastLoc('offset=26427 line=598 span=19 id="beginner-to-javascript.ss"')&&cD(dH))))]))})())};var dd=function(dI,bf,dF,dG,dH){return(((dl.Kernel.setLastLoc('offset=26764 line=607 span=26 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_question_((dl.Kernel.setLastLoc('offset=26773 line=607 span=16 id="beginner-to-javascript.ss"')&&b2(bf))))&&(dl.Kernel.setLastLoc('offset=26801 line=608 span=42 id="beginner-to-javascript.ss"')&&dl.Kernel.not((dl.Kernel.setLastLoc('offset=26806 line=608 span=36 id="beginner-to-javascript.ss"')&&j(dG,(dl.Kernel.setLastLoc('offset=26825 line=608 span=16 id="beginner-to-javascript.ss"')&&b2(bf)))))))?(dl.Kernel.setLastLoc('offset=26850 line=609 span=136 id="beginner-to-javascript.ss"')&&dl.Kernel.syntax_dash_error((dl.Kernel.setLastLoc('offset=26864 line=609 span=93 id="beginner-to-javascript.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("name ~s is not defined, not a parameter, and not a primitive name")),[(dl.Kernel.setLastLoc('offset=26940 line=609 span=16 id="beginner-to-javascript.ss"')&&b2(bf))])),bf)):((dl.Kernel.setLastLoc('offset=26998 line=612 span=26 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_question_((dl.Kernel.setLastLoc('offset=27007 line=612 span=16 id="beginner-to-javascript.ss"')&&b2(bf))))?((function(){var dM;var dL;var dK;var dJ;(function(dN){dM=(dl.Kernel.setLastLoc('offset=27063 line=613 span=33 id="beginner-to-javascript.ss"')&&ac(dG,(dl.Kernel.setLastLoc('offset=27079 line=613 span=16 id="beginner-to-javascript.ss"')&&b2(bf))));dL=(dl.Kernel.setLastLoc('offset=27156 line=615 span=54 id="beginner-to-javascript.ss"')&&cF(dF,dG,dH));dK=(dl.Kernel.setLastLoc('offset=27263 line=617 span=29 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dL));dJ=(dl.Kernel.setLastLoc('offset=27329 line=618 span=30 id="beginner-to-javascript.ss"')&&dl.Kernel.second(dL))})(dl.Kernel.identity);return((dl.Kernel.setLastLoc('offset=27395 line=621 span=36 id="beginner-to-javascript.ss"')&&cJ(dM))?(dl.Kernel.setLastLoc('offset=27442 line=622 span=369 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=27448 line=622 span=332 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("(")),(dl.Kernel.setLastLoc('offset=27467 line=622 span=73 id="beginner-to-javascript.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("plt.Kernel.setLastLoc(~s)")),[(dl.Kernel.setLastLoc('offset=27503 line=622 span=36 id="beginner-to-javascript.ss"')&&bH((dl.Kernel.setLastLoc('offset=27516 line=622 span=22 id="beginner-to-javascript.ss"')&&t(dI))))])),(dl.types.String.makeInstance(" && ")),(dl.Kernel.setLastLoc('offset=27611 line=624 span=47 id="beginner-to-javascript.ss"')&&aU(dM)),(dl.types.String.makeInstance(".apply(null, [[")),(dl.Kernel.setLastLoc('offset=27707 line=625 span=34 id="beginner-to-javascript.ss"')&&w(dK,(dl.types.String.makeInstance(", ")))),(dl.types.String.makeInstance("]]))"))])),dJ])):((dl.Kernel.setLastLoc('offset=27833 line=629 span=36 id="beginner-to-javascript.ss"')&&ci(dM))?((dl.Kernel.setLastLoc('offset=27899 line=631 span=83 id="beginner-to-javascript.ss"')&&dl.Kernel._lessthan_((dl.Kernel.setLastLoc('offset=27902 line=631 span=17 id="beginner-to-javascript.ss"')&&dl.Kernel.length(dF)),(dl.Kernel.setLastLoc('offset=27936 line=632 span=45 id="beginner-to-javascript.ss"')&&dA(dM)),[]))?(dl.Kernel.setLastLoc('offset=27996 line=633 span=325 id="beginner-to-javascript.ss"')&&dl.Kernel.syntax_dash_error((dl.Kernel.setLastLoc('offset=28010 line=633 span=270 id="beginner-to-javascript.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("Too few arguments passed to ~s. Expects at least ~a arguments, given ~a.")),[(dl.Kernel.setLastLoc('offset=28129 line=634 span=16 id="beginner-to-javascript.ss"')&&b2(bf)),(dl.Kernel.setLastLoc('offset=28181 line=635 span=45 id="beginner-to-javascript.ss"')&&dA(dM)),(dl.Kernel.setLastLoc('offset=28262 line=636 span=17 id="beginner-to-javascript.ss"')&&dl.Kernel.length(dF))])),dI)):((dl.Kernel.setLastLoc('offset=28336 line=638 span=46 id="beginner-to-javascript.ss"')&&bp(dM))?((dl.Kernel.setLastLoc('offset=28403 line=639 span=51 id="beginner-to-javascript.ss"')&&dl.Kernel._greaterthan_((dl.Kernel.setLastLoc('offset=28406 line=639 span=45 id="beginner-to-javascript.ss"')&&dA(dM)),(dl.types.Rational.makeInstance(0,1)),[]))?(dl.Kernel.setLastLoc('offset=28475 line=640 span=708 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=28503 line=641 span=644 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("(")),(dl.Kernel.setLastLoc('offset=28522 line=641 span=73 id="beginner-to-javascript.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("plt.Kernel.setLastLoc(~s)")),[(dl.Kernel.setLastLoc('offset=28558 line=641 span=36 id="beginner-to-javascript.ss"')&&bH((dl.Kernel.setLastLoc('offset=28571 line=641 span=22 id="beginner-to-javascript.ss"')&&t(dI))))])),(dl.types.String.makeInstance(" && ")),(dl.Kernel.setLastLoc('offset=28675 line=643 span=47 id="beginner-to-javascript.ss"')&&bv(dM)),(dl.types.String.makeInstance("(")),(dl.Kernel.setLastLoc('offset=28799 line=645 span=86 id="beginner-to-javascript.ss"')&&w((dl.Kernel.setLastLoc('offset=28812 line=645 span=68 id="beginner-to-javascript.ss"')&&cQ(dK,(dl.Kernel.setLastLoc('offset=28834 line=645 span=45 id="beginner-to-javascript.ss"')&&dA(dM)))),(dl.types.String.makeInstance(",")))),(dl.types.String.makeInstance(", [")),(dl.Kernel.setLastLoc('offset=28964 line=647 span=140 id="beginner-to-javascript.ss"')&&w((dl.Kernel.setLastLoc('offset=28977 line=647 span=73 id="beginner-to-javascript.ss"')&&bZ(dK,(dl.Kernel.setLastLoc('offset=29004 line=647 span=45 id="beginner-to-javascript.ss"')&&dA(dM)))),(dl.types.String.makeInstance(",")))),(dl.types.String.makeInstance("]))"))])),dJ])):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=29230 line=652 span=437 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=29257 line=653 span=374 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("(")),(dl.Kernel.setLastLoc('offset=29276 line=653 span=73 id="beginner-to-javascript.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("plt.Kernel.setLastLoc(~s)")),[(dl.Kernel.setLastLoc('offset=29312 line=653 span=36 id="beginner-to-javascript.ss"')&&bH((dl.Kernel.setLastLoc('offset=29325 line=653 span=22 id="beginner-to-javascript.ss"')&&t(dI))))])),(dl.types.String.makeInstance(" && ")),(dl.Kernel.setLastLoc('offset=29429 line=655 span=47 id="beginner-to-javascript.ss"')&&bv(dM)),(dl.types.String.makeInstance("([")),(dl.Kernel.setLastLoc('offset=29555 line=657 span=33 id="beginner-to-javascript.ss"')&&w(dK,(dl.types.String.makeInstance(",")))),(dl.types.String.makeInstance("]))"))])),dJ])):(dl.Kernel.setLastLoc('offset=28396 line=639 span=1273 id="beginner-to-javascript.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=28396 line=639 span=1273 id=\\"beginner-to-javascript.ss\\""')))))):(dl.types.Logic.TRUE?((dl.Kernel.setLastLoc('offset=29724 line=662 span=86 id="beginner-to-javascript.ss"')&&dl.Kernel._greaterthan_((dl.Kernel.setLastLoc('offset=29727 line=662 span=17 id="beginner-to-javascript.ss"')&&dl.Kernel.length(dF)),(dl.Kernel.setLastLoc('offset=29764 line=663 span=45 id="beginner-to-javascript.ss"')&&dA(dM)),[]))?(dl.Kernel.setLastLoc('offset=29827 line=664 span=337 id="beginner-to-javascript.ss"')&&dl.Kernel.syntax_dash_error((dl.Kernel.setLastLoc('offset=29841 line=664 span=279 id="beginner-to-javascript.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("Too many arguments passed to ~s. Expects at most ~a arguments, given ~a.")),[(dl.Kernel.setLastLoc('offset=29963 line=665 span=16 id="beginner-to-javascript.ss"')&&b2(bf)),(dl.Kernel.setLastLoc('offset=30018 line=666 span=45 id="beginner-to-javascript.ss"')&&dA(dM)),(dl.Kernel.setLastLoc('offset=30102 line=667 span=17 id="beginner-to-javascript.ss"')&&dl.Kernel.length(dF))])),dI)):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=30203 line=670 span=377 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=30227 line=671 span=321 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("(")),(dl.Kernel.setLastLoc('offset=30278 line=672 span=73 id="beginner-to-javascript.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("plt.Kernel.setLastLoc(~s)")),[(dl.Kernel.setLastLoc('offset=30314 line=672 span=36 id="beginner-to-javascript.ss"')&&bH((dl.Kernel.setLastLoc('offset=30327 line=672 span=22 id="beginner-to-javascript.ss"')&&t(dI))))])),(dl.types.String.makeInstance(" && ")),(dl.Kernel.setLastLoc('offset=30425 line=674 span=47 id="beginner-to-javascript.ss"')&&bv(dM)),(dl.types.String.makeInstance("(")),(dl.Kernel.setLastLoc('offset=30509 line=675 span=33 id="beginner-to-javascript.ss"')&&w(dK,(dl.types.String.makeInstance(",")))),(dl.types.String.makeInstance("))"))])),dJ])):(dl.Kernel.setLastLoc('offset=29702 line=661 span=880 id="beginner-to-javascript.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=29702 line=661 span=880 id=\\"beginner-to-javascript.ss\\""')))))):(dl.Kernel.setLastLoc('offset=27880 line=630 span=2704 id="beginner-to-javascript.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=27880 line=630 span=2704 id=\\"beginner-to-javascript.ss\\""'))))))):(dl.Kernel.setLastLoc('offset=27369 line=619 span=3217 id="beginner-to-javascript.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=27369 line=619 span=3217 id=\\"beginner-to-javascript.ss\\""'))))))})()):(dl.types.Logic.TRUE?((function(){var dL;var dM;var dK;var dJ;(function(dN){dL=(dl.Kernel.setLastLoc('offset=30692 line=681 span=166 id="beginner-to-javascript.ss"')&&cF((dl.Kernel.setLastLoc('offset=30725 line=681 span=24 id="beginner-to-javascript.ss"')&&dl.Kernel.cons(bf,dF)),dG,dH));dM=(dl.Kernel.setLastLoc('offset=30897 line=684 span=40 id="beginner-to-javascript.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=30904 line=684 span=32 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dL))));dK=(dl.Kernel.setLastLoc('offset=30976 line=685 span=39 id="beginner-to-javascript.ss"')&&dl.Kernel.rest((dl.Kernel.setLastLoc('offset=30982 line=685 span=32 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dL))));dJ=(dl.Kernel.setLastLoc('offset=31052 line=686 span=33 id="beginner-to-javascript.ss"')&&dl.Kernel.second(dL))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=31095 line=687 span=311 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=31109 line=688 span=274 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("(")),(dl.Kernel.setLastLoc('offset=31128 line=688 span=73 id="beginner-to-javascript.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("plt.Kernel.setLastLoc(~s)")),[(dl.Kernel.setLastLoc('offset=31164 line=688 span=36 id="beginner-to-javascript.ss"')&&bH((dl.Kernel.setLastLoc('offset=31177 line=688 span=22 id="beginner-to-javascript.ss"')&&t(dI))))])),(dl.types.String.makeInstance(" && ")),(dl.types.String.makeInstance("(")),dM,(dl.types.String.makeInstance(").apply(null, [[")),(dl.Kernel.setLastLoc('offset=31318 line=691 span=34 id="beginner-to-javascript.ss"')&&w(dK,(dl.types.String.makeInstance(", ")))),(dl.types.String.makeInstance("]]))"))])),dJ]))})()):(dl.Kernel.setLastLoc('offset=26699 line=605 span=4710 id="beginner-to-javascript.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=26699 line=605 span=4710 id=\\"beginner-to-javascript.ss\\""')))))))};var df=function(dF,bf){return((dl.Kernel.setLastLoc('offset=31641 line=702 span=42 id="beginner-to-javascript.ss"')&&dl.Kernel.not((dl.Kernel.setLastLoc('offset=31646 line=702 span=36 id="beginner-to-javascript.ss"')&&j(bf,(dl.Kernel.setLastLoc('offset=31668 line=702 span=13 id="beginner-to-javascript.ss"')&&b2(dF))))))?(dl.Kernel.setLastLoc('offset=31689 line=703 span=131 id="beginner-to-javascript.ss"')&&dl.Kernel.syntax_dash_error((dl.Kernel.setLastLoc('offset=31703 line=703 span=91 id="beginner-to-javascript.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("name ~s is not defined, not a parameter, and not a primitive name.")),[(dl.Kernel.setLastLoc('offset=31780 line=703 span=13 id="beginner-to-javascript.ss"')&&b2(dF))])),dF)):(dl.types.Logic.TRUE?((function(){var dG;(function(dH){dG=(dl.Kernel.setLastLoc('offset=31866 line=706 span=33 id="beginner-to-javascript.ss"')&&ac(bf,(dl.Kernel.setLastLoc('offset=31885 line=706 span=13 id="beginner-to-javascript.ss"')&&b2(dF))))})(dl.Kernel.identity);return((dl.Kernel.setLastLoc('offset=31925 line=708 span=27 id="beginner-to-javascript.ss"')&&cJ(dG))?(dl.Kernel.setLastLoc('offset=31963 line=709 span=38 id="beginner-to-javascript.ss"')&&aU(dG)):((dl.Kernel.setLastLoc('offset=32013 line=710 span=27 id="beginner-to-javascript.ss"')&&ci(dG))?((dl.Kernel.setLastLoc('offset=32070 line=712 span=37 id="beginner-to-javascript.ss"')&&bp(dG))?(dl.Kernel.setLastLoc('offset=32121 line=713 span=646 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("((function() { var result = (function(args) {\n return ")),(dl.Kernel.setLastLoc('offset=32240 line=715 span=38 id="beginner-to-javascript.ss"')&&bv(dG)),(dl.types.String.makeInstance(".apply(null, args.slice(0, ")),(dl.Kernel.setLastLoc('offset=32337 line=716 span=53 id="beginner-to-javascript.ss"')&&dl.Kernel.number_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=32353 line=716 span=36 id="beginner-to-javascript.ss"')&&dA(dG)))),(dl.types.String.makeInstance(").concat([args.slice(")),(dl.Kernel.setLastLoc('offset=32414 line=716 span=53 id="beginner-to-javascript.ss"')&&dl.Kernel.number_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=32430 line=716 span=36 id="beginner-to-javascript.ss"')&&dA(dG)))),(dl.types.String.makeInstance(")]));\n }); result.toWrittenString = function() {return '<function:")),(dl.Kernel.setLastLoc('offset=32553 line=717 span=37 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=32569 line=717 span=20 id="beginner-to-javascript.ss"')&&Q(dG)))),(dl.types.String.makeInstance(">'; }\n result.toDisplayedString = function() {return '<function:")),(dl.Kernel.setLastLoc('offset=32679 line=718 span=37 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=32695 line=718 span=20 id="beginner-to-javascript.ss"')&&Q(dG)))),(dl.types.String.makeInstance(">';}\n return result; })())"))])):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=32800 line=721 span=798 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("(function() { var result = (function(args) {\n return ")),(dl.Kernel.setLastLoc('offset=32918 line=723 span=38 id="beginner-to-javascript.ss"')&&bv(dG)),(dl.types.String.makeInstance("(")),(dl.Kernel.setLastLoc('offset=33017 line=725 span=263 id="beginner-to-javascript.ss"')&&w((dl.Kernel.setLastLoc('offset=33030 line=725 span=203 id="beginner-to-javascript.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=33035 line=725 span=106 id="beginner-to-javascript.ss"');var dH=(function(dJ){var dI=dJ[0];return(dl.Kernel.setLastLoc('offset=33095 line=726 span=45 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("args[")),(dl.Kernel.setLastLoc('offset=33118 line=726 span=18 id="beginner-to-javascript.ss"')&&dl.Kernel.number_dash__greaterthan_string(dI)),(dl.types.String.makeInstance("]"))]))});dH.toWrittenString=function(){return"<function:lambda>"};dH.toDisplayedString=dH.toWrittenString;return dH})()),[(dl.Kernel.setLastLoc('offset=33188 line=727 span=44 id="beginner-to-javascript.ss"')&&av((dl.Kernel.setLastLoc('offset=33195 line=727 span=36 id="beginner-to-javascript.ss"')&&dA(dG))))])),(dl.types.String.makeInstance(", ")))),(dl.types.String.makeInstance(");\n }); result.toWrittenString = function() {return '<function:")),(dl.Kernel.setLastLoc('offset=33390 line=730 span=37 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=33406 line=730 span=20 id="beginner-to-javascript.ss"')&&Q(dG)))),(dl.types.String.makeInstance(">'; }\n result.toDisplayedString = function() {return '<function:")),(dl.Kernel.setLastLoc('offset=33513 line=731 span=37 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=33529 line=731 span=20 id="beginner-to-javascript.ss"')&&Q(dG)))),(dl.types.String.makeInstance(">';}\n return result; })()"))])):(dl.Kernel.setLastLoc('offset=32051 line=711 span=1549 id="beginner-to-javascript.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=32051 line=711 span=1549 id=\\"beginner-to-javascript.ss\\""')))))):(dl.Kernel.setLastLoc('offset=31909 line=707 span=1693 id="beginner-to-javascript.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=31909 line=707 span=1693 id=\\"beginner-to-javascript.ss\\""'))))))})()):(dl.Kernel.setLastLoc('offset=31630 line=701 span=1975 id="beginner-to-javascript.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=31630 line=701 span=1975 id=\\"beginner-to-javascript.ss\\""'))))))};var p=function(dI,dF,bf,dG,dH){return((function(){var dL=function(dS,dT){return((function(){var dU=function(dV,dW){return((dl.Kernel.setLastLoc('offset=33976 line=744 span=13 id="beginner-to-javascript.ss"')&&dl.Kernel.empty_question_(dW))?dl.types.Empty.EMPTY:(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=34077 line=747 span=84 id="beginner-to-javascript.ss"')&&dl.Kernel.cons((dl.Kernel.setLastLoc('offset=34083 line=747 span=18 id="beginner-to-javascript.ss"')&&dS.apply(null,[[(dl.Kernel.setLastLoc('offset=34086 line=747 span=12 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dW)),dV]])),(dl.Kernel.setLastLoc('offset=34133 line=748 span=27 id="beginner-to-javascript.ss"')&&dU((dl.Kernel.setLastLoc('offset=34139 line=748 span=8 id="beginner-to-javascript.ss"')&&dl.Kernel.add1(dV)),(dl.Kernel.setLastLoc('offset=34148 line=748 span=11 id="beginner-to-javascript.ss"')&&dl.Kernel.rest(dW)))))):(dl.Kernel.setLastLoc('offset=33945 line=743 span=218 id="beginner-to-javascript.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=33945 line=743 span=218 id=\\"beginner-to-javascript.ss\\""'))))))};(function(dV){})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=34180 line=749 span=13 id="beginner-to-javascript.ss"')&&dU((dl.types.Rational.makeInstance(0,1)),dT))})())};var dJ;var dP;var dM;var dO;var dN;var dQ;var dK;var dR;(function(dS){dJ=(dl.Kernel.setLastLoc('offset=34252 line=752 span=89 id="beginner-to-javascript.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=34257 line=752 span=61 id="beginner-to-javascript.ss"');var dT=(function(dU){var dV=dU[0];return(dl.Kernel.setLastLoc('offset=34270 line=752 span=47 id="beginner-to-javascript.ss"')&&h((dl.Kernel.setLastLoc('offset=34306 line=752 span=10 id="beginner-to-javascript.ss"')&&b2(dV))))});dT.toWrittenString=function(){return"<function:lambda>"};dT.toDisplayedString=dT.toWrittenString;return dT})()),[dF]));dP=(dl.Kernel.setLastLoc('offset=34392 line=756 span=401 id="beginner-to-javascript.ss"')&&dl.Kernel.foldl(((function(){dl.Kernel.setLastLoc('offset=34399 line=756 span=346 id="beginner-to-javascript.ss"');var dT=(function(dU){var dW=dU[0];var dV=dU[1];return(dl.Kernel.setLastLoc('offset=34442 line=757 span=302 id="beginner-to-javascript.ss"')&&bN(dV,(dl.Kernel.setLastLoc('offset=34492 line=758 span=251 id="beginner-to-javascript.ss"')&&aM((dl.Kernel.setLastLoc('offset=34550 line=759 span=14 id="beginner-to-javascript.ss"')&&b2(dW)),(dl.Kernel.setLastLoc('offset=34599 line=760 span=103 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=34650 line=761 span=51 id="beginner-to-javascript.ss"')&&h((dl.Kernel.setLastLoc('offset=34686 line=761 span=14 id="beginner-to-javascript.ss"')&&b2(dW)))))),dl.types.Empty.EMPTY))))});dT.toWrittenString=function(){return"<function:lambda>"};dT.toDisplayedString=dT.toWrittenString;return dT})()),dG,[dF]));dM=(dl.Kernel.setLastLoc('offset=34851 line=767 span=28 id="beginner-to-javascript.ss"')&&cG(dH,(dl.types.Symbol.makeInstance("args"))));dO=(dl.Kernel.setLastLoc('offset=34930 line=769 span=22 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dM));dN=(dl.Kernel.setLastLoc('offset=34981 line=770 span=23 id="beginner-to-javascript.ss"')&&dl.Kernel.second(dM));dQ=(dl.Kernel.setLastLoc('offset=35061 line=773 span=54 id="beginner-to-javascript.ss"')&&cO(bf,dP,dO));dK=(dl.Kernel.setLastLoc('offset=35147 line=774 span=21 id="beginner-to-javascript.ss"')&&dl.Kernel.first(dQ));dR=(dl.Kernel.setLastLoc('offset=35202 line=775 span=22 id="beginner-to-javascript.ss"')&&dl.Kernel.second(dQ))})(dl.Kernel.identity);return(function(){(dl.Kernel.setLastLoc('offset=35244 line=777 span=35 id="beginner-to-javascript.ss"')&&dp(dF));return(dl.Kernel.setLastLoc('offset=35286 line=778 span=1204 id="beginner-to-javascript.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=35299 line=779 span=1169 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("((function() {\n")),(dl.types.String.makeInstance(" plt.Kernel.setLastLoc(")),(dl.Kernel.setLastLoc('offset=35383 line=780 span=50 id="beginner-to-javascript.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("~s")),[(dl.Kernel.setLastLoc('offset=35396 line=780 span=36 id="beginner-to-javascript.ss"')&&bH((dl.Kernel.setLastLoc('offset=35409 line=780 span=22 id="beginner-to-javascript.ss"')&&t(dI))))])),(dl.types.String.makeInstance(");\n")),(dl.types.String.makeInstance(" var result = (function(")),(dl.Kernel.setLastLoc('offset=35492 line=781 span=25 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(dN)),(dl.types.String.makeInstance(") {\n")),(dl.Kernel.setLastLoc('offset=35548 line=782 span=518 id="beginner-to-javascript.ss"')&&w((dl.Kernel.setLastLoc('offset=35561 line=782 span=464 id="beginner-to-javascript.ss"')&&dL(((function(){dl.Kernel.setLastLoc('offset=35567 line=782 span=401 id="beginner-to-javascript.ss"');var dS=(function(dT){var dV=dT[0];var dU=dT[1];return(dl.Kernel.setLastLoc('offset=35629 line=783 span=338 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("var ")),(dl.Kernel.setLastLoc('offset=35709 line=784 span=23 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(dV)),(dl.types.String.makeInstance(" = ")),(dl.Kernel.setLastLoc('offset=35855 line=786 span=25 id="beginner-to-javascript.ss"')&&dl.Kernel.symbol_dash__greaterthan_string(dN)),(dl.types.String.makeInstance("[")),(dl.Kernel.setLastLoc('offset=35943 line=787 span=18 id="beginner-to-javascript.ss"')&&dl.Kernel.number_dash__greaterthan_string(dU)),(dl.types.String.makeInstance("];"))]))});dS.toWrittenString=function(){return"<function:lambda>"};dS.toDisplayedString=dS.toWrittenString;return dS})()),dJ)),(dl.types.String.makeInstance("\n")))),(dl.types.String.makeInstance("\n return ")),dK,(dl.types.String.makeInstance("; });\n result.toWrittenString = function () {\n return '<function:lambda>';\n };\n result.toDisplayedString = result.toWrittenString;\n return result;\n })())"))])),dR]))})()})())};var cg=function(bf){return((dl.Kernel.setLastLoc('offset=36617 line=807 span=19 id="beginner-to-javascript.ss"')&&dl.Kernel.eqv_question_(bf,(dl.types.FloatPoint.makeInstance(Number.POSITIVE_INFINITY))))?(dl.types.String.makeInstance("Number.POSITIVE_INFINITY")):((dl.Kernel.setLastLoc('offset=36675 line=809 span=19 id="beginner-to-javascript.ss"')&&dl.Kernel.eqv_question_(bf,(dl.types.FloatPoint.makeInstance(Number.NEGATIVE_INFINITY))))?(dl.types.String.makeInstance("Number.NEGATIVE_INFINITY")):((dl.Kernel.setLastLoc('offset=36733 line=811 span=19 id="beginner-to-javascript.ss"')&&dl.Kernel.eqv_question_(bf,(dl.types.FloatPoint.makeInstance(Number.NaN))))?(dl.types.String.makeInstance("Number.NaN")):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=36787 line=814 span=22 id="beginner-to-javascript.ss"')&&dl.Kernel.number_dash__greaterthan_string(bf)):(dl.Kernel.setLastLoc('offset=36606 line=806 span=205 id="beginner-to-javascript.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=36606 line=806 span=205 id=\\"beginner-to-javascript.ss\\""'))))))))};var b4=function(bf,dF){return((dl.Kernel.setLastLoc('offset=36920 line=819 span=16 id="beginner-to-javascript.ss"')&&dl.Kernel.integer_question_(bf))?(dl.Kernel.setLastLoc('offset=36946 line=820 span=147 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("(plt.types.Rational.makeInstance(")),(dl.Kernel.setLastLoc('offset=37021 line=821 span=39 id="beginner-to-javascript.ss"')&&dl.Kernel.number_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=37037 line=821 span=22 id="beginner-to-javascript.ss"')&&dl.Kernel.inexact_dash__greaterthan_exact(bf)))),(dl.types.String.makeInstance(", 1))"))])):((dl.Kernel.setLastLoc('offset=37104 line=823 span=17 id="beginner-to-javascript.ss"')&&dl.Kernel.rational_question_(bf))?(dl.Kernel.setLastLoc('offset=37131 line=824 span=229 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("(plt.types.Rational.makeInstance(")),(dl.Kernel.setLastLoc('offset=37206 line=825 span=34 id="beginner-to-javascript.ss"')&&dl.Kernel.number_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=37222 line=825 span=17 id="beginner-to-javascript.ss"')&&dl.Kernel.numerator(bf)))),(dl.types.String.makeInstance(", ")),(dl.Kernel.setLastLoc('offset=37294 line=827 span=36 id="beginner-to-javascript.ss"')&&dl.Kernel.number_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=37310 line=827 span=19 id="beginner-to-javascript.ss"')&&dl.Kernel.denominator(bf)))),(dl.types.String.makeInstance("))"))])):((dl.Kernel.setLastLoc('offset=37371 line=829 span=13 id="beginner-to-javascript.ss"')&&dl.Kernel.real_question_(bf))?(dl.Kernel.setLastLoc('offset=37394 line=830 span=150 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("(plt.types.FloatPoint.makeInstance(")),(dl.Kernel.setLastLoc('offset=37472 line=831 span=42 id="beginner-to-javascript.ss"')&&cg(bf)),(dl.types.String.makeInstance("))"))])):((dl.Kernel.setLastLoc('offset=37556 line=834 span=16 id="beginner-to-javascript.ss"')&&dl.Kernel.complex_question_(bf))?(dl.Kernel.setLastLoc('offset=37582 line=835 span=190 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("(plt.types.Complex.makeInstance(")),(dl.Kernel.setLastLoc('offset=37635 line=836 span=58 id="beginner-to-javascript.ss"')&&b4((dl.Kernel.setLastLoc('offset=37662 line=836 span=17 id="beginner-to-javascript.ss"')&&dl.Kernel.real_dash_part(bf)),dF)),(dl.types.String.makeInstance(", ")),(dl.Kernel.setLastLoc('offset=37705 line=838 span=58 id="beginner-to-javascript.ss"')&&b4((dl.Kernel.setLastLoc('offset=37732 line=838 span=17 id="beginner-to-javascript.ss"')&&dl.Kernel.imag_dash_part(bf)),dF)),(dl.types.String.makeInstance("))"))])):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=37806 line=842 span=99 id="beginner-to-javascript.ss"')&&dl.Kernel.syntax_dash_error((dl.Kernel.setLastLoc('offset=37820 line=842 span=48 id="beginner-to-javascript.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("Don't know how to handle ~s yet")),[bf])),dF)):(dl.Kernel.setLastLoc('offset=36913 line=819 span=994 id="beginner-to-javascript.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=36913 line=819 span=994 id=\\"beginner-to-javascript.ss\\""')))))))))};var a6=function(bf){return(dl.Kernel.setLastLoc('offset=37998 line=849 span=147 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance("(plt.types.Char.makeInstance(String.fromCharCode(")),(dl.Kernel.setLastLoc('offset=38082 line=850 span=39 id="beginner-to-javascript.ss"')&&dl.Kernel.number_dash__greaterthan_string((dl.Kernel.setLastLoc('offset=38098 line=850 span=22 id="beginner-to-javascript.ss"')&&dl.Kernel.char_dash__greaterthan_integer(bf)))),(dl.types.String.makeInstance(")))"))]))};var bU=function(bf){return((function(){var dF=function(dG){return((dl.Kernel.setLastLoc('offset=38355 line=859 span=19 id="beginner-to-javascript.ss"')&&dl.Kernel.char_equal__question_(dG,(dl.types.Char.makeInstance(String.fromCharCode(34))),[]))?(dl.Kernel.setLastLoc('offset=38390 line=860 span=16 id="beginner-to-javascript.ss"')&&dl.Kernel.string([(dl.types.Char.makeInstance(String.fromCharCode(92))),(dl.types.Char.makeInstance(String.fromCharCode(34)))])):((dl.Kernel.setLastLoc('offset=38423 line=861 span=19 id="beginner-to-javascript.ss"')&&dl.Kernel.char_equal__question_(dG,(dl.types.Char.makeInstance(String.fromCharCode(92))),[]))?(dl.Kernel.setLastLoc('offset=38458 line=862 span=16 id="beginner-to-javascript.ss"')&&dl.Kernel.string([(dl.types.Char.makeInstance(String.fromCharCode(92))),(dl.types.Char.makeInstance(String.fromCharCode(92)))])):((dl.Kernel.setLastLoc('offset=38491 line=863 span=25 id="beginner-to-javascript.ss"')&&dl.Kernel.char_equal__question_(dG,(dl.types.Char.makeInstance(String.fromCharCode(10))),[]))?(dl.Kernel.setLastLoc('offset=38532 line=864 span=16 id="beginner-to-javascript.ss"')&&dl.Kernel.string([(dl.types.Char.makeInstance(String.fromCharCode(92))),(dl.types.Char.makeInstance(String.fromCharCode(110)))])):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=38585 line=866 span=15 id="beginner-to-javascript.ss"')&&dl.Kernel.string([dG])):(dl.Kernel.setLastLoc('offset=38334 line=858 span=268 id="beginner-to-javascript.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=38334 line=858 span=268 id=\\"beginner-to-javascript.ss\\""'))))))))};(function(dG){})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=38609 line=867 span=189 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash_append([(dl.types.String.makeInstance('(plt.types.String.makeInstance("')),(dl.Kernel.setLastLoc('offset=38679 line=868 span=92 id="beginner-to-javascript.ss"')&&w((dl.Kernel.setLastLoc('offset=38692 line=868 span=43 id="beginner-to-javascript.ss"')&&dl.Kernel.map((function(){var dG=(function(dH){return dF(dH[0])});dG.toWrittenString=function(){return"<function:escape-char-code>"};dG.toDisplayedString=function(){return"<function:escape-char-code>"};return dG})(),[(dl.Kernel.setLastLoc('offset=38714 line=868 span=20 id="beginner-to-javascript.ss"')&&dl.Kernel.string_dash__greaterthan_list(bf))])),(dl.types.String.makeInstance("")))),(dl.types.String.makeInstance('"))'))]))})())};(function(){((function(bf){ds=(dl.Kernel.setLastLoc('offset=857 line=28 span=26 id="permission.ss"')&&S());cV=(dl.Kernel.setLastLoc('offset=913 line=29 span=26 id="permission.ss"')&&cX());N=(dl.Kernel.setLastLoc('offset=972 line=30 span=26 id="permission.ss"')&&cX());bA=(dl.Kernel.setLastLoc('offset=1024 line=31 span=22 id="permission.ss"')&&aO());H=(dl.Kernel.setLastLoc('offset=1073 line=32 span=23 id="permission.ss"')&&c1());R=(dl.Kernel.setLastLoc('offset=1126 line=33 span=26 id="permission.ss"')&&aS());bb=(dl.Kernel.setLastLoc('offset=1183 line=34 span=27 id="permission.ss"')&&bm());cS=(dl.Kernel.setLastLoc('offset=1241 line=35 span=27 id="permission.ss"')&&u());bc=(dl.Kernel.setLastLoc('offset=221 line=9 span=40 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("black")),(dl.types.Symbol.makeInstance("nil")),(dl.types.Symbol.makeInstance("nil")),(dl.types.Symbol.makeInstance("nil")),(dl.types.Symbol.makeInstance("nil"))));c3=(dl.Kernel.list([(dl.types.Symbol.makeInstance("abstract")),(dl.types.Symbol.makeInstance("continue")),(dl.types.Symbol.makeInstance("for")),(dl.types.Symbol.makeInstance("new")),(dl.types.Symbol.makeInstance("switch")),(dl.types.Symbol.makeInstance("assert")),(dl.types.Symbol.makeInstance("default")),(dl.types.Symbol.makeInstance("goto")),(dl.types.Symbol.makeInstance("package")),(dl.types.Symbol.makeInstance("synchronized")),(dl.types.Symbol.makeInstance("boolean")),(dl.types.Symbol.makeInstance("do")),(dl.types.Symbol.makeInstance("if")),(dl.types.Symbol.makeInstance("private")),(dl.types.Symbol.makeInstance("break")),(dl.types.Symbol.makeInstance("double")),(dl.types.Symbol.makeInstance("implements")),(dl.types.Symbol.makeInstance("protected")),(dl.types.Symbol.makeInstance("throw")),(dl.types.Symbol.makeInstance("byte")),(dl.types.Symbol.makeInstance("delete")),(dl.types.Symbol.makeInstance("else")),(dl.types.Symbol.makeInstance("import")),(dl.types.Symbol.makeInstance("public")),(dl.types.Symbol.makeInstance("throws")),(dl.types.Symbol.makeInstance("case")),(dl.types.Symbol.makeInstance("enum")),(dl.types.Symbol.makeInstance("instanceof")),(dl.types.Symbol.makeInstance("instanceOf")),(dl.types.Symbol.makeInstance("return")),(dl.types.Symbol.makeInstance("transient")),(dl.types.Symbol.makeInstance("catch")),(dl.types.Symbol.makeInstance("extends")),(dl.types.Symbol.makeInstance("int")),(dl.types.Symbol.makeInstance("short")),(dl.types.Symbol.makeInstance("try")),(dl.types.Symbol.makeInstance("char")),(dl.types.Symbol.makeInstance("final")),(dl.types.Symbol.makeInstance("interface")),(dl.types.Symbol.makeInstance("static")),(dl.types.Symbol.makeInstance("void")),(dl.types.Symbol.makeInstance("class")),(dl.types.Symbol.makeInstance("finally")),(dl.types.Symbol.makeInstance("long")),(dl.types.Symbol.makeInstance("strictfp")),(dl.types.Symbol.makeInstance("volatile")),(dl.types.Symbol.makeInstance("const")),(dl.types.Symbol.makeInstance("float")),(dl.types.Symbol.makeInstance("native")),(dl.types.Symbol.makeInstance("super")),(dl.types.Symbol.makeInstance("while")),(dl.types.Symbol.makeInstance("null")),(dl.types.Symbol.makeInstance("comment")),(dl.types.Symbol.makeInstance("export")),(dl.types.Symbol.makeInstance("import")),(dl.types.Symbol.makeInstance("in")),(dl.types.Symbol.makeInstance("label")),(dl.types.Symbol.makeInstance("typeof")),(dl.types.Symbol.makeInstance("with")),(dl.types.Symbol.makeInstance("false")),(dl.types.Symbol.makeInstance("true")),(dl.types.Symbol.makeInstance("debugger"))]));U=(dl.Kernel.setLastLoc('offset=184 line=10 span=23 id="env.ss"')&&f(bc));aa=((function(){var dF=function(dH,dK,dJ,dL,dI){return(dl.Kernel.setLastLoc('offset=375 line=16 span=80 id="modules.ss"')&&bl(dH,dK,dJ,dL,dI,dl.types.Empty.EMPTY,dl.types.Logic.FALSE))};var dG;(function(dH){dG=(dl.types.String.makeInstance("moby/world-effects"))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=538 line=20 span=3437 id="modules.ss"')&&bi((dl.types.Symbol.makeInstance("world-effects")),dG,(dl.Kernel.setLastLoc('offset=636 line=22 span=3338 id="modules.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=642 line=22 span=143 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("make-effect:none")),dG,(dl.types.Rational.makeInstance(0,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("make_dash_effect_colon_none")))),(dl.Kernel.setLastLoc('offset=817 line=25 span=143 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("make-effect:beep")),dG,(dl.types.Rational.makeInstance(0,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("make_dash_effect_colon_beep")))),(dl.Kernel.setLastLoc('offset=992 line=28 span=173 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("make-effect:play-dtmf-tone")),dG,(dl.types.Rational.makeInstance(2,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("make_dash_effect_colon_play_dash_dtmf_dash_tone")))),(dl.Kernel.setLastLoc('offset=1197 line=31 span=267 id="modules.ss"')&&bl((dl.types.Symbol.makeInstance("make-effect:send-sms")),dG,(dl.types.Rational.makeInstance(2,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("make_dash_effect_colon_send_dash_sms")),(dl.Kernel.setLastLoc('offset=1399 line=34 span=26 id="modules.ss"')&&dl.Kernel.list([cV])),dl.types.Logic.FALSE)),(dl.Kernel.setLastLoc('offset=1527 line=36 span=366 id="modules.ss"')&&bl((dl.types.Symbol.makeInstance("make-effect:play-sound")),dG,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("make_dash_effect_colon_play_dash_sound")),(dl.Kernel.setLastLoc('offset=1828 line=42 span=26 id="modules.ss"')&&dl.Kernel.list([R])),dl.types.Logic.FALSE)),(dl.Kernel.setLastLoc('offset=1925 line=44 span=160 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("make-effect:stop-sound")),dG,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("make_dash_effect_colon_stop_dash_sound")))),(dl.Kernel.setLastLoc('offset=2117 line=47 span=161 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("make-effect:pause-sound")),dG,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("make_dash_effect_colon_pause_dash_sound")))),(dl.Kernel.setLastLoc('offset=2310 line=50 span=177 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("make-effect:set-sound-volume")),dG,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("make_dash_effect_colon_set_dash_sound_dash_volume")))),(dl.Kernel.setLastLoc('offset=2519 line=53 span=180 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("make-effect:raise-sound-volume")),dG,(dl.types.Rational.makeInstance(0,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("make_dash_effect_colon_raise_dash_sound_dash_volume")))),(dl.Kernel.setLastLoc('offset=2731 line=56 span=181 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("make-effect:lower-sound-volume")),dG,(dl.types.Rational.makeInstance(0,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("make_dash_effect_colon_lower_dash_sound_dash_volume")))),(dl.Kernel.setLastLoc('offset=2976 line=60 span=260 id="modules.ss"')&&bl((dl.types.Symbol.makeInstance("make-effect:set-wake-lock")),dG,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("make_dash_effect_colon_set_dash_wake_dash_lock")),(dl.Kernel.setLastLoc('offset=3166 line=62 span=27 id="modules.ss"')&&dl.Kernel.list([cS])),dl.types.Logic.FALSE)),(dl.Kernel.setLastLoc('offset=3268 line=64 span=353 id="modules.ss"')&&bl((dl.types.Symbol.makeInstance("make-effect:release-wake-lock")),dG,(dl.types.Rational.makeInstance(0,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("make_dash_effect_colon_release_dash_wake_dash_lock")),(dl.Kernel.setLastLoc('offset=3555 line=69 span=27 id="modules.ss"')&&dl.Kernel.list([cS])),dl.types.Logic.FALSE)),(dl.Kernel.setLastLoc('offset=3653 line=71 span=130 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("make-effect:pick-playlist")),dG,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("make_dash_effect_colon_pick_dash_playlist")))),(dl.Kernel.setLastLoc('offset=3815 line=73 span=126 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("make-effect:pick-random")),dG,(dl.types.Rational.makeInstance(2,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("make_dash_effect_colon_pick_dash_random"))))]))))})());cd=((function(){var dF=function(dH,dK,dJ,dL,dI){return(dl.Kernel.setLastLoc('offset=4192 line=82 span=80 id="modules.ss"')&&bl(dH,dK,dJ,dL,dI,dl.types.Empty.EMPTY,dl.types.Logic.FALSE))};var dG;(function(dH){dG=(dl.types.String.makeInstance("moby/world-handlers"))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=4345 line=85 span=3999 id="modules.ss"')&&bi((dl.types.Symbol.makeInstance("world-config")),dG,(dl.Kernel.setLastLoc('offset=4442 line=87 span=3901 id="modules.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=4448 line=87 span=66 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("on-tick")),dG,(dl.types.Rational.makeInstance(2,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.onTick")))),(dl.Kernel.setLastLoc('offset=4546 line=88 span=73 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("on-tick!")),dG,(dl.types.Rational.makeInstance(3,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.onTick_star_")))),(dl.Kernel.setLastLoc('offset=4651 line=89 span=68 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("on-mouse")),dG,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.onMouse")))),(dl.Kernel.setLastLoc('offset=4751 line=90 span=75 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("on-mouse!")),dG,(dl.types.Rational.makeInstance(2,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.onMouse_star_")))),(dl.Kernel.setLastLoc('offset=4870 line=93 span=80 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("initial-effect")),dG,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.initialEffect")))),(dl.Kernel.setLastLoc('offset=4983 line=95 span=64 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("on-key")),dG,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.onKey")))),(dl.Kernel.setLastLoc('offset=5079 line=96 span=71 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("on-key!")),dG,(dl.types.Rational.makeInstance(2,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.onKey_star_")))),(dl.Kernel.setLastLoc('offset=5183 line=98 span=74 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("on-announce")),dG,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.onAnnounce")))),(dl.Kernel.setLastLoc('offset=5289 line=99 span=81 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("on-announce!")),dG,(dl.types.Rational.makeInstance(2,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.onAnnounce_star_")))),(dl.Kernel.setLastLoc('offset=5403 line=101 span=267 id="modules.ss"')&&bl((dl.types.Symbol.makeInstance("on-location-change")),dG,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.onLocationChange")),(dl.Kernel.setLastLoc('offset=5605 line=104 span=26 id="modules.ss"')&&dl.Kernel.list([ds])),dl.types.Logic.FALSE)),(dl.Kernel.setLastLoc('offset=5702 line=106 span=274 id="modules.ss"')&&bl((dl.types.Symbol.makeInstance("on-location-change!")),dG,(dl.types.Rational.makeInstance(2,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.onLocationChange_star_")),(dl.Kernel.setLastLoc('offset=5911 line=109 span=26 id="modules.ss"')&&dl.Kernel.list([ds])),dl.types.Logic.FALSE)),(dl.Kernel.setLastLoc('offset=6040 line=112 span=242 id="modules.ss"')&&bl((dl.types.Symbol.makeInstance("on-tilt")),dG,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.onTilt")),(dl.Kernel.setLastLoc('offset=6221 line=115 span=22 id="modules.ss"')&&dl.Kernel.list([bA])),dl.types.Logic.FALSE)),(dl.Kernel.setLastLoc('offset=6314 line=117 span=249 id="modules.ss"')&&bl((dl.types.Symbol.makeInstance("on-tilt!")),dG,(dl.types.Rational.makeInstance(2,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.onTilt_star_")),(dl.Kernel.setLastLoc('offset=6502 line=120 span=22 id="modules.ss"')&&dl.Kernel.list([bA])),dl.types.Logic.FALSE)),(dl.Kernel.setLastLoc('offset=6627 line=123 span=258 id="modules.ss"')&&bl((dl.types.Symbol.makeInstance("on-acceleration")),dG,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.onAcceleration")),(dl.Kernel.setLastLoc('offset=6824 line=126 span=22 id="modules.ss"')&&dl.Kernel.list([bA])),dl.types.Logic.FALSE)),(dl.Kernel.setLastLoc('offset=6949 line=129 span=265 id="modules.ss"')&&bl((dl.types.Symbol.makeInstance("on-acceleration!")),dG,(dl.types.Rational.makeInstance(2,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.onAcceleration_star_")),(dl.Kernel.setLastLoc('offset=7153 line=132 span=22 id="modules.ss"')&&dl.Kernel.list([bA])),dl.types.Logic.FALSE)),(dl.Kernel.setLastLoc('offset=7278 line=135 span=245 id="modules.ss"')&&bl((dl.types.Symbol.makeInstance("on-shake")),dG,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.onShake")),(dl.Kernel.setLastLoc('offset=7461 line=138 span=23 id="modules.ss"')&&dl.Kernel.list([H])),dl.types.Logic.FALSE)),(dl.Kernel.setLastLoc('offset=7587 line=141 span=252 id="modules.ss"')&&bl((dl.types.Symbol.makeInstance("on-shake!")),dG,(dl.types.Rational.makeInstance(2,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.onShake_star_")),(dl.Kernel.setLastLoc('offset=7777 line=144 span=23 id="modules.ss"')&&dl.Kernel.list([H])),dl.types.Logic.FALSE)),(dl.Kernel.setLastLoc('offset=7947 line=148 span=70 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("on-redraw")),dG,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.onRedraw")))),(dl.Kernel.setLastLoc('offset=8142 line=151 span=66 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("on-draw")),dG,(dl.types.Rational.makeInstance(2,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.onDraw")))),(dl.Kernel.setLastLoc('offset=8272 line=153 span=70 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("stop-when")),dG,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.config.Kernel.stopWhen"))))]))))})());aP=((function(){var dF;(function(dG){dF=(dl.types.String.makeInstance("moby/world"))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=10944 line=205 span=31 id="modules.ss"')&&cc(dF))})());c5=((function(){var dF;(function(dG){dF=(dl.types.String.makeInstance("moby/world"))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=11130 line=212 span=31 id="modules.ss"')&&cc(dF))})());dD=((function(){var dF=function(dH,dK,dJ,dL,dI){return(dl.Kernel.setLastLoc('offset=11394 line=220 span=80 id="modules.ss"')&&bl(dH,dK,dJ,dL,dI,dl.types.Empty.EMPTY,dl.types.Logic.FALSE))};var dG;(function(dH){dG=(dl.types.String.makeInstance("moby/bootstrap-world"))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=11547 line=223 span=244 id="modules.ss"')&&bi((dl.types.Symbol.makeInstance("world")),dG,(dl.Kernel.setLastLoc('offset=11637 line=225 span=153 id="modules.ss"')&&dl.Kernel.append((dl.Kernel.setLastLoc('offset=11645 line=225 span=67 id="modules.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=11651 line=225 span=60 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("start")),dG,(dl.types.Rational.makeInstance(10,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.Bootstrap.start"))))])),[(dl.Kernel.setLastLoc('offset=11746 line=226 span=43 id="modules.ss"')&&cW(c5))]))))})());dk=((function(){var dG;var dF=function(dH,dK,dJ,dL,dI){return(dl.Kernel.setLastLoc('offset=11996 line=237 span=172 id="modules.ss"')&&bl(dH,dK,dJ,dL,dI,(dl.Kernel.setLastLoc('offset=12100 line=238 span=26 id="modules.ss"')&&dl.Kernel.list([ds])),dl.types.Logic.FALSE))};(function(dH){dG=(dl.types.String.makeInstance("moby/geolocation"))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=12175 line=240 span=896 id="modules.ss"')&&bi((dl.types.Symbol.makeInstance("location")),dG,(dl.Kernel.setLastLoc('offset=12268 line=242 span=802 id="modules.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=12274 line=242 span=105 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("get-latitude")),dG,(dl.types.Rational.makeInstance(0,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.lib.Location.getLatitude")))),(dl.Kernel.setLastLoc('offset=12411 line=244 span=107 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("get-longitude")),dG,(dl.types.Rational.makeInstance(0,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.lib.Location.getLongitude")))),(dl.Kernel.setLastLoc('offset=12550 line=246 span=105 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("get-altitude")),dG,(dl.types.Rational.makeInstance(0,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.lib.Location.getAltitude")))),(dl.Kernel.setLastLoc('offset=12687 line=248 span=103 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("get-bearing")),dG,(dl.types.Rational.makeInstance(0,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.lib.Location.getBearing")))),(dl.Kernel.setLastLoc('offset=12822 line=250 span=99 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("get-speed")),dG,(dl.types.Rational.makeInstance(0,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.lib.Location.getSpeed")))),(dl.Kernel.setLastLoc('offset=12953 line=252 span=116 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("location-distance")),dG,(dl.types.Rational.makeInstance(4,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.lib.Location.getDistanceBetween"))))]))))})());am=((function(){var dG;var dF=function(dH,dJ,dK,dI){return(dl.Kernel.setLastLoc('offset=13257 line=262 span=166 id="modules.ss"')&&bl(dH,dG,dJ,dK,dI,(dl.Kernel.setLastLoc('offset=13360 line=263 span=22 id="modules.ss"')&&dl.Kernel.list([bA])),dl.types.Logic.TRUE))};(function(dH){dG=(dl.types.String.makeInstance("moby/tilt"))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=13430 line=265 span=844 id="modules.ss"')&&bi((dl.types.Symbol.makeInstance("tilt")),dG,(dl.Kernel.setLastLoc('offset=13519 line=267 span=754 id="modules.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=13525 line=267 span=100 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("get-x-acceleration")),(dl.types.Rational.makeInstance(0,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.lib.Tilt.getXAcceleration")))),(dl.Kernel.setLastLoc('offset=13657 line=269 span=100 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("get-y-acceleration")),(dl.types.Rational.makeInstance(0,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.lib.Tilt.getYAcceleration")))),(dl.Kernel.setLastLoc('offset=13789 line=271 span=104 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("get-z-acceleration")),(dl.types.Rational.makeInstance(0,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.lib.Location.getZAcceleration")))),(dl.Kernel.setLastLoc('offset=13957 line=274 span=87 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("get-azimuth")),(dl.types.Rational.makeInstance(0,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.lib.Tilt.getAzimuth")))),(dl.Kernel.setLastLoc('offset=14076 line=276 span=83 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("get-pitch")),(dl.types.Rational.makeInstance(0,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.lib.Tilt.getPitch")))),(dl.Kernel.setLastLoc('offset=14191 line=278 span=81 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("get-roll")),(dl.types.Rational.makeInstance(0,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.lib.Tilt.getRoll"))))]))))})());aG=((function(){var dF;(function(dG){dF=(dl.types.String.makeInstance("moby/telephony"))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=14373 line=289 span=567 id="modules.ss"')&&bi((dl.types.Symbol.makeInstance("telephony")),dF,(dl.Kernel.setLastLoc('offset=14467 line=291 span=472 id="modules.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=14473 line=291 span=465 id="modules.ss"')&&bl((dl.types.Symbol.makeInstance("get-signal-strengths")),dF,(dl.types.Rational.makeInstance(0,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.lib.Telephony.getSignalStrengths")),(dl.Kernel.setLastLoc('offset=14850 line=296 span=27 id="modules.ss"')&&dl.Kernel.list([bb])),dl.types.Logic.FALSE))]))))})());au=((function(){var dF;(function(dG){dF=(dl.types.String.makeInstance("moby/net"))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=15027 line=307 span=529 id="modules.ss"')&&bi((dl.types.Symbol.makeInstance("net")),dF,(dl.Kernel.setLastLoc('offset=15115 line=309 span=440 id="modules.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=15121 line=309 span=433 id="modules.ss"')&&bl((dl.types.Symbol.makeInstance("get-url")),dF,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.lib.Net.getUrl")),(dl.Kernel.setLastLoc('offset=15467 line=314 span=26 id="modules.ss"')&&dl.Kernel.list([R])),dl.types.Logic.FALSE))]))))})());dm=((function(){var dF;(function(dG){dF=(dl.types.String.makeInstance("moby/parser"))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=15645 line=321 span=989 id="modules.ss"')&&bi((dl.types.Symbol.makeInstance("parser")),dF,(dl.Kernel.setLastLoc('offset=15736 line=323 span=897 id="modules.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=15742 line=323 span=420 id="modules.ss"')&&bl((dl.types.Symbol.makeInstance("xml->s-exp")),dF,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.lib.Parser.parseXml")),dl.types.Empty.EMPTY,dl.types.Logic.FALSE))]))))})());at=((function(){var dG;var dF=function(dH,dJ,dI){return(dl.Kernel.setLastLoc('offset=16778 line=343 span=75 id="modules.ss"')&&bl(dH,dG,dJ,dl.types.Logic.TRUE,dI,dl.types.Empty.EMPTY,dl.types.Logic.FALSE))};(function(dH){dG=(dl.types.String.makeInstance("moby/jsworld"))})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=16860 line=344 span=1610 id="modules.ss"')&&bi((dl.types.Symbol.makeInstance("jsworld")),dG,(dl.Kernel.setLastLoc('offset=16952 line=346 span=1517 id="modules.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=16958 line=346 span=324 id="modules.ss"')&&bl((dl.types.Symbol.makeInstance("js-big-bang")),dG,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.TRUE,(dl.types.String.makeInstance("plt.world.MobyJsworld.bigBang")),dl.types.Empty.EMPTY,dl.types.Logic.FALSE)),(dl.Kernel.setLastLoc('offset=17314 line=354 span=421 id="modules.ss"')&&bl((dl.types.Symbol.makeInstance("js-text")),dG,(dl.types.Rational.makeInstance(1,1)),dl.types.Logic.FALSE,(dl.types.String.makeInstance("plt.world.MobyJsworld.text")),dl.types.Empty.EMPTY,dl.types.Logic.FALSE)),(dl.Kernel.setLastLoc('offset=17974 line=366 span=42 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("js-div")),(dl.types.Rational.makeInstance(0,1)),(dl.types.String.makeInstance("plt.world.MobyJsworld.div")))),(dl.Kernel.setLastLoc('offset=18048 line=367 span=38 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("js-p")),(dl.types.Rational.makeInstance(0,1)),(dl.types.String.makeInstance("plt.world.MobyJsworld.p")))),(dl.Kernel.setLastLoc('offset=18118 line=368 span=48 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("js-button")),(dl.types.Rational.makeInstance(1,1)),(dl.types.String.makeInstance("plt.world.MobyJsworld.button")))),(dl.Kernel.setLastLoc('offset=18198 line=369 span=53 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("js-button!")),(dl.types.Rational.makeInstance(2,1)),(dl.types.String.makeInstance("plt.world.MobyJsworld.buttonStar")))),(dl.Kernel.setLastLoc('offset=18283 line=370 span=46 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("js-input")),(dl.types.Rational.makeInstance(2,1)),(dl.types.String.makeInstance("plt.world.MobyJsworld.input")))),(dl.Kernel.setLastLoc('offset=18340 line=371 span=49 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("js-img")),(dl.types.Rational.makeInstance(1,1)),(dl.types.String.makeInstance("plt.world.MobyJsworld.img")))),(dl.Kernel.setLastLoc('offset=18421 line=373 span=47 id="modules.ss"')&&dF((dl.types.Symbol.makeInstance("js-node")),(dl.types.Rational.makeInstance(1,1)),(dl.types.String.makeInstance("plt.world.MobyJsworld.rawNode"))))]))))})());aC=(dl.Kernel.setLastLoc('offset=18604 line=381 span=401 id="modules.ss"')&&bi((dl.types.Symbol.makeInstance("moby")),(dl.types.String.makeInstance("moby/moby")),(dl.Kernel.setLastLoc('offset=18689 line=383 span=315 id="modules.ss"')&&dl.Kernel.append((dl.Kernel.setLastLoc('offset=18722 line=384 span=43 id="modules.ss"')&&cW(c5)),[(dl.Kernel.setLastLoc('offset=18790 line=385 span=40 id="modules.ss"')&&cW(at)),(dl.Kernel.setLastLoc('offset=18855 line=386 span=42 id="modules.ss"')&&cW(aG)),(dl.Kernel.setLastLoc('offset=18922 line=387 span=41 id="modules.ss"')&&cW(dk)),(dl.Kernel.setLastLoc('offset=18967 line=388 span=36 id="modules.ss"')&&cW(au))]))));ak=(dl.Kernel.setLastLoc('offset=19580 line=407 span=397 id="modules.ss"')&&dl.Kernel.list([aP,c5,dk,am,au,dm,dD,aG,aC]));b1=(dl.Kernel.setLastLoc('offset=902 line=28 span=106 id="pinfo.ss"')&&aq(U,dl.types.Empty.EMPTY,bc,(dl.types.Rational.makeInstance(0,1)),dl.types.Empty.EMPTY))}))(arguments[0]||dl.Kernel.identity)})();function e(bf){var dF=[];while(!bf.isEmpty()){dF.push(bf.first());bf=bf.rest()}return dF}var bX=aJ(dl.types.Symbol.makeInstance("moby"));return function(dG){var dJ=dl.reader.readSchemeExpressions(dG);var dH=dq(dJ,bX);var bf=b0(dH);var dI=M(cA(dH));var dF=[];while(!dI.isEmpty()){dF.push(A(dI.first()));dI=dI.rest()}return[bf,dF]}})(); \ No newline at end of file +var compile=(function(){var dl=dl||{};(function(){dl.types=dl.types||{};dl.types.Logic={TRUE:true,FALSE:false};Boolean.prototype.toWrittenString=function(){if(this.valueOf()){return"true"}return"false"};Boolean.prototype.toDisplayedString=Boolean.prototype.toWrittenString;Boolean.prototype.isEqual=function(dO){return this==dO};dl.types.Char=function(dO){this.val=dO};dl.types.Char.makeInstance=function(dO){return new dl.types.Char(dO)};dl.types.Char.prototype.toWrittenString=function(){return"#\\"+this.val};dl.types.Char.prototype.toDisplayedString=function(){return this.val};dl.types.Char.prototype.getValue=function(){return this.val};dl.types.Char.prototype.isEqual=function(dO){return dO instanceof dl.types.Char&&this.val==dO.val};dl.types.Symbol=function(dO){this.val=dO};var dH={};dl.types.Symbol.makeInstance=function(dO){if(!(dO in dH)){dH[dO]=new dl.types.Symbol(dO)}else{}return dH[dO]};dl.types.Symbol.prototype.isEqual=function(dO){return dO instanceof dl.types.Symbol&&this.val==dO.val};dl.types.Symbol.prototype.toString=function(){return this.val};dl.types.Symbol.prototype.toWrittenString=function(){return this.val};dl.types.Symbol.prototype.toDisplayedString=function(){return this.val};dl.types.Empty=function(){};dl.types.Empty.EMPTY=new dl.types.Empty();dl.types.Empty.prototype.isEqual=function(dO){return dO instanceof dl.types.Empty};dl.types.Empty.prototype.first=function(){throw new dl.Kernel.MobyRuntimeError("first can't be applied on empty.")};dl.types.Empty.prototype.rest=function(){throw new dl.Kernel.MobyRuntimeError("rest can't be applied on empty.")};dl.types.Empty.prototype.isEmpty=function(){return true};dl.types.Empty.prototype.toWrittenString=function(){return"empty"};dl.types.Empty.prototype.toDisplayedString=function(){return"empty"};dl.types.Empty.prototype.append=function(dO){return dO};dl.types.Cons=function(dP,dO){this.f=dP;this.r=dO};dl.types.Cons.makeInstance=function(dP,dO){return new dl.types.Cons(dP,dO)};dl.types.Cons.prototype.isEqual=function(dO){if(!(dO instanceof dl.types.Cons)){return dl.types.Logic.FALSE}return(dl.Kernel.equal_question_(this.first(),dO.first())&&dl.Kernel.equal_question_(this.rest(),dO.rest()))};dl.types.Cons.prototype.first=function(){return this.f};dl.types.Cons.prototype.rest=function(){return this.r};dl.types.Cons.prototype.isEmpty=function(){return false};dl.types.Cons.prototype.append=function(dP){if(dP.isEmpty()){return this}var dQ=dP;var dO=dl.Kernel.reverse(this);while(!dO.isEmpty()){dQ=dl.types.Cons.makeInstance(dO.first(),dQ);dO=dO.rest()}return dQ};dl.types.Cons.prototype.toWrittenString=function(){var dO=[];var dP=this;while(!dP.isEmpty()){dO.push(dl.Kernel.toWrittenString(dP.first()));dP=dP.rest()}return"("+dO.join(" ")+")"};dl.types.Cons.prototype.toDisplayedString=function(){var dO=[];var dP=this;while(!dP.isEmpty()){dO.push(dP.first().toDisplayedString());dP=dP.rest()}return"("+dO.join(" ")+")"};var dJ=function(dO,dP){dO.appendChild(dP)};dl.types.Cons.prototype.toDomNode=function(){var dO=document.createElement("div");dO.appendChild(document.createTextNode("("));var dP=this;while(!dP.isEmpty()){dJ(dO,dl.Kernel.toDomNode(dP.first()));dP=dP.rest();if(!dP.isEmpty()){dJ(dO,document.createTextNode(" "))}}dO.appendChild(document.createTextNode(")"));return dO};dl.types.Vector=function(dQ,dP){this.elts=new Array(dQ);if(dP){for(var dO=0;dO<dQ;dO++){this.elts[dO]=dP[dO]}}else{for(var dO=0;dO<dQ;dO++){this.elts[dO]=undefined}}};dl.types.Vector.makeInstance=function(dP,dO){return new dl.types.Vector(dP,dO)};dl.types.Vector.prototype.length=function(){return this.elts.length};dl.types.Vector.prototype.ref=function(dO){return this.elts[dO]};dl.types.Vector.prototype.set=function(dP,dO){this.elts[dP]=dO};dl.types.Vector.prototype.toWrittenString=function(){var dP=[];for(var dO=0;dO<this.length();dO++){dP.push(dl.Kernel.toWrittenString(this.ref(dO)))}return"#("+dP.join(" ")+")"};dl.types.Vector.prototype.toDisplayedString=function(){var dP=[];for(var dO=0;dO<this.length();dO++){dP.push(dl.Kernel.toDisplayedStringString(this.ref(dO)))}return"#("+dP.join(" ")+")"};dl.types.Vector.prototype.toDomNode=function(){var dP=document.createElement("div");dP.appendChild(document.createTextNode("#("));for(var dO=0;dO<this.length();dO++){dJ(dP,dl.Kernel.toDomNode(this.ref(dO)))}dP.appendChild(document.createTextNode(")"));return dP};var dL=function(dP,dO){var dQ;if(isNaN(dP)||!isFinite(dP)){throw new dl.Kernel.MobyRuntimeError("not a number: "+dP)}if(isNaN(dO)||!isFinite(dO)){throw new dl.Kernel.MobyRuntimeError("not a number: "+dO)}while(dO!=0){dQ=dP;dP=dO;dO=dQ%dO}return dP};dl.types.Rational=function(dQ,dO){if(dO==undefined){dO=1}if(dO==0){throw new dl.Kernel.MobyRuntimeError("cannot have zero denominator.")}var dP=dL(Math.abs(dQ),Math.abs(dO));this.n=dQ/dP;this.d=dO/dP};dl.types.Rational.prototype.toWrittenString=function(){if(this.d==1){return this.n+""}else{return this.n+"/"+this.d}};dl.types.Rational.prototype.toDisplayedString=dl.types.Rational.prototype.toWrittenString;dl.types.Rational.prototype.level=function(){return 0};dl.types.Rational.prototype.lift=function(dO){if(dO.level()==1){return dl.types.FloatPoint.makeInstance(this.n/this.d)}if(dO.level()==2){return dl.types.Complex.makeInstance(this,dl.types.Rational.ZERO)}throw new dl.Kernel.MobyRuntimeError("invalid level of Number")};dl.types.Rational.prototype.isFinite=function(){return true};dl.types.Rational.prototype.isEqual=function(dO){return dO instanceof dl.types.Rational&&this.n==dO.n&&this.d==dO.d};dl.types.Rational.prototype.isInteger=function(){return this.d==1};dl.types.Rational.prototype.isRational=function(){return true};dl.types.Rational.prototype.isReal=function(){return true};dl.types.Rational.prototype.add=function(dO){return dl.types.Rational.makeInstance(this.n*dO.d+this.d*dO.n,this.d*dO.d)};dl.types.Rational.prototype.subtract=function(dO){return dl.types.Rational.makeInstance((this.n*dO.d)-(this.d*dO.n),(this.d*dO.d))};dl.types.Rational.prototype.multiply=function(dO){return dl.types.Rational.makeInstance(this.n*dO.n,this.d*dO.d)};dl.types.Rational.prototype.divide=function(dO){if(this.d*dO.n==0){throw new dl.Kernel.MobyRuntimeError("division by zero")}return dl.types.Rational.makeInstance(this.n*dO.d,this.d*dO.n)};dl.types.Rational.prototype.toExact=function(){return this};dl.types.Rational.prototype.isExact=function(){return true};dl.types.Rational.prototype.toInteger=function(){return Math.floor(this.n/this.d)};dl.types.Rational.prototype.numerator=function(){return dl.types.Rational.makeInstance(this.n)};dl.types.Rational.prototype.denominator=function(){return dl.types.Rational.makeInstance(this.d)};dl.types.Rational.prototype.toFloat=function(){return this.n/this.d};dl.types.Rational.prototype.toComplex=function(){return dl.types.Complex.makeInstance(this,dl.types.Rational.ZERO)};dl.types.Rational.prototype.greaterThan=function(dO){return this.n*dO.d>this.d*dO.n};dl.types.Rational.prototype.greaterThanOrEqual=function(dO){return this.n*dO.d>=this.d*dO.n};dl.types.Rational.prototype.lessThan=function(dO){return this.n*dO.d<this.d*dO.n};dl.types.Rational.prototype.lessThanOrEqual=function(dO){return this.n*dO.d<=this.d*dO.n};dl.types.Rational.prototype.sqrt=function(){if(this.n>=0){var dP=Math.sqrt(this.n);var dO=Math.sqrt(this.d);if(Math.floor(dP)==dP&&Math.floor(dO)==dO){return dl.types.Rational.makeInstance(dP,dO)}else{return dl.types.FloatPoint.makeInstance(dP/dO)}}else{var dP=Math.sqrt(-this.n);var dO=Math.sqrt(this.d);if(Math.floor(dP)==dP&&Math.floor(dO)==dO){return dl.types.Complex.makeInstance(dl.types.Rational.ZERO,dl.types.Rational.makeInstance(dP,dO))}else{return dl.types.Complex.makeInstance(dl.types.Rational.ZERO,dl.types.FloatPoint.makeInstance(dP/dO))}}};dl.types.Rational.prototype.abs=function(){return dl.types.Rational.makeInstance(Math.abs(this.n),this.d)};dl.types.Rational.prototype.floor=function(){return dl.types.Rational.makeInstance(Math.floor(this.n/this.d),1)};dl.types.Rational.prototype.ceiling=function(){return dl.types.Rational.makeInstance(Math.ceil(this.n/this.d),1)};dl.types.Rational.prototype.conjugate=dl.types.Rational.prototype.abs;dl.types.Rational.prototype.magnitude=dl.types.Rational.prototype.abs;dl.types.Rational.prototype.log=function(){return dl.types.FloatPoint.makeInstance(Math.log(this.n/this.d))};dl.types.Rational.prototype.angle=function(){if(0==this.n){return dl.types.Rational.ZERO}if(this.n>0){return dl.types.Rational.ZERO}else{return dl.Kernel.pi}};dl.types.Rational.prototype.atan=function(){return dl.types.FloatPoint.makeInstance(Math.atan(this.n/this.d))};dl.types.Rational.prototype.cos=function(){return dl.types.FloatPoint.makeInstance(Math.cos(this.n/this.d))};dl.types.Rational.prototype.sin=function(){return dl.types.FloatPoint.makeInstance(Math.sin(this.n/this.d))};dl.types.Rational.prototype.expt=function(dO){return dl.types.FloatPoint.makeInstance(Math.pow(this.n/this.d,dO.n/dO.d))};dl.types.Rational.prototype.exp=function(){return dl.types.FloatPoint.makeInstance(Math.exp(this.n/this.d))};dl.types.Rational.prototype.acos=function(){return dl.types.FloatPoint.makeInstance(Math.acos(this.n/this.d))};dl.types.Rational.prototype.asin=function(){return dl.types.FloatPoint.makeInstance(Math.asin(this.n/this.d))};dl.types.Rational.prototype.imag_dash_part=function(){return dl.types.Rational.ZERO};dl.types.Rational.prototype.real_dash_part=function(){return this};dl.types.Rational.prototype.timesI=function(){return dl.types.Complex.makeInstance(dl.types.Rational.ZERO,this)};dl.types.Rational.prototype.round=function(){if(this.d==2){var dO=this.n/this.d;var dP=Math.floor(dO);var dQ=Math.ceil(dO);if(dP%2==0){return dl.types.Rational.makeInstance(dP)}else{return dl.types.Rational.makeInstance(dQ)}}else{return dl.types.Rational.makeInstance(Math.round(this.n/this.d))}};dl.types.Rational.prototype.half=function(){return dl.types.Rational.makeInstance(this.n,this.d*2)};dl.types.Rational.prototype.minus=function(){return dl.types.Rational.makeInstance(0-this.n,this.d)};var dK={};dl.types.Rational.makeInstance=function(dP,dO){if(dP==undefined){throw new dl.Kernel.MobyRuntimeError("n undefined")}if(dO==undefined){dO=1}if(dO<0){dP=-dP;dO=-dO}if(dO==1&&dP in dK){return dK[dP]}else{return new dl.types.Rational(dP,dO)}};dK={};(function(){var dO;for(dO=-500;dO<500;dO++){dK[dO]=new dl.types.Rational(dO,1)}})();dl.types.Rational.NEGATIVE_ONE=dK[-1];dl.types.Rational.ZERO=dK[0];dl.types.Rational.ONE=dK[1];dl.types.Rational.TWO=dK[2];dl.types.FloatPoint=function(dO){this.n=dO};dl.types.FloatPoint.makeInstance=function(dO){return new dl.types.FloatPoint(dO)};var dM=dl.types.FloatPoint.makeInstance(Number.NaN);var bf=dl.types.FloatPoint.makeInstance(Number.POSITIVE_INFINITY);var dF=dl.types.FloatPoint.makeInstance(Number.NEGATIVE_INFINITY);dl.types.FloatPoint.prototype.isFinite=function(){return isFinite(this.n)};dl.types.FloatPoint.prototype.toExact=function(){return dl.types.Rational.makeInstance(Math.floor(this.n),1)};dl.types.FloatPoint.prototype.isExact=function(){return false};dl.types.FloatPoint.prototype.level=function(){return 1};dl.types.FloatPoint.prototype.lift=function(dO){return dl.types.Complex.makeInstance(this,dl.types.Rational.ZERO)};dl.types.FloatPoint.prototype.toWrittenString=function(){if(this.n==Number.POSITIVE_INFINITY){return"+inf.0"}else{if(this.n==Number.NEGATIVE_INFINITY){return"-inf.0"}else{if(this.n==Number.NaN){return"+nan.0"}else{return this.n.toString()}}}};dl.types.FloatPoint.prototype.toDisplayedString=dl.types.FloatPoint.prototype.toWrittenString;dl.types.FloatPoint.prototype.isEqual=function(dO){return((dO instanceof dl.types.FloatPoint)&&((this.n==dO.n)||(isNaN(this.n)&&isNaN(dO.n))))};dl.types.FloatPoint.prototype.isRational=function(){return this.isFinite()&&this.n==Math.floor(this.n)};dl.types.FloatPoint.prototype.isInteger=function(){return this.isFinite()&&this.n==Math.floor(this.n)};dl.types.FloatPoint.prototype.isReal=function(){return true};var dG=function(dO){if(dl.types.NumberTower.lessThan(dO,dl.types.Rational.ZERO)){return -1}else{if(dl.types.NumberTower.greaterThan(dO,dl.types.Rational.ZERO)){return 1}else{return 0}}};dl.types.FloatPoint.prototype.add=function(dO){if(this.isFinite()&&dO.isFinite()){return dl.types.FloatPoint.makeInstance(this.n+dO.n)}else{if(isNaN(this.n)||isNaN(dO.n)){return dM}else{if(this.isFinite()&&!dO.isFinite()){return dO}else{if(!this.isFinite()&&dO.isFinite()){return this}else{return((dG(this)*dG(dO)==1)?this:dM)}}}}};dl.types.FloatPoint.prototype.subtract=function(dO){if(this.isFinite()&&dO.isFinite()){return dl.types.FloatPoint.makeInstance(this.n-dO.n)}else{if(isNaN(this.n)||isNaN(dO.n)){return dM}else{if(!this.isFinite()&&!dO.isFinite()){if(dG(this)==dG(dO)){return dM}else{return this}}else{if(this.isFinite()){return dl.types.NumberTower.multiply(dO,dl.types.Rational.NEGATIVE_ONE)}else{return this}}}}};dl.types.FloatPoint.prototype.multiply=function(dO){if(this.n==0||dO.n==0){return dl.types.Rational.ZERO}if(this.isFinite()&&dO.isFinite()){return dl.types.FloatPoint.makeInstance(this.n*dO.n)}else{if(isNaN(this.n)||isNaN(dO.n)){return dM}else{return((dG(this)*dG(dO)==1)?bf:dF)}}};dl.types.FloatPoint.prototype.divide=function(dO){if(this.isFinite()&&dO.isFinite()){if(dO.n==0){throw new dl.Kernel.MobyRuntimeError("division by zero")}return dl.types.FloatPoint.makeInstance(this.n/dO.n)}else{if(isNaN(this.n)||isNaN(dO.n)){return dM}else{if(!this.isFinite()&&!dO.isFinite()){return dM}else{if(this.isFinite()&&!dO.isFinite()){return dl.types.FloatPoint.makeInstance(0)}else{if(!this.isFinite()&&dO.isFinite()){return((dG(this)*dG(dO)==1)?bf:dF)}}}}}};dl.types.FloatPoint.prototype.toInteger=function(){return Math.floor(this.n)};dl.types.FloatPoint.prototype.numerator=function(){var dP=this.n.toString();var dO=dP.match(/^(.*)\.(.*)$/);if(dO){return dl.types.FloatPoint.makeInstance(parseFloat(dO[1]+dO[2]))}else{return this}};dl.types.FloatPoint.prototype.denominator=function(){var dP=this.n.toString();var dO=dP.match(/^(.*)\.(.*)$/);if(dO){return dl.types.FloatPoint.makeInstance(Math.pow(10,dO[2].length))}else{return dl.types.FloatPoint.makeInstance(1)}};dl.types.FloatPoint.prototype.toFloat=function(){return this.n};dl.types.FloatPoint.prototype.toComplex=function(){return dl.types.Complex.makeInstance(this,dl.types.Rational.ZERO)};dl.types.FloatPoint.prototype.floor=function(){if(!isFinite(this.n)){return this}return dl.types.Rational.makeInstance(Math.floor(this.n),1)};dl.types.FloatPoint.prototype.ceiling=function(){if(!isFinite(this.n)){return this}return dl.types.Rational.makeInstance(Math.ceil(this.n),1)};dl.types.FloatPoint.prototype.greaterThan=function(dO){return this.n>dO.n};dl.types.FloatPoint.prototype.greaterThanOrEqual=function(dO){return this.n>=dO.n};dl.types.FloatPoint.prototype.lessThan=function(dO){return this.n<dO.n};dl.types.FloatPoint.prototype.lessThanOrEqual=function(dO){return this.n<=dO.n};dl.types.FloatPoint.prototype.sqrt=function(){if(this.n<0){var dO=dl.types.Complex.makeInstance(dl.types.Rational.ZERO,dl.types.FloatPoint.makeInstance(Math.sqrt(-this.n)));return dO}else{return dl.types.FloatPoint.makeInstance(Math.sqrt(this.n))}};dl.types.FloatPoint.prototype.abs=function(){return dl.types.FloatPoint.makeInstance(Math.abs(this.n))};dl.types.FloatPoint.prototype.log=function(){if(this.n<0){return this.toComplex().log()}else{return dl.types.FloatPoint.makeInstance(Math.log(this.n))}};dl.types.FloatPoint.prototype.angle=function(){if(0==this.n){return dl.types.Rational.ZERO}if(this.n>0){return dl.types.Rational.ZERO}else{return dl.Kernel.pi}};dl.types.FloatPoint.prototype.atan=function(){return dl.types.FloatPoint.makeInstance(Math.atan(this.n))};dl.types.FloatPoint.prototype.cos=function(){return dl.types.FloatPoint.makeInstance(Math.cos(this.n))};dl.types.FloatPoint.prototype.sin=function(){return dl.types.FloatPoint.makeInstance(Math.sin(this.n))};dl.types.FloatPoint.prototype.expt=function(dO){if(this.n==1){if(dO.isFinite()){return this}else{if(isNaN(dO.n)){return this}else{return this}}}else{return dl.types.FloatPoint.makeInstance(Math.pow(this.n,dO.n))}};dl.types.FloatPoint.prototype.exp=function(){return dl.types.FloatPoint.makeInstance(Math.exp(this.n))};dl.types.FloatPoint.prototype.acos=function(){return dl.types.FloatPoint.makeInstance(Math.acos(this.n))};dl.types.FloatPoint.prototype.asin=function(){return dl.types.FloatPoint.makeInstance(Math.asin(this.n))};dl.types.FloatPoint.prototype.imag_dash_part=function(){return dl.types.Rational.ZERO};dl.types.FloatPoint.prototype.real_dash_part=function(){return this};dl.types.FloatPoint.prototype.round=function(){if(isFinite(this.n)){if(Math.abs(Math.floor(this.n)-this.n)==0.5){if(Math.floor(this.n)%2==0){return dl.types.Rational.makeInstance(Math.floor(this.n))}return dl.types.Rational.makeInstance(Math.ceil(this.n))}else{return dl.types.Rational.makeInstance(Math.round(this.n))}}else{return this}};dl.types.FloatPoint.prototype.conjugate=dl.types.FloatPoint.prototype.abs;dl.types.FloatPoint.prototype.magnitude=dl.types.FloatPoint.prototype.abs;dl.types.FloatPoint.prototype.minus=function(){return dl.types.FloatPoint.makeInstance(0-this.n)};dl.types.FloatPoint.prototype.half=function(){return dl.types.FloatPoint.makeInstance(this.n/2)};dl.types.FloatPoint.prototype.timesI=function(){return dl.types.Complex.makeInstance(dl.types.Rational.ZERO,this)};dl.types.Complex=function(dP,dO){this.r=dP;this.i=dO};dl.types.Complex.makeInstance=function(dQ,dP){if(typeof(dQ)=="number"){dQ=(dQ==Math.floor(dQ)?dl.types.Rational.makeInstance(dQ):dl.types.FloatPoint.makeInstance(dQ))}if(typeof(dP)=="number"){dP=(dP==Math.floor(dP)?dl.types.Rational.makeInstance(dP):dl.types.FloatPoint.makeInstance(dP))}var dO=new dl.types.Complex(dQ,dP);return dO};dl.types.Complex.prototype.toWrittenString=function(){if(dl.types.NumberTower.greaterThanOrEqual(this.i,dl.types.Rational.ZERO)){return dl.Kernel.toWrittenString(this.r)+"+"+dl.Kernel.toWrittenString(this.i)+"i"}else{return dl.Kernel.toWrittenString(this.r)+dl.Kernel.toWrittenString(this.i)+"i"}};dl.types.Complex.prototype.toDisplayedString=dl.types.Complex.prototype.toWrittenString;dl.types.Complex.prototype.isFinite=function(){return this.r.isFinite()&&this.i.isFinite()};dl.types.Complex.prototype.isRational=function(){return this.r.isRational()&&dl.types.NumberTower.equal(this.i,dl.types.Rational.ZERO)};dl.types.Complex.prototype.isInteger=function(){return this.r.isInteger()&&dl.types.NumberTower.equal(this.i,dl.types.Rational.ZERO)};dl.types.Complex.prototype.toExact=function(){if(!this.isReal()){throw new dl.Kernel.MobyRuntimeError("inexact->exact: expects argument of type real number")}return this.r.toExact()};dl.types.Complex.prototype.isExact=function(){return this.r.isExact()&&this.i.isExact()};dl.types.Complex.prototype.level=function(){return 2};dl.types.Complex.prototype.lift=function(dO){throw new dl.Kernel.MobyRuntimeError("Don't know how to lift Complex number")};dl.types.Complex.prototype.isEqual=function(dP){var dO=((dP instanceof dl.types.Complex)&&(dl.types.NumberTower.equal(this.r,dP.r))&&(dl.types.NumberTower.equal(this.i,dP.i)));return dO};dl.types.Complex.prototype.greaterThan=function(dO){if(!this.isReal()||!dO.isReal()){throw new dl.Kernel.MobyRuntimeError(">: expects argument of type real number")}return dl.types.NumberTower.greaterThan(this.r,dO.r)};dl.types.Complex.prototype.greaterThanOrEqual=function(dO){if(!this.isReal()||!dO.isReal()){throw new dl.Kernel.MobyRuntimeError(">: expects argument of type real number")}return dl.types.NumberTower.greaterThanOrEqual(this.r,dO.r)};dl.types.Complex.prototype.lessThan=function(dO){if(!this.isReal()||!dO.isReal()){throw new dl.Kernel.MobyRuntimeError(">: expects argument of type real number")}return dl.types.NumberTower.lessThan(this.r,dO.r)};dl.types.Complex.prototype.lessThanOrEqual=function(dO){if(!this.isReal()||!dO.isReal()){throw new dl.Kernel.MobyRuntimeError(">: expects argument of type real number")}return dl.types.NumberTower.lessThanOrEqual(this.r,dO.r)};dl.types.Complex.prototype.abs=function(){if(!dl.types.NumberTower.equal(this.i,dl.types.Rational.ZERO).valueOf()){throw new dl.Kernel.MobyRuntimeError("abs: expects argument of type real number")}return this.r.abs()};dl.types.Complex.prototype.toInteger=function(){if(!dl.types.NumberTower.equal(this.i,dl.types.Rational.ZERO).valueOf()){throw new dl.Kernel.MobyRuntimeError("toInteger: expects argument of type real number")}return this.r.toInteger()};dl.types.Complex.prototype.numerator=function(){if(!this.isReal()){throw new dl.Kernel.MobyRuntimeError("numerator: can only be applied to real number")}return this.n.numerator()};dl.types.Complex.prototype.denominator=function(){if(!this.isReal()){throw new dl.Kernel.MobyRuntimeError("floor: can only be applied to real number")}return this.n.denominator()};dl.types.Complex.prototype.toFloat=function(){if(!dl.types.NumberTower.equal(this.i,dl.types.Rational.ZERO).valueOf()){throw new dl.Kernel.MobyRuntimeError("toFloat: expects argument of type real number")}return this.r.toFloat()};dl.types.Complex.prototype.toComplex=function(){return this};dl.types.Complex.prototype.add=function(dO){return dl.types.Complex.makeInstance(dl.types.NumberTower.add(this.r,dO.r),dl.types.NumberTower.add(this.i,dO.i))};dl.types.Complex.prototype.subtract=function(dO){return dl.types.Complex.makeInstance(dl.types.NumberTower.subtract(this.r,dO.r),dl.types.NumberTower.subtract(this.i,dO.i))};dl.types.Complex.prototype.multiply=function(dO){if(dO.isReal()){return dl.types.Complex.makeInstance(dl.types.NumberTower.multiply(this.r,dO.r),dl.types.NumberTower.multiply(this.i,dO.r))}var dQ=dl.types.NumberTower.subtract(dl.types.NumberTower.multiply(this.r,dO.r),dl.types.NumberTower.multiply(this.i,dO.i));var dP=dl.types.NumberTower.add(dl.types.NumberTower.multiply(this.r,dO.i),dl.types.NumberTower.multiply(this.i,dO.r));if(dl.types.NumberTower.equal(dP,dl.types.Rational.ZERO)){return dQ}return dl.types.Complex.makeInstance(dQ,dP)};dl.types.Complex.prototype.divide=function(dQ){if(dQ.isReal()){return dl.types.Complex.makeInstance(dl.types.NumberTower.divide(this.r,dQ.r),dl.types.NumberTower.divide(this.i,dQ.r))}var dR=dQ.conjugate();var dP=dl.types.NumberTower.multiply(this,dR).toComplex();var dS=dl.types.NumberTower.multiply(dQ,dR);var dO=dl.types.Complex.makeInstance(dl.types.NumberTower.divide(dP.r,dS),dl.types.NumberTower.divide(dP.i,dS));return dO};dl.types.Complex.prototype.conjugate=function(){var dO=dl.types.Complex.makeInstance(this.r,dl.types.NumberTower.subtract(dl.types.Rational.ZERO,this.i));return dO};dl.types.Complex.prototype.magnitude=function(){var dO=dl.types.NumberTower.add(dl.types.NumberTower.multiply(this.r,this.r),dl.types.NumberTower.multiply(this.i,this.i));return dO.sqrt()};dl.types.Complex.prototype.isReal=function(){return dl.types.NumberTower.equal(this.i,dl.types.Rational.ZERO)};dl.types.Complex.prototype.sqrt=function(){if(this.isReal()){return this.r.sqrt()}var dO=dl.types.NumberTower.add(this.magnitude(),this.r);var dQ=dO.half().sqrt();var dP=dl.types.NumberTower.divide(this.i,dl.types.NumberTower.multiply(dO,dl.types.FloatPoint.makeInstance(2)).sqrt());return dl.types.Complex.makeInstance(dQ,dP)};dl.types.Complex.prototype.log=function(){var dP=this.magnitude();var dQ=this.angle();var dO=dl.types.NumberTower.add(dP.log(),dQ.timesI());return dO};dl.types.Complex.prototype.angle=function(){if(this.isReal()){return this.r.angle()}if(dl.types.NumberTower.equal(dl.types.Rational.ZERO,this.r)){var dO=dl.Kernel.pi.half();return dl.types.NumberTower.greaterThan(this.i,dl.types.Rational.ZERO)?dO:dO.minus()}else{var dO=dl.types.NumberTower.divide(this.i.abs(),this.r.abs()).atan();if(dl.types.NumberTower.greaterThan(this.r,dl.types.Rational.ZERO)){return dl.types.NumberTower.greaterThan(this.i,dl.types.Rational.ZERO)?dO:dO.minus()}else{return dl.types.NumberTower.greaterThan(this.i,dl.types.Rational.ZERO)?dl.Kernel.pi.subtract(dO):dO.subtract(dl.Kernel.pi)}}};var dI=dl.types.Complex.makeInstance(dl.types.Rational.ZERO,dl.types.Rational.ONE);var dN=dl.types.Complex.makeInstance(dl.types.Rational.ZERO,dl.types.Rational.NEGATIVE_ONE);dl.types.Complex.prototype.atan=function(){if(dl.types.NumberTower.equal(this,dI)||dl.types.NumberTower.equal(this,dN)){return dl.types.FloatPoint.makeInstance(Number.NEGATIVE_INFINITY)}return dl.types.NumberTower.multiply(dI,dl.types.NumberTower.multiply(dl.types.FloatPoint.makeInstance(0.5),(dl.types.NumberTower.divide(dl.types.NumberTower.add(dI,this),dl.types.NumberTower.add(dI,dl.types.NumberTower.subtract(dl.types.Rational.ZERO,this)))).log()))};dl.types.Complex.prototype.cos=function(){if(this.isReal()){return this.r.cos()}var dP=this.timesI();var dO=dP.minus();return dl.types.NumberTower.add(dP.exp(),dO.exp()).half()};dl.types.Complex.prototype.sin=function(){if(this.isReal()){return this.r.sin()}var dS=this.timesI();var dR=dS.minus();var dQ=dl.types.Complex.makeInstance(dl.types.Rational.ZERO,dl.types.Rational.TWO);var dP=dl.types.NumberTower.subtract(dS.exp(),dR.exp());var dO=dl.types.NumberTower.divide(dP,dQ);return dO};dl.types.Complex.prototype.expt=function(dP){var dO=dl.types.NumberTower.multiply(dP,this.log());return dO.exp()};dl.types.Complex.prototype.exp=function(){var dQ=this.r.exp();var dO=this.i.cos();var dP=this.i.sin();return dl.types.NumberTower.multiply(dQ,dl.types.NumberTower.add(dO,dP.timesI()))};dl.types.Complex.prototype.acos=function(){if(this.isReal()){return this.r.acos()}var dQ=dl.Kernel.pi.half();var dR=this.timesI();var dP=dl.types.NumberTower.subtract(dl.types.Rational.ONE,this.multiply(this)).sqrt();var dO=dl.types.NumberTower.add(dR,dP).log().timesI();return dl.types.NumberTower.add(dQ,dO)};dl.types.Complex.prototype.asin=function(){if(this.isReal()){return this.r.asin()}var dQ=this.timesI();var dO=dl.types.NumberTower.subtract(dl.types.Rational.ONE,this.multiply(this)).sqrt();var dP=dl.types.NumberTower.add(dQ,dO).log().timesI().minus();throw new dl.Kernel.MobyRuntimeError("")};dl.types.Complex.prototype.ceiling=function(){if(!this.isReal()){throw new dl.Kernel.MobyRuntimeError("ceiling: can only be applied to real number")}return this.r.ceiling()};dl.types.Complex.prototype.floor=function(){if(!this.isReal()){throw new dl.Kernel.MobyRuntimeError("floor: can only be applied to real number")}return this.r.floor()};dl.types.Complex.prototype.imag_dash_part=function(){return this.i};dl.types.Complex.prototype.real_dash_part=function(){return this.r};dl.types.Complex.prototype.round=function(){return this.r.round()};dl.types.Complex.prototype.timesI=function(){return this.multiply(dl.types.Complex.makeInstance(dl.types.Rational.ZERO,dl.types.Rational.ONE))};dl.types.Complex.prototype.minus=function(){return dl.types.Complex.makeInstance(dl.types.NumberTower.subtract(dl.types.Rational.ZERO,this.r),dl.types.NumberTower.subtract(dl.types.Rational.ZERO,this.i))};dl.types.Complex.prototype.half=function(){return dl.types.Complex.makeInstance(this.r.half(),this.i.half())};dl.types.NumberTower={};dl.types.NumberTower.toInteger=function(dO){return dO.toInteger()};dl.types.NumberTower.toFloat=function(dO){return dO.toFloat()};dl.types.NumberTower.abs=function(dO){return dO.abs()};dl.types.NumberTower.isFinite=function(dO){return dO.isFinite()};dl.types.NumberTower.toExact=function(dO){return dO.toExact()};dl.types.NumberTower.add=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}return dO.add(dP)};dl.types.NumberTower.subtract=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}return dO.subtract(dP)};dl.types.NumberTower.multiply=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}return dO.multiply(dP)};dl.types.NumberTower.divide=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}return dO.divide(dP)};dl.types.NumberTower.equal=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}return dO.isEqual(dP)};dl.types.NumberTower.approxEqual=function(dO,dQ,dP){return dl.types.NumberTower.lessThan(dl.types.NumberTower.abs(dl.types.NumberTower.subtract(dO,dQ)),dP)};dl.types.NumberTower.greaterThanOrEqual=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}if(!(dO.isReal()&&dP.isReal())){throw new dl.Kernel.MobyRuntimeError("greaterThanOrEqual: couldn't be applied to complex number")}return dO.greaterThanOrEqual(dP)};dl.types.NumberTower.lessThanOrEqual=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}if(!(dO.isReal()&&dP.isReal())){throw new dl.Kernel.MobyRuntimeError("lessThanOrEqual: couldn't be applied to complex number")}return dO.lessThanOrEqual(dP)};dl.types.NumberTower.greaterThan=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}if(!(dO.isReal()&&dP.isReal())){throw new dl.Kernel.MobyRuntimeError("greaterThan: couldn't be applied to complex number")}return dO.greaterThan(dP)};dl.types.NumberTower.lessThan=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}if(!(dO.isReal()&&dP.isReal())){throw new dl.Kernel.MobyRuntimeError("lessThan: couldn't be applied to complex number")}return dO.lessThan(dP)};dl.types.NumberTower.modulo=function(dP,dQ){var dO=dl.types.Rational.makeInstance(dP.toInteger()%dQ.toInteger(),1);if(dl.types.NumberTower.lessThan(dQ,dl.types.Rational.ZERO)){if(dl.types.NumberTower.lessThanOrEqual(dO,dl.types.Rational.ZERO)){return dO}return dl.types.NumberTower.add(dO,dQ)}else{if(dl.types.NumberTower.lessThan(dO,dl.types.Rational.ZERO)){return dl.types.NumberTower.add(dO,dQ)}return dO}};dl.types.NumberTower.sqr=function(dO){return dl.types.NumberTower.multiply(dO,dO)};dl.types.NumberTower.expt=function(dO,dP){if(dO.level()<dP.level()){dO=dO.lift(dP)}if(dP.level()<dO.level()){dP=dP.lift(dO)}return dO.expt(dP)};dl.types.String=String;dl.types.String.makeInstance=function(dO){return dO.valueOf()};dl.types.String.prototype.isEqual=function(dO){return this==dO};dl.types.String.prototype.toWrittenString=function(){return'"'+this.replace(/["\\]/g,function(dP,dQ,dO){return"\\"+dP})+'"'};dl.types.String.prototype.toDisplayedString=function(){return this}})();var dl=dl||{};(function(){if(!Array.indexOf){Array.prototype.indexOf=function(es){for(var er=0;er<this.length;er++){if(this[er]==es){return er}}return -1}}var dI=function(et,er,es){if(et.addEventListener){et.addEventListener(er,es,false)}else{et.attachEvent("on"+er,es,false)}};var dS=function(et,er,es){if(et.addEventListener){et.removeEventListener(er,es,false)}else{et.detachEvent("on"+er,es,false)}};var d2=function(es){var er=function(){};er.prototype=es;return new er()};var d0=function(er){this.msg=er};d0.prototype.name="MobyError";d0.prototype.toString=function(){return this.name+": "+this.msg};var ep=function(es,er){d0.call(this,es);this.loc=er};ep.prototype=d2(d0.prototype);ep.prototype.name="MobyParserError";var ef=function(es,er){d0.call(this,es);this.stx=er};ef.prototype=d2(d0.prototype);ef.prototype.name="MobySyntaxError";var d9=function(er){d0.call(this,er)};d9.prototype=d2(d0.prototype);d9.prototype.name="MobyTypeError";var d5=function(er){d0.call(this,er)};d5.prototype=d2(d0.prototype);d5.prototype.name="MobyRuntimeError";var ej=function(er){d0.call(this,er)};ej.prototype=d2(d5.prototype);ej.prototype.name="MobyTestingError";var ec=function(es,er){while(er!=0){var et=es;es=er;er=et%er}return Math.abs(es)};var dH=function(es,er){return Math.abs(es*er/ec(es,er))};var eo=function(er){return(er!=null&&er!=undefined&&(er instanceof dl.types.Rational||er instanceof dl.types.FloatPoint||er instanceof dl.types.Complex))};var dL=function(er){return(er!=null&&er!=undefined&&er instanceof dl.types.Symbol)};var dR=function(er){return er!=null&&er!=undefined&&er instanceof dl.types.Char};var eg=function(er){return a8(er)};var dK=function(er){return typeof(er)=="string"};var d8=function(er){return(er==dl.types.Logic.TRUE||er==dl.types.Logic.FALSE)};var el=function(er){return er!=null&&er!=undefined&&er instanceof dl.types.Cons};var dU=function(er){return er!=null&&er!=undefined&&er instanceof dl.types.Empty};var en=function(er){return(eo(er)&&er.isReal())};var d6=function(er){return eo(er)&&er.isRational()};var d7=function(er){return eo(er)};var dT=function(er){return typeof(er)=="function"};var dP=function(er){return(eo(er)&&er.isInteger())};var dN=function(er){return eo(er)&&er.isInteger()&&er.toInteger()>=0};var dV=function(es){for(var er=0;er<es.length;er++){if(!((es[er]>="a"&&es[er]<="z")||(es[er]>="A"&&es[er]<="Z"))){return false}}return true};var ed=(function(){var er=new RegExp("^\\s*$");return function(es){return(es.match(er)?true:false)}}());var dF=function(er){return er!=null&&er!=undefined&&(er instanceof dl.types.Vector)};var dJ=function(er,et){for(var es=0;es<er.length;es++){et.apply(er[es],[er[es],es])}};var eb=function(ev,eu,er,et){if(!ev(eu,er).valueOf()){return false}if(et.length==0){return true}if(!ev(er,et[0]).valueOf()){return false}for(var es=0;es<et.length-1;es++){if(!ev(et[es],et[es+1]).valueOf()){return false}}return true};var dM=function(er,ev,et){var es;var eu=ev;for(es=0;es<et.length;es++){if(!(er(eu,et[es])).valueOf()){eu=et[es]}}return eu};var bf=function(er){return er!=null&&er!=undefined&&((er instanceof dl.types.Cons)||(er instanceof dl.types.Empty))};var d3=function(ev,es,er,eu){var et=["th","st","nd","rd","th","th","th","th"];return dl.Kernel.format("~a: expects type <~a> as ~a argument, given: ~s",[ev,es,er+et[Math.min(et.length-1,er)],eu])};var dZ=function(es,ev,eu,et,er){if(!ev(es)){throw new d9(d3(eu,et,er,es))}};var ea=function(es,et,er){if(!bf(es)){throw new d9(d3(et,"list",er,es))}};var ek=function(es,ev,eu,et,er){if(!bf(es)){throw new d9(d3(eu,"listof "+et,er,es))}while(!es.isEmpty()){if(!ev(es.first())){throw new d9(d3(eu,"listof "+et,er,es))}es=es.rest()}};var d1=function(eu,es,et,er){return function(ex,ev,ew){dZ(ex,eu,er,es,1);dZ(ev,eu,er,es,2);dJ(ew,function(ey,ez){dZ(ey,eu,er,es,ez+3)});return et(ex,ev,ew)}};var dO=function(es,er){return d1(eo,"number",function(ev,et,eu){return eb(es,ev,et,eu)},er)};var eq=function(es,er){return d1(dR,"char",function(ev,et,eu){return eb(es,ev,et,eu)},er)};var dQ=function(es,er){return d1(dK,"string",function(ev,et,eu){return eb(es,ev,et,eu)},er)};dl.Kernel={_heir:d2,pi:dl.types.FloatPoint.makeInstance(Math.PI),e:dl.types.FloatPoint.makeInstance(Math.E),Struct:function(es,er){this._constructorName=es;this._fields=er},struct_question_:function(er){return(er!=null&&er!=undefined&&er instanceof dl.Kernel.Struct)},number_question_:function(er){return eo(er)},equal_question_:function(er,es){if(dl.Kernel.number_question_(er)&&dl.Kernel.number_question_(es)){if("isEqual" in er){return dl.types.NumberTower.equal(er,es)}else{if("isEqual" in es){return dl.types.NumberTower.equal(es,er)}else{return(er==es)}}}else{return er.isEqual(es)}},equal_tilde__question_:function(er,et,es){dZ(es,eo,"equal~?","number",3);if(dl.Kernel.number_question_(er).valueOf()&&dl.Kernel.number_question_(et).valueOf()){if("isEqual" in er){return dl.types.NumberTower.approxEqual(er,et,es)}else{if("isEqual" in et){return dl.types.NumberTower.approxEqual(et,er,es)}else{return(er==et)}}}else{return er.isEqual(et)}},eq_question_:function(er,es){return(er==es)},eqv_question_:function(er,es){if(eo(er)&&eo(es)&&er.level()==es.level()){return dl.types.NumberTower.equal(er,es)}else{if(dR(er)&&dR(es)){return er.getValue()==es.getValue()}}return er===es},identity:function(er){return er},cons:function(er,es){ea(es,"cons",2);return dl.types.Cons.makeInstance(er,es)},first:function(er){ea(er,"first",1);return er.first()},rest:function(er){ea(er,"rest",1);return er.rest()},second:function(er){ea(er,"second",1);return er.rest().first()},third:function(er){ea(er,"third",1);return er.rest().rest().first()},fourth:function(er){ea(er,"fourth",1);return er.rest().rest().rest().first()},fifth:function(er){ea(er,"fifth",1);return er.rest().rest().rest().rest().first()},random:function(er){dZ(er,dP,"random","integer",1);return dl.types.Rational.makeInstance(Math.floor(dl.types.NumberTower.toInteger(er)*Math.random()),1)},current_dash_seconds:function(){return dl.types.Rational.makeInstance(new Date().getMilliseconds()/1000)},floor:function(er){dZ(er,eo,"floor","number",1);return er.floor()},ceiling:function(er){dZ(er,eo,"ceiling","number",1);return er.ceiling()},sqrt:function(er){dZ(er,eo,"sqrt","number",1);return er.sqrt()},integer_dash_sqrt:function(es){dZ(es,dP,"integer-sqrt","integer",1);var er=es.sqrt();if(d6(er)){return dl.types.Rational.makeInstance(er.toInteger())}else{if(en(er)){return dl.types.Rational.makeInstance(er.toInteger())}else{return dl.types.Complex.makeInstance(dl.types.Rational.makeInstance(dl.Kernel.real_dash_part(er).toInteger()),dl.types.Rational.makeInstance(dl.Kernel.imag_dash_part(er).toInteger()))}}},sqr:function(er){dZ(er,eo,"sqr","number",1);return dl.types.NumberTower.sqr(er)},sin:function(er){dZ(er,eo,"sin","number",1);return er.sin()},cos:function(er){dZ(er,eo,"cos","number",1);return er.cos()},modulo:function(er,es){dZ(er,eo,"modulo","number",1);dZ(es,eo,"modulo","number",2);return dl.types.NumberTower.modulo(er,es)},zero_question_:function(er){dZ(er,eo,"zero?","number",1);return dl.types.NumberTower.equal(er,dl.types.Rational.ZERO)},_equal__tilde_:function(er,et,es){dZ(er,eo,"=~","number",1);dZ(et,eo,"=~","number",2);dZ(es,eo,"=~","number",3);return dl.types.NumberTower.approxEqual(er,et,es)},abs:function(er){dZ(er,eo,"abs","number",1);return dl.types.NumberTower.abs(er)},add1:function(er){dZ(er,eo,"add1","number",1);return dl.types.NumberTower.add(er,dl.types.Rational.ONE)},sub1:function(er){dZ(er,eo,"sub1","number",1);return dl.types.NumberTower.subtract(er,dl.types.Rational.ONE)},_plus_:function(er){dJ(er,function(eu,ev){dZ(eu,eo,"+","number",ev+1)});var es,et=dl.types.Rational.ZERO;for(es=0;es<er.length;es++){et=dl.types.NumberTower.add(et,er[es])}return et},_dash_:function(eu,er){dZ(eu,eo,"-","number",1);dJ(er,function(ev,ew){dZ(ev,eo,"-","number",ew+2)});if(er.length==0){return dl.types.NumberTower.subtract(dl.types.Rational.ZERO,eu)}var es,et=eu;for(es=0;es<er.length;es++){et=dl.types.NumberTower.subtract(et,er[es])}return et},_star_:function(es){dJ(es,function(eu,ev){dZ(eu,eo,"*","number",ev+1)});var et,er=dl.types.Rational.ONE;for(et=0;et<es.length;et++){er=dl.types.NumberTower.multiply(er,es[et])}return er},_slash_:function(et,er){dZ(et,eo,"/","number",1);dJ(er,function(ev,ew){dZ(ev,eo,"/","number",ew+2)});var es,eu=et;if(er.length==0){return dl.types.NumberTower.divide(dl.types.Rational.ONE,eu)}else{for(es=0;es<er.length;es++){eu=dl.types.NumberTower.divide(eu,er[es])}return eu}},_equal_:dO(dl.types.NumberTower.equal,"="),_greaterthan__equal_:dO(dl.types.NumberTower.greaterThanOrEqual,">="),_lessthan__equal_:dO(dl.types.NumberTower.lessThanOrEqual,"<="),_greaterthan_:dO(dl.types.NumberTower.greaterThan,">"),_lessthan_:dO(dl.types.NumberTower.lessThan,"<"),min:function(es,er){dZ(es,eo,"min","number",1);dJ(er,function(et,eu){dZ(this,eo,"min","number",eu+2)});return dM(dl.types.NumberTower.lessThanOrEqual,es,er)},max:function(es,er){dZ(es,eo,"max","number",1);dJ(er,function(et,eu){dZ(this,eo,"max","number",eu+2)});return dM(dl.types.NumberTower.greaterThanOrEqual,es,er)},lcm:function(eu,et){dZ(eu,dP,"lcm","number",1);dJ(et,function(ev,ew){dZ(this,dP,"lcm","number",ew+2)});var er=Math.abs(eu.toInteger());if(er==0){return dl.types.Rational.ZERO}for(var es=0;es<et.length;es++){if(et[es].toInteger()==0){return dl.types.Rational.ZERO}er=dH(er,et[es].toInteger())}return dl.types.Rational.makeInstance(er)},gcd:function(eu,et){dZ(eu,dP,"gcd","number",1);dJ(et,function(ev,ew){dZ(this,dP,"gcd","number",ew+2)});var er=Math.abs(eu.toInteger());for(var es=0;es<et.length;es++){er=ec(er,et[es].toInteger())}return dl.types.Rational.makeInstance(er)},exact_dash__greaterthan_inexact:function(er){dZ(er,eo,"exact->inexact","number",1);return dl.types.FloatPoint.makeInstance(er.toFloat())},inexact_dash__greaterthan_exact:function(er){dZ(er,eo,"inexact->exact","number",1);return dl.types.NumberTower.toExact(er)},exact_question_:function(er){dZ(er,eo,"exact?","number",1);return er.isExact()},inexact_question_:function(er){dZ(er,eo,"inexact?","number",1);return !er.isExact()},rational_question_:function(er){return(dl.Kernel.number_question_(er)&&er.isRational())},number_dash__greaterthan_string:function(er){dZ(er,eo,"number->string","number",1);return dl.types.String.makeInstance(dl.Kernel.toWrittenString(er))},conjugate:function(er){dZ(er,eo,"conjugate","number",1);return er.conjugate()},magnitude:function(er){dZ(er,eo,"magnitude","number",1);return er.magnitude()},log:function(er){dZ(er,eo,"log","number",1);return er.log()},angle:function(er){dZ(er,eo,"angle","number",1);return er.angle()},atan:function(er,es){if(es.length==0){dZ(er,eo,"atan","number",1);return er.atan()}else{if(es.length==1){dZ(er,en,"atan","number",1);dZ(es[0],en,"atan","number",2);return dl.types.FloatPoint.makeInstance(Math.atan2(dl.types.NumberTower.toFloat(er),dl.types.NumberTower.toFloat(es[0])))}else{throw new d5(dl.Kernel.format("atan: expects 1 to 2 arguments, given ~a.",[dl.types.Rational.makeInstance(es.length)]))}}},expt:function(er,es){dZ(er,eo,"expt","number",1);dZ(es,eo,"expt","number",2);return dl.types.NumberTower.expt(er,es)},exp:function(er){dZ(er,eo,"exp","number",1);return er.exp()},acos:function(er){dZ(er,eo,"acos","number",1);return er.acos()},asin:function(er){dZ(er,eo,"asin","number",1);return er.asin()},tan:function(er){dZ(er,eo,"tan","number",1);return dl.types.NumberTower.divide(er.sin(),er.cos())},complex_question_:function(er){return d7(er)},cosh:function(er){dZ(er,eo,"cosh","number",1);return this._plus_([this.exp(er),this.exp(er.minus())]).half()},sinh:function(er){dZ(er,eo,"sinh","number",1);return dl.types.NumberTower.subtract(this.exp(er),this.exp(er.minus())).half()},denominator:function(er){dZ(er,d6,"denominator","rational",1);return er.denominator()},numerator:function(er){dZ(er,d6,"numerator","rational",1);return er.numerator()},odd_question_:function(er){dZ(er,eo,"odd?","number",1);return(Math.abs((er.toInteger()%2))==1)},even_question_:function(er){dZ(er,eo,"even?","number",1);return(Math.abs((er.toInteger()%2))==0)},positive_question_:function(er){dZ(er,eo,"positive?","number",1);return this._greaterthan_(er,dl.types.Rational.ZERO,[])},negative_question_:function(er){dZ(er,eo,"negative?","number",1);return this._lessthan_(er,dl.types.Rational.ZERO,[])},imag_dash_part:function(er){dZ(er,eo,"imag-part","number",1);return er.imag_dash_part()},real_dash_part:function(er){dZ(er,eo,"real-part","number",1);return er.real_dash_part()},make_dash_polar:function(et,es){if(dl.types.NumberTower.equal(es,dl.types.Rational.ZERO)){return et}var er=dl.types.NumberTower.multiply(et,es.cos());var eu=dl.types.NumberTower.multiply(et,es.sin());return dl.types.Complex.makeInstance(er,eu)},integer_question_:function(er){return(dP(er))},make_dash_rectangular:function(er,es){return dl.types.Complex.makeInstance(er,es)},quotient:function(er,et){dZ(er,dP,"quotient","integer",1);dZ(et,dP,"quotient","integer",2);var es=dl.types.NumberTower.divide(er,et);if(dl.Kernel.positive_question_(es)){return dl.types.Rational.makeInstance(es.floor().toInteger(),1)}else{return dl.types.Rational.makeInstance(es.ceiling().toInteger(),1)}},remainder:function(er,es){dZ(er,eo,"remainder","number",1);dZ(es,eo,"remainder","number",2);return dl.types.Rational.makeInstance(er.toInteger()%es.toInteger(),1)},real_question_:function(er){return en(er)},round:function(er){dZ(er,eo,"round","number",1);return er.round()},sgn:function(er){dZ(er,eo,"sgn","number",1);if(this.positive_question_(er).valueOf()){return dl.types.Rational.ONE}if(this.negative_question_(er).valueOf()){return dl.types.Rational.NEGATIVE_ONE}else{return dl.types.Rational.ZERO}},boolean_equal__question_:function(er,es){dZ(er,d8,"boolean=?","boolean",1);dZ(es,d8,"boolean=?","boolean",2);return er==es},boolean_question_:function(er){return d8(er)},false_question_:function(er){return(er==dl.types.Logic.FALSE)},not:function(er){if(!er||er===dl.types.Logic.FALSE){return dl.types.Logic.TRUE}return dl.types.Logic.FALSE},symbol_dash__greaterthan_string:function(er){dZ(er,dL,"symbol->string","symbol",1);return dl.types.String.makeInstance(er.val)},symbol_equal__question_:function(er,es){dZ(er,dL,"symbol=?","symbol",1);dZ(es,dL,"symbol=?","symbol",2);return(er.val==es.val)},symbol_question_:function(er){return dL(er)},append:function(eu,et){ea(eu,"append",1);var er=eu;var es;for(es=0;es<et.length;es++){ea(et[es],"append",es+2);er=er.append(et[es])}return er},reverse:function(er){ea(er,"reverse",1);var es=dl.types.Empty.EMPTY;while(!er.isEmpty()){es=dl.types.Cons.makeInstance(er.first(),es);er=er.rest()}return es},assq:function(es,er){ea(er,"assq",2);while(!er.isEmpty()&&!dl.Kernel.eq_question_(es,er.first().first())){er=er.rest()}if(er.isEmpty()){return dl.types.Logic.FALSE}else{return er.first()}},caaar:function(er){ea(er,"caaar",1);return er.first().first().first()},caadr:function(er){ea(er,"caadr",1);return er.first().first().rest()},caar:function(er){ea(er,"caar",1);return er.first().first()},cadar:function(er){ea(er,"cadar",1);return er.first().rest().first()},cadddr:function(er){ea(er,"cadddr",1);return er.rest().rest().rest().first()},caddr:function(er){ea(er,"caddr",1);return er.rest().rest().first()},cadr:function(er){ea(er,"cadr",1);return er.rest().first()},car:function(er){ea(er,"car",1);return er.first()},cdaar:function(er){ea(er,"cdaar",1);return er.first().first().rest()},cdadr:function(er){ea(er,"cdadr",1);return er.rest().first().rest()},cdar:function(er){ea(er,"cdar",1);return er.first().rest()},cddar:function(er){ea(er,"cddar",1);return er.first().rest().rest()},cdddr:function(er){ea(er,"cdddr",1);return er.rest().rest().rest()},cddr:function(er){ea(er,"cddr",1);return er.rest().rest()},cdr:function(er){ea(er,"cdr",1);return er.rest()},null_question_:function(er){return dU(er)},empty_question_:function(er){return dU(er)},pair_question_:function(er){return el(er)},cons_question_:function(er){return el(er)},sixth:function(er){ea(er,"sixth",1);return er.rest().rest().rest().rest().rest().first()},seventh:function(er){ea(er,"seventh",1);return er.rest().rest().rest().rest().rest().rest().first()},eighth:function(er){ea(er,"eighth",1);return er.rest().rest().rest().rest().rest().rest().rest().first()},set_dash_car_bang_:function(er,es){ea(er,"set-car!",1);er.f=es;return undefined},set_dash_cdr_bang_:function(er,es){ea(er,"set-cdr!",1);ea(es,"set-cdr!",2);er.r=es;return undefined},length:function(er){ea(er,"length",1);var es=dl.types.Rational.ZERO;for(;!er.isEmpty();er=er.rest()){es=dl.Kernel.add1(es)}return es},list:function(er){var es=dl.types.Empty.EMPTY;for(var et=er.length-1;et>=0;et--){es=dl.types.Cons.makeInstance(er[et],es)}return es},list_star_:function(er,et){var es=et.pop();if(es==undefined||!es instanceof dl.types.Cons){throw new d9("list*: "+es+" not a list")}et.unshift(er);return dl.Kernel.append(dl.Kernel.list(et),[es])},list_dash_ref:function(es,er){ea(es,"list-ref",1);dZ(er,dN,"list-ref","natural",2);var et=dl.types.Rational.ZERO;for(;dl.Kernel._lessthan_(et,er,[]);et=dl.Kernel.add1(et)){if(es.isEmpty()){throw new d5("list-ref: index too small")}else{es=es.rest()}}return es.first()},remove:function(eu,es){ea(es,"member",2);var et=es;var er=dl.types.Empty.EMPTY;while(!es.isEmpty()){if(dl.Kernel.equal_question_(eu,es.first()).valueOf()){return dl.Kernel.append(dl.Kernel.reverse(er),[es.rest()])}else{er=dl.types.Cons.makeInstance(es.first(),er);es=es.rest()}}return et},member:function(es,er){ea(er,"member",2);while(!er.isEmpty()){if(dl.Kernel.equal_question_(es,er.first()).valueOf()){return dl.types.Logic.TRUE}er=er.rest()}return dl.types.Logic.FALSE},memq:function(es,er){ea(er,"memq",2);while(!er.isEmpty()){if(dl.Kernel.eq_question_(es,er.first()).valueOf()){return er}er=er.rest()}return dl.types.Logic.FALSE},memv:function(es,er){ea(er,"memv",2);while(!er.isEmpty()){if(dl.Kernel.eqv_question_(es,er.first()).valueOf()){return er}er=er.rest()}return dl.types.Logic.FALSE},memf:function(es,er){dZ(es,dT,"memf","function",1);ea(er,"memf",2);while(!er.isEmpty()){if(es([er.first()])){return er}er=er.rest()}return dl.types.Logic.FALSE},compose:function(er){return function(es){var eu=es;for(var et=er.length-1;et>=0;et--){eu=[er[et](eu)]}return eu[0]}},string_dash__greaterthan_number:function(eu){dZ(eu,dK,"string->number","string",1);try{var es=dl.reader.readSchemeExpressions(eu,"");if(dl.types.NumberTower.equal(dl.Kernel.length(es),dl.types.Rational.ONE)){var er=b2(es.first());if(eo(er)){return er}else{return dl.types.Logic.FALSE}}else{return dl.types.Logic.FALSE}}catch(et){return dl.types.Logic.FALSE}},string_dash__greaterthan_symbol:function(er){dZ(er,dK,"string->symbol","string",1);return dl.types.Symbol.makeInstance(er)},string_dash__greaterthan_int:function(er){dZ(er,dK,"string->int","string",1);return dl.types.Rational.makeInstance(er.toString().charCodeAt(0),1)},string_dash_append:function(er){dJ(er,function(es,et){dZ(es,dK,"string-append","string",et+1)});return dl.types.String.makeInstance(er.join(""))},replicate:function(eu,et){dZ(eu,dN,"replicate","natural",1);dZ(et,dK,"replicate","string",2);var er=[];for(var es=0;es<eu.toInteger();es++){er.push(et)}return dl.types.String.makeInstance(er.join(""))},string_equal__question_:dQ(function(er,es){return er==es},"string=?"),string_lessthan__equal__question_:dQ(function(er,es){return er<=es},"string<=?"),string_lessthan__question_:dQ(function(er,es){return er<es},"string<?"),string_greaterthan__equal__question_:dQ(function(er,es){return er>=es},"string>=?"),string_greaterthan__question_:dQ(function(er,es){return er>es},"string>?"),string_dash_ci_equal__question_:dQ(function(er,es){return er.toUpperCase()==es.toUpperCase()},"string-ci=?"),string_dash_ci_lessthan__equal__question_:dQ(function(er,es){return er.toUpperCase()<=es.toUpperCase()},"string-ci<=?"),string_dash_ci_lessthan__question_:dQ(function(er,es){return er.toUpperCase()<es.toUpperCase()},"string-ci<?"),string_dash_ci_greaterthan__question_:dQ(function(er,es){return er.toUpperCase()>es.toUpperCase()},"string-ci>?"),string_dash_ci_greaterthan__equal__question_:dQ(function(er,es){return er.toUpperCase()>=es.toUpperCase()},"string-ci>=?"),string_dash_copy:function(er){dZ(er,dK,"string-copy","string",1);return er.substring(0,er.length)},string_dash_length:function(er){dZ(er,dK,"string-length","string",1);return dl.types.Rational.makeInstance(er.length,1)},string_dash_ref:function(es,er){dZ(es,dK,"string-ref","string",1);dZ(er,dN,"string-ref","natural",2);if(er.toInteger()>=es.length){throw new d5("string-ref: index >= length")}return dl.types.String.makeInstance(es.charAt(er.toInteger()))},string_dash_ith:function(es,er){dZ(es,dK,"string-ith","string",1);dZ(er,dN,"string-ith","natural",2);if(er.toInteger()>=es.length){throw new d5("string-ith: index >= string length")}return dl.types.String.makeInstance(es.substring(er.toInteger(),er.toInteger()+1))},int_dash__greaterthan_string:function(er){dZ(er,dP,"int->string","integer",1);return dl.types.String.makeInstance(String.fromCharCode(er.toInteger()))},string_question_:function(er){return dK(er)},substring:function(et,es,er){dZ(et,dK,"substring","string",1);dZ(es,dN,"substring","natural",2);dZ(er,dN,"substring","natural",3);if(es.toInteger()>er.toInteger()){throw new d5("substring: begin > end")}if(er.toInteger()>et.length){throw new d5("substring: end > length")}return String.makeInstance(et.substring(es.toInteger(),er.toInteger()))},char_question_:function(er){return dR(er)},char_dash__greaterthan_integer:function(er){dZ(er,dR,"char->integer","char",1);var es=new String(er.val);return dl.types.Rational.makeInstance(es.charCodeAt(0),1)},integer_dash__greaterthan_char:function(es){dZ(es,dP,"integer->char","integer",1);var er=String.fromCharCode(es.toInteger());return dl.types.Char.makeInstance(er)},char_equal__question_:eq(function(er,es){return er.val==es.val},"char=?"),char_lessthan__question_:eq(function(er,es){return er.val<es.val},"char<?"),char_lessthan__equal__question_:eq(function(er,es){return er.val<=es.val},"char<=?"),char_greaterthan__question_:eq(function(er,es){return er.val>es.val},"char>?"),char_greaterthan__equal__question_:eq(function(er,es){return er.val>=es.val},"char>=?"),char_dash_ci_equal__question_:eq(function(er,es){return er.val.toUpperCase()==es.val.toUpperCase()},"char-ci=?"),char_dash_ci_lessthan__question_:eq(function(er,es){return er.val.toUpperCase()<es.val.toUpperCase()},"char-ci<?"),char_dash_ci_lessthan__equal__question_:eq(function(er,es){return er.val.toUpperCase()<=es.val.toUpperCase()},"char-ci<=?"),char_dash_ci_greaterthan__question_:eq(function(er,es){return er.val.toUpperCase()>es.val.toUpperCase()},"char-ci>?"),char_dash_ci_greaterthan__equal__question_:eq(function(er,es){return er.val.toUpperCase()>=es.val.toUpperCase()},"char-ci>=?"),char_dash_numeric_question_:function(er){dZ(er,dR,"char-numeric?","char",1);var es=er.val;return(es>="0"&&es<="9")},char_dash_alphabetic_question_:function(er){dZ(er,dR,"char-alphabetic?","char",1);var es=er.val;return dV(es)},char_dash_whitespace_question_:function(er){dZ(er,dR,"char-whitespace?","char",1);var es=er.val;return ed(es)},char_dash_upper_dash_case_question_:function(er){dZ(er,dR,"char-upper-case?","char",1);return dV(er.val)&&er.val.toUpperCase()==er.val},char_dash_lower_dash_case_question_:function(er){dZ(er,dR,"char-lower-case?","char",1);return dV(er.val)&&er.val.toLowerCase()==er.val},char_dash_upcase:function(er){dZ(er,dR,"char-upcase","char",1);return dl.types.Char.makeInstance(er.val.toUpperCase())},char_dash_downcase:function(er){dZ(er,dR,"char-downcase","char",1);return dl.types.Char.makeInstance(er.val.toLowerCase())},list_dash__greaterthan_string:function(er){ek(er,dR,"list->string","char",1);var es="";while(!er.isEmpty()){es+=er.first().val;er=er.rest()}return dl.types.String.makeInstance(es)},implode:function(er){ek(er,dK,"implode","string",1);var es=[];while(!er.isEmpty()){es.push(er.first().toString());er=er.rest()}return dl.types.String.makeInstance(es.join(""))},string_dash_numeric_question_:function(es){dZ(es,dK,"string-numeric?","string",1);for(var er=0;er<es.length;er++){if(es[er]<"0"||es[er]>"9"){return dl.types.Logic.FALSE}}return dl.types.Logic.TRUE},string_dash_alphabetic_question_:function(er){dZ(er,dK,"string-alphabetic?","string",1);return dV(er)?dl.types.Logic.TRUE:dl.types.Logic.FALSE},string_dash_whitespace_question_:function(er){dZ(er,dK,"string-whitespace?","string",1);return ed(er)?dl.types.Logic.TRUE:dl.types.Logic.FALSE},string_dash_upper_dash_case_question_:function(er){dZ(er,dK,"string-upper-case?","string",1);return dV(er)&&er.toUpperCase()==er},string_dash_lower_dash_case_question_:function(er){dZ(er,dK,"string-lower-case?","string",1);return dV(er)&&er.toLowerCase()==er},string:function(et){dJ(et,function(eu,ev){dZ(this,dR,"string","char",ev+1)});var er=[];for(var es=0;es<et.length;es++){er.push(et[es].val)}return String.makeInstance(er.join(""))},make_dash_string:function(ev,et){dZ(ev,dN,"make-string","natural",1);dZ(et,dR,"make-string","char",2);var er="";var eu=et.val;var es=dl.types.Rational.ZERO;for(;dl.Kernel._lessthan_(es,ev,[]);es=dl.Kernel.add1(es)){er+=eu}return dl.types.String.makeInstance(er)},string_dash__greaterthan_list:function(eu){dZ(eu,dK,"string->list","string",1);var et=eu;var er=dl.types.Empty.EMPTY;for(var es=et.length-1;es>=0;es--){er=dl.types.Cons.makeInstance(dl.types.Char.makeInstance(et.charAt(es)),er)}return er},explode:function(eu){dZ(eu,dK,"explode","string",1);var et=eu;var er=dl.types.Empty.EMPTY;for(var es=et.length-1;es>=0;es--){er=dl.types.Cons.makeInstance(dl.types.String.makeInstance(et.charAt(es)),er)}return er}};dl.Kernel._dumpKernelSymbols=function(){var er=dl.types.Empty.EMPTY;for(var es in dl.Kernel){er=dl.types.Cons.makeInstance(dl.types.Symbol.makeInstance(es),er)}return er};dl.Kernel.openInputStx=function(er){throw new d5("open-input-stx currently unsupported")};var dX=function(er){this.hash=new dl._Hashtable()};dX.prototype.toWrittenString=function(){return"<hash>"};dX.prototype.toDisplayedString=function(){return"<hash>"};dX.prototype.isEqual=function(er){return this===er};dl.Kernel.makeHashEq=function(){var er=new dX();return er};dl.Kernel.hashSetBang=function(es,er,et){dZ(es,dW,"hash-set!","hash",1);es.hash.put(er,et);return undefined};dl.Kernel.hashRef=function(es,er,et){dZ(es,dW,"hash-ref","hash",1);if(es.hash.containsKey(er)){return es.hash.get(er)}else{if(dT(et)){return et([])}return et}};dl.Kernel.hashRemoveBang=function(es,er){dZ(es,dW,"hash-remove!","hash",1);es.hash.remove(er);return undefined};dl.Kernel.hashMap=function(es,ev){dZ(es,dW,"hash-map","hash",1);var er=dl.types.Empty.EMPTY;var eu=es.hash.keys();for(var et=0;et<eu.length;et++){var ew=es.hash.get(eu[et]);er=dl.Kernel.cons(ev([eu[et],ew]),er)}return er};var dW=function(er){return((er!=null)&&(er!=undefined)&&(er instanceof dX))};dl.Kernel.isHash=dW;dl.Kernel.apply=function(ew,ev,er){var eu;var et=[];dZ(ew,dT,"apply","function",1);if(er.length==0){eu=ev;ea(eu,"apply",2);while(!eu.isEmpty()){var es=eu.first();et.push(es);eu=eu.rest()}}else{eu=er.pop();ea(eu,"apply",3);while(!eu.isEmpty()){var es=eu.first();et.push(es);eu=eu.rest()}while(er.length>0){et.unshift(er.pop())}et.unshift(ev)}return ew(et)};dl.Kernel.map=function(eu,ev){dZ(eu,dT,"map","function",1);dJ(ev,function(ew,ex){ea(ew,"map",ex+2)});var et=dl.types.Empty.EMPTY;while(!ev[0].isEmpty()){var er=[];for(var es=0;es<ev.length;es++){er.push(ev[es].first());ev[es]=ev[es].rest()}et=dl.Kernel.cons(eu(er),et)}return dl.Kernel.reverse(et)};dl.Kernel.for_dash_each=function(et,eu){dZ(et,dT,"for-each","function",1);dJ(eu,function(ev,ew){ea(ev,"for-each",ew+2)});while(!eu[0].isEmpty()){var er=[];for(var es=0;es<eu.length;es++){er.push(eu[es].first());eu[es]=eu[es].rest()}et(er)}return undefined};dl.Kernel.andmap=function(et,eu){dZ(et,dT,"andmap","function",1);dJ(eu,function(ev,ew){ea(ev,"andmap",ew+2)});while(!eu[0].isEmpty()){var er=[];for(var es=0;es<eu.length;es++){er.push(eu[es].first());eu[es]=eu[es].rest()}if(!et(er)){return dl.types.Logic.FALSE}}return dl.types.Logic.TRUE};dl.Kernel.ormap=function(et,eu){dZ(et,dT,"ormap","function",1);dJ(eu,function(ev,ew){ea(ev,"ormap",ew+2)});while(!eu[0].isEmpty()){var er=[];for(var es=0;es<eu.length;es++){er.push(eu[es].first());eu[es]=eu[es].rest()}if(et(er)){return dl.types.Logic.TRUE}}return dl.types.Logic.FALSE};dl.Kernel.filter=function(es,et){dZ(es,dT,"filter","function",1);dZ(et,bf,"filter","list",2);var er=dl.types.Empty.EMPTY;while(!et.isEmpty()){if(es([et.first()])){er=dl.types.Cons.makeInstance(et.first(),er)}et=et.rest()}return dl.Kernel.reverse(er)};dl.Kernel.foldl=function(ev,eu,ew){dZ(ev,dT,"foldl","function",1);dJ(ew,function(ex,ey){dZ(ex,bf,"foldl","list",ey+3)});var er=eu;while(!ew[0].isEmpty()){var es=[];for(var et=0;et<ew.length;et++){es.push(ew[et].first());ew[et]=ew[et].rest()}es.push(er);er=ev(es)}return er};dl.Kernel.foldr=function(ev,eu,ew){dZ(ev,dT,"foldr","function",1);dJ(ew,function(ex,ey){dZ(ex,bf,"foldr","list",ey+3)});var er=eu;for(var et=0;et<ew.length;et++){ew[et]=dl.Kernel.reverse(ew[et])}while(!ew[0].isEmpty()){var es=[];for(var et=0;et<ew.length;et++){es.push(ew[et].first());ew[et]=ew[et].rest()}es.push(er);er=ev(es)}return er};dl.Kernel.argmin=function(et,ev){dZ(et,dT,"argmin","function",1);dZ(ev,el,"argmin","nonempty list",2);var es=ev.first();var er=et([ev.first()]).toFloat();ev=ev.rest();while(!ev.isEmpty()){var eu=et([ev.first()]).toFloat();if(eu<er){es=ev.first();er=eu}ev=ev.rest()}return es};dl.Kernel.argmax=function(et,ev){dZ(et,dT,"argmax","function",1);dZ(ev,el,"argmax","nonempty list",2);var es=ev.first();var er=et([ev.first()]).toFloat();ev=ev.rest();while(!ev.isEmpty()){var eu=et([ev.first()]).toFloat();if(eu>er){es=ev.first();er=eu}ev=ev.rest()}return es};dl.Kernel.sort=function(es,et){dZ(es,bf,"sort","list",1);dZ(et,dT,"sort","function",2);var er=[];while(!es.isEmpty()){er.push(es.first());es=es.rest()}er.sort(function(eu,ev){return et([eu,ev])?-1:1});return dl.Kernel.list(er)};dl.Kernel.quicksort=dl.Kernel.sort;dl.Kernel.build_dash_list=function(eu,et){dZ(eu,dN,"build-list","natural",1);dZ(et,dT,"build-list","function",2);var er=dl.types.Empty.EMPTY;for(var es=0;es<eu.toInteger();es++){er=dl.Kernel.cons(et([dl.types.Rational.makeInstance(es,1)]),er)}return dl.Kernel.reverse(er)};dl.Kernel.build_dash_string=function(ev,eu){dZ(ev,dN,"build-string","natural",1);dZ(eu,dT,"build-string","function",2);var et=[];for(var er=0;er<ev.toInteger();er++){var es=eu([dl.types.Rational.makeInstance(er,1)]);et.push(es.val)}return dl.types.String.makeInstance(et.join(""))};dl.Kernel.format=function(et,eu){dZ(et,dK,"format","string",1);var ew=new RegExp("~[sSaAn%~]","g");var es=eu;function ev(ex){if(ex=="~~"){return"~"}else{if(ex=="~n"||ex=="~%"){return"\n"}else{if(ex=="~s"||ex=="~S"){if(es.length==0){throw new d5("format: fewer arguments passed than expected")}return dl.Kernel.toWrittenString(es.shift())}else{if(ex=="~a"||ex=="~A"){if(es.length==0){throw new d5("format: fewer arguments passed than expected")}return dl.Kernel.toDisplayedString(es.shift())}else{throw new d5("Unimplemented format "+ex)}}}}}var er=dl.types.String.makeInstance(et.replace(ew,ev));if(es.length>0){throw new d5("format: More arguments passed than expected")}return er};dl.Kernel.string=function(er){var et=[];for(var es=0;es<er.length;es++){et.push(er[es].getValue())}return dl.types.String.makeInstance(et.join(""))};dl.Kernel.procedure_question_=function(er){return dT(er)};dl.Kernel.xml_dash__greaterthan_s_dash_exp=function(et){dZ(et,dK,"xml->s-exp","string",1);if(et.length==0){return dl.types.String.makeInstance("")}var eu;try{eu=new ActiveXObject("Microsoft.XMLDOM");eu.async="false";eu.loadXML(et)}catch(ev){var ex=new DOMParser();eu=ex.parseFromString(et,"text/xml")}var es=function(ez){var ey=dl.types.Empty.EMPTY;for(var eA=0;eA<ez.length;eA++){var eB=dl.types.Cons.makeInstance(dl.types.Symbol.makeInstance(ez.item(eA).nodeName),dl.types.Cons.makeInstance(ez.item(eA).nodeValue,dl.types.Empty.EMPTY));ey=dl.types.Cons.makeInstance(eB,ey)}return dl.types.Cons.makeInstance(dl.types.Symbol.makeInstance("@"),dl.Kernel.reverse(ey))};var ew=function(eA){if(eA.nodeType==Node.ELEMENT_NODE){var ey=dl.types.Empty.EMPTY;var eB=eA.firstChild;while(eB!=null){var ez=ew(eB);if(dK(ez)&&!ey.isEmpty()&&dK(ey.first())){ey=dl.types.Cons.makeInstance(ey.first()+ez,ey.rest())}else{ey=dl.types.Cons.makeInstance(ez,ey)}eB=eB.nextSibling}ey=dl.Kernel.reverse(ey);ey=dl.types.Cons.makeInstance(es(eA.attributes),ey);ey=dl.types.Cons.makeInstance(dl.types.Symbol.makeInstance(eA.nodeName),ey);return ey}else{if(eA.nodeType==Node.TEXT_NODE){return eA.textContent}else{if(eA.nodeType==Node.CDATA_SECTION_NODE){return eA.data}else{return dl.types.Empty.EMPTY}}}};var er=ew(eu.firstChild);return er};dl.Kernel.split_dash_whitespace=function(er){er=er.replace(/^\s+/,"");er=er.replace(/\s+$/,"");return dl.Kernel.list(er.split(/\s+/))};var em=function(er){dl.Kernel.Struct.call(this,"box",[er])};em.prototype=d2(dl.Kernel.Struct.prototype);dl.Kernel.box=function(er){return new em(er)};dl.Kernel.unbox=function(er){dZ(er,dl.Kernel.box_question_,"unbox","box",1);return er._fields[0]};dl.Kernel.box_question_=function(er){return er!=null&&er!=undefined&&er instanceof em};dl.Kernel.set_dash_box_bang_=function(es,er){dZ(es,dl.Kernel.box_question_,"set-box!","box",1);es._fields[0]=er;return undefined};var dY=function(er,es){dl.Kernel.Struct.call(this,"make-posn",[er,es])};dY.prototype=d2(dl.Kernel.Struct.prototype);var d4=function(es,er){return new dY(es,er)};var ei=function(er){dZ(er,ee,"posn-x","posn",1);return er._fields[0]};var eh=function(er){dZ(er,ee,"posn-y","posn",1);return er._fields[1]};var ee=function(er){return er!=null&&er!=undefined&&er instanceof dY};dl.Kernel.make_dash_posn=d4;dl.Kernel.posn_question_=ee;dl.Kernel.posn_dash_x=ei;dl.Kernel.posn_dash_y=eh;dl.Kernel.error=function(er,es){dZ(er,dL,"error","symbol",1);dZ(es,dK,"error","string",2);throw new d5(dl.Kernel.format("~a: ~a",[er,es]).toString())};dl.Kernel.syntax_dash_error=function(es,er){dZ(es,dK,"syntax-error","string",1);dZ(er,eg,"syntax-error","stx",2);throw new ef(es,er)};dl.Kernel.toWrittenString=function(er){if(er==undefined||er==null){return"<undefined>"}if(typeof(er)=="string"){return er.toWrittenString()}if(typeof(er)!="object"&&typeof(er)!="function"){return er.toString()}if("toWrittenString" in er){return er.toWrittenString()}if("toDisplayedString" in er){return er.toDisplayedString()}else{return er.toString()}};dl.Kernel.toDisplayedString=function(er){if(er==undefined||er==null){return"<undefined>"}if(typeof(er)=="string"){return er.toDisplayedString()}if(typeof(er)!="object"&&typeof(er)!="function"){return er.toString()}if("toWrittenString" in er){return er.toWrittenString()}if("toDisplayedString" in er){return er.toDisplayedString()}else{return er.toString()}};dl.Kernel.toDomNode=function(er){if(er==undefined||er==null){var es=document.createTextNode("<undefined>");return es}if(typeof(er)=="string"){var es=document.createTextNode(er.toWrittenString());return es}if(typeof(er)!="object"&&typeof(er)!="function"){var es=document.createTextNode(er.toString());return es}if(er.nodeType){return er}if("toDomNode" in er){return er.toDomNode()}if("toWrittenString" in er){var es=document.createTextNode(er.toWrittenString());return es}if("toDisplayedString" in er){var es=document.createTextNode(er.toDisplayedString());return es}else{var es=document.createTextNode(er.toString());return es}};dl.Kernel.Struct.prototype.toWrittenString=function(){var er=[];er.push("(");er.push(this._constructorName);for(var es=0;es<this._fields.length;es++){er.push(" ");er.push(dl.Kernel.toWrittenString(this._fields[es]))}er.push(")");return dl.types.String.makeInstance(er.join(""))};dl.Kernel.Struct.prototype.toDisplayedString=dl.Kernel.Struct.prototype.toWrittenString;var dG=function(er,es){er.appendChild(es)};dl.Kernel.Struct.prototype.toDomNode=function(){var es=document.createElement("div");es.appendChild(document.createTextNode("("));es.appendChild(document.createTextNode(this._constructorName));for(var er=0;er<this._fields.length;er++){es.appendChild(document.createTextNode(" "));dG(es,dl.Kernel.toDomNode(this._fields[er]))}es.appendChild(document.createTextNode(")"));return es};dl.Kernel.Struct.prototype.isEqual=function(er){if(typeof(er)!="object"){return false}if(!er._constructorName){return false}if(er._constructorName!=this._constructorName){return false}if(!"_fields" in er){return false}if(this._fields.length!=er._fields.length){return false}for(var es=0;es<this._fields.length;es++){if(!dl.Kernel.equal_question_(this._fields[es],er._fields[es])){return false}}return true};dl.Kernel.reportError=function(es){var er;if(typeof(console)!="undefined"&&typeof(console.log)!="undefined"){er=(function(et){console.log(et)})}else{er=(function(et){alert(et)})}if(typeof es=="string"){er(es)}else{if(es.msg){er(es.msg)}else{er(es.toString())}}if(dl.Kernel.lastLoc){er("Error was raised around "+dl.Kernel.lastLoc)}};dl.Kernel._void_=function(er){return undefined};dl.Kernel.build_dash_vector=function(eu,es){dZ(eu,dN,"build-vector","natural",1);dZ(es,dT,"build-vector","function",2);var et=[];for(var er=0;er<eu.toInteger();er++){et[er]=es([dl.types.Rational.makeInstance(er,1)])}return dl.types.Vector.makeInstance(eu.toInteger(),et)};dl.Kernel.make_dash_vector=function(er){dZ(er,dN,"make-vector","natural",1);return dl.types.Vector.makeInstance(er.toInteger())};dl.Kernel.vector=function(er){return dl.types.Vector.makeInstance(er.length,er)};dl.Kernel.vector_dash_length=function(er){dZ(er,dF,"vector-length","vector",1);return dl.types.Rational.makeInstance(er.length())};dl.Kernel.vector_dash_ref=function(es,er){dZ(es,dF,"vector-ref","vector",1);dZ(er,function(et){return dN(et)&&et.toInteger()<es.length()},"vector-ref","natural < vector length",2);return es.ref(er.toInteger())};dl.Kernel.vector_dash_set_bang_=function(et,es,er){dZ(et,dF,"vector-set!","vector",1);dZ(es,function(eu){return dN(eu)&&eu.toInteger()<et.length()},"vector-set!","natural < vector length",2);return et.set(es.toInteger(),er)};dl.Kernel.vector_question_=function(er){return dF(er)?dl.types.Logic.TRUE:dl.types.Logic.FALSE};dl.Kernel.check_dash_expect=function(et,er){var eu=et([]);var es=er([]);if(!dl.Kernel.equal_question_(eu,es)){throw new ej(dl.Kernel.format("~s doesn't match the expected value ~s",[eu,es]))}};dl.Kernel.check_dash_within=function(ev,es,eu){var ew=ev([]);var et=es([]);var er=eu([]);if(!dl.Kernel._equal__tilde_(ew,et,er)){throw new ej(dl.Kernel.format("~s doesn't match the expected value ~s within ~s",[ew,et,er]))}};dl.Kernel.check_dash_error=function(er,et){var ev=et([]);var eu;try{eu=er([])}catch(es){if(!dl.Kernel.equal_question_(es.msg,ev)){throw new ej(dl.Kernel.format("check-error encountered the error ~s instead of the expected error ~s.",[es.msg,ev]))}else{return}}throw new ej(dl.Kernel.format("check-error expected the error ~s, but instead received the value ~s.",[ev,eu]))};dl.Kernel.lastLoc=undefined;dl.Kernel.setLastLoc=function(er){dl.Kernel.lastLoc=er;return true};dl.Kernel.printf=function(er,es){var et=dl.Kernel.format(er,es);dl.Kernel.printHook(et);return undefined};dl.Kernel.printHook=function(er){};dl.Kernel.isSymbol=dL;dl.Kernel.isChar=dR;dl.Kernel.isString=dK;dl.Kernel.isBoolean=d8;dl.Kernel.isPair=el;dl.Kernel.isEmpty=dU;dl.Kernel.isReal=en;dl.Kernel.isRational=d6;dl.Kernel.isComplex=d7;dl.Kernel.isInteger=dP;dl.Kernel.isNatural=dN;dl.Kernel.isNumber=eo;dl.Kernel.isAlphabeticString=dV;dl.Kernel.isWhitespaceString=ed;dl.Kernel.isList=bf;dl.Kernel.isVector=dF;dl.Kernel.isFunction=dT;dl.Kernel.arrayEach=dJ;dl.Kernel.check=dZ;dl.Kernel.checkList=ea;dl.Kernel.checkListof=ek;dl.Kernel.MobyError=d0;dl.Kernel.MobyParserError=ep;dl.Kernel.MobySyntaxError=ef;dl.Kernel.MobyTypeError=d9;dl.Kernel.MobyRuntimeError=d5;dl.Kernel.attachEvent=dI;dl.Kernel.detachEvent=dS})();var dr=function(bf,dF){dl.Kernel.Struct.call(this,"make-stx:atom",[bf,dF]);this.datum=bf;this.loc=dF};dr.prototype=new dl.Kernel.Struct();var bY=function(dG,bf){var dF=new dr(dG,bf);return dF};var di=function(bf){if(J(bf)){return bf.datum}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("stx_colon_atom_dash_datum: not a stx:atom: ~s",[bf]))}};var E=function(bf){if(J(bf)){return bf.loc}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("stx_colon_atom_dash_loc: not a stx:atom: ~s",[bf]))}};var B=function(dF,bf){if(J(dF)){dF.datum=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_stx_colon_atom_dash_datum_bang_: not a stx:atom: ~s",[dF]))}};var bC=function(dF,bf){if(J(dF)){dF.loc=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_stx_colon_atom_dash_loc_bang_: not a stx:atom: ~s",[dF]))}};var J=function(bf){return(bf!=null&&bf!=undefined&&bf instanceof dr)};var bM=function(bf,dF){dl.Kernel.Struct.call(this,"make-stx:list",[bf,dF]);this.elts=bf;this.loc=dF};bM.prototype=new dl.Kernel.Struct();var aw=function(dF,bf){return new bM(dF,bf)};var aH=function(bf){if(cb(bf)){return bf.elts}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("stx_colon_list_dash_elts: not a stx:list: ~s",[bf]))}};var V=function(bf){if(cb(bf)){return bf.loc}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("stx_colon_list_dash_loc: not a stx:list: ~s",[bf]))}};var aX=function(dF,bf){if(cb(dF)){dF.elts=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_stx_colon_list_dash_elts_bang_: not a stx:list: ~s",[dF]))}};var g=function(dF,bf){if(cb(dF)){dF.loc=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_stx_colon_list_dash_loc_bang_: not a stx:list: ~s",[dF]))}};var cb=function(bf){return bf!=null&&bf!=undefined&&bf instanceof bM};var v=function(dG,bf,dF,dH){dl.Kernel.Struct.call(this,"make-Loc",[dG,bf,dF,dH]);this.offset=dG;this.line=bf;this.span=dF;this.id=dH};v.prototype=new dl.Kernel.Struct();var cr=function(dH,dG,dF,bf){return new v(dH,dG,dF,bf)};var a=function(bf){if(n(bf)){return bf.offset}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("Loc_dash_offset: not a Loc: ~s",[bf]))}};var ab=function(bf){if(n(bf)){return bf.line}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("Loc_dash_line: not a Loc: ~s",[bf]))}};var W=function(bf){if(n(bf)){return bf.span}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("Loc_dash_span: not a Loc: ~s",[bf]))}};var ba=function(bf){if(n(bf)){return bf.id}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("Loc_dash_id: not a Loc: ~s",[bf]))}};var c0=function(dF,bf){if(n(dF)){dF.offset=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_Loc_dash_offset_bang_: not a Loc: ~s",[dF]))}};var d=function(dF,bf){if(n(dF)){dF.line=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_Loc_dash_line_bang_: not a Loc: ~s",[dF]))}};var dn=function(dF,bf){if(n(dF)){dF.span=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_Loc_dash_span_bang_: not a Loc: ~s",[dF]))}};var b=function(dF,bf){if(n(dF)){dF.id=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_Loc_dash_id_bang_: not a Loc: ~s",[dF]))}};var n=function(bf){return bf!=null&&bf!=undefined&&bf instanceof v};var bH=function(bf){return(dl.Kernel.setLastLoc('offset=284 line=14 span=154 id="stx.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("offset=~a line=~a span=~a id=~s")),[(dl.Kernel.setLastLoc('offset=337 line=15 span=18 id="stx.ss"')&&a(bf)),(dl.Kernel.setLastLoc('offset=367 line=16 span=16 id="stx.ss"')&&ab(bf)),(dl.Kernel.setLastLoc('offset=395 line=17 span=16 id="stx.ss"')&&W(bf)),(dl.Kernel.setLastLoc('offset=423 line=18 span=14 id="stx.ss"')&&ba(bf))]))};var a8=function(bf){return((dl.Kernel.setLastLoc('offset=489 line=23 span=13 id="stx.ss"')&&J(bf))||(dl.Kernel.setLastLoc('offset=509 line=24 span=13 id="stx.ss"')&&cb(bf)))};var b2=function(bf){return((dl.Kernel.setLastLoc('offset=635 line=31 span=17 id="stx.ss"')&&J(bf))?(dl.Kernel.setLastLoc('offset=658 line=32 span=22 id="stx.ss"')&&di(bf)):((dl.Kernel.setLastLoc('offset=687 line=33 span=17 id="stx.ss"')&&cb(bf))?(dl.Kernel.setLastLoc('offset=710 line=34 span=21 id="stx.ss"')&&aH(bf)):(dl.Kernel.setLastLoc('offset=624 line=30 span=109 id="stx.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=624 line=30 span=109 id=\\"stx.ss\\""'))))))};var t=function(bf){return((dl.Kernel.setLastLoc('offset=797 line=40 span=17 id="stx.ss"')&&J(bf))?(dl.Kernel.setLastLoc('offset=820 line=41 span=20 id="stx.ss"')&&E(bf)):((dl.Kernel.setLastLoc('offset=847 line=42 span=17 id="stx.ss"')&&cb(bf))?(dl.Kernel.setLastLoc('offset=870 line=43 span=20 id="stx.ss"')&&V(bf)):(dl.Kernel.setLastLoc('offset=786 line=39 span=106 id="stx.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=786 line=39 span=106 id=\\"stx.ss\\""'))))))};var X=function(dF,bf){return((dl.Kernel.setLastLoc('offset=991 line=49 span=17 id="stx.ss"')&&J(dF))?dl.types.Logic.FALSE:((dl.Kernel.setLastLoc('offset=1023 line=51 span=17 id="stx.ss"')&&cb(dF))?((dl.Kernel.setLastLoc('offset=1051 line=52 span=36 id="stx.ss"')&&dl.Kernel.not((dl.Kernel.setLastLoc('offset=1056 line=52 span=30 id="stx.ss"')&&dl.Kernel.empty_question_((dl.Kernel.setLastLoc('offset=1064 line=52 span=21 id="stx.ss"')&&aH(dF))))))&&(dl.Kernel.setLastLoc('offset=1098 line=53 span=47 id="stx.ss"')&&dl.Kernel.symbol_question_((dl.Kernel.setLastLoc('offset=1107 line=53 span=37 id="stx.ss"')&&b2((dl.Kernel.setLastLoc('offset=1114 line=53 span=29 id="stx.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=1121 line=53 span=21 id="stx.ss"')&&aH(dF))))))))&&(dl.Kernel.setLastLoc('offset=1156 line=54 span=74 id="stx.ss"')&&dl.Kernel.symbol_equal__question_((dl.Kernel.setLastLoc('offset=1166 line=54 span=37 id="stx.ss"')&&b2((dl.Kernel.setLastLoc('offset=1173 line=54 span=29 id="stx.ss"')&&dl.Kernel.first((dl.Kernel.setLastLoc('offset=1180 line=54 span=21 id="stx.ss"')&&aH(dF)))))),bf))):(dl.Kernel.setLastLoc('offset=980 line=48 span=253 id="stx.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=980 line=48 span=253 id=\\"stx.ss\\""'))))))};var dC=function(bf,dF){return((dl.Kernel.setLastLoc('offset=1461 line=65 span=14 id="stx.ss"')&&a8(bf))?bf:(((dl.Kernel.setLastLoc('offset=1499 line=67 span=15 id="stx.ss"')&&dl.Kernel.pair_question_(bf))||(dl.Kernel.setLastLoc('offset=1515 line=67 span=16 id="stx.ss"')&&dl.Kernel.empty_question_(bf)))?(dl.Kernel.setLastLoc('offset=1538 line=68 span=89 id="stx.ss"')&&aw((dl.Kernel.setLastLoc('offset=1553 line=68 span=47 id="stx.ss"')&&dl.Kernel.map(((function(){dl.Kernel.setLastLoc('offset=1558 line=68 span=33 id="stx.ss"');var dG=(function(dI){var dH=dI[0];return(dl.Kernel.setLastLoc('offset=1570 line=68 span=20 id="stx.ss"')&&dC(dH,dF))});dG.toWrittenString=function(){return"<function:lambda>"};dG.toDisplayedString=dG.toWrittenString;return dG})()),[bf])),dF)):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=1644 line=71 span=29 id="stx.ss"')&&bY(bf,dF)):(dl.Kernel.setLastLoc('offset=1450 line=64 span=225 id="stx.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=1450 line=64 span=225 id=\\"stx.ss\\""')))))))};var ah=function(bf){return((dl.Kernel.setLastLoc('offset=1787 line=84 span=17 id="stx.ss"')&&J(bf))?(dl.Kernel.setLastLoc('offset=1810 line=85 span=22 id="stx.ss"')&&di(bf)):((dl.Kernel.setLastLoc('offset=1839 line=86 span=17 id="stx.ss"')&&cb(bf))?(dl.Kernel.setLastLoc('offset=1862 line=87 span=38 id="stx.ss"')&&dl.Kernel.map((function(){var dF=(function(dG){return ah(dG[0])});dF.toWrittenString=function(){return"<function:stx->datum>"};dF.toDisplayedString=function(){return"<function:stx->datum>"};return dF})(),[(dl.Kernel.setLastLoc('offset=1878 line=87 span=21 id="stx.ss"')&&aH(bf))])):(dl.Kernel.setLastLoc('offset=1776 line=83 span=126 id="stx.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=1776 line=83 span=126 id=\\"stx.ss\\""'))))))};(function(){((function(bf){}))(arguments[0]||dl.Kernel.identity)})();var dl=dl||{};dl.reader={};(function(){var dG=function(dJ){return dJ.replace(/\\./g,function(dL,dM,dK){switch(dL){case"\\b":return"\b";case"\\f":return"\f";case"\\n":return"\n";case"\\r":return"\r";case"\\t":return"\t";case"\\v":return"\v";default:return dL.substring(1)}})};var bf=function(dK){var dJ;var dL=0;for(dJ=0;dJ<dK.length;dJ++){if(dK[dJ]=="\n"){dL++}}return dL};var dF=[["whitespace",/^(\s+)/],["#;",/^([#][;])/],["comment",new RegExp("^([#][|](?:(?:\\|[^\\#])|[^\\|])*[|][#])")],["comment",/(^;[^\n]*)/],["(",/^($|\[|\{)/],[")",/^($|\]|\})/],["'",/^(\')/],["`",/^(`)/],[",@",/^(,@)/],[",",/^(,)/],["char",/^\#\\(newline|backspace)/],["char",/^\#\\(.)/],["complex",/^((?:\#[ei])?[+\-]?(?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+)?[+\-](?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+)i)/],["number",/^((?:\#[ei])?[+-]inf.0)/],["number",/^((?:\#[ei])?[+-]nan.0)/],["number",/^((?:\#[ei])?[+\-]?(?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+))/],["string",new RegExp('^"((?:([^\\\\"]|(\\\\.)))*)"')],["symbol",/^([a-zA-Z\:\+\=\~\_\?\!\@\#\$\%\^\&\*\-\/\.\>\<][\w\:\+\=\~\_\?\!\@\#\$\%\^\&\*\-\/\.\>\<]*)/]];var dI=function(dR,dJ){var dK=0;var dS=1;var dP=[];if(!dJ){dJ=""}while(true){var dN=false;for(var dL=0;dL<dF.length;dL++){var dM=dF[dL][0];var dO=dF[dL][1];var dQ=dR.match(dO);if(dQ!=null){if(dM=="string"){dQ[1]=dG(dQ[1])}if(dM!="whitespace"&&dM!="comment"){dP.push([dM,dQ[1],new v(dK,dS,dQ[0].length,dJ)])}dK=dK+dQ[0].length;dS=dS+bf(dQ[0]);dR=dR.substring(dQ[0].length);dN=true;break}}if(!dN){break}}return[dP,dR]};var dH=function(dW,d0){var dZ=aw;var d2=bY;var dK=dI(dW,d0);var dX=dK[0];var d1=undefined;if(dK[1].length>0){throw new dl.Kernel.MobyParserError("Error while tokenizing: the rest of the stream is: "+dK[1],new v(dW.length-dK[1].length,bf(dW.substring(0,dW.length-dK[1].length)),dK[1].length,d0))}var dT=dl.types.Symbol.makeInstance("quote");var dJ=dl.types.Symbol.makeInstance("quasiquote");var dY=dl.types.Symbol.makeInstance("unquote");var dL=dl.types.Symbol.makeInstance("unquote-splicing");var dQ=dl.types.Empty.EMPTY;var dN=function(d3){return(dX.length>0&&dX[0][0]==d3)};var dR=function(d4){if(dX.length==0){if(d1){throw new dl.Kernel.MobyParserError("token stream exhausted while trying to eat "+d4,d1[2])}else{throw new dl.Kernel.MobyParserError("token stream exhausted while trying to eat "+d4,new v(0,0,dW.length,d0))}}var d3=dX.shift();d1=d3;if(d3[0]==d4){return d3}else{throw new dl.Kernel.MobyParserError("Unexpected token "+d3,d3[2])}};var dP;var dU;var dM;dM=function(d4,d6){var d3=dR(d4);var d5=dP();return dZ(dl.Kernel.cons(d2(d6,d3[2]),dl.Kernel.cons(d5,dQ)),new v(d3[2].offset,d3[2].line,(d5.loc.offset-d3[2].offset+d5.loc.span),""))};var dO=function(d3){switch(d3){case"(":return")";case"[":return"]";case"{":return"}";default:throw new Error()}};var dV=function(d6,d5){var d4=d6.match(/([+\-]?\d+)\/(\d+)/);if(d6=="+inf.0"){return dl.types.FloatPoint.makeInstance(Number.POSITIVE_INFINITY)}else{if(d6=="-inf.0"){return dl.types.FloatPoint.makeInstance(Number.NEGATIVE_INFINITY)}else{if(d6=="+nan.0"||d6=="-nan.0"){return dl.types.FloatPoint.makeInstance(Number.NaN)}else{if(d6.match(/\./)){if(d5){var d3=d6.match("^(.*)[.](.*)$");return dl.types.NumberTower.add(dl.types.Rational.makeInstance(parseInt(d3[1]||"0")),dl.types.Rational.makeInstance(parseInt(d3[2]),Math.pow(10,d3[2].length)))}else{return dl.types.FloatPoint.makeInstance(parseFloat(d6))}}else{if(d4){if(d5){return dl.types.Rational.makeInstance(parseInt(d4[1]),parseInt(d4[2]))}else{return dl.types.FloatPoint.makeInstance(parseInt(d4[1])/parseInt(d4[2]))}}else{if(d5){return dl.types.Rational.makeInstance(parseInt(d6),1)}else{return dl.types.FloatPoint.makeInstance(parseInt(d6))}}}}}}};dP=function(){if(dX.length==0){if(d1){throw new dl.Kernel.MobyParserError("Parse broke with empty token stream",d1[2])}else{throw new dl.Kernel.MobyParserError("Parse broke with empty token stream",new v(0,0,dW.length,d0))}}switch(dX[0][0]){case"(":var ee=dR("(");var ea=ee[1];var d8=dO(ee[1]);var eg=dU();if(dX.length==0){throw new dl.Kernel.MobyParserError("Expected a "+d8+" to close "+ea,ee[2])}else{if(dX[0][1]!=d8){throw new dl.Kernel.MobyParserError("Expected a "+d8+" to close "+ea,dX[0][2])}}var ec=dR(")");return aw(eg,new v(ee[2].offset,ee[2].line,ec[2].offset-ee[2].offset+1,""));case"#;":var d7=dR("#;");var d6=dP();return dP();case"'":return dM("'",dT);case"`":return dM("`",dJ);case",":return dM(",",dY);case",@":return dM(",@",dL);case"number":var ef=dR("number");var ed=ef[1].match(/^(\#[ie])(.+)$/);if(ed){if(ed[1]=="#i"){return d2(dV(ed[2],false),ef[2])}else{return d2(dV(ed[2],true),ef[2])}}else{return d2(dV(ef[1],true),ef[2])}case"complex":var ef=dR("complex");var d5=ef[1].match(/^((?:\#[ei])?)([+\-]?(?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+)?)([+\-](?:\d+\/\d+|\d+\.\d+|\d+\.|\.\d+|\d+))i/);var d4=(d5[1]=="#i"?false:true);var eb=(d5[2]!=""?dV(d5[2],d4):dl.types.Rational.ZERO);var d9=dV(d5[3],d4);var d3=d2(dl.types.Complex.makeInstance(eb,d9));return d3;case"string":var ef=dR("string");return d2(dl.types.String.makeInstance(ef[1]),ef[2]);case"char":var ef=dR("char");if(ef[1]=="newline"){return d2(dl.types.Char.makeInstance("\n"),ef[2])}else{if(ef[1]=="backspace"){return d2(dl.types.Char.makeInstance(String.fromCharCode(8)),ef[2])}else{return d2(dl.types.Char.makeInstance(ef[1]),ef[2])}}case"symbol":var ef=dR("symbol");if(ef[1]=="."){throw new dl.Kernel.MobyParserError("Dotted pairs are not currently accepted by Moby",ef[2])}return d2(dl.types.Symbol.makeInstance(ef[1]),ef[2]);default:throw new dl.Kernel.MobyParserError("Parse broke with token stream "+dX,dX[0][2])}};dU=function(){var d3=dl.types.Empty.EMPTY;while(true){if(dX.length==0||dN(")")){break}else{if(dN("#;")){dR("#;");var d4=dP()}else{var d5=dP();d3=dl.types.Cons.makeInstance(d5,d3)}}}return dl.Kernel.reverse(d3)};var dS=dU();if(dX.length>0){throw new dl.Kernel.MobyParserError("More elements in the program's token stream than expected: the next unconsumed token is: "+dX[0][1],dX[0][2])}return dS};dl.reader.tokenize=dI;dl.reader.readSchemeExpressions=dH}());var cv=function(){dl.Kernel.Struct.call(this,"make-permission:location",[])};cv.prototype=new dl.Kernel.Struct();var S=function(){return new cv()};var cs=function(bf){return bf!=null&&bf!=undefined&&bf instanceof cv};var bB=function(){dl.Kernel.Struct.call(this,"make-permission:send-sms",[])};bB.prototype=new dl.Kernel.Struct();var cX=function(){return new bB()};var a7=function(bf){return bf!=null&&bf!=undefined&&bf instanceof bB};var s=function(){dl.Kernel.Struct.call(this,"make-permission:receive-sms",[])};s.prototype=new dl.Kernel.Struct();var cI=function(){return new s()};var I=function(bf){return bf!=null&&bf!=undefined&&bf instanceof s};var ce=function(){dl.Kernel.Struct.call(this,"make-permission:tilt",[])};ce.prototype=new dl.Kernel.Struct();var aO=function(){return new ce()};var Y=function(bf){return bf!=null&&bf!=undefined&&bf instanceof ce};var bu=function(){dl.Kernel.Struct.call(this,"make-permission:shake",[])};bu.prototype=new dl.Kernel.Struct();var c1=function(){return new bu()};var aT=function(bf){return bf!=null&&bf!=undefined&&bf instanceof bu};var dv=function(){dl.Kernel.Struct.call(this,"make-permission:internet",[])};dv.prototype=new dl.Kernel.Struct();var aS=function(){return new dv()};var dx=function(bf){return bf!=null&&bf!=undefined&&bf instanceof dv};var b9=function(){dl.Kernel.Struct.call(this,"make-permission:telephony",[])};b9.prototype=new dl.Kernel.Struct();var bm=function(){return new b9()};var bn=function(bf){return bf!=null&&bf!=undefined&&bf instanceof b9};var by=function(){dl.Kernel.Struct.call(this,"make-permission:wake-lock",[])};by.prototype=new dl.Kernel.Struct();var u=function(){return new by()};var de=function(bf){return bf!=null&&bf!=undefined&&bf instanceof by};var cy=function(bf){dl.Kernel.Struct.call(this,"make-permission:open-image-url",[bf]);this.url=bf};cy.prototype=new dl.Kernel.Struct();var bK=function(bf){return new cy(bf)};var bL=function(bf){if(c(bf)){return bf.url}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("permission:open-image-url-url: not a permission:open-image-url: ~s",[bf]))}};var aA=function(dF,bf){if(c(dF)){dF.url=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_permission_colon_open_dash_image_dash_url_dash_url_bang_: not a permission:open-image-url: ~s",[dF]))}};var c=function(bf){return bf!=null&&bf!=undefined&&bf instanceof cy};var an=function(bf){return((dl.Kernel.setLastLoc('offset=512 line=17 span=28 id="permission.ss"')&&cs(bf))||(dl.Kernel.setLastLoc('offset=547 line=18 span=28 id="permission.ss"')&&a7(bf))||(dl.Kernel.setLastLoc('offset=582 line=19 span=31 id="permission.ss"')&&I(bf))||(dl.Kernel.setLastLoc('offset=620 line=20 span=24 id="permission.ss"')&&Y(bf))||(dl.Kernel.setLastLoc('offset=651 line=21 span=25 id="permission.ss"')&&aT(bf))||(dl.Kernel.setLastLoc('offset=683 line=22 span=28 id="permission.ss"')&&dx(bf))||(dl.Kernel.setLastLoc('offset=718 line=23 span=29 id="permission.ss"')&&bn(bf))||(dl.Kernel.setLastLoc('offset=754 line=24 span=29 id="permission.ss"')&&de(bf))||(dl.Kernel.setLastLoc('offset=790 line=25 span=34 id="permission.ss"')&&c(bf)))};var ds;var cV;var N;var bA;var H;var R;var bb;var cS;var A=function(bf){return((dl.Kernel.setLastLoc('offset=1465 line=42 span=35 id="permission.ss"')&&cs(bf))?(dl.types.String.makeInstance("PERMISSION:LOCATION")):((dl.Kernel.setLastLoc('offset=1534 line=44 span=35 id="permission.ss"')&&a7(bf))?(dl.types.String.makeInstance("PERMISSION:SEND-SMS")):((dl.Kernel.setLastLoc('offset=1603 line=46 span=38 id="permission.ss"')&&I(bf))?(dl.types.String.makeInstance("PERMISSION:RECEIVE-SMS")):((dl.Kernel.setLastLoc('offset=1678 line=48 span=31 id="permission.ss"')&&Y(bf))?(dl.types.String.makeInstance("PERMISSION:TILT")):((dl.Kernel.setLastLoc('offset=1739 line=50 span=32 id="permission.ss"')&&aT(bf))?(dl.types.String.makeInstance("PERMISSION:SHAKE")):((dl.Kernel.setLastLoc('offset=1802 line=52 span=35 id="permission.ss"')&&dx(bf))?(dl.types.String.makeInstance("PERMISSION:INTERNET")):((dl.Kernel.setLastLoc('offset=1871 line=54 span=36 id="permission.ss"')&&bn(bf))?(dl.types.String.makeInstance("PERMISSION:TELEPHONY")):((dl.Kernel.setLastLoc('offset=1942 line=56 span=36 id="permission.ss"')&&de(bf))?(dl.types.String.makeInstance("PERMISSION:WAKE-LOCK")):((dl.Kernel.setLastLoc('offset=2013 line=58 span=41 id="permission.ss"')&&c(bf))?(dl.Kernel.setLastLoc('offset=2060 line=59 span=84 id="permission.ss"')&&dl.Kernel.format((dl.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL ~a")),[(dl.Kernel.setLastLoc('offset=2099 line=59 span=44 id="permission.ss"')&&bL(bf))])):(dl.Kernel.setLastLoc('offset=1454 line=41 span=692 id="permission.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=1454 line=41 span=692 id=\\"permission.ss\\""')))))))))))))};var bs=function(bf){return((dl.Kernel.setLastLoc('offset=2242 line=65 span=38 id="permission.ss"')&&dl.Kernel.string_equal__question_(bf,(dl.types.String.makeInstance("PERMISSION:LOCATION")),[]))?ds:((dl.Kernel.setLastLoc('offset=2312 line=67 span=38 id="permission.ss"')&&dl.Kernel.string_equal__question_(bf,(dl.types.String.makeInstance("PERMISSION:SEND-SMS")),[]))?cV:((dl.Kernel.setLastLoc('offset=2387 line=69 span=41 id="permission.ss"')&&dl.Kernel.string_equal__question_(bf,(dl.types.String.makeInstance("PERMISSION:RECEIVE-SMS")),[]))?N:((dl.Kernel.setLastLoc('offset=2463 line=71 span=34 id="permission.ss"')&&dl.Kernel.string_equal__question_(bf,(dl.types.String.makeInstance("PERMISSION:TILT")),[]))?bA:((dl.Kernel.setLastLoc('offset=2525 line=73 span=35 id="permission.ss"')&&dl.Kernel.string_equal__question_(bf,(dl.types.String.makeInstance("PERMISSION:SHAKE")),[]))?H:((dl.Kernel.setLastLoc('offset=2589 line=75 span=38 id="permission.ss"')&&dl.Kernel.string_equal__question_(bf,(dl.types.String.makeInstance("PERMISSION:INTERNET")),[]))?R:((dl.Kernel.setLastLoc('offset=2659 line=77 span=39 id="permission.ss"')&&dl.Kernel.string_equal__question_(bf,(dl.types.String.makeInstance("PERMISSION:TELEPHONY")),[]))?bb:((dl.Kernel.setLastLoc('offset=2731 line=79 span=39 id="permission.ss"')&&dl.Kernel.string_equal__question_(bf,(dl.types.String.makeInstance("PERMISSION:WAKE-LOCK")),[]))?cS:(((dl.Kernel.setLastLoc('offset=2808 line=81 span=82 id="permission.ss"')&&dl.Kernel._greaterthan_((dl.Kernel.setLastLoc('offset=2811 line=81 span=21 id="permission.ss"')&&dl.Kernel.string_dash_length(bf)),(dl.Kernel.setLastLoc('offset=2846 line=82 span=43 id="permission.ss"')&&dl.Kernel.string_dash_length((dl.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL")))),[]))&&(dl.Kernel.setLastLoc('offset=2901 line=83 span=122 id="permission.ss"')&&dl.Kernel.string_equal__question_((dl.Kernel.setLastLoc('offset=2911 line=83 span=63 id="permission.ss"')&&dl.Kernel.substring(bf,(dl.types.Rational.makeInstance(0,1)),(dl.Kernel.setLastLoc('offset=2930 line=83 span=43 id="permission.ss"')&&dl.Kernel.string_dash_length((dl.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL")))))),(dl.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL")),[])))?(dl.Kernel.setLastLoc('offset=3030 line=85 span=220 id="permission.ss"')&&bK((dl.Kernel.setLastLoc('offset=3062 line=85 span=187 id="permission.ss"')&&dl.Kernel.substring(bf,(dl.Kernel.setLastLoc('offset=3128 line=86 span=50 id="permission.ss"')&&dl.Kernel.add1((dl.Kernel.setLastLoc('offset=3134 line=86 span=43 id="permission.ss"')&&dl.Kernel.string_dash_length((dl.types.String.makeInstance("PERMISSION:OPEN-IMAGE-URL")))))),(dl.Kernel.setLastLoc('offset=3227 line=87 span=21 id="permission.ss"')&&dl.Kernel.string_dash_length(bf)))))):(dl.Kernel.setLastLoc('offset=2231 line=64 span=1021 id="permission.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=2231 line=64 span=1021 id=\\"permission.ss\\""')))))))))))))};var O=function(bf){return((dl.Kernel.setLastLoc('offset=3392 line=95 span=35 id="permission.ss"')&&cs(bf))?(dl.Kernel.setLastLoc('offset=3433 line=96 span=103 id="permission.ss"')&&dl.Kernel.list([(dl.types.String.makeInstance("android.permission.ACCESS_COARSE_LOCATION")),(dl.types.String.makeInstance("android.permission.ACCESS_FINE_LOCATION"))])):((dl.Kernel.setLastLoc('offset=3543 line=98 span=35 id="permission.ss"')&&a7(bf))?(dl.Kernel.setLastLoc('offset=3584 line=99 span=36 id="permission.ss"')&&dl.Kernel.list([(dl.types.String.makeInstance("android.permission.SEND_SMS"))])):((dl.Kernel.setLastLoc('offset=3627 line=100 span=38 id="permission.ss"')&&I(bf))?(dl.Kernel.setLastLoc('offset=3671 line=101 span=39 id="permission.ss"')&&dl.Kernel.list([(dl.types.String.makeInstance("android.permission.RECEIVE_SMS"))])):((dl.Kernel.setLastLoc('offset=3717 line=102 span=31 id="permission.ss"')&&Y(bf))?(dl.Kernel.setLastLoc('offset=3754 line=103 span=6 id="permission.ss"')&&dl.Kernel.list([])):((dl.Kernel.setLastLoc('offset=3767 line=104 span=32 id="permission.ss"')&&aT(bf))?(dl.Kernel.setLastLoc('offset=3805 line=105 span=6 id="permission.ss"')&&dl.Kernel.list([])):((dl.Kernel.setLastLoc('offset=3818 line=106 span=35 id="permission.ss"')&&dx(bf))?(dl.Kernel.setLastLoc('offset=3859 line=107 span=36 id="permission.ss"')&&dl.Kernel.list([(dl.types.String.makeInstance("android.permission.INTERNET"))])):((dl.Kernel.setLastLoc('offset=3902 line=108 span=36 id="permission.ss"')&&bn(bf))?(dl.Kernel.setLastLoc('offset=3944 line=109 span=49 id="permission.ss"')&&dl.Kernel.list([(dl.types.String.makeInstance("android.permission.ACCESS_COARSE_UPDATES"))])):((dl.Kernel.setLastLoc('offset=4000 line=110 span=36 id="permission.ss"')&&de(bf))?(dl.Kernel.setLastLoc('offset=4042 line=111 span=37 id="permission.ss"')&&dl.Kernel.list([(dl.types.String.makeInstance("android.permission.WAKE_LOCK"))])):((dl.Kernel.setLastLoc('offset=4086 line=112 span=41 id="permission.ss"')&&c(bf))?(dl.Kernel.setLastLoc('offset=4133 line=113 span=6 id="permission.ss"')&&dl.Kernel.list([])):(dl.Kernel.setLastLoc('offset=3381 line=94 span=760 id="permission.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=3381 line=94 span=760 id=\\"permission.ss\\""')))))))))))))};var aZ=function(bf){return((dl.Kernel.setLastLoc('offset=4258 line=119 span=35 id="permission.ss"')&&cs(bf))?(dl.types.String.makeInstance("plt.platform.Platform.getInstance().getLocationService().startService();\n plt.platform.Platform.getInstance().getLocationService().addLocationChangeListener(listener);")):((dl.Kernel.setLastLoc('offset=4480 line=122 span=35 id="permission.ss"')&&a7(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=4530 line=124 span=38 id="permission.ss"')&&I(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=4583 line=126 span=31 id="permission.ss"')&&Y(bf))?(dl.types.String.makeInstance("plt.platform.Platform.getInstance().getTiltService().startService();\n plt.platform.Platform.getInstance().getTiltService().addOrientationChangeListener(listener);\n plt.platform.Platform.getInstance().getTiltService().addAccelerationChangeListener(listener);\n plt.platform.Platform.getInstance().getTiltService().addShakeListener(listener);")):((dl.Kernel.setLastLoc('offset=4988 line=132 span=32 id="permission.ss"')&&aT(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5042 line=135 span=35 id="permission.ss"')&&dx(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5092 line=137 span=36 id="permission.ss"')&&bn(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5143 line=139 span=36 id="permission.ss"')&&de(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5194 line=141 span=41 id="permission.ss"')&&c(bf))?(dl.types.String.makeInstance("")):(dl.Kernel.setLastLoc('offset=4247 line=118 span=998 id="permission.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=4247 line=118 span=998 id=\\"permission.ss\\""')))))))))))))};var bg=function(bf){return((dl.Kernel.setLastLoc('offset=5362 line=148 span=35 id="permission.ss"')&&cs(bf))?(dl.types.String.makeInstance("plt.platform.Platform.getInstance().getLocationService().shutdownService();")):((dl.Kernel.setLastLoc('offset=5487 line=150 span=35 id="permission.ss"')&&a7(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5537 line=152 span=38 id="permission.ss"')&&I(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5590 line=154 span=31 id="permission.ss"')&&Y(bf))?(dl.types.String.makeInstance("plt.platform.Platform.getInstance().getTiltService().shutdownService();")):((dl.Kernel.setLastLoc('offset=5707 line=156 span=32 id="permission.ss"')&&aT(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5754 line=158 span=35 id="permission.ss"')&&dx(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5804 line=160 span=36 id="permission.ss"')&&bn(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5855 line=162 span=36 id="permission.ss"')&&de(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=5906 line=164 span=41 id="permission.ss"')&&c(bf))?(dl.types.String.makeInstance("")):(dl.Kernel.setLastLoc('offset=5351 line=147 span=606 id="permission.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=5351 line=147 span=606 id=\\"permission.ss\\""')))))))))))))};var cu=function(bf){return((dl.Kernel.setLastLoc('offset=6078 line=171 span=35 id="permission.ss"')&&cs(bf))?(dl.types.String.makeInstance("plt.platform.Platform.getInstance().getLocationService().shutdownService();")):((dl.Kernel.setLastLoc('offset=6203 line=173 span=35 id="permission.ss"')&&a7(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=6253 line=175 span=38 id="permission.ss"')&&I(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=6306 line=177 span=31 id="permission.ss"')&&Y(bf))?(dl.types.String.makeInstance("plt.platform.Platform.getInstance().getTiltService().shutdownService();")):((dl.Kernel.setLastLoc('offset=6423 line=179 span=32 id="permission.ss"')&&aT(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=6470 line=181 span=35 id="permission.ss"')&&dx(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=6520 line=183 span=36 id="permission.ss"')&&bn(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=6571 line=185 span=36 id="permission.ss"')&&de(bf))?(dl.types.String.makeInstance("")):((dl.Kernel.setLastLoc('offset=6622 line=187 span=41 id="permission.ss"')&&c(bf))?(dl.types.String.makeInstance("")):(dl.Kernel.setLastLoc('offset=6067 line=170 span=606 id="permission.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=6067 line=170 span=606 id=\\"permission.ss\\""')))))))))))))};var aW=function(bf,dF,dH,dG,dI){dl.Kernel.Struct.call(this,"make-rbtree",[bf,dF,dH,dG,dI]);this.color=bf;this.key=dF;this.value=dH;this.lkid=dG;this.rkid=dI};aW.prototype=new dl.Kernel.Struct();var D=function(dI,dH,dG,dF,bf){return new aW(dI,dH,dG,dF,bf)};var G=function(bf){if(a2(bf)){return bf.color}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("rbtree-color: not a rbtree: ~s",[bf]))}};var bQ=function(bf){if(a2(bf)){return bf.key}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("rbtree-key: not a rbtree: ~s",[bf]))}};var az=function(bf){if(a2(bf)){return bf.value}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("rbtree-value: not a rbtree: ~s",[bf]))}};var dz=function(bf){if(a2(bf)){return bf.lkid}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("rbtree-lkid: not a rbtree: ~s",[bf]))}};var ar=function(bf){if(a2(bf)){return bf.rkid}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("rbtree-rkid: not a rbtree: ~s",[bf]))}};var c9=function(dF,bf){if(a2(dF)){dF.color=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_rbtree_dash_color_bang_: not a rbtree: ~s",[dF]))}};var bE=function(dF,bf){if(a2(dF)){dF.key=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_rbtree_dash_key_bang_: not a rbtree: ~s",[dF]))}};var m=function(dF,bf){if(a2(dF)){dF.value=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_rbtree_dash_value_bang_: not a rbtree: ~s",[dF]))}};var cY=function(dF,bf){if(a2(dF)){dF.lkid=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_rbtree_dash_lkid_bang_: not a rbtree: ~s",[dF]))}};var be=function(dF,bf){if(a2(dF)){dF.rkid=bf}else{throw new dl.Kernel.MobyRuntimeError(dl.Kernel.format("set_dash_rbtree_dash_rkid_bang_: not a rbtree: ~s",[dF]))}};var a2=function(bf){return bf!=null&&bf!=undefined&&bf instanceof aW};var bc;var a1=function(bf){return(dl.Kernel.setLastLoc('offset=335 line=13 span=20 id="rbtree.ss"')&&dl.Kernel.eq_question_(bf,bc))};var b6=function(bf){return(dl.Kernel.setLastLoc('offset=417 line=17 span=12 id="rbtree.ss"')&&dl.Kernel.eq_question_(bf,(dl.types.Symbol.makeInstance("red"))))};var db=function(bf){return(dl.Kernel.setLastLoc('offset=495 line=21 span=14 id="rbtree.ss"')&&dl.Kernel.eq_question_(bf,(dl.types.Symbol.makeInstance("black"))))};var aR=function(dG,dF,bf){return((dl.Kernel.setLastLoc('offset=631 line=26 span=17 id="rbtree.ss"')&&a1(dF))?dl.types.Logic.FALSE:((dl.Kernel.setLastLoc('offset=672 line=28 span=22 id="rbtree.ss"')&&dG.apply(null,[[bf,(dl.Kernel.setLastLoc('offset=679 line=28 span=14 id="rbtree.ss"')&&bQ(dF))]]))?(dl.Kernel.setLastLoc('offset=705 line=29 span=37 id="rbtree.ss"')&&aR(dG,(dl.Kernel.setLastLoc('offset=724 line=29 span=15 id="rbtree.ss"')&&dz(dF)),bf)):((dl.Kernel.setLastLoc('offset=753 line=30 span=22 id="rbtree.ss"')&&dG.apply(null,[[(dl.Kernel.setLastLoc('offset=758 line=30 span=14 id="rbtree.ss"')&&bQ(dF)),bf]]))?(dl.Kernel.setLastLoc('offset=785 line=31 span=37 id="rbtree.ss"')&&aR(dG,(dl.Kernel.setLastLoc('offset=804 line=31 span=15 id="rbtree.ss"')&&ar(dF)),bf)):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=848 line=33 span=38 id="rbtree.ss"')&&dl.Kernel.list([(dl.Kernel.setLastLoc('offset=854 line=33 span=14 id="rbtree.ss"')&&bQ(dF)),(dl.Kernel.setLastLoc('offset=869 line=33 span=16 id="rbtree.ss"')&&az(dF))])):(dl.Kernel.setLastLoc('offset=624 line=26 span=264 id="rbtree.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=624 line=26 span=264 id=\\"rbtree.ss\\""'))))))))};var o=function(dH,dG,dF,bf){return((function(){var dI=function(dJ){return((dl.Kernel.setLastLoc('offset=1039 line=39 span=17 id="rbtree.ss"')&&a1(dJ))?(dl.Kernel.setLastLoc('offset=1057 line=39 span=48 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("red")),dF,bf,bc,bc)):((dl.Kernel.setLastLoc('offset=1126 line=40 span=22 id="rbtree.ss"')&&dH.apply(null,[[dF,(dl.Kernel.setLastLoc('offset=1133 line=40 span=14 id="rbtree.ss"')&&bQ(dJ))]]))?(dl.Kernel.setLastLoc('offset=1168 line=41 span=103 id="rbtree.ss"')&&dj((dl.Kernel.setLastLoc('offset=1184 line=41 span=16 id="rbtree.ss"')&&G(dJ)),(dl.Kernel.setLastLoc('offset=1201 line=41 span=14 id="rbtree.ss"')&&bQ(dJ)),(dl.Kernel.setLastLoc('offset=1216 line=41 span=16 id="rbtree.ss"')&&az(dJ)),(dl.Kernel.setLastLoc('offset=1233 line=41 span=21 id="rbtree.ss"')&&dI((dl.Kernel.setLastLoc('offset=1238 line=41 span=15 id="rbtree.ss"')&&dz(dJ)))),(dl.Kernel.setLastLoc('offset=1255 line=41 span=15 id="rbtree.ss"')&&ar(dJ)))):((dl.Kernel.setLastLoc('offset=1292 line=42 span=22 id="rbtree.ss"')&&dH.apply(null,[[(dl.Kernel.setLastLoc('offset=1297 line=42 span=14 id="rbtree.ss"')&&bQ(dJ)),dF]]))?(dl.Kernel.setLastLoc('offset=1334 line=43 span=103 id="rbtree.ss"')&&dj((dl.Kernel.setLastLoc('offset=1350 line=43 span=16 id="rbtree.ss"')&&G(dJ)),(dl.Kernel.setLastLoc('offset=1367 line=43 span=14 id="rbtree.ss"')&&bQ(dJ)),(dl.Kernel.setLastLoc('offset=1382 line=43 span=16 id="rbtree.ss"')&&az(dJ)),(dl.Kernel.setLastLoc('offset=1399 line=43 span=15 id="rbtree.ss"')&&dz(dJ)),(dl.Kernel.setLastLoc('offset=1415 line=43 span=21 id="rbtree.ss"')&&dI((dl.Kernel.setLastLoc('offset=1420 line=43 span=15 id="rbtree.ss"')&&ar(dJ)))))):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=1482 line=45 span=66 id="rbtree.ss"')&&D((dl.Kernel.setLastLoc('offset=1495 line=45 span=16 id="rbtree.ss"')&&G(dJ)),dF,bf,(dl.Kernel.setLastLoc('offset=1516 line=45 span=15 id="rbtree.ss"')&&dz(dJ)),(dl.Kernel.setLastLoc('offset=1532 line=45 span=15 id="rbtree.ss"')&&ar(dJ)))):(dl.Kernel.setLastLoc('offset=1032 line=39 span=518 id="rbtree.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=1032 line=39 span=518 id=\\"rbtree.ss\\""'))))))))};(function(dJ){})(dl.Kernel.identity);return(dl.Kernel.setLastLoc('offset=1557 line=46 span=110 id="rbtree.ss"')&&(((function(){dl.Kernel.setLastLoc('offset=1557 line=46 span=110 id="rbtree.ss"');var dJ=(function(dL){var dK=dL[0];return(dl.Kernel.setLastLoc('offset=1582 line=47 span=84 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("black")),(dl.Kernel.setLastLoc('offset=1602 line=47 span=14 id="rbtree.ss"')&&bQ(dK)),(dl.Kernel.setLastLoc('offset=1617 line=47 span=16 id="rbtree.ss"')&&az(dK)),(dl.Kernel.setLastLoc('offset=1634 line=47 span=15 id="rbtree.ss"')&&dz(dK)),(dl.Kernel.setLastLoc('offset=1650 line=47 span=15 id="rbtree.ss"')&&ar(dK))))});dJ.toWrittenString=function(){return"<function:lambda>"};dJ.toDisplayedString=dJ.toWrittenString;return dJ})())).apply(null,[[(dl.Kernel.setLastLoc('offset=1566 line=46 span=7 id="rbtree.ss"')&&dI(dG))]]))})())};var dj=function(dI,dG,dF,bf,dH){return(((dl.Kernel.setLastLoc('offset=1792 line=52 span=23 id="rbtree.ss"')&&db(dI))&&(dl.Kernel.setLastLoc('offset=1816 line=52 span=36 id="rbtree.ss"')&&b6((dl.Kernel.setLastLoc('offset=1835 line=52 span=16 id="rbtree.ss"')&&G(bf))))&&(dl.Kernel.setLastLoc('offset=1853 line=52 span=50 id="rbtree.ss"')&&b6((dl.Kernel.setLastLoc('offset=1872 line=52 span=30 id="rbtree.ss"')&&G((dl.Kernel.setLastLoc('offset=1886 line=52 span=15 id="rbtree.ss"')&&dz(bf)))))))?(dl.Kernel.setLastLoc('offset=1914 line=53 span=305 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("red")),(dl.Kernel.setLastLoc('offset=1932 line=53 span=14 id="rbtree.ss"')&&bQ(bf)),(dl.Kernel.setLastLoc('offset=1947 line=53 span=16 id="rbtree.ss"')&&az(bf)),(dl.Kernel.setLastLoc('offset=1984 line=54 span=171 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("black")),(dl.Kernel.setLastLoc('offset=2004 line=54 span=28 id="rbtree.ss"')&&bQ((dl.Kernel.setLastLoc('offset=2016 line=54 span=15 id="rbtree.ss"')&&dz(bf)))),(dl.Kernel.setLastLoc('offset=2033 line=54 span=30 id="rbtree.ss"')&&az((dl.Kernel.setLastLoc('offset=2047 line=54 span=15 id="rbtree.ss"')&&dz(bf)))),(dl.Kernel.setLastLoc('offset=2095 line=55 span=29 id="rbtree.ss"')&&dz((dl.Kernel.setLastLoc('offset=2108 line=55 span=15 id="rbtree.ss"')&&dz(bf)))),(dl.Kernel.setLastLoc('offset=2125 line=55 span=29 id="rbtree.ss"')&&ar((dl.Kernel.setLastLoc('offset=2138 line=55 span=15 id="rbtree.ss"')&&dz(bf)))))),(dl.Kernel.setLastLoc('offset=2176 line=56 span=42 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("black")),dG,dF,(dl.Kernel.setLastLoc('offset=2200 line=56 span=15 id="rbtree.ss"')&&ar(bf)),dH)))):(((dl.Kernel.setLastLoc('offset=2235 line=57 span=23 id="rbtree.ss"')&&db(dI))&&(dl.Kernel.setLastLoc('offset=2259 line=57 span=36 id="rbtree.ss"')&&b6((dl.Kernel.setLastLoc('offset=2278 line=57 span=16 id="rbtree.ss"')&&G(bf))))&&(dl.Kernel.setLastLoc('offset=2296 line=57 span=50 id="rbtree.ss"')&&b6((dl.Kernel.setLastLoc('offset=2315 line=57 span=30 id="rbtree.ss"')&&G((dl.Kernel.setLastLoc('offset=2329 line=57 span=15 id="rbtree.ss"')&&ar(bf)))))))?(dl.Kernel.setLastLoc('offset=2357 line=58 span=274 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("red")),(dl.Kernel.setLastLoc('offset=2375 line=58 span=28 id="rbtree.ss"')&&bQ((dl.Kernel.setLastLoc('offset=2387 line=58 span=15 id="rbtree.ss"')&&ar(bf)))),(dl.Kernel.setLastLoc('offset=2404 line=58 span=30 id="rbtree.ss"')&&az((dl.Kernel.setLastLoc('offset=2418 line=58 span=15 id="rbtree.ss"')&&ar(bf)))),(dl.Kernel.setLastLoc('offset=2455 line=59 span=98 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("black")),(dl.Kernel.setLastLoc('offset=2475 line=59 span=14 id="rbtree.ss"')&&bQ(bf)),(dl.Kernel.setLastLoc('offset=2490 line=59 span=16 id="rbtree.ss"')&&az(bf)),(dl.Kernel.setLastLoc('offset=2507 line=59 span=15 id="rbtree.ss"')&&dz(bf)),(dl.Kernel.setLastLoc('offset=2523 line=59 span=29 id="rbtree.ss"')&&dz((dl.Kernel.setLastLoc('offset=2536 line=59 span=15 id="rbtree.ss"')&&ar(bf)))))),(dl.Kernel.setLastLoc('offset=2574 line=60 span=56 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("black")),dG,dF,(dl.Kernel.setLastLoc('offset=2598 line=60 span=29 id="rbtree.ss"')&&ar((dl.Kernel.setLastLoc('offset=2611 line=60 span=15 id="rbtree.ss"')&&ar(bf)))),dH)))):(((dl.Kernel.setLastLoc('offset=2647 line=61 span=23 id="rbtree.ss"')&&db(dI))&&(dl.Kernel.setLastLoc('offset=2671 line=61 span=36 id="rbtree.ss"')&&b6((dl.Kernel.setLastLoc('offset=2690 line=61 span=16 id="rbtree.ss"')&&G(dH))))&&(dl.Kernel.setLastLoc('offset=2708 line=61 span=50 id="rbtree.ss"')&&b6((dl.Kernel.setLastLoc('offset=2727 line=61 span=30 id="rbtree.ss"')&&G((dl.Kernel.setLastLoc('offset=2741 line=61 span=15 id="rbtree.ss"')&&dz(dH)))))))?(dl.Kernel.setLastLoc('offset=2769 line=62 span=274 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("red")),(dl.Kernel.setLastLoc('offset=2787 line=62 span=28 id="rbtree.ss"')&&bQ((dl.Kernel.setLastLoc('offset=2799 line=62 span=15 id="rbtree.ss"')&&dz(dH)))),(dl.Kernel.setLastLoc('offset=2816 line=62 span=30 id="rbtree.ss"')&&az((dl.Kernel.setLastLoc('offset=2830 line=62 span=15 id="rbtree.ss"')&&dz(dH)))),(dl.Kernel.setLastLoc('offset=2867 line=63 span=56 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("black")),dG,dF,bf,(dl.Kernel.setLastLoc('offset=2893 line=63 span=29 id="rbtree.ss"')&&dz((dl.Kernel.setLastLoc('offset=2906 line=63 span=15 id="rbtree.ss"')&&dz(dH)))))),(dl.Kernel.setLastLoc('offset=2944 line=64 span=98 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("black")),(dl.Kernel.setLastLoc('offset=2964 line=64 span=14 id="rbtree.ss"')&&bQ(dH)),(dl.Kernel.setLastLoc('offset=2979 line=64 span=16 id="rbtree.ss"')&&az(dH)),(dl.Kernel.setLastLoc('offset=2996 line=64 span=29 id="rbtree.ss"')&&ar((dl.Kernel.setLastLoc('offset=3009 line=64 span=15 id="rbtree.ss"')&&dz(dH)))),(dl.Kernel.setLastLoc('offset=3026 line=64 span=15 id="rbtree.ss"')&&ar(dH)))))):(((dl.Kernel.setLastLoc('offset=3059 line=65 span=23 id="rbtree.ss"')&&db(dI))&&(dl.Kernel.setLastLoc('offset=3083 line=65 span=36 id="rbtree.ss"')&&b6((dl.Kernel.setLastLoc('offset=3102 line=65 span=16 id="rbtree.ss"')&&G(dH))))&&(dl.Kernel.setLastLoc('offset=3120 line=65 span=50 id="rbtree.ss"')&&b6((dl.Kernel.setLastLoc('offset=3139 line=65 span=30 id="rbtree.ss"')&&G((dl.Kernel.setLastLoc('offset=3153 line=65 span=15 id="rbtree.ss"')&&ar(dH)))))))?(dl.Kernel.setLastLoc('offset=3181 line=66 span=305 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("red")),(dl.Kernel.setLastLoc('offset=3199 line=66 span=14 id="rbtree.ss"')&&bQ(dH)),(dl.Kernel.setLastLoc('offset=3214 line=66 span=16 id="rbtree.ss"')&&az(dH)),(dl.Kernel.setLastLoc('offset=3251 line=67 span=42 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("black")),dG,dF,bf,(dl.Kernel.setLastLoc('offset=3277 line=67 span=15 id="rbtree.ss"')&&dz(dH)))),(dl.Kernel.setLastLoc('offset=3314 line=68 span=171 id="rbtree.ss"')&&D((dl.types.Symbol.makeInstance("black")),(dl.Kernel.setLastLoc('offset=3334 line=68 span=28 id="rbtree.ss"')&&bQ((dl.Kernel.setLastLoc('offset=3346 line=68 span=15 id="rbtree.ss"')&&ar(dH)))),(dl.Kernel.setLastLoc('offset=3363 line=68 span=30 id="rbtree.ss"')&&az((dl.Kernel.setLastLoc('offset=3377 line=68 span=15 id="rbtree.ss"')&&ar(dH)))),(dl.Kernel.setLastLoc('offset=3425 line=69 span=29 id="rbtree.ss"')&&dz((dl.Kernel.setLastLoc('offset=3438 line=69 span=15 id="rbtree.ss"')&&ar(dH)))),(dl.Kernel.setLastLoc('offset=3455 line=69 span=29 id="rbtree.ss"')&&ar((dl.Kernel.setLastLoc('offset=3468 line=69 span=15 id="rbtree.ss"')&&ar(dH)))))))):(dl.types.Logic.TRUE?(dl.Kernel.setLastLoc('offset=3502 line=70 span=23 id="rbtree.ss"')&&D(dI,dG,dF,bf,dH)):(dl.Kernel.setLastLoc('offset=1780 line=52 span=1747 id="rbtree.ss"')&&dl.Kernel.error((dl.types.Symbol.makeInstance("cond")),(dl.types.String.makeInstance('cond: fell out of cond around "offset=1780 line=52 span=1747 id=\\"rbtree.ss\\""')))))))))};var bh=function(bf){return((function(){var dF=function(dH,dG){return((dl.Kernel.setLastLoc('offset=3660 line=76 span=17 id="rbtree.ss"')&&a1(dH))?dG:(((dl.Kernel.setLastL