.\"
.\"     cook - file construction tool
.\"     Copyright (C) 1997, 2007, 2008 Peter Miller
.\"
.\"     This program is free software; you can redistribute it and/or modify
.\"     it under the terms of the GNU General Public License as published by
.\"     the Free Software Foundation; either version 3 of the License, or
.\"     (at your option) any later version.
.\"
.\"     This program is distributed in the hope that it will be useful,
.\"     but WITHOUT ANY WARRANTY; without even the implied warranty of
.\"     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
.\"     GNU General Public License for more details.
.\"
.\"     You should have received a copy of the GNU General Public License
.\"     along with this program. If not, see
.\"     <http://www.gnu.org/licenses/>.
.\"
.PS
line from (0,10.3162) \
        then to (0.796167,10.3162)
"stmt" ljust at (0,10.4002)
line from (0.796167,10.3162) \
        then to (0.944333,10.3162)
line from (0.944333,10.3162) \
        then to (2.6015,10.3162)
arc at (2.71817,10.3162) \
        rad 0.116667 \
        from (2.71817,10.4328) \
        to (2.71817,10.1995)
line from (2.71817,10.1995) \
        then to (2.91067,10.1995)
arc at (2.91067,10.3162) \
        rad 0.116667 \
        from (2.91067,10.1995) \
        to (2.91067,10.4328)
line from (2.91067,10.4328) \
        then to (2.71817,10.4328)
"\f[CW]set\fP" at (2.81442,10.3162)
line from (2.51817,10.3439) \
        then to (2.6015,10.3162) \
        then to (2.51817,10.2884)
line from (3.02733,10.3162) \
        then to (3.1755,10.3162)
line from (3.1755,10.1995) \
        then to (3.77467,10.1995) \
        then to (3.77467,10.4328) \
        then to (3.1755,10.4328) \
        then to (3.1755,10.1995)
"exprs" at (3.47508,10.3162)
line from (3.09217,10.3439) \
        then to (3.1755,10.3162) \
        then to (3.09217,10.2884)
line from (3.77467,10.3162) \
        then to (3.92283,10.3162)
arc at (4.0395,10.3162) \
        rad 0.116667 \
        from (4.0395,10.4328) \
        to (4.0395,10.1995)
line from (4.0395,10.1995) \
        then to (4.09317,10.1995)
arc at (4.09317,10.3162) \
        rad 0.116667 \
        from (4.09317,10.1995) \
        to (4.09317,10.4328)
line from (4.09317,10.4328) \
        then to (4.0395,10.4328)
"\f[CW];\fP" at (4.06633,10.3162)
line from (3.8395,10.3439) \
        then to (3.92283,10.3162) \
        then to (3.8395,10.2884)
line from (4.20983,10.3162) \
        then to (5.867,10.3162)
line from (5.867,10.3162) \
        then to (6.01517,10.3162)
line from (5.93183,10.3439) \
        then to (6.01517,10.3162) \
        then to (5.93183,10.2884)
.PE