/usr/share/doc/racket/unstable-gui/ppict.html is in racket-doc 6.1-4.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 | <!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html><head><meta http-equiv="content-type" content="text/html; charset=utf-8"/><title>5 Progressive Picts and Slides</title><link rel="stylesheet" type="text/css" href="../scribble.css" title="default"/><link rel="stylesheet" type="text/css" href="../racket.css" title="default"/><link rel="stylesheet" type="text/css" href="../manual-style.css" title="default"/><link rel="stylesheet" type="text/css" href="../manual-racket.css" title="default"/><link rel="stylesheet" type="text/css" href="../doc-site.css" title="default"/><script type="text/javascript" src="../scribble-common.js"></script><script type="text/javascript" src="../manual-racket.js"></script><script type="text/javascript" src="../doc-site.js"></script><script type="text/javascript" src="../local-redirect/local-redirect.js"></script><script type="text/javascript" src="../local-redirect/local-user-redirect.js"></script><!--[if IE 6]><style type="text/css">.SIEHidden { overflow: hidden; }</style><![endif]--></head><body id="doc-racket-lang-org"><div class="tocset"><div class="tocview"><div class="tocviewlist tocviewlisttopspace"><div class="tocviewtitle"><table cellspacing="0" cellpadding="0"><tr><td style="width: 1em;"><a href="javascript:void(0);" title="Expand/Collapse" class="tocviewtoggle" onclick="TocviewToggle(this,"tocview_0");">▼</a></td><td></td><td><a href="index.html" class="tocviewlink" data-pltdoc="x">Unstable GUI:<span class="mywbr"> </span> May Change Without Warning</a></td></tr></table></div><div class="tocviewsublisttop" style="display: block;" id="tocview_0"><table cellspacing="0" cellpadding="0"><tr><td align="right">1 </td><td><a href="gui-notify.html" class="tocviewlink" data-pltdoc="x">Notify-<wbr></wbr>boxes</a></td></tr><tr><td align="right">2 </td><td><a href="gui-prefs.html" class="tocviewlink" data-pltdoc="x">Preferences</a></td></tr><tr><td align="right">3 </td><td><a href="pict.html" class="tocviewlink" data-pltdoc="x">Pict Utilities</a></td></tr><tr><td align="right">4 </td><td><a href="Slideshow_Presentations.html" class="tocviewlink" data-pltdoc="x">Slideshow Presentations</a></td></tr><tr><td align="right">5 </td><td><a href="" class="tocviewselflink" data-pltdoc="x">Progressive Picts and Slides</a></td></tr><tr><td align="right">6 </td><td><a href="snip.html" class="tocviewlink" data-pltdoc="x">Snip Utilities</a></td></tr><tr><td align="right">7 </td><td><a href="Scribble_Utilities.html" class="tocviewlink" data-pltdoc="x">Scribble Utilities</a></td></tr></table></div></div><div class="tocviewlist"><table cellspacing="0" cellpadding="0"><tr><td style="width: 1em;"><a href="javascript:void(0);" title="Expand/Collapse" class="tocviewtoggle" onclick="TocviewToggle(this,"tocview_1");">►</a></td><td>5 </td><td><a href="" class="tocviewselflink" data-pltdoc="x">Progressive Picts and Slides</a></td></tr></table><div class="tocviewsublistbottom" style="display: none;" id="tocview_1"><table cellspacing="0" cellpadding="0"><tr><td align="right">5.1 </td><td><a href="#%28part._ppicts%29" class="tocviewlink" data-pltdoc="x">Progressive Picts</a></td></tr><tr><td align="right">5.2 </td><td><a href="#%28part._pslide%29" class="tocviewlink" data-pltdoc="x">Progressive Slides</a></td></tr></table></div></div></div><div class="tocsub"><div class="tocsubtitle">On this page:</div><table class="tocsublist" cellspacing="0"><tr><td><span class="tocsublinknumber">5.1<tt> </tt></span><a href="#%28part._ppicts%29" class="tocsubseclink" data-pltdoc="x">Progressive Picts</a></td></tr><tr><td><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="tocsubnonseclink" data-pltdoc="x"><span class="RktSym"><span class="RktStxLink">ppict-<wbr></wbr>do</span></span></a></td></tr><tr><td><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%2A%29%29" class="tocsubnonseclink" data-pltdoc="x"><span class="RktSym"><span class="RktStxLink">ppict-<wbr></wbr>do*</span></span></a></td></tr><tr><td><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do-state%29%29" class="tocsubnonseclink" data-pltdoc="x"><span class="RktSym"><span class="RktStxLink">ppict-<wbr></wbr>do-<wbr></wbr>state</span></span></a></td></tr><tr><td><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict~3f%29%29" class="tocsubnonseclink" data-pltdoc="x"><span class="RktSym"><span class="RktValLink">ppict?</span></span></a></td></tr><tr><td><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-go%29%29" class="tocsubnonseclink" data-pltdoc="x"><span class="RktSym"><span class="RktValLink">ppict-<wbr></wbr>go</span></span></a></td></tr><tr><td><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-add%29%29" class="tocsubnonseclink" data-pltdoc="x"><span class="RktSym"><span class="RktValLink">ppict-<wbr></wbr>add</span></span></a></td></tr><tr><td><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-add%2A%29%29" class="tocsubnonseclink" data-pltdoc="x"><span class="RktSym"><span class="RktValLink">ppict-<wbr></wbr>add*</span></span></a></td></tr><tr><td><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._placer~3f%29%29" class="tocsubnonseclink" data-pltdoc="x"><span class="RktSym"><span class="RktValLink">placer?</span></span></a></td></tr><tr><td><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._refpoint-placer~3f%29%29" class="tocsubnonseclink" data-pltdoc="x"><span class="RktSym"><span class="RktValLink">refpoint-<wbr></wbr>placer?</span></span></a></td></tr><tr><td><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="tocsubnonseclink" data-pltdoc="x"><span class="RktSym"><span class="RktValLink">coord</span></span></a></td></tr><tr><td><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._grid%29%29" class="tocsubnonseclink" data-pltdoc="x"><span class="RktSym"><span class="RktValLink">grid</span></span></a></td></tr><tr><td><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._cascade%29%29" class="tocsubnonseclink" data-pltdoc="x"><span class="RktSym"><span class="RktValLink">cascade</span></span></a></td></tr><tr><td><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._tile%29%29" class="tocsubnonseclink" data-pltdoc="x"><span class="RktSym"><span class="RktValLink">tile</span></span></a></td></tr><tr><td><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._at-find-pict%29%29" class="tocsubnonseclink" data-pltdoc="x"><span class="RktSym"><span class="RktValLink">at-<wbr></wbr>find-<wbr></wbr>pict</span></span></a></td></tr><tr><td><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._merge-refpoints%29%29" class="tocsubnonseclink" data-pltdoc="x"><span class="RktSym"><span class="RktValLink">merge-<wbr></wbr>refpoints</span></span></a></td></tr><tr><td><span class="tocsublinknumber">5.2<tt> </tt></span><a href="#%28part._pslide%29" class="tocsubseclink" data-pltdoc="x">Progressive Slides</a></td></tr><tr><td><a href="#%28form._%28%28lib._unstable%2Fgui%2Fpslide..rkt%29._pslide%29%29" class="tocsubnonseclink" data-pltdoc="x"><span class="RktSym"><span class="RktStxLink">pslide</span></span></a></td></tr><tr><td><a href="#%28def._%28%28lib._unstable%2Fgui%2Fpslide..rkt%29._pslide-base-pict%29%29" class="tocsubnonseclink" data-pltdoc="x"><span class="RktSym"><span class="RktValLink">pslide-<wbr></wbr>base-<wbr></wbr>pict</span></span></a></td></tr><tr><td><a href="#%28def._%28%28lib._unstable%2Fgui%2Fpslide..rkt%29._pslide-default-placer%29%29" class="tocsubnonseclink" data-pltdoc="x"><span class="RktSym"><span class="RktValLink">pslide-<wbr></wbr>default-<wbr></wbr>placer</span></span></a></td></tr></table></div></div><div class="maincolumn"><div class="main"><div class="navsettop"><span class="navleft"><form class="searchform"><input class="searchbox" style="color: #888;" type="text" value="...search manuals..." title="Enter a search string to search the manuals" onkeypress="return DoSearchKey(event, this, "6.1", "../");" onfocus="this.style.color="black"; this.style.textAlign="left"; if (this.value == "...search manuals...") this.value="";" onblur="if (this.value.match(/^ *$/)) { this.style.color="#888"; this.style.textAlign="center"; this.value="...search manuals..."; }"/></form> <a href="../index.html" title="up to the documentation top" data-pltdoc="x" onclick="return GotoPLTRoot("6.1");">top</a></span><span class="navright"> <a href="Slideshow_Presentations.html" title="backward to "4 Slideshow Presentations"" data-pltdoc="x">← prev</a> <a href="index.html" title="up to "Unstable GUI: May Change Without Warning"" data-pltdoc="x">up</a> <a href="snip.html" title="forward to "6 Snip Utilities"" data-pltdoc="x">next →</a></span> </div><h3 x-source-module="(lib "unstable/scribblings/gui/unstable-gui.scrbl")" x-part-tag=""ppict"">5<tt> </tt><a name="(part._ppict)"></a>Progressive Picts and Slides</h3><div class="SAuthorListBox"><span class="SAuthorList"><p class="author">Ryan Culpepper <<a href="mailto:ryanc@racket-lang.org">ryanc@racket-lang.org</a>></p></span></div><p><div class="SIntrapara"></div><div class="SIntrapara">This library is <span style="font-style: italic">unstable</span>;
compatibility will not be maintained.
See <a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=unstable&rel=index.html&version=6.1" class="Sq" data-pltdoc="x">Unstable: May Change Without Warning</a>
for more information.</div></p><h4 x-source-module="(lib "unstable/scribblings/gui/unstable-gui.scrbl")" x-part-tag=""ppicts"">5.1<tt> </tt><a name="(part._ppicts)"></a><a name="(mod-path._unstable/gui/ppict)"></a>Progressive Picts</h4><p><table cellspacing="0" cellpadding="0" class="defmodule"><tr><td align="left"><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=require.html%23%2528form._%2528%2528lib._racket%252Fprivate%252Fbase..rkt%2529._require%2529%2529&version=6.1" class="RktStxLink Sq" data-pltdoc="x">require</a></span><span class="stt"> </span><a href="#%28mod-path._unstable%2Fgui%2Fppict%29" class="RktModLink" data-pltdoc="x"><span class="RktSym">unstable/gui/ppict</span></a><span class="RktPn">)</span></td><td align="right"><span class="RpackageSpec"><span class="Smaller"> package:</span> <span class="stt">unstable-lib</span></span></td></tr></table></p><p>A <a name="(tech._progressive._pict)"></a><span style="font-style: italic">progressive pict</span> or “ppict” is a kind of <span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Datatype.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._pict%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">pict</a></span>
that has an associated “pict placer,” which generally represents a
position and alignment. New picts can be placed on the progressive
pict by calling <span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-add%29%29" class="RktValLink" data-pltdoc="x">ppict-add</a></span>, and the placer can be updated by
calling <span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-go%29%29" class="RktValLink" data-pltdoc="x">ppict-go</a></span>. The <span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span> form provides a
compact notation for sequences of those two operations.</p><p><div class="SIntrapara"><blockquote class="SVInsetFlow"><table cellspacing="0" cellpadding="0" class="boxed RBoxed"><tr><td><table cellspacing="0" cellpadding="0" class="together"><tr><td><blockquote class="SubFlow"><div class="RBackgroundLabel SIEHidden"><div class="RBackgroundLabelInner"><p>syntax</p></div></div><p class="RForeground"><span class="RktPn">(</span><a name="(form._((lib._unstable/gui/ppict..rkt)._ppict-do))"></a><span title="Provided from: unstable/gui/ppict | Package: unstable-lib"><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxDef RktStxLink" data-pltdoc="x">ppict-do</a></span></span><span class="hspace"> </span><span class="RktVar">base-expr</span><span class="hspace"> </span><span class="RktVar">ppict-do-fragment</span><span class="hspace"> </span><span class="RktMeta">...</span><span class="RktPn">)</span></p></blockquote></td></tr></table></td></tr><tr><td><table cellspacing="0" cellpadding="0" class="together"><tr><td><blockquote class="SubFlow"><div class="RBackgroundLabel SIEHidden"><div class="RBackgroundLabelInner"><p>syntax</p></div></div><p class="RForeground"><span class="RktPn">(</span><a name="(form._((lib._unstable/gui/ppict..rkt)._ppict-do*))"></a><span title="Provided from: unstable/gui/ppict | Package: unstable-lib"><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%2A%29%29" class="RktStxDef RktStxLink" data-pltdoc="x">ppict-do*</a></span></span><span class="hspace"> </span><span class="RktVar">base-expr</span><span class="hspace"> </span><span class="RktVar">ppic-do-fragment</span><span class="hspace"> </span><span class="RktMeta">...</span><span class="RktPn">)</span></p></blockquote></td></tr><tr><td><span class="stt"> </span></td></tr><tr><td><table cellspacing="0" cellpadding="0" class="specgrammar"><tr><td align="right" valign="baseline"><span class="RktVar">ppict-do-fragment</span></td><td align="left" valign="baseline"><span class="stt"> </span></td><td align="center" valign="baseline">=</td><td align="left" valign="baseline"><span class="stt"> </span></td><td align="left" valign="baseline"><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktVar">placer-expr</span></td></tr><tr><td align="right" valign="baseline"><span class="stt"> </span></td><td align="left" valign="baseline"><span class="stt"> </span></td><td align="center" valign="baseline">|</td><td align="left" valign="baseline"><span class="stt"> </span></td><td align="left" valign="baseline"><span class="RktPn">#:set</span><span class="hspace"> </span><span class="RktVar">pict-expr</span></td></tr><tr><td align="right" valign="baseline"><span class="stt"> </span></td><td align="left" valign="baseline"><span class="stt"> </span></td><td align="center" valign="baseline">|</td><td align="left" valign="baseline"><span class="stt"> </span></td><td align="left" valign="baseline"><span class="RktPn">#:next</span></td></tr><tr><td align="right" valign="baseline"><span class="stt"> </span></td><td align="left" valign="baseline"><span class="stt"> </span></td><td align="center" valign="baseline">|</td><td align="left" valign="baseline"><span class="stt"> </span></td><td align="left" valign="baseline"><span class="RktPn">#:alt</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktVar">ppict-do-fragment</span><span class="hspace"> </span><span class="RktMeta">...</span><span class="RktPn">)</span></td></tr><tr><td align="right" valign="baseline"><span class="stt"> </span></td><td align="left" valign="baseline"><span class="stt"> </span></td><td align="center" valign="baseline">|</td><td align="left" valign="baseline"><span class="stt"> </span></td><td align="left" valign="baseline"><span class="RktVar">elem-expr</span></td></tr></table></td></tr><tr><td><span class="stt"> </span></td></tr><tr><td><blockquote class="SubFlow"><table cellspacing="0" cellpadding="0" class="argcontract"><tr><td><span class="hspace"> </span></td><td><span class="RktVar">base-expr</span></td><td><span class="hspace"> </span></td><td>:</td><td><span class="hspace"> </span></td><td><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Datatype.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._pict%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">pict?</a></span></td></tr></table><table cellspacing="0" cellpadding="0" class="argcontract"><tr><td><span class="hspace"> </span></td><td><span class="RktVar">placer-expr</span></td><td><span class="hspace"> </span></td><td>:</td><td><span class="hspace"> </span></td><td><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._placer~3f%29%29" class="RktValLink" data-pltdoc="x">placer?</a></span></td></tr></table><table cellspacing="0" cellpadding="0" class="argcontract"><tr><td><span class="hspace"> </span></td><td><span class="RktVar">pict-expr</span></td><td><span class="hspace"> </span></td><td>:</td><td><span class="hspace"> </span></td><td><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Datatype.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._pict%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">pict?</a></span></td></tr></table><table cellspacing="0" cellpadding="0" class="argcontract"><tr><td><span class="hspace"> </span></td><td><span class="RktVar">elem-expr</span></td><td><span class="hspace"> </span></td><td>:</td><td><span class="hspace"> </span></td><td><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=data-structure-contracts.html%23%2528def._%2528%2528lib._racket%252Fcontract%252Fbase..rkt%2529._or%252Fc%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">or/c</a></span><span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Datatype.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._pict%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">pict?</a></span><span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=number-types.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._real%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">real?</a></span><span class="hspace"> </span><span class="RktVal">#f</span><span class="RktPn">)</span></td></tr></table></blockquote></td></tr></table></td></tr></table></blockquote></div><div class="SIntrapara">Builds a pict (and optionally a list of intermediate picts)
progressively. The <span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span> form returns only the final pict;
any uses of <span class="RktPn">#:next</span> are ignored. The <span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%2A%29%29" class="RktStxLink" data-pltdoc="x">ppict-do*</a></span> form
returns two values: the final pict and a list of all partial picts
emitted due to <span class="RktPn">#:next</span> (the final pict is not included).</div></p><p>A <span class="RktPn">#:go</span> fragment changes the current placer. A <span class="RktPn">#:set</span>
fragment replaces the current pict state altogether with a new
computed pict. A <span class="RktPn">#:next</span> fragment saves a pict including only
the contents emitted so far (but whose alignment takes into account
picts yet to come). A <span class="RktPn">#:alt</span> fragment saves the current pict
state, executes the sub-sequence that follows, saves the result (as if
the sub-sequence ended with <span class="RktPn">#:next</span>), then restores the saved
pict state before continuing.</p><p>The <span class="RktVar">elem-expr</span>s are interpreted by the current placer. A
numeric <span class="RktVar">elem-expr</span> usually represents a spacing change, but
some placers do not support them. A spacing change only affects added
picts up until the next placer is installed; when a new placer is
installed, the spacing is reset, usually to <span class="RktVal">0</span>.</p><p>The <span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do-state%29%29" class="RktStxLink" data-pltdoc="x">ppict-do-state</a></span> form tracks the current state of the
pict. It is updated before a <span class="RktPn">#:go</span> or <span class="RktPn">#:set</span> fragment
or before a sequence of <span class="RktVar">elem-expr</span>s. It is not updated in the
middle of a chain of <span class="RktVar">elem-expr</span>s, however.</p><p><div class="SIntrapara"><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><p>Examples:</p></td></tr><tr><td><blockquote class="SCodeFlow"><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="stt">> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=define.html%23%2528form._%2528%2528lib._racket%252Fprivate%252Fbase..rkt%2529._define%2529%2529&version=6.1" class="RktStxLink Sq" data-pltdoc="x">define</a></span><span class="hspace"> </span><span class="RktSym">base</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Drawing_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._colorize%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">colorize</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._rectangle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">rectangle</a></span><span class="hspace"> </span><span class="RktVal">200</span><span class="hspace"> </span><span class="RktVal">200</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">"gray"</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValLink" data-pltdoc="x">coord</a></span><span class="hspace"> </span><span class="RktVal">1/2</span><span class="hspace"> </span><span class="RktVal">1/2</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">cc</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Drawing_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._colorize%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">colorize</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._hline%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">hline</a></span><span class="hspace"> </span><span class="RktVal">200</span><span class="hspace"> </span><span class="RktVal">1</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">"gray"</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValLink" data-pltdoc="x">coord</a></span><span class="hspace"> </span><span class="RktVal">1/2</span><span class="hspace"> </span><span class="RktVal">1/2</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">cc</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Drawing_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._colorize%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">colorize</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._vline%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">vline</a></span><span class="hspace"> </span><span class="RktVal">1</span><span class="hspace"> </span><span class="RktVal">200</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">"gray"</span><span class="RktPn">)</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr></table></td></tr><tr><td><table cellspacing="0" cellpadding="0"><tr><td></td></tr></table></td></tr><tr><td><span class="stt">> </span><span class="RktSym">base</span></td></tr><tr><td><p><img style="vertical-align: 0px; margin: -3px -3px -3px -3px;" src="pict_36.png" alt="image" width="206" height="206"/></p></td></tr></table></blockquote></td></tr></table></div><div class="SIntrapara">The use of <span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span> in the defnition of <span class="RktSym">base</span> above
is equivalent to
</div><div class="SIntrapara"><blockquote class="SCodeFlow"><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=let.html%23%2528form._%2528%2528lib._racket%252Fprivate%252Fletstx-scheme..rkt%2529._let%252A%2529%2529&version=6.1" class="RktStxLink Sq" data-pltdoc="x">let*</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">[</span><span class="RktSym">pp</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Drawing_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._colorize%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">colorize</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._rectangle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">rectangle</a></span><span class="hspace"> </span><span class="RktVal">200</span><span class="hspace"> </span><span class="RktVal">200</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">"gray"</span><span class="RktPn">)</span><span class="RktPn">]</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">[</span><span class="RktSym">pp</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-go%29%29" class="RktValLink" data-pltdoc="x">ppict-go</a></span><span class="hspace"> </span><span class="RktSym">pp</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValLink" data-pltdoc="x">coord</a></span><span class="hspace"> </span><span class="RktVal">1/2</span><span class="hspace"> </span><span class="RktVal">1/2</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">cc</span><span class="RktPn">)</span><span class="RktPn">)</span><span class="RktPn">]</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">[</span><span class="RktSym">pp</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-add%29%29" class="RktValLink" data-pltdoc="x">ppict-add</a></span><span class="hspace"> </span><span class="RktSym">pp</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Drawing_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._colorize%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">colorize</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._hline%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">hline</a></span><span class="hspace"> </span><span class="RktVal">200</span><span class="hspace"> </span><span class="RktVal">1</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">"gray"</span><span class="RktPn">)</span><span class="RktPn">)</span><span class="RktPn">]</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">[</span><span class="RktSym">pp</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-go%29%29" class="RktValLink" data-pltdoc="x">ppict-go</a></span><span class="hspace"> </span><span class="RktSym">pp</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValLink" data-pltdoc="x">coord</a></span><span class="hspace"> </span><span class="RktVal">1/2</span><span class="hspace"> </span><span class="RktVal">1/2</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">cc</span><span class="RktPn">)</span><span class="RktPn">)</span><span class="RktPn">]</span></td></tr><tr><td><span class="hspace"> </span><span class="RktPn">[</span><span class="RktSym">pp</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-add%29%29" class="RktValLink" data-pltdoc="x">ppict-add</a></span><span class="hspace"> </span><span class="RktSym">pp</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Drawing_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._colorize%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">colorize</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._vline%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">vline</a></span><span class="hspace"> </span><span class="RktVal">1</span><span class="hspace"> </span><span class="RktVal">200</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">"gray"</span><span class="RktPn">)</span><span class="RktPn">)</span><span class="RktPn">]</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="RktSym">pp</span><span class="RktPn">)</span></td></tr></table></blockquote></div></p><p><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><p>Examples:</p></td></tr><tr><td><blockquote class="SCodeFlow"><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="stt">> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=define.html%23%2528form._%2528%2528lib._racket%252Fprivate%252Fbase..rkt%2529._define%2529%2529&version=6.1" class="RktStxLink Sq" data-pltdoc="x">define</a></span><span class="hspace"> </span><span class="RktSym">circles-down-1</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span><span class="hspace"> </span><span class="RktSym">base</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._grid%29%29" class="RktValLink" data-pltdoc="x">grid</a></span><span class="hspace"> </span><span class="RktVal">2</span><span class="hspace"> </span><span class="RktVal">2</span><span class="hspace"> </span><span class="RktVal">2</span><span class="hspace"> </span><span class="RktVal">1</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">ct</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktVal">10</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._circle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">circle</a></span><span class="hspace"> </span><span class="RktVal">20</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._circle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">circle</a></span><span class="hspace"> </span><span class="RktVal">20</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktVal">30</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._circle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">circle</a></span><span class="hspace"> </span><span class="RktVal">20</span><span class="RktPn">)</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr></table></td></tr><tr><td><table cellspacing="0" cellpadding="0"><tr><td></td></tr></table></td></tr><tr><td><span class="stt">> </span><span class="RktSym">circles-down-1</span></td></tr><tr><td><p><img style="vertical-align: 0px; margin: -3px -3px -3px -3px;" src="pict_37.png" alt="image" width="206" height="206"/></p></td></tr><tr><td><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="stt">> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=define.html%23%2528form._%2528%2528lib._racket%252Fprivate%252Fbase..rkt%2529._define%2529%2529&version=6.1" class="RktStxLink Sq" data-pltdoc="x">define</a></span><span class="hspace"> </span><span class="RktSym">circles-down-2</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span><span class="hspace"> </span><span class="RktSym">circles-down-1</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Drawing_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._colorize%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">colorize</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._circle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">circle</a></span><span class="hspace"> </span><span class="RktVal">20</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">"red"</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktVal">40</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Drawing_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._colorize%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">colorize</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._circle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">circle</a></span><span class="hspace"> </span><span class="RktVal">20</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">"red"</span><span class="RktPn">)</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr></table></td></tr><tr><td><table cellspacing="0" cellpadding="0"><tr><td></td></tr></table></td></tr><tr><td><span class="stt">> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Bounding_Box_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._inset%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">inset</a></span><span class="hspace"> </span><span class="RktSym">circles-down-2</span><span class="hspace"> </span><span class="RktVal">20</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktCmt">;</span><span class="RktCmt"> </span><span class="RktCmt">draws outside its bounding box</span></td></tr><tr><td><p><img style="vertical-align: -20px; margin: -3px -3px -3px -3px;" src="pict_38.png" alt="image" width="246" height="246"/></p></td></tr><tr><td><span class="stt">> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Bounding_Box_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._inset%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">inset</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Drawing_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._clip%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">clip</a></span><span class="hspace"> </span><span class="RktSym">circles-down-2</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">20</span><span class="RktPn">)</span></td></tr><tr><td><p><img style="vertical-align: -20px; margin: -3px -3px -3px -3px;" src="pict_39.png" alt="image" width="246" height="246"/></p></td></tr><tr><td><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="stt">> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span><span class="hspace"> </span><span class="RktSym">base</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValLink" data-pltdoc="x">coord</a></span><span class="hspace"> </span><span class="RktVal">0</span><span class="hspace"> </span><span class="RktVal">0</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">lt</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="pict.html#%28def._%28%28lib._unstable%2Fgui%2Fpict..rkt%29._tag-pict%29%29" class="RktValLink" data-pltdoc="x">tag-pict</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._circle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">circle</a></span><span class="hspace"> </span><span class="RktVal">20</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">circA</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValLink" data-pltdoc="x">coord</a></span><span class="hspace"> </span><span class="RktVal">1</span><span class="hspace"> </span><span class="RktVal">1</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">rb</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="pict.html#%28def._%28%28lib._unstable%2Fgui%2Fpict..rkt%29._tag-pict%29%29" class="RktValLink" data-pltdoc="x">tag-pict</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._circle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">circle</a></span><span class="hspace"> </span><span class="RktVal">20</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">circB</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:set</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=let.html%23%2528form._%2528%2528lib._racket%252Fprivate%252Fletstx-scheme..rkt%2529._let%2529%2529&version=6.1" class="RktStxLink Sq" data-pltdoc="x">let</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">[</span><span class="RktSym">p</span><span class="hspace"> </span><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do-state%29%29" class="RktStxLink" data-pltdoc="x">ppict-do-state</a></span><span class="RktPn">]</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._pin-arrow-line%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">pin-arrow-line</a></span><span class="hspace"> </span><span class="RktVal">10</span><span class="hspace"> </span><span class="RktSym">p</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="pict.html#%28def._%28%28lib._unstable%2Fgui%2Fpict..rkt%29._find-tag%29%29" class="RktValLink" data-pltdoc="x">find-tag</a></span><span class="hspace"> </span><span class="RktSym">p</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">circA</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Finders.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._rb-find%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">rb-find</a></span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="pict.html#%28def._%28%28lib._unstable%2Fgui%2Fpict..rkt%29._find-tag%29%29" class="RktValLink" data-pltdoc="x">find-tag</a></span><span class="hspace"> </span><span class="RktSym">p</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">circB</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Finders.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._lt-find%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">lt-find</a></span><span class="RktPn">)</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr></table></td></tr><tr><td><p><img style="vertical-align: 0px; margin: -3px -3px -3px -3px;" src="pict_40.png" alt="image" width="206" height="206"/></p></td></tr><tr><td><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="stt">> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=let.html%23%2528form._%2528%2528quote._%7E23%7E25kernel%2529._let-values%2529%2529&version=6.1" class="RktStxLink Sq" data-pltdoc="x">let-values</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">[</span><span class="RktPn">(</span><span class="RktSym">final</span><span class="hspace"> </span><span class="RktSym">intermediates</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%2A%29%29" class="RktStxLink" data-pltdoc="x">ppict-do*</a></span><span class="hspace"> </span><span class="RktSym">base</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValLink" data-pltdoc="x">coord</a></span><span class="hspace"> </span><span class="RktVal">1/4</span><span class="hspace"> </span><span class="RktVal">1/2</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">cb</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._text%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">text</a></span><span class="hspace"> </span><span class="RktVal">"shapes:"</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValLink" data-pltdoc="x">coord</a></span><span class="hspace"> </span><span class="RktVal">1/2</span><span class="hspace"> </span><span class="RktVal">1/2</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">lb</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:alt</span><span class="hspace"> </span><span class="RktPn">[</span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._circle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">circle</a></span><span class="hspace"> </span><span class="RktVal">20</span><span class="RktPn">)</span><span class="RktPn">]</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:alt</span><span class="hspace"> </span><span class="RktPn">[</span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._rectangle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">rectangle</a></span><span class="hspace"> </span><span class="RktVal">20</span><span class="hspace"> </span><span class="RktVal">20</span><span class="RktPn">)</span><span class="RktPn">]</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._text%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">text</a></span><span class="hspace"> </span><span class="RktVal">"and more!"</span><span class="RktPn">)</span><span class="RktPn">)</span><span class="RktPn">]</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=pairs.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._append%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">append</a></span><span class="hspace"> </span><span class="RktSym">intermediates</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=pairs.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._list%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">list</a></span><span class="hspace"> </span><span class="RktSym">final</span><span class="RktPn">)</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr></table></td></tr><tr><td><p><span class="RktRes">'(</span><img style="vertical-align: 0px; margin: -3px -3px -3px -3px;" src="pict_41.png" alt="image" width="206" height="206"/><span class="RktRes"></span><span class="hspace"> </span><span class="RktRes"></span><img style="vertical-align: 0px; margin: -3px -3px -3px -3px;" src="pict_42.png" alt="image" width="206" height="206"/><span class="RktRes"></span><span class="hspace"> </span><span class="RktRes"></span><img style="vertical-align: 0px; margin: -3px -3px -3px -3px;" src="pict_43.png" alt="image" width="206" height="206"/><span class="RktRes">)</span></p></td></tr></table></blockquote></td></tr></table></p><p>More examples of <span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span> are scattered throughout this
section.</p><p><div class="SIntrapara"><blockquote class="SVInsetFlow"><table cellspacing="0" cellpadding="0" class="boxed RBoxed"><tr><td><blockquote class="SubFlow"><div class="RBackgroundLabel SIEHidden"><div class="RBackgroundLabelInner"><p>syntax</p></div></div><p class="RForeground"><a name="(form._((lib._unstable/gui/ppict..rkt)._ppict-do-state))"></a><span title="Provided from: unstable/gui/ppict | Package: unstable-lib"><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do-state%29%29" class="RktStxDef RktStxLink" data-pltdoc="x">ppict-do-state</a></span></span></p></blockquote></td></tr></table></blockquote></div><div class="SIntrapara">Tracks the current state of a <span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span> or <span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%2A%29%29" class="RktStxLink" data-pltdoc="x">ppict-do*</a></span>
form.</div></p><p><div class="SIntrapara"><blockquote class="SVInsetFlow"><table cellspacing="0" cellpadding="0" class="boxed RBoxed"><tr><td><blockquote class="SubFlow"><div class="RBackgroundLabel SIEHidden"><div class="RBackgroundLabelInner"><p>procedure</p></div></div><p class="RForeground"><span class="RktPn">(</span><a name="(def._((lib._unstable/gui/ppict..rkt)._ppict~3f))"></a><span title="Provided from: unstable/gui/ppict | Package: unstable-lib"><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict~3f%29%29" class="RktValDef RktValLink" data-pltdoc="x">ppict?</a></span></span><span class="hspace"> </span><span class="RktVar">x</span><span class="RktPn">)</span><span class="hspace"> </span>→<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=booleans.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._boolean%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">boolean?</a></span></p></blockquote></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">x</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=data-structure-contracts.html%23%2528def._%2528%2528lib._racket%252Fcontract%252Fprivate%252Fmisc..rkt%2529._any%252Fc%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">any/c</a></span></td></tr></table></blockquote></div><div class="SIntrapara">Returns <span class="RktVal">#t</span> if <span class="RktVar">x</span> is a <a href="#%28tech._progressive._pict%29" class="techoutside" data-pltdoc="x"><span class="techinside">progressive pict</span></a>,
<span class="RktVal">#f</span> otherwise.</div></p><p><div class="SIntrapara"><blockquote class="SVInsetFlow"><table cellspacing="0" cellpadding="0" class="boxed RBoxed"><tr><td><blockquote class="SubFlow"><div class="RBackgroundLabel SIEHidden"><div class="RBackgroundLabelInner"><p>procedure</p></div></div><p class="RForeground"><span class="RktPn">(</span><a name="(def._((lib._unstable/gui/ppict..rkt)._ppict-go))"></a><span title="Provided from: unstable/gui/ppict | Package: unstable-lib"><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-go%29%29" class="RktValDef RktValLink" data-pltdoc="x">ppict-go</a></span></span><span class="hspace"> </span><span class="RktVar">p</span><span class="hspace"> </span><span class="RktVar">pl</span><span class="RktPn">)</span><span class="hspace"> </span>→<span class="hspace"> </span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict~3f%29%29" class="RktValLink" data-pltdoc="x">ppict?</a></span></p></blockquote></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">p</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Datatype.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._pict%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">pict?</a></span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">pl</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._placer~3f%29%29" class="RktValLink" data-pltdoc="x">placer?</a></span></td></tr></table></blockquote></div><div class="SIntrapara">Creates a <a href="#%28tech._progressive._pict%29" class="techoutside" data-pltdoc="x"><span class="techinside">progressive pict</span></a> with the given base pict <span class="RktVar">p</span>
and the placer <span class="RktVar">pl</span>.</div></p><p><div class="SIntrapara"><blockquote class="SVInsetFlow"><table cellspacing="0" cellpadding="0" class="boxed RBoxed"><tr><td><table cellspacing="0" cellpadding="0" class="together"><tr><td><blockquote class="SubFlow"><div class="RBackgroundLabel SIEHidden"><div class="RBackgroundLabelInner"><p>procedure</p></div></div><p class="RForeground"><span class="RktPn">(</span><a name="(def._((lib._unstable/gui/ppict..rkt)._ppict-add))"></a><span title="Provided from: unstable/gui/ppict | Package: unstable-lib"><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-add%29%29" class="RktValDef RktValLink" data-pltdoc="x">ppict-add</a></span></span><span class="hspace"> </span><span class="RktVar">pp</span><span class="hspace"> </span><span class="RktVar">elem</span><span class="hspace"> </span><span class="RktMeta">...</span><span class="RktPn">)</span><span class="hspace"> </span>→<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Datatype.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._pict%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">pict?</a></span></p></blockquote></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">pp</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict~3f%29%29" class="RktValLink" data-pltdoc="x">ppict?</a></span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">elem</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=data-structure-contracts.html%23%2528def._%2528%2528lib._racket%252Fcontract%252Fbase..rkt%2529._or%252Fc%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">or/c</a></span><span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Datatype.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._pict%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">pict?</a></span><span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=number-types.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._real%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">real?</a></span><span class="hspace"> </span><span class="RktVal">#f</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">next</span><span class="RktPn">)</span></td></tr></table></td></tr><tr><td><table cellspacing="0" cellpadding="0" class="together"><tr><td><blockquote class="SubFlow"><div class="RBackgroundLabel SIEHidden"><div class="RBackgroundLabelInner"><p>procedure</p></div></div><table cellspacing="0" cellpadding="0" class="prototype RForeground"><tr><td><span class="RktPn">(</span><a name="(def._((lib._unstable/gui/ppict..rkt)._ppict-add*))"></a><span title="Provided from: unstable/gui/ppict | Package: unstable-lib"><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-add%2A%29%29" class="RktValDef RktValLink" data-pltdoc="x">ppict-add*</a></span></span><span class="hspace"> </span><span class="RktVar">pp</span><span class="hspace"> </span><span class="RktVar">elem</span><span class="hspace"> </span><span class="RktMeta">...</span><span class="RktPn">)</span></td><td><span class="hspace"> </span></td><td>→</td><td><span class="hspace"> </span></td><td><table cellspacing="0" cellpadding="0"><tr><td><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Datatype.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._pict%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">pict?</a></span></td><td><span class="hspace"> </span></td><td><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=data-structure-contracts.html%23%2528def._%2528%2528lib._racket%252Fcontract%252Fprivate%252Fmisc..rkt%2529._listof%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">listof</a></span><span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Datatype.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._pict%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">pict?</a></span><span class="RktPn">)</span></td></tr></table></td></tr></table></blockquote></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">pp</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict~3f%29%29" class="RktValLink" data-pltdoc="x">ppict?</a></span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">elem</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=data-structure-contracts.html%23%2528def._%2528%2528lib._racket%252Fcontract%252Fbase..rkt%2529._or%252Fc%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">or/c</a></span><span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Datatype.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._pict%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">pict?</a></span><span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=number-types.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._real%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">real?</a></span><span class="hspace"> </span><span class="RktVal">#f</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">next</span><span class="RktPn">)</span></td></tr></table></td></tr></table></blockquote></div><div class="SIntrapara">Creates a new pict by adding each <span class="RktVar">elem</span> pict on top of
<span class="RktVar">pp</span> according to <span class="RktVar">pp</span>’s placer. The result pict may or
may not be a <a href="#%28tech._progressive._pict%29" class="techoutside" data-pltdoc="x"><span class="techinside">progressive pict</span></a>, depending on the placer
used. The <span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-add%29%29" class="RktValLink" data-pltdoc="x">ppict-add</a></span> function only the final pict; any
occurrences of <span class="RktVal">'</span><span class="RktVal">next</span> are ignored. The <span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-add%2A%29%29" class="RktValLink" data-pltdoc="x">ppict-add*</a></span>
function returns two values: the final pict and a list of all partial
picts emitted due to <span class="RktVal">'</span><span class="RktVal">next</span> (the final pict is not included).</div></p><p>An <span class="RktVar">elem</span> that is a real number changes the spacing for
subsequent additions. A <span class="RktVar">elem</span> that is <span class="RktVal">#f</span> is
discarded; it is permitted as a convenience for conditionally
including sub-picts. Note that <span class="RktVal">#f</span> is not equivalent to
<span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._blank%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">blank</a></span><span class="stt"> </span><span class="RktVal">0</span><span class="RktPn">)</span>, since the latter will cause spacing to be added
around it.</p><p><div class="SIntrapara"><blockquote class="SVInsetFlow"><table cellspacing="0" cellpadding="0" class="boxed RBoxed"><tr><td><blockquote class="SubFlow"><div class="RBackgroundLabel SIEHidden"><div class="RBackgroundLabelInner"><p>procedure</p></div></div><p class="RForeground"><span class="RktPn">(</span><a name="(def._((lib._unstable/gui/ppict..rkt)._placer~3f))"></a><span title="Provided from: unstable/gui/ppict | Package: unstable-lib"><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._placer~3f%29%29" class="RktValDef RktValLink" data-pltdoc="x">placer?</a></span></span><span class="hspace"> </span><span class="RktVar">x</span><span class="RktPn">)</span><span class="hspace"> </span>→<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=booleans.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._boolean%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">boolean?</a></span></p></blockquote></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">x</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=data-structure-contracts.html%23%2528def._%2528%2528lib._racket%252Fcontract%252Fprivate%252Fmisc..rkt%2529._any%252Fc%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">any/c</a></span></td></tr></table></blockquote></div><div class="SIntrapara">Returns <span class="RktVal">#t</span> if <span class="RktVar">x</span> is a placer, <span class="RktVal">#f</span> otherwise.</div></p><p><div class="SIntrapara"><blockquote class="SVInsetFlow"><table cellspacing="0" cellpadding="0" class="boxed RBoxed"><tr><td><blockquote class="SubFlow"><div class="RBackgroundLabel SIEHidden"><div class="RBackgroundLabelInner"><p>procedure</p></div></div><p class="RForeground"><span class="RktPn">(</span><a name="(def._((lib._unstable/gui/ppict..rkt)._refpoint-placer~3f))"></a><span title="Provided from: unstable/gui/ppict | Package: unstable-lib"><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._refpoint-placer~3f%29%29" class="RktValDef RktValLink" data-pltdoc="x">refpoint-placer?</a></span></span><span class="hspace"> </span><span class="RktVar">x</span><span class="RktPn">)</span><span class="hspace"> </span>→<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=booleans.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._boolean%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">boolean?</a></span></p></blockquote></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">x</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=data-structure-contracts.html%23%2528def._%2528%2528lib._racket%252Fcontract%252Fprivate%252Fmisc..rkt%2529._any%252Fc%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">any/c</a></span></td></tr></table></blockquote></div><div class="SIntrapara">Returns <span class="RktVal">#t</span> if <span class="RktVar">x</span> is a placer based on a reference
point, <span class="RktVal">#f</span> otherwise.</div></p><p><div class="SIntrapara"><blockquote class="SVInsetFlow"><table cellspacing="0" cellpadding="0" class="boxed RBoxed"><tr><td><blockquote class="SubFlow"><div class="RBackgroundLabel SIEHidden"><div class="RBackgroundLabelInner"><p>procedure</p></div></div><table cellspacing="0" cellpadding="0" class="prototype RForeground"><tr><td><span class="RktPn">(</span><a name="(def._((lib._unstable/gui/ppict..rkt)._coord))"></a><span title="Provided from: unstable/gui/ppict | Package: unstable-lib"><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValDef RktValLink" data-pltdoc="x">coord</a></span></span></td><td><span class="hspace"> </span></td><td><span class="RktVar">rel-x</span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td></tr><tr><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="RktVar">rel-y</span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td></tr><tr><td><span class="hspace"> </span></td><td><span class="hspace"> </span>[</td><td><span class="RktVar">align</span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td></tr><tr><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="RktPn">#:abs-x</span><span class="hspace"> </span><span class="RktVar">abs-x</span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td></tr><tr><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="RktPn">#:abs-y</span><span class="hspace"> </span><span class="RktVar">abs-y</span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td></tr><tr><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="RktPn">#:compose</span><span class="hspace"> </span><span class="RktVar">composer</span>]<span class="RktPn">)</span></td><td><span class="hspace"> </span></td><td>→</td><td><span class="hspace"> </span></td><td><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._refpoint-placer~3f%29%29" class="RktValLink" data-pltdoc="x">refpoint-placer?</a></span></td></tr></table></blockquote></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">rel-x</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=number-types.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._real%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">real?</a></span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">rel-y</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=number-types.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._real%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">real?</a></span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">align</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=data-structure-contracts.html%23%2528def._%2528%2528lib._racket%252Fcontract%252Fbase..rkt%2529._or%252Fc%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">or/c</a></span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">lt</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">ct</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">rt</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">lc</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">cc</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">rc</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">lb</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">cb</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">rb</span><span class="RktPn">)</span><span class="hspace"> </span>=<span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">cc</span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">abs-x</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=number-types.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._real%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">real?</a></span><span class="hspace"> </span>=<span class="hspace"> </span><span class="RktVal">0</span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">abs-y</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=number-types.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._real%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">real?</a></span><span class="hspace"> </span>=<span class="hspace"> </span><span class="RktVal">0</span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">composer</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=procedures.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._procedure%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">procedure?</a></span><span class="hspace"> </span>=<span class="hspace"> </span>computed from <span class="RktVar">align</span></td></tr></table></blockquote></div><div class="SIntrapara">Returns a placer that places picts according to <span class="RktVar">rel-x</span> and
<span class="RktVar">rel-y</span>, which are interpeted as fractions of the width and
height of the base <a href="#%28tech._progressive._pict%29" class="techoutside" data-pltdoc="x"><span class="techinside">progressive pict</span></a>. That is, <span class="RktVal">0</span>,
<span class="RktVal">0</span> is the top left corner of the base’s bounding box, and
<span class="RktVal">1</span>, <span class="RktVal">1</span> is the bottom right. Then <span class="RktVar">abs-x</span> and
<span class="RktVar">abs-y</span> offsets are added to get the final reference point.</div></p><p>Additions are aligned according to <span class="RktVar">align</span>, a symbol whose name
consists of a horizontal alignment character followed by a vertical
alignment character. For example, if <span class="RktVar">align</span> is <span class="RktVal">'</span><span class="RktVal">lt</span>,
the pict is placed so that its left-top corner is at the reference
point; if <span class="RktVar">align</span> is <span class="RktVal">'</span><span class="RktVal">rc</span>, the pict is placed so that
the center of its bounding box’s right edge coincides with the
reference point.</p><p>By default, if there are multiple picts to be placed, they are
vertically appended, aligned according to the horizontal component of
<span class="RktVar">align</span>. For example, if <span class="RktVar">align</span> is <span class="RktVal">'</span><span class="RktVal">cc</span>, the
default <span class="RktVar">composer</span> is <span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Combiners.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._vc-append%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">vc-append</a></span>; for <span class="RktVal">'</span><span class="RktVal">lt</span>, the
default <span class="RktVar">composer</span> is <span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Combiners.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._vl-append%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">vl-append</a></span>. The spacing is
initially <span class="RktVal">0</span>.</p><p><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><p>Examples:</p></td></tr><tr><td><blockquote class="SCodeFlow"><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="stt">> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span><span class="hspace"> </span><span class="RktSym">base</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValLink" data-pltdoc="x">coord</a></span><span class="hspace"> </span><span class="RktVal">1/2</span><span class="hspace"> </span><span class="RktVal">1/2</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">rb</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Drawing_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._colorize%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">colorize</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._circle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">circle</a></span><span class="hspace"> </span><span class="RktVal">20</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">"red"</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValLink" data-pltdoc="x">coord</a></span><span class="hspace"> </span><span class="RktVal">1/2</span><span class="hspace"> </span><span class="RktVal">1/2</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">lt</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Drawing_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._colorize%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">colorize</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._circle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">circle</a></span><span class="hspace"> </span><span class="RktVal">20</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">"darkgreen"</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr></table></td></tr><tr><td><p><img style="vertical-align: 0px; margin: -3px -3px -3px -3px;" src="pict_44.png" alt="image" width="206" height="206"/></p></td></tr><tr><td><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="stt">> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span><span class="hspace"> </span><span class="RktSym">base</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValLink" data-pltdoc="x">coord</a></span><span class="hspace"> </span><span class="RktVal">1</span><span class="hspace"> </span><span class="RktVal">0</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">rt</span><span class="hspace"> </span><span class="RktPn">#:abs-x</span><span class="hspace"> </span><span class="RktVal"><span class="nobreak">-5</span></span><span class="hspace"> </span><span class="RktPn">#:abs-y</span><span class="hspace"> </span><span class="RktVal">10</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktVal">50</span><span class="hspace"> </span><span class="RktCmt">;</span><span class="RktCmt"> </span><span class="RktCmt">change spacing</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._text%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">text</a></span><span class="hspace"> </span><span class="RktVal">"abc"</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._text%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">text</a></span><span class="hspace"> </span><span class="RktVal">"12345"</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktVal">0</span><span class="hspace"> </span><span class="RktCmt">;</span><span class="RktCmt"> </span><span class="RktCmt">and again</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._text%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">text</a></span><span class="hspace"> </span><span class="RktVal">"ok done"</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr></table></td></tr><tr><td><p><img style="vertical-align: 0px; margin: -3px -3px -3px -3px;" src="pict_45.png" alt="image" width="206" height="206"/></p></td></tr><tr><td><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="stt">> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span><span class="hspace"> </span><span class="RktSym">base</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValLink" data-pltdoc="x">coord</a></span><span class="hspace"> </span><span class="RktVal">0</span><span class="hspace"> </span><span class="RktVal">0</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">lt</span><span class="hspace"> </span><span class="RktPn">#:compose</span><span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Combiners.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._ht-append%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">ht-append</a></span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._circle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">circle</a></span><span class="hspace"> </span><span class="RktVal">10</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._circle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">circle</a></span><span class="hspace"> </span><span class="RktVal">20</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._circle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">circle</a></span><span class="hspace"> </span><span class="RktVal">30</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr></table></td></tr><tr><td><p><img style="vertical-align: 0px; margin: -3px -3px -3px -3px;" src="pict_46.png" alt="image" width="206" height="206"/></p></td></tr></table></blockquote></td></tr></table></p><p><div class="SIntrapara"><blockquote class="SVInsetFlow"><table cellspacing="0" cellpadding="0" class="boxed RBoxed"><tr><td><blockquote class="SubFlow"><div class="RBackgroundLabel SIEHidden"><div class="RBackgroundLabelInner"><p>procedure</p></div></div><table cellspacing="0" cellpadding="0" class="prototype RForeground"><tr><td><span class="RktPn">(</span><a name="(def._((lib._unstable/gui/ppict..rkt)._grid))"></a><span title="Provided from: unstable/gui/ppict | Package: unstable-lib"><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._grid%29%29" class="RktValDef RktValLink" data-pltdoc="x">grid</a></span></span></td><td><span class="hspace"> </span></td><td><span class="RktVar">cols</span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td></tr><tr><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="RktVar">rows</span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td></tr><tr><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="RktVar">col</span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td></tr><tr><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="RktVar">row</span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td></tr><tr><td><span class="hspace"> </span></td><td><span class="hspace"> </span>[</td><td><span class="RktVar">align</span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td></tr><tr><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="RktPn">#:abs-x</span><span class="hspace"> </span><span class="RktVar">abs-x</span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td></tr><tr><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="RktPn">#:abs-y</span><span class="hspace"> </span><span class="RktVar">abs-y</span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td></tr><tr><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="RktPn">#:compose</span><span class="hspace"> </span><span class="RktVar">composer</span>]<span class="RktPn">)</span></td><td><span class="hspace"> </span></td><td>→</td><td><span class="hspace"> </span></td><td><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._refpoint-placer~3f%29%29" class="RktValLink" data-pltdoc="x">refpoint-placer?</a></span></td></tr></table></blockquote></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">cols</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=number-types.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._exact-positive-integer%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">exact-positive-integer?</a></span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">rows</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=number-types.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._exact-positive-integer%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">exact-positive-integer?</a></span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">col</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=number-types.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._exact-integer%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">exact-integer?</a></span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">row</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=number-types.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._exact-integer%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">exact-integer?</a></span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">align</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=data-structure-contracts.html%23%2528def._%2528%2528lib._racket%252Fcontract%252Fbase..rkt%2529._or%252Fc%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">or/c</a></span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">lt</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">ct</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">rt</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">lc</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">cc</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">rc</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">lb</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">cb</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">rb</span><span class="RktPn">)</span><span class="hspace"> </span>=<span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">cc</span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">abs-x</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=number-types.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._real%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">real?</a></span><span class="hspace"> </span>=<span class="hspace"> </span><span class="RktVal">0</span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">abs-y</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=number-types.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._real%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">real?</a></span><span class="hspace"> </span>=<span class="hspace"> </span><span class="RktVal">0</span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">composer</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=procedures.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._procedure%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">procedure?</a></span><span class="hspace"> </span>=<span class="hspace"> </span>computed from <span class="RktVar">align</span></td></tr></table></blockquote></div><div class="SIntrapara">Returns a placer that places picts according to a position in a
virtual grid. The <span class="RktVar">row</span> and <span class="RktVar">col</span> indexes are numbered
starting at <span class="RktVal">1</span>.</div></p><p>Uses of <span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._grid%29%29" class="RktValLink" data-pltdoc="x">grid</a></span> can be translated into uses of <span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValLink" data-pltdoc="x">coord</a></span>,
but the translation depends on the alignment. For example,
<span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._grid%29%29" class="RktValLink" data-pltdoc="x">grid</a></span><span class="stt"> </span><span class="RktVal">2</span><span class="stt"> </span><span class="RktVal">2</span><span class="stt"> </span><span class="RktVal">1</span><span class="stt"> </span><span class="RktVal">1</span><span class="stt"> </span><span class="RktVal">'</span><span class="RktVal">lt</span><span class="RktPn">)</span> is equivalent to <span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValLink" data-pltdoc="x">coord</a></span><span class="stt"> </span><span class="RktVal">0</span><span class="stt"> </span><span class="RktVal">0</span><span class="stt"> </span><span class="RktVal">'</span><span class="RktVal">lt</span><span class="RktPn">)</span>,
but <span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._grid%29%29" class="RktValLink" data-pltdoc="x">grid</a></span><span class="stt"> </span><span class="RktVal">2</span><span class="stt"> </span><span class="RktVal">2</span><span class="stt"> </span><span class="RktVal">1</span><span class="stt"> </span><span class="RktVal">1</span><span class="stt"> </span><span class="RktVal">'</span><span class="RktVal">rt</span><span class="RktPn">)</span> is equivalent to <span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValLink" data-pltdoc="x">coord</a></span><span class="stt"> </span><span class="RktVal">1/2</span><span class="stt"> </span><span class="RktVal">0</span><span class="stt"> </span><span class="RktVal">'</span><span class="RktVal">rt</span><span class="RktPn">)</span>.</p><p><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><p>Examples:</p></td></tr><tr><td><blockquote class="SCodeFlow"><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="stt">> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=define.html%23%2528form._%2528%2528lib._racket%252Fprivate%252Fbase..rkt%2529._define%2529%2529&version=6.1" class="RktStxLink Sq" data-pltdoc="x">define</a></span><span class="hspace"> </span><span class="RktSym">none-for-me-thanks</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span><span class="hspace"> </span><span class="RktSym">base</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._grid%29%29" class="RktValLink" data-pltdoc="x">grid</a></span><span class="hspace"> </span><span class="RktVal">2</span><span class="hspace"> </span><span class="RktVal">2</span><span class="hspace"> </span><span class="RktVal">1</span><span class="hspace"> </span><span class="RktVal">1</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">lt</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._text%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">text</a></span><span class="hspace"> </span><span class="RktVal">"You do not like"</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Drawing_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._colorize%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">colorize</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._text%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">text</a></span><span class="hspace"> </span><span class="RktVal">"green eggs and ham?"</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">"darkgreen"</span><span class="RktPn">)</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr></table></td></tr><tr><td><table cellspacing="0" cellpadding="0"><tr><td></td></tr></table></td></tr><tr><td><span class="stt">> </span><span class="RktSym">none-for-me-thanks</span></td></tr><tr><td><p><img style="vertical-align: 0px; margin: -3px -3px -3px -3px;" src="pict_47.png" alt="image" width="206" height="206"/></p></td></tr><tr><td><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="stt">> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span><span class="hspace"> </span><span class="RktSym">none-for-me-thanks</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._grid%29%29" class="RktValLink" data-pltdoc="x">grid</a></span><span class="hspace"> </span><span class="RktVal">2</span><span class="hspace"> </span><span class="RktVal">2</span><span class="hspace"> </span><span class="RktVal">2</span><span class="hspace"> </span><span class="RktVal">1</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">rb</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Drawing_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._colorize%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">colorize</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._text%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">text</a></span><span class="hspace"> </span><span class="RktVal">"I do not like them,"</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">"red"</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._text%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">text</a></span><span class="hspace"> </span><span class="RktVal">"Sam-I-am."</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr></table></td></tr><tr><td><p><img style="vertical-align: 0px; margin: -3px -3px -3px -3px;" src="pict_48.png" alt="image" width="206" height="206"/></p></td></tr></table></blockquote></td></tr></table></p><p><div class="SIntrapara"><blockquote class="SVInsetFlow"><table cellspacing="0" cellpadding="0" class="boxed RBoxed"><tr><td><blockquote class="SubFlow"><div class="RBackgroundLabel SIEHidden"><div class="RBackgroundLabelInner"><p>procedure</p></div></div><p class="RForeground"><span class="RktPn">(</span><a name="(def._((lib._unstable/gui/ppict..rkt)._cascade))"></a><span title="Provided from: unstable/gui/ppict | Package: unstable-lib"><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._cascade%29%29" class="RktValDef RktValLink" data-pltdoc="x">cascade</a></span></span><span class="hspace"> </span>[<span class="RktVar">step-x</span><span class="hspace"> </span><span class="RktVar">step-y</span>]<span class="RktPn">)</span><span class="hspace"> </span>→<span class="hspace"> </span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._placer~3f%29%29" class="RktValLink" data-pltdoc="x">placer?</a></span></p></blockquote></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">step-x</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=data-structure-contracts.html%23%2528def._%2528%2528lib._racket%252Fcontract%252Fbase..rkt%2529._or%252Fc%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">or/c</a></span><span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=number-types.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._real%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">real?</a></span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">auto</span><span class="RktPn">)</span><span class="hspace"> </span>=<span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">auto</span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">step-y</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=data-structure-contracts.html%23%2528def._%2528%2528lib._racket%252Fcontract%252Fbase..rkt%2529._or%252Fc%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">or/c</a></span><span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=number-types.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._real%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">real?</a></span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">auto</span><span class="RktPn">)</span><span class="hspace"> </span>=<span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">auto</span></td></tr></table></blockquote></div><div class="SIntrapara">Returns a placer that places picts by evenly spreading them diagonally
across the base pict in “cascade” style. This placer does not
support changing the spacing by including a real number within the
pict sequence.</div></p><p>When a list picts is to be placed, their bounding boxes are normalized
to the maximum width and height of all picts in the list; each pict is
centered in its new bounding box. The picts are then cascaded so there
is <span class="RktVar">step-x</span> space between each of the picts’ left edges; there
is also <span class="RktVar">step-x</span> space between the base pict’s left edge and
the first pict’s left edge. Similarly for <span class="RktVar">step-y</span> and the
vertical spacing.</p><p>If <span class="RktVar">step-x</span> or <span class="RktVar">step-y</span> is <span class="RktVal">'</span><span class="RktVal">auto</span>, the spacing
between the centers of the picts to be placed is determined
automatically so that the inter-pict spacing is the same as the
spacing between the last pict and the base.</p><p><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><p>Examples:</p></td></tr><tr><td><blockquote class="SCodeFlow"><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="stt">> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span><span class="hspace"> </span><span class="RktSym">base</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._cascade%29%29" class="RktValLink" data-pltdoc="x">cascade</a></span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Drawing_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._colorize%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">colorize</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._filled-rectangle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">filled-rectangle</a></span><span class="hspace"> </span><span class="RktVal">100</span><span class="hspace"> </span><span class="RktVal">100</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">"red"</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Drawing_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._colorize%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">colorize</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._filled-rectangle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">filled-rectangle</a></span><span class="hspace"> </span><span class="RktVal">100</span><span class="hspace"> </span><span class="RktVal">100</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">"blue"</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr></table></td></tr><tr><td><p><img style="vertical-align: 0px; margin: -3px -3px -3px -3px;" src="pict_49.png" alt="image" width="206" height="206"/></p></td></tr><tr><td><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="stt">> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span><span class="hspace"> </span><span class="RktSym">base</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._cascade%29%29" class="RktValLink" data-pltdoc="x">cascade</a></span><span class="hspace"> </span><span class="RktVal">40</span><span class="hspace"> </span><span class="RktVal">20</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Drawing_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._colorize%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">colorize</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._filled-rectangle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">filled-rectangle</a></span><span class="hspace"> </span><span class="RktVal">100</span><span class="hspace"> </span><span class="RktVal">100</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">"red"</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Drawing_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._colorize%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">colorize</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._filled-rectangle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">filled-rectangle</a></span><span class="hspace"> </span><span class="RktVal">100</span><span class="hspace"> </span><span class="RktVal">100</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">"blue"</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr></table></td></tr><tr><td><p><img style="vertical-align: 0px; margin: -3px -3px -3px -3px;" src="pict_50.png" alt="image" width="206" height="206"/></p></td></tr></table></blockquote></td></tr></table></p><p><div class="SIntrapara"><blockquote class="SVInsetFlow"><table cellspacing="0" cellpadding="0" class="boxed RBoxed"><tr><td><blockquote class="SubFlow"><div class="RBackgroundLabel SIEHidden"><div class="RBackgroundLabelInner"><p>procedure</p></div></div><p class="RForeground"><span class="RktPn">(</span><a name="(def._((lib._unstable/gui/ppict..rkt)._tile))"></a><span title="Provided from: unstable/gui/ppict | Package: unstable-lib"><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._tile%29%29" class="RktValDef RktValLink" data-pltdoc="x">tile</a></span></span><span class="hspace"> </span><span class="RktVar">cols</span><span class="hspace"> </span><span class="RktVar">rows</span><span class="RktPn">)</span><span class="hspace"> </span>→<span class="hspace"> </span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._placer~3f%29%29" class="RktValLink" data-pltdoc="x">placer?</a></span></p></blockquote></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">cols</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=number-types.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._exact-positive-integer%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">exact-positive-integer?</a></span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">rows</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=number-types.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._exact-positive-integer%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">exact-positive-integer?</a></span></td></tr></table></blockquote></div><div class="SIntrapara">Returns a placer that places picts by tiling them in a grid
<span class="RktVar">cols</span> columns wide and <span class="RktVar">rows</span> rows high.</div></p><p><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><p>Example:</p></td></tr><tr><td><blockquote class="SCodeFlow"><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="stt">> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span><span class="hspace"> </span><span class="RktSym">base</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._tile%29%29" class="RktValLink" data-pltdoc="x">tile</a></span><span class="hspace"> </span><span class="RktVal">2</span><span class="hspace"> </span><span class="RktVal">2</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._circle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">circle</a></span><span class="hspace"> </span><span class="RktVal">50</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._rectangle%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">rectangle</a></span><span class="hspace"> </span><span class="RktVal">50</span><span class="hspace"> </span><span class="RktVal">50</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=More_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._jack-o-lantern%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">jack-o-lantern</a></span><span class="hspace"> </span><span class="RktVal">50</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=More_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._standard-fish%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">standard-fish</a></span><span class="hspace"> </span><span class="RktVal">50</span><span class="hspace"> </span><span class="RktVal">30</span><span class="hspace"> </span><span class="RktPn">#:color</span><span class="hspace"> </span><span class="RktVal">"red"</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr></table></td></tr><tr><td><p><img style="vertical-align: 0px; margin: -3px -3px -3px -3px;" src="pict_51.png" alt="image" width="206" height="206"/></p></td></tr></table></blockquote></td></tr></table></p><p><div class="SIntrapara"><blockquote class="SVInsetFlow"><table cellspacing="0" cellpadding="0" class="boxed RBoxed"><tr><td><blockquote class="SubFlow"><div class="RBackgroundLabel SIEHidden"><div class="RBackgroundLabelInner"><p>procedure</p></div></div><table cellspacing="0" cellpadding="0" class="prototype RForeground"><tr><td><span class="RktPn">(</span><a name="(def._((lib._unstable/gui/ppict..rkt)._at-find-pict))"></a><span title="Provided from: unstable/gui/ppict | Package: unstable-lib"><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._at-find-pict%29%29" class="RktValDef RktValLink" data-pltdoc="x">at-find-pict</a></span></span></td><td><span class="hspace"> </span></td><td><span class="RktVar">find-path</span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td></tr><tr><td><span class="hspace"> </span></td><td><span class="hspace"> </span>[</td><td><span class="RktVar">finder</span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td></tr><tr><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="RktVar">align</span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td></tr><tr><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="RktPn">#:abs-x</span><span class="hspace"> </span><span class="RktVar">abs-x</span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td></tr><tr><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="RktPn">#:abs-y</span><span class="hspace"> </span><span class="RktVar">abs-y</span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td></tr><tr><td><span class="hspace"> </span></td><td><span class="hspace"> </span></td><td><span class="RktPn">#:compose</span><span class="hspace"> </span><span class="RktVar">composer</span>]<span class="RktPn">)</span></td><td><span class="hspace"> </span></td><td>→</td><td><span class="hspace"> </span></td><td><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._refpoint-placer~3f%29%29" class="RktValLink" data-pltdoc="x">refpoint-placer?</a></span></td></tr></table></blockquote></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">find-path</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=data-structure-contracts.html%23%2528def._%2528%2528lib._racket%252Fcontract%252Fbase..rkt%2529._or%252Fc%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">or/c</a></span><span class="hspace"> </span><span class="RktSym"><a href="pict.html#%28def._%28%28lib._unstable%2Fgui%2Fpict..rkt%29._tag-path~3f%29%29" class="RktValLink" data-pltdoc="x">tag-path?</a></span><span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Finders.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._pict-path%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">pict-path?</a></span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">finder</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=procedures.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._procedure%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">procedure?</a></span><span class="hspace"> </span>=<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Finders.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._cc-find%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">cc-find</a></span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">align</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=data-structure-contracts.html%23%2528def._%2528%2528lib._racket%252Fcontract%252Fbase..rkt%2529._or%252Fc%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">or/c</a></span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">lt</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">ct</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">rt</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">lc</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">cc</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">rc</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">lb</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">cb</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">rb</span><span class="RktPn">)</span><span class="hspace"> </span>=<span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">cc</span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">abs-x</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=number-types.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._real%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">real?</a></span><span class="hspace"> </span>=<span class="hspace"> </span><span class="RktVal">0</span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">abs-y</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=number-types.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._real%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">real?</a></span><span class="hspace"> </span>=<span class="hspace"> </span><span class="RktVal">0</span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">composer</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=procedures.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._procedure%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">procedure?</a></span><span class="hspace"> </span>=<span class="hspace"> </span>computed from <span class="RktVar">align</span></td></tr></table></blockquote></div><div class="SIntrapara">Returns a placer that places picts according to a reference point
based on an existing pict within the base.</div></p><p><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><p>Example:</p></td></tr><tr><td><blockquote class="SCodeFlow"><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="stt">> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span><span class="hspace"> </span><span class="RktSym">base</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._cascade%29%29" class="RktValLink" data-pltdoc="x">cascade</a></span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="pict.html#%28def._%28%28lib._unstable%2Fgui%2Fpict..rkt%29._tag-pict%29%29" class="RktValLink" data-pltdoc="x">tag-pict</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=More_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._standard-fish%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">standard-fish</a></span><span class="hspace"> </span><span class="RktVal">40</span><span class="hspace"> </span><span class="RktVal">20</span><span class="hspace"> </span><span class="RktPn">#:direction</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">right</span><span class="hspace"> </span><span class="RktPn">#:color</span><span class="hspace"> </span><span class="RktVal">"red"</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">red-fish</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="pict.html#%28def._%28%28lib._unstable%2Fgui%2Fpict..rkt%29._tag-pict%29%29" class="RktValLink" data-pltdoc="x">tag-pict</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=More_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._standard-fish%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">standard-fish</a></span><span class="hspace"> </span><span class="RktVal">50</span><span class="hspace"> </span><span class="RktVal">30</span><span class="hspace"> </span><span class="RktPn">#:direction</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">left</span><span class="hspace"> </span><span class="RktPn">#:color</span><span class="hspace"> </span><span class="RktVal">"blue"</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">blue-fish</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._at-find-pict%29%29" class="RktValLink" data-pltdoc="x">at-find-pict</a></span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">red-fish</span><span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Finders.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._rc-find%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">rc-find</a></span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">lc</span><span class="hspace"> </span><span class="RktPn">#:abs-x</span><span class="hspace"> </span><span class="RktVal">10</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._text%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">text</a></span><span class="hspace"> </span><span class="RktVal">"red fish"</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr></table></td></tr><tr><td><p><img style="vertical-align: 0px; margin: -3px -3px -3px -3px;" src="pict_52.png" alt="image" width="206" height="206"/></p></td></tr></table></blockquote></td></tr></table></p><p><div class="SIntrapara"><blockquote class="SVInsetFlow"><table cellspacing="0" cellpadding="0" class="boxed RBoxed"><tr><td><blockquote class="SubFlow"><div class="RBackgroundLabel SIEHidden"><div class="RBackgroundLabelInner"><p>procedure</p></div></div><p class="RForeground"><span class="RktPn">(</span><a name="(def._((lib._unstable/gui/ppict..rkt)._merge-refpoints))"></a><span title="Provided from: unstable/gui/ppict | Package: unstable-lib"><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._merge-refpoints%29%29" class="RktValDef RktValLink" data-pltdoc="x">merge-refpoints</a></span></span><span class="hspace"> </span><span class="RktVar">x-placer</span><span class="hspace"> </span><span class="RktVar">y-placer</span><span class="RktPn">)</span><span class="hspace"> </span>→<span class="hspace"> </span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._refpoint-placer~3f%29%29" class="RktValLink" data-pltdoc="x">refpoint-placer?</a></span></p></blockquote></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">x-placer</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._refpoint-placer~3f%29%29" class="RktValLink" data-pltdoc="x">refpoint-placer?</a></span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">y-placer</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._refpoint-placer~3f%29%29" class="RktValLink" data-pltdoc="x">refpoint-placer?</a></span></td></tr></table></blockquote></div><div class="SIntrapara">Returns a placer like <span class="RktVar">x-placer</span> except that the y-coordinate of its
reference point is computed by <span class="RktVar">y-placer</span>.</div></p><p><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><p>Example:</p></td></tr><tr><td><blockquote class="SCodeFlow"><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="stt">> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span><span class="hspace"> </span><span class="RktSym">base</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._cascade%29%29" class="RktValLink" data-pltdoc="x">cascade</a></span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="pict.html#%28def._%28%28lib._unstable%2Fgui%2Fpict..rkt%29._tag-pict%29%29" class="RktValLink" data-pltdoc="x">tag-pict</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=More_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._standard-fish%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">standard-fish</a></span><span class="hspace"> </span><span class="RktVal">40</span><span class="hspace"> </span><span class="RktVal">20</span><span class="hspace"> </span><span class="RktPn">#:direction</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">right</span><span class="hspace"> </span><span class="RktPn">#:color</span><span class="hspace"> </span><span class="RktVal">"red"</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">red-fish</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="pict.html#%28def._%28%28lib._unstable%2Fgui%2Fpict..rkt%29._tag-pict%29%29" class="RktValLink" data-pltdoc="x">tag-pict</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=More_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._standard-fish%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">standard-fish</a></span><span class="hspace"> </span><span class="RktVal">50</span><span class="hspace"> </span><span class="RktVal">30</span><span class="hspace"> </span><span class="RktPn">#:direction</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">left</span><span class="hspace"> </span><span class="RktPn">#:color</span><span class="hspace"> </span><span class="RktVal">"blue"</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">blue-fish</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._merge-refpoints%29%29" class="RktValLink" data-pltdoc="x">merge-refpoints</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValLink" data-pltdoc="x">coord</a></span><span class="hspace"> </span><span class="RktVal">1</span><span class="hspace"> </span><span class="RktVal">0</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">rc</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._at-find-pict%29%29" class="RktValLink" data-pltdoc="x">at-find-pict</a></span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">red-fish</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._text%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">text</a></span><span class="hspace"> </span><span class="RktVal">"red fish"</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr></table></td></tr><tr><td><p><img style="vertical-align: 0px; margin: -3px -3px -3px -3px;" src="pict_53.png" alt="image" width="206" height="206"/></p></td></tr></table></blockquote></td></tr></table></p><h4 x-source-module="(lib "unstable/scribblings/gui/unstable-gui.scrbl")" x-part-tag=""pslide"">5.2<tt> </tt><a name="(part._pslide)"></a><a name="(mod-path._unstable/gui/pslide)"></a>Progressive Slides</h4><p><table cellspacing="0" cellpadding="0" class="defmodule"><tr><td align="left"><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=require.html%23%2528form._%2528%2528lib._racket%252Fprivate%252Fbase..rkt%2529._require%2529%2529&version=6.1" class="RktStxLink Sq" data-pltdoc="x">require</a></span><span class="stt"> </span><a href="#%28mod-path._unstable%2Fgui%2Fpslide%29" class="RktModLink" data-pltdoc="x"><span class="RktSym">unstable/gui/pslide</span></a><span class="RktPn">)</span></td><td align="right"><span class="RpackageSpec"><span class="Smaller"> package:</span> <span class="stt">unstable-lib</span></span></td></tr></table></p><p><div class="SIntrapara"><blockquote class="SVInsetFlow"><table cellspacing="0" cellpadding="0" class="boxed RBoxed"><tr><td><blockquote class="SubFlow"><div class="RBackgroundLabel SIEHidden"><div class="RBackgroundLabelInner"><p>syntax</p></div></div><p class="RForeground"><span class="RktPn">(</span><a name="(form._((lib._unstable/gui/pslide..rkt)._pslide))"></a><span title="Provided from: unstable/gui/pslide | Package: unstable-lib"><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fpslide..rkt%29._pslide%29%29" class="RktStxDef RktStxLink" data-pltdoc="x">pslide</a></span></span><span class="hspace"> </span><span class="RktVar">ppict-do-fragment</span><span class="hspace"> </span><span class="RktMeta">...</span><span class="RktPn">)</span></p></blockquote></td></tr></table></blockquote></div><div class="SIntrapara">Produce slide(s) using <a href="#%28tech._progressive._pict%29" class="techoutside" data-pltdoc="x"><span class="techinside">progressive picts</span></a>. See <span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%29%29" class="RktStxLink" data-pltdoc="x">ppict-do</a></span>
for an explanation of <span class="RktVar">ppict-do-fragment</span>s.</div></p><p>Note that like <span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=slideshow&rel=Primary_Slide_Functions.html%23%2528def._%2528%2528lib._slideshow%252Fbase..rkt%2529._slide%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">slide</a></span> but unlike <span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._ppict-do%2A%29%29" class="RktStxLink" data-pltdoc="x">ppict-do*</a></span>, the
number of slides produced is one greater than the number of
<span class="RktPn">#:next</span> uses; that is, a slide is created for the final pict.</p><p>Remember to include <span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=slideshow&rel=Constants_and_Layout_Variables.html%23%2528def._%2528%2528lib._slideshow%252Fbase..rkt%2529._gap-size%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">gap-size</a></span> after updating the current
placer if you want <span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=slideshow&rel=Primary_Slide_Functions.html%23%2528def._%2528%2528lib._slideshow%252Fbase..rkt%2529._slide%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">slide</a></span>-like spacing.</p><p><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><p>Example:</p></td></tr><tr><td><blockquote class="SCodeFlow"><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><table cellspacing="0" cellpadding="0" class="RktBlk"><tr><td><span class="stt">> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fpslide..rkt%29._pslide%29%29" class="RktStxLink" data-pltdoc="x">pslide</a></span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValLink" data-pltdoc="x">coord</a></span><span class="hspace"> </span><span class="RktVal">0</span><span class="hspace"> </span><span class="RktVal">0</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">lt</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=slideshow&rel=Primary_Slide_Functions.html%23%2528def._%2528%2528lib._slideshow%252Fbase..rkt%2529._t%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">t</a></span><span class="hspace"> </span><span class="RktVal">"You do not like"</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Drawing_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._colorize%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">colorize</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=slideshow&rel=Primary_Slide_Functions.html%23%2528def._%2528%2528lib._slideshow%252Fbase..rkt%2529._t%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">t</a></span><span class="hspace"> </span><span class="RktVal">"green eggs and ham?"</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">"darkgreen"</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:next</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">#:go</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValLink" data-pltdoc="x">coord</a></span><span class="hspace"> </span><span class="RktVal">1</span><span class="hspace"> </span><span class="RktVal">1</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">rb</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Drawing_Adjusters.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._colorize%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">colorize</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=slideshow&rel=Primary_Slide_Functions.html%23%2528def._%2528%2528lib._slideshow%252Fbase..rkt%2529._t%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">t</a></span><span class="hspace"> </span><span class="RktVal">"I do not like them,"</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktVal">"red"</span><span class="RktPn">)</span></td></tr><tr><td><span class="hspace"> </span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=slideshow&rel=Primary_Slide_Functions.html%23%2528def._%2528%2528lib._slideshow%252Fbase..rkt%2529._t%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">t</a></span><span class="hspace"> </span><span class="RktVal">"Sam-I-am."</span><span class="RktPn">)</span><span class="RktPn">)</span></td></tr></table></td></tr><tr><td><p><img style="vertical-align: -0.0px; margin: -3px -3px -3px -3px;" src="pict_54.png" alt="image" width="466.0" height="200.09765625"/></p></td></tr></table></blockquote></td></tr></table></p><p>Note that the text is not flush against the sides of the slide,
because <span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fpslide..rkt%29._pslide%29%29" class="RktStxLink" data-pltdoc="x">pslide</a></span> uses a base pict the size of the client
area, excluding the margins.</p><p><div class="SIntrapara"><blockquote class="SVInsetFlow"><table cellspacing="0" cellpadding="0" class="boxed RBoxed"><tr><td><blockquote class="SubFlow"><div class="RBackgroundLabel SIEHidden"><div class="RBackgroundLabelInner"><p>parameter</p></div></div><p class="RForeground"><span class="RktPn">(</span><a name="(def._((lib._unstable/gui/pslide..rkt)._pslide-base-pict))"></a><span title="Provided from: unstable/gui/pslide | Package: unstable-lib"><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fpslide..rkt%29._pslide-base-pict%29%29" class="RktValDef RktValLink" data-pltdoc="x">pslide-base-pict</a></span></span><span class="RktPn"></span><span class="RktPn">)</span><span class="hspace"> </span>→<span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=function-contracts.html%23%2528form._%2528%2528lib._racket%252Fcontract%252Fbase..rkt%2529._-%7E3e%2529%2529&version=6.1" class="RktStxLink Sq" data-pltdoc="x"><span class="nobreak">-></span></a></span><span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Datatype.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._pict%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">pict</a></span><span class="RktPn">)</span></p></blockquote></td></tr><tr><td><span class="RktPn">(</span><span title="Provided from: unstable/gui/pslide | Package: unstable-lib"><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fpslide..rkt%29._pslide-base-pict%29%29" class="RktValDef RktValLink" data-pltdoc="x">pslide-base-pict</a></span></span><span class="hspace"> </span><span class="RktVar">make-base-pict</span><span class="RktPn">)</span><span class="hspace"> </span>→<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=void.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._void%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">void?</a></span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">make-base-pict</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=function-contracts.html%23%2528form._%2528%2528lib._racket%252Fcontract%252Fbase..rkt%2529._-%7E3e%2529%2529&version=6.1" class="RktStxLink Sq" data-pltdoc="x"><span class="nobreak">-></span></a></span><span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Pict_Datatype.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._pict%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">pict</a></span><span class="RktPn">)</span></td></tr></table></blockquote></div><div class="SIntrapara">Controls the initial pict used by <span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fpslide..rkt%29._pslide%29%29" class="RktStxLink" data-pltdoc="x">pslide</a></span>. The default value
is
</div><div class="SIntrapara"><blockquote class="SCodeFlow"><p><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=lambda.html%23%2528form._%2528%2528lib._racket%252Fprivate%252Fbase..rkt%2529._lambda%2529%2529&version=6.1" class="RktStxLink Sq" data-pltdoc="x">lambda</a></span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktPn">)</span><span class="hspace"> </span><span class="RktPn">(</span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=pict&rel=Basic_Pict_Constructors.html%23%2528def._%2528%2528lib._pict%252Fmain..rkt%2529._blank%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">blank</a></span><span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=slideshow&rel=Constants_and_Layout_Variables.html%23%2528form._%2528%2528lib._slideshow%252Fbase..rkt%2529._client-w%2529%2529&version=6.1" class="RktStxLink Sq" data-pltdoc="x">client-w</a></span><span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=slideshow&rel=Constants_and_Layout_Variables.html%23%2528form._%2528%2528lib._slideshow%252Fbase..rkt%2529._client-h%2529%2529&version=6.1" class="RktStxLink Sq" data-pltdoc="x">client-h</a></span><span class="RktPn">)</span><span class="RktPn">)</span></p></blockquote></div></p><p><div class="SIntrapara"><blockquote class="SVInsetFlow"><table cellspacing="0" cellpadding="0" class="boxed RBoxed"><tr><td><blockquote class="SubFlow"><div class="RBackgroundLabel SIEHidden"><div class="RBackgroundLabelInner"><p>parameter</p></div></div><p class="RForeground"><span class="RktPn">(</span><a name="(def._((lib._unstable/gui/pslide..rkt)._pslide-default-placer))"></a><span title="Provided from: unstable/gui/pslide | Package: unstable-lib"><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fpslide..rkt%29._pslide-default-placer%29%29" class="RktValDef RktValLink" data-pltdoc="x">pslide-default-placer</a></span></span><span class="RktPn"></span><span class="RktPn">)</span><span class="hspace"> </span>→<span class="hspace"> </span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._placer~3f%29%29" class="RktValLink" data-pltdoc="x">placer?</a></span></p></blockquote></td></tr><tr><td><span class="RktPn">(</span><span title="Provided from: unstable/gui/pslide | Package: unstable-lib"><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fpslide..rkt%29._pslide-default-placer%29%29" class="RktValDef RktValLink" data-pltdoc="x">pslide-default-placer</a></span></span><span class="hspace"> </span><span class="RktVar">placer</span><span class="RktPn">)</span><span class="hspace"> </span>→<span class="hspace"> </span><span class="RktSym"><a href="http://download.racket-lang.org/docs/6.1/html/local-redirect/index.html?doc=reference&rel=void.html%23%2528def._%2528%2528quote._%7E23%7E25kernel%2529._void%7E3f%2529%2529&version=6.1" class="RktValLink Sq" data-pltdoc="x">void?</a></span></td></tr><tr><td><span class="hspace"> </span><span class="RktVar">placer</span><span class="hspace"> </span>:<span class="hspace"> </span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._placer~3f%29%29" class="RktValLink" data-pltdoc="x">placer?</a></span></td></tr></table></blockquote></div><div class="SIntrapara">Controls the initial placer used by <span class="RktSym"><a href="#%28form._%28%28lib._unstable%2Fgui%2Fpslide..rkt%29._pslide%29%29" class="RktStxLink" data-pltdoc="x">pslide</a></span>. The default value
is
</div><div class="SIntrapara"><blockquote class="SCodeFlow"><p><span class="RktPn">(</span><span class="RktSym"><a href="#%28def._%28%28lib._unstable%2Fgui%2Fppict..rkt%29._coord%29%29" class="RktValLink" data-pltdoc="x">coord</a></span><span class="hspace"> </span><span class="RktVal">1/2</span><span class="hspace"> </span><span class="RktVal">1/2</span><span class="hspace"> </span><span class="RktVal">'</span><span class="RktVal">cc</span><span class="RktPn">)</span></p></blockquote></div></p><div class="navsetbottom"><span class="navleft"><form class="searchform"><input class="searchbox" style="color: #888;" type="text" value="...search manuals..." title="Enter a search string to search the manuals" onkeypress="return DoSearchKey(event, this, "6.1", "../");" onfocus="this.style.color="black"; this.style.textAlign="left"; if (this.value == "...search manuals...") this.value="";" onblur="if (this.value.match(/^ *$/)) { this.style.color="#888"; this.style.textAlign="center"; this.value="...search manuals..."; }"/></form> <a href="../index.html" title="up to the documentation top" data-pltdoc="x" onclick="return GotoPLTRoot("6.1");">top</a></span><span class="navright"> <a href="Slideshow_Presentations.html" title="backward to "4 Slideshow Presentations"" data-pltdoc="x">← prev</a> <a href="index.html" title="up to "Unstable GUI: May Change Without Warning"" data-pltdoc="x">up</a> <a href="snip.html" title="forward to "6 Snip Utilities"" data-pltdoc="x">next →</a></span> </div></div></div><div id="contextindicator"> </div></body></html>
|