🚀 go-pugleaf

$@<mLn!w$o$;$@$G$9!#;d$K$O<!Bh$KFq$7$/$J$C$F$-$^$7$?$,!D!D!#(J

In article <ONIZUKA.93Feb25114313@psiux535.icot.or.jp> onizuka@icot.or.jp (Onizuka "Creole" Kentaro) writes:

>$@7k6I!"$`$+$7$`$+$7$N%^%7%s8l$K;O$^$j!"%3%s%T%e!<%?8@8l$O$I$s$I$s;H$$0W(J
>$@$/$J$C$F$$$k!J!)!K$H$9$k(J$@$H!"$=$l$O?M4V$NG'CN$70W$$$b$N$K$J$j$D$D$"$k$H(J
>$@$$$&$3$H$G$9!#Hf3SE*LLGr$$$H;W$&$N$O!"M}O@E*$Ke:No$K:n(J$@$i$l$?(Jpure LISP
>$@$H$+!"(Jpure prolog $@$J$I$h$j!"8=>l$N5;=Q<T$,Cf?4$G%"%I%[%C%/$K:n$i$l$?$h(J
>$@$&$J8@8l$NJ}(J$@$,LLGr$$FCD'$r$b$C$F$$$^$9!#%*%V%8%'%/%H;X8~$bDL?.%7%9%F%`(J
>$@$r#C8@8l$G3+H/$7$F$$$k5;=Q<T$,9=B$BN$NCf$K(J$@$8$c$s$8$c$s4X?t$X$N%]%$%s%?(J
>$@$rF~$l$F=q$-;O$a$?$N$,;O$^$j$H$b8@$o$l$F$$$^$9!#(JHyperTalk$@$@$C$FM}O@E*(J
>$@$Ke:No$J8@8l$G$O$J$$$G$7$g$&$,$$$m$$$m$H<+A38@8lE*$KLLGr$$$G$9$h$M!#(J
>forth$@$bHs>o$KLLGr$$!#(J

$@$=$&$J$s(J$@$G$9$+!#%*%V%8%'%/%H;X8~65?.<T$,!V(JC++ $@$O1x$$!W$J$I$H$h$/8@$$!"(J
$@$=$l$KBP$7$F!V(JC++ $@$O<BMQ$N$?$a$K:n$i$l(J$@$?8@8l$@$+$i!W$H8@$$$o$1$r$9$k(J
$@$N$r;68+$7$^$9$+$i!"=c?h$KM}O@E*$J8@8l$NJ}$,FCD'$r!V=c?h$K!WHw$($F(J
$@$$$k(J$@$+$H;W$C$?$s$G$9$,!D!D!#(J

$@<BMQE*$J8@8l$G$O5-=R$r4J7i!&L@2r$K$9$k$N$K<BMQE*$JL\E*$r;}$C$F9=J8$r(J
$@:n$C$F(J$@$$$k$N$G$9$+$i!"?M4V$,<+A3$K!VH/A[$N0l2t!W$H$7$FM}2r$70W$$$b$N$r(J
$@AH$_9g$o$;$k$3$H$K$J$k$N$G$7$g$&$M!#(J
$@$=$l$KH?$7$F!"=cM}O@E*$J8@8l$O%H%C%W%@%&%s<0$KJ8K!$r:n$C$F$$$/$+$i(J
$@9=J8E*$K1x$/8+$($kNc30$O>/$J$$Be$o(J$@$j$K!"?M4V$N<+A38@8l$G$O0l8@$GI=8=(J
$@$G$-$k$h$&$JC1=c$J;vJA$r8@$$I=$9$N$K6lO+$7$?$j$b$9$k$N$G$O!)(J

$@!t<+(J$@A38@8l$=$N$b$N$,8=>l$G%"%I%[%C%/$K:n$i$l$?$b$N$G$9$+$iBP1~$r<h$k(J
$@!t$K$OF1$8$h$&$J0i$A$N?M9)8@8l$,ET9g(J$@$,NI$$$N$G$7$g$&$+!)(J


> |$@$J$I$HHf$Y$l$P:3:Y$J:9$7$+$J$$$H8+$F$$$$$H;W$$$^$9!#(J
> |$@?tNL$KBP$9$k3,AX9=B$(J$@$K$h$C$F?t;l$r;H$$J,$1$k1Q8l$NJ}K!$H!"=x?t;l$rMQ$$$?(J
> |$@0l85E*$J4IM}K!$K$h$kF|K\8l$NJ}K!$H$N$I$A$i$,JX(J$@Mx$+!"$H$$$&:9$G$9$M!#(J

>$@%*%V%8%'%/%H;X8~$@$H$*$b$&$s$G$9$h!"F|K\8l$N>l9g$O!#BP>]$N%/%i%9$K1~$8(J
>$@$??t(J$@BN7O$,$"$k!#1Q8l$N>l9g$O0lHL2=$7$F!"BN7O2=$5$l$F$$$k!#L>;l$HF0;l$H(J
>$@$+IJ;l$N35G0$H$$$&$b$N$O$3$l$OHs>o(J$@$K0lHL2=$5$l$?35G0$G$9!#$G$b!"<B:]L>(J
>$@;l$HF0;l$NAH$_9g$o$;$OL>;l$N<($9BP>]$N%/%i%9$K1~$8$F7h$^$C$F$/$k(J$@$b$N$G!"(J
>$@L>;l$HF0;l$HJ,$1$k$h$j!"BP>]%/%i%9$H$=$l$N<u$1$H$l$k=R8l%/%i%9$NBP1~$r(J
>$@8D!9Dj5A$9$k$N$,NI$$(J$@$3$H$b$"$j$^$9!#$h$/8@$o$l$k!"!VNP?'$N9=B$$,LTA3$H(J
>$@L2$k!W$H$$$&J8$,0UL#$r$J$5L5$$$N$O!"IJ;lJ,N`$H$7$F(J$@J8K!E*$K$O@5$7$$J8$G(J
>$@$b!"0UL#E*$KHsJ8$G$"$k$H$$$&$3$H$G$9!#(J
>$@$=$N0UL#$G!":#8e$b$C$H0UL#O@E*$JJ8>O2r@O(J$@$,=EMW$K@.$C$F$/$k$H;W$$$^$9!#(J

$@8lMQO@$r9M$($KF~$l$?J8>O2r@O$G$9$M!#<BMQE*$J%l%Y%k$G$d$m$&$H$9$k$H(J
$@BP(J$@1~$NDj5A$r5pBg$JI=$K$7$J$1$l$P$J$i$J$$$G$7$g$&!#$+$J$j@h$N$3$H$K(J
$@$J$j$=$&$G$9$M!#(J
$@!t$=$3$^$G9T$/$H!VJ8(J$@K!!W$H8F$Y$k$+$I$&$+!D!D!)(J

$@;d$b!"0UL#O@E*$JJ8>O2r@O$O$3$l$+$i$b$C$H8&5f$5$l$k$@$m$&$7!"$=$&$J$C$F(J
$@$[(J$@$7$$$H;W$$$^$9!#$7$+$7;d$,4|BT$7$F$$$k$N$O>e$K5s$2$?$[$I:Y$+$$$b$N(J
$@$G$O$J$/$F!"8@8l$r@bL@$9$k$N$K8=:_(J$@;H$o$l$F$$$kJ8K!!&9=J8O@$,$J$<@8$^$l(J
$@$?$N$+!"0UL#O@E*$K2r<a$r$9$k$H$$$&$$$o$P%a%?J8K!$H$G$b8@$&$Y$-$b(J$@$N$G$9!#(J

$@$3$l$,L5$$$3$H$,!";d$,8=:_$^$G$NJ8K!3X<T$N;E;v$KITK~$r3P$($kM}M3$G$b(J
$@$"$j$^$9$7!"3X9;$NJ8K!(J$@650i$r$D$^$i$J$$$b$N$K$7$F$$$k860x$G$b$"$k$H(J
$@;W$$$^$9!#(J
$@?M4V$,0UL#$N0l2t$H$7$FB*$($kBP>]$O;w$?$j4s$C$?(J$@$j$G$7$g$&$+$i!"3F8@8l$N(J
$@%a%?J8K!$rFM$-9g$o$;$F$_$l$P!"%A%g%`%9%-!<$,!V8@8l=,F@$NG=NO$O@8F@E*$J(J
$@$b$N$G(J$@$"$k!W$H<gD%$7$F$$$?;v$NN"IU$1$,F@$i$l$k$+$bCN$l$^$;$s!#(J

> |$@F|K\8l$G!"A4$F$N@)Ls>r7o$H$7$F$N=$>~!J$$(J$@$o$f$k<g=R$N4X78$b4^$`!K8l$rHo(J
> |$@=$>~8l$NA0$KCV$/M}M3$G$"$k:,K\K!B'!J$H;d$,9M$($F$$$k$b$N!K$O!"!V8l=g(J$@$O(J
> |$@Bg>u67$+$i>.>u67$X!W$H$$$&86B'$G$9!#8@$$49$($l$P!"?7$7$$>pJs$rM?$($kA0$K(J
> |$@6KNOJ8L.$rM?$($k$H$$(J$@$&9M$(J}$G$9!#(J

>$@$3$l$G!"1Q8l$G$O4';l$,L>;l6g$N@hF,$KIU$/M}M3$b$o$+$j$^$9$h$M!#4';l$G!"(J
>$@$^$:Aj<j$K4{(J$@CN$N$b$N$G$"$k$+$=$&$G$J$$$+$r<($7$F$*$+$J$$$H!"Aj<j$H$7$F(J
>$@$O$=$N8e$N2r<a$K;Y>c$r$-$?$9Lu$G$9!#F|K\8l(J$@$G$O!"!V$O!W$H!V$,!W$,4';l5!(J
>$@G=$KBP1~$7$F$$$k$H8@$o$l$k$3$H$,M-$j$^$9$,!"$3$l$OL>;l6g$K8eCV$5$l$^$9!#(J
>$@$D$^$j!"1Q8l$HCzEY5U$N$3$H$,8@$($k$H;W$$$^$9!#(J

$@F|K\8l$G$O>e5-$N86B'$rE0Dl$5$;$F$$$^$9$,!"$=$N;~E@$G(J$@9=J8E*$JOHAH$,(J
$@$+$J$jDj$a$i$l$F$7$^$$$^$9$h$M!J$@$+$i$3$l$OMh$?$k$Y$-%a%?F|K\8lJ8K!(J
$@$NCf?4E*$J86B'$K$J(J$@$k$H;W$$$^$9!K!#1Q8l$G$O$3$N86B'$O:,K\E*$G$O$J$$(J
$@!J!VJ8$N;O$a$@$1$G6KNO0UL#$rDL$8$5$;$k!W$,86B'$@$H;W(J$@$$$^$9!K$1$l$I$b!"(J
$@M}2r$NMF0W$5$N$?$a$K$OL5;k$9$k$o$1$K$$$+$J$$$G$7$g$&!#(J

$@!V!X$O!Y$OL$CN$N$b$N!"!X$,(J$@!Y$O4{CN$N$b$N$rI=$9!W$H>'$($?J8K!3X<T$,(J
$@$$$^$7$?$,!"$=$l$K=>$($PF|K\8l$G8eCV$5$l$k$N$OIT;W5D$H8@$($P(J$@IT;W5D(J
$@$G$9$M!#;d$O$3$N@bL@$h$j$b!"!V!X$,!Y$O$=$N8l$h$jA0$NItJ,$r!"!X$O!Y$O(J
$@$=$N8l$h$j8e$m$r6/D4$9$k!J(J$@$=$NItJ,$rB>$NMWAG$KCV$-49$($?J8$H$N6hJL$r(J
$@L@$i$+$K$9$k!K!W$H8@$C$?J}$,NI$$@bL@$@$H;W$$$^$9$,!#(J

> |>$@7k6I!"0UL#O@$r9M$($F$$$J$+$C$?;~Be$K!"J8K!$H8@$&$b$N$,!"4pK\E*$K$O!"%.(J
> |>$@%j%7%"8l!"%i%F%s8l$K4p$E$$(J$@$F3+H/$5$l$?$s$G$7$g$&!#F|K\8l$N3hMQ$J$s$6!"(J
> |>$@$b$H$OMv3X$N1F6A$G$9$+$i$M!#4V@\E*$G$"$l!"F|K\8l$N9q(J$@J8K!$O%.%j%7%"8l!"(J
> |>$@%i%F%s8l$N1F6A$r<u$1$F$$$k$G$7$g$&!#(J
> |
> |$@!V<g8l!W!V=R8l!W$C$F$d$D$,0lHV$N1F(J$@6A$8$c$J$$$G$9$+$M!#FH<+$KF|K\?M$,(J
> |$@J8K!$rBN7O2=$7$F$$$?$H$7$?$i!"=R8l0l85O@E*$JJ*$K$J$C$?$G$7$g$&!#(J

>$@L@<#;~Be$O!"K\Ev$KF|K\8l$r@>MN8l$K6a$$$b$N$K2~B$$7$h$&$H$7$?!"$"$k$$$O!"(J
>$@7k2L$H$7$F$=$&$7$h$&$H$7(J$@$?$h$&$G$9!#$@$+$i!"L@<#;~Be$N!VF|>o2qOC!W$N65(J
>$@2J=q$K$O!"!V2f%OI.%r;}%D%G%"%i%U!W$H$$$&$h$&$J$H$s$G$b(J$@$J$$F|K\8l$,>h$C(J
>$@$F$$$^$9!#(J

$@86J80lCW1?F0$N:n2H$K$h$C$F$b@>MN8l$+$iBt;3$N8@$$2s$7$,M"F~$5$l$?(J
$@$=$&$G(J$@$9$M!#!V!D$9$k$dH]$d!W$O(J no sooner than... $@$NLu$@$=$&$G$9!#(J

> |$@7ABVO@E*$J@bL@$H$7$F$NJ8K!$,H/E8$9$k$H(J$@$=$&$J$k$s$G$7$g$&$M!#9=J85,B'$r(J
> |$@;YG[$9$k860x$H$7$F$N0UL#O@E*$JK!B'$rJ8K!$+$iCj=P$9$k;n$_$O$3$l$+$i(J$@$H$$$&(J
> |$@$H$3$m$G$7$g$&$+!#(J
>
>$@$=$&$G$9$M!#$3$l$O!"%A%g%`%9%-!<N.$N@8@.J8K!$NOHAH$r4^$a$F!"5,HOJ8K!$K(J
>$@FG$5$l$F$-$?$H$$$&$3$H$G$O$J$$$G$7$g$&$+!#;v<B!"@8@.J8K!$G$b!"IJ;l$,$=(J
>$@$N$^$^=P$F$-$^$9$+$i$M!#(J

$@J8(J$@K!$r!"Dj$a$i$l$?K!N'$N$h$&$K07$$$?$,$k?M$NLdBj$O$^$?JL$G$7$g$&!#(J
$@%h!<%m%C%Q$N=t8@8l$NJ88l$O!"%i%F%s8l(J$@0J30$K=q$-8@MU$,L5$+$C$?;~Be$K(J
$@!VA4$F$NB/8l$OIe$C$?%i%F%s8l$G$"$k!W$H$$$&JP8+$HI,;j$K@o$$$D$D@.N)(J
$@$7$?(J$@J*$G$9$7$M!#0UL#O@E*$J%a%?J8K!$,=P$F$-$?$H$7$F$b:#EY$O$=$l$r(J
$@6b2J6L>r$N$4$H$/Jt$j!"8@8l$NJQ2=$rA4$F!V(J$@Mp$l!W$H8F$V?M$,$-$C$H=P$F(J
$@$-$^$9$h!#(J

$@!V8@8l$N=c?h@-!W$H8@$&$N$bF1$8$h$&$J%$%+%,%o%7$5$r;}$A9g$o$;$F(J
$@$$$^$9$M!#%/%l%*!<%k$,?M4V$N=c?h$J8@8l$K6a$$$H54DM$5$s$,$*$C$7$c$k(J
$@$N$,K\Ev$@$H$9$l$P!"$3$l$3$=$OBg$-(J$@$JHiFy$G$7$g$&!#(J
$@EDCf9nI'$N!V$3$H$P$H9q2H!W!J4dGH?7=q!K$"$?$j$rFI$`$H!"$3$l$i8@MU$N(J
$@=c2=<g5A<T$I$b$X$N(J$@H?46$,O*9|$K8=$l$F$$$F!"$J$+$J$+LLGr$$$G$9!#(J

>C++$@$+$i!"3g8L$H$+(J -> $@$H$+(J . $@$J$I$r<h$j=|$/$H!"7k9=<+A3(J$@8@8l%b%I%-$K$J$j(J
>$@$^$9!#$b$A$m$s!";H$&C18l$r9M$($J$$$H9T$1$^$;$s$,!#(J

$@$=$l$OLLGr$=$&$@!#:#EY;n$7$F$_$k(J$@$3$H$K$7$^$7$g$&!#(J

> |$@%3%s%T%e!<%?$N@$3&$G$O(J get $@$H(J there is/are $@$,F10U8l$K$J$k$H$$$&$N$O(J
> |$@LLGr$$$G(J$@$9$M!#%I%$%D8l$GB8:_$rI=$9(J es gibt(= it gives)$@$H$$$&I=8=$b2?$H$J$/(J
> |$@G<F@$,$$$/!#(J
>
>$@$3$l$O!"%/%l%*!<(J$@%k$NI=8=$G$9!#%/%l%*!<%k$G$O!"B8:_$H=jM-$,F10l$G$9$+$i!"(J
>$@F1$8(Jget$@$r;H$$$^$9!#(J
>
>Mi get wan dog.		I have a dog.
>Get wan haus dere.	There is a house.

$@F|K\8l$G$O<x<u$NI=8=$K$OF@$KAj8_$N4X78$,H?1G$7$^$9$+(J$@$i!"$3$N$h$&$J(J
$@F10l;k$NH/A[$O5/$3$j$K$/$$$s$G$7$g$&$M!#(J

> |$@8!:w$,5?Ld$r4^$`4X78;l$@$H$$$&$N$O9M$($F$_(J$@$?$3$H$b$"$j$^$;$s$G$7$?!#(J
> |$@1T$$$40U8+$G$9$M!#%*%V%8%'%/%H;X8~E*$JH/A[$G$OEv$jA0$J$N$G$7$g$&$+!)(J
>
>$@$I$&$G$7$g$&$M!#4X78BeL>;l$N$"$k%*%V%8%'%/%H;X8~8@8l$C$F$$$&$N$OJ9$$$?(J
>$@$3$H$,$J$$$7!#(J

$@9M$($F$_$F$b(J$@LLGr$$$G$7$g$&$M!#$G$b!";d$,8@$$$?$+$C$?$N$O5U$N0UL#(J
$@9g$$$G!"5?Ld$r4^$`4X78;l$r8!:w$H$$$&A`:n$GB*$($k(J$@$3$H$N?7A/$5$G$7$?!#(J

>The + $@L>;l(J + $@A0CV;l6g(J/$@4X78BeL>;l6g(J $@$H$$$&$N$O!"$^$:!"(Jthe$@$G4{CN$N%*%V%8%'(J
>$@%/%H(J$@$G$"$k$3$H$r$7$a$7$F!"<!$K!"L>;l$G%/%i%9$r$7$a$7!"$=$l$GJ#?t$N4{CN(J
>$@$N$=$N%/%i%9$KB0$9$k%*%V%8%'%/%H$,(J$@$"$k$N$G!"8BDj$5$l$J$$$N$G!"$&$7$m$N(J
>$@8BDj@b$G8BDj$7$F$$$k$s$G$9$M!#$@$+$i!"%/%i%9$H8BDj>r7o$rM?$($F8!(J$@:w$7$F(J
>$@$$$k$N$HF1$8$3$H$G$9!#(J

$@8!:w$9$k$H$$$&A`:n$rL@<(E*$KM?$($J$1$l$P$$$1$J$$$N$O>/$7LLE]$G$9$M!#(J
$@?M4V$O!"%/%i%9$KB0$9$k3F%*%V%8%'%/%H$,8BDj>r7o$K9gCW$9$k$+$I$&$+(J
$@$$$A$$$A3N$+$a$?$j$7$^$;$s$+$i!#$=$N(J$@$X$s$N%Q%?!<%s%^%C%A%s%0$r8@8l$,(J
$@<+F0E*$K$d$C$F$/$l$k$H!"?M4V$N9M$($r$b$C$HD>@\E*$KI=8=$G$-$^$9$M!#(J

>Plot all the points whose x_coordinate < 1.0.
>
>$@$3$l$O!"(J
>
>(Points | x_coordinate() < 1.0).plot();
>
>$@$_$?$$$K=q$1$F$b$h$$$G$9$h$M!#(JSmallTalk$@$G$O$G$-$?$+$J!#(J

$@$3$3$^$GMh$k$HAjEv$K?M4V$NI=8=$K6aIU$$$F(J$@$$$^$9$M!#(J| $@$r4X78BeL>;l$H(J
$@8F$s$G$b$$$$$h$&$J5$$,$7$^$9!#(J
--
$@<mLn(J  $@9(<y(J g2k032@cfi.waseda.ac.jp
$@Aa0pED(J$@Bg3XM}9)3XIt1~MQJ*M}3X2J#1G/(J
[$@%X%/%H%Q%9%+%k(J]$@$C$F4A;z$G=q$1$k!)(J