((2 ()) ((1) 0 () 31 ((c (? . 1) c canvas<%>) (c lib c (u . "mred/main.ss")) (c lib c (u . "scheme/private/class-internal.ss")) (c (? . 1) c window<%>) (c lib c (u . "scheme/gui/base.ss")) (c quote c #%kernel) (c lib c (u . "scheme/contract.ss")) (c (? . 1) c canvas%) (c (? . 1) c area<%>) (c lib c (u . "scheme/base.ss")) (c (? . 5) c void?) (c (? . 9) c require) (c (? . 1) c subwindow<%>) (c (? . 5) c real?) (c lib c (u . "scheme/private/contract-guts.ss")) (c lib c (u . "mred/main.ss")) (c (? . 14) c any) (c lib c (u . "scheme/private/pre-base.ss")) (c lib c (u . "scheme/class.ss")) (c (? . 14) c any/c) (c (? . 2) c new) (c (? . 5) c list?) (c (? . 2) c send) (c (? . 1) c subarea<%>) (c (? . 5) c boolean?) (c (? . 6) c ->) (c (? . 1) c canvas%) (c (? . 2) c class?) (c (? . 5) c string?) (c (? . 18) c is-a?/c) (c (? . 5) c void)) () (c (c meth c (c (? . 0) c set-canvas-background)) c (c meth c (c (? . 0) c warp-pointer)) c (c dep c (c (? . 18) c new)) c (c dep c (? . 22)) c (c meth c (c (? . 8) c get-graphical-min-size)) c (c meth c (c (? . 3) c on-drop-file)) c (c def c (? . 24)) c (c dep c (? . 25)) c (c dep c (c (? . 4) c canvas<%>)) c (c meth c (c (? . 0) c on-tab-in)) c (c meth c (c (? . 0) c on-event)) c (c dep c (? . 11)) c (c dep c (? . 20)) c (c meth c (c (? . 0) c on-char)) c (c meth c (c (? . 3) c refresh)) c (c meth c (c (? . 3) c get-height)) c (c dep c (? . 12)) c (c dep c (c (? . 4) c area<%>)) c (c meth c (c (? . 7) c with-gl-context)) c (c dep c (? . 10)) c (c dep c (c (? . 6) c any)) c (c meth c (c (? . 3) c get-handle)) c (c meth c (c (? . 3) c show)) c (c meth c (c (? . 3) c on-move)) c (c meth c (c (? . 7) c set-scroll-range)) c (c meth c (c (? . 8) c get-parent)) c (c meth c (c (? . 0) c get-dc)) c (c def c (? . 19)) c (c dep c (c (? . 4) c subarea<%>)) c (c dep c (? . 8)) c (c dep c (c (? . 9) c list?)) c (c meth c (c (? . 3) c get-x)) c (c def c (? . 10)) c (c dep c (c (? . 9) c void?)) c (c meth c (c (? . 7) c swap-gl-buffers)) c (c meth c (c (? . 7) c set-scroll-pos)) c (c meth c (c (? . 3) c client->screen)) c (c meth c (c (? . 7) c on-paint)) c (c meth c (c (? . 0) c get-canvas-background)) c (c form c (? . 11)) c (c meth c (c (? . 3) c popup-menu)) c (c dep c (c (? . 17) c real?)) c (c dep c (? . 13)) c (c dep c (c (? . 9) c void)) c (c cls/intf c (? . 7)) c (c meth c (c (? . 7) c show-scrollbars)) c (c meth c (c (? . 8) c stretchable-width)) c (c cls/intf c (? . 12)) c (c def c (? . 13)) c (c meth c (c (? . 3) c set-cursor)) c (c meth c (c (? . 8) c min-width)) c (c meth c (c (? . 3) c get-y)) c (c def c (c (? . 15) c window<%>)) c (c cls/intf c (? . 23)) c (c form c (? . 16)) c (c dep c (c (? . 9) c real?)) c (c def c (c (? . 15) c canvas<%>)) c (c meth c (c (? . 8) c min-height)) c (c def c (? . 30)) c (c dep c (? . 16)) c (c meth c (c (? . 3) c get-cursor)) c (c meth c (c (? . 3) c enable)) c (c dep c (c (? . 17) c boolean?)) c (c dep c (c (? . 17) c list?)) c (c def c (? . 29)) c (c dep c (c (? . 17) c string?)) c (c def c (c (? . 15) c area<%>)) c (c dep c (? . 3)) c (c meth c (c (? . 7) c get-scroll-range)) c (c dep c (? . 19)) c (c meth c (c (? . 3) c get-client-size)) c (c meth c (c (? . 7) c set-scroll-page)) c (c meth c (c (? . 3) c has-focus?)) c (c def c (? . 26)) c (c meth c (c (? . 7) c init-manual-scrollbars)) c (c meth c (c (? . 3) c on-subwindow-char)) c (c meth c (c (? . 7) c get-scroll-pos)) c (c meth c (c (? . 8) c stretchable-height)) c (c meth c (c (? . 3) c screen->client)) c (c meth c (c (? . 8) c get-top-level-window)) c (c dep c (c (? . 17) c void)) c (c dep c (c (? . 4) c window<%>)) c (c meth c (c (? . 7) c get-virtual-size)) c (c meth c (c (? . 7) c accept-tab-focus)) c (c meth c (c (? . 3) c is-shown?)) c (c meth c (c (? . 3) c focus)) c (c meth c (c (? . 3) c accept-drop-files)) c (c cls/intf c (? . 8)) c (c dep c (c (? . 9) c string?)) c (c meth c (c (? . 7) c scroll)) c (c meth c (c (? . 7) c get-view-start)) c (c meth c (c (? . 0) c min-client-width)) c (c dep c (? . 28)) c (c def c (? . 27)) c (c form c (? . 20)) c (c dep c (? . 21)) c (c cls/intf c (? . 0)) c (c dep c (c (? . 9) c boolean?)) c (c meth c (c (? . 7) c get-scroll-page)) c (c def c (? . 21)) c (c meth c (c (? . 3) c is-enabled?)) c (c form c (? . 22)) c (c meth c (c (? . 23) c vert-margin)) c (c meth c (c (? . 3) c on-superwindow-show)) c (c dep c (c (? . 17) c void?)) c (c def c (c (? . 15) c subarea<%>)) c (c meth c (c (? . 7) c on-scroll)) c (c meth c (c (? . 3) c get-width)) c (c dep c (? . 24)) c (c form c (? . 25)) c (c dep c (? . 26)) c (c cls/intf c (? . 3)) c (c meth c (c (? . 0) c min-client-height)) c (c dep c (? . 0)) c (c meth c (c (? . 3) c on-subwindow-event)) c (c meth c (c (? . 3) c get-plain-label)) c (c meth c (c (? . 3) c on-superwindow-enable)) c (c dep c (? . 27)) c (c meth c (c (? . 7) c init-auto-scrollbars)) c (c dep c (c (? . 18) c send)) c (c meth c (c (? . 3) c set-label)) c (c def c (? . 28)) c (c meth c (c (? . 3) c on-focus)) c (c meth c (c (? . 0) c set-resize-corner)) c (c meth c (c (? . 3) c get-size)) c (c dep c (? . 23)) c (c dep c (c (? . 4) c canvas%)) c (c dep c (c (? . 6) c any/c)) c (c dep c (c (? . 4) c subwindow<%>)) c (c dep c (? . 29)) c (c meth c (c (? . 3) c on-size)) c (c dep c (? . 30)) c (c dep c (c (? . 18) c class?)) c (c meth c (c (? . 23) c horiz-margin)) c (c meth c (c (? . 3) c get-label)))) ((collects #"scribblings" #"gui" #"gui.scrbl") (collects #"scribblings" #"reference" #"reference.scrbl")) ((1) 0 () 23 ((c (? . 9) c send) (c (c lib c (u . "games/gl-board-game.ss")) c gl-board%) (c (? . 4) c string?) (c (? . 12) c ->) (c lib c (u . "scheme/base.ss")) (c lib c (u . "scheme/private/pre-base.ss")) (c quote c #%kernel) (c (? . 4) c void) (c (? . 4) c require) (c lib c (u . "scheme/class.ss")) (c (? . 9) c class?) (c lib c (u . "scheme/private/class-internal.ss")) (c lib c (u . "scheme/contract.ss")) (c (? . 12) c any/c) (c (c lib c (u . "scheme/gui/base.ss")) c canvas%) (c (? . 4) c boolean?) (c (? . 9) c is-a?/c) (c (? . 12) c any) (c lib c (u . "scheme/private/contract-guts.ss")) (c (? . 4) c void?) (c (? . 4) c real?) (c (? . 4) c list?) (c (? . 9) c new)) () (h ! (equal) ((? . 0) h ! (equal) ((c dep c (? . 0)) . #t) ((c dep c (c (? . 11) c send)) . #t)) ((? . 1) h ! (equal) ((c dep c (? . 1)) . #t)) ((? . 2) h ! (equal) ((c dep c (? . 2)) . #t) ((c dep c (c (? . 6) c string?)) . #t) ((c dep c (c (? . 5) c string?)) . #t)) ((? . 3) h ! (equal) ((c dep c (? . 3)) . #t) ((c dep c (c (c lib c (u . "scheme/private/contract-arrow.ss")) c ->)) . #t)) ((? . 7) h ! (equal) ((c dep c (c (? . 5) c void)) . #t) ((c dep c (c (? . 6) c void)) . #t) ((c dep c (? . 7)) . #t)) ((? . 8) h ! (equal) ((c dep c (c (c lib c (u . "scheme/private/reqprov.ss")) c require)) . #t) ((c dep c (? . 8)) . #t) ((c dep c (c (? . 5) c require)) . #t)) ((? . 10) h ! (equal) ((c dep c (? . 10)) . #t) ((c dep c (c (? . 11) c class?)) . #t)) ((? . 13) h ! (equal) ((c dep c (c (? . 18) c any/c)) . #t) ((c dep c (? . 13)) . #t)) ((? . 14) h ! (equal) ((c dep c (c (c lib c (u . "mred/private/mrcanvas.ss")) c canvas%)) . #t) ((c dep c (c (c lib c (u . "mred/main.ss")) c canvas%)) . #t) ((c dep c (c (c lib c (u . "mred/mred.ss")) c canvas%)) . #t) ((c dep c (? . 14)) . #t)) ((? . 15) h ! (equal) ((c dep c (? . 15)) . #t) ((c dep c (c (? . 5) c boolean?)) . #t) ((c dep c (c (? . 6) c boolean?)) . #t)) ((? . 16) h ! (equal) ((c dep c (c (c lib c (u . "scheme/private/contract-object.ss")) c is-a?/c)) . #t) ((c dep c (? . 16)) . #t)) ((? . 17) h ! (equal) ((c dep c (? . 17)) . #t) ((c dep c (c (? . 18) c any)) . #t)) ((? . 19) h ! (equal) ((c dep c (c (? . 5) c void?)) . #t) ((c dep c (c (? . 6) c void?)) . #t) ((c dep c (? . 19)) . #t)) ((? . 20) h ! (equal) ((c dep c (c (? . 5) c real?)) . #t) ((c dep c (c (? . 6) c real?)) . #t) ((c dep c (? . 20)) . #t)) ((? . 21) h ! (equal) ((c dep c (c (? . 6) c list?)) . #t) ((c dep c (? . 21)) . #t) ((c dep c (c (? . 5) c list?)) . #t)) ((? . 22) h ! (equal) ((c dep c (c (? . 11) c new)) . #t) ((c dep c (? . 22)) . #t)))))