JoyでFizzBuzz(3)
もう少し整理してみました。 DEFINE roll4 == swap [swap [swap] dip] dip; mkifte == [unitlist swap] dip unitlist swap; fbq == ...
もう少し整理してみました。 DEFINE roll4 == swap [swap [swap] dip] dip; mkifte == [unitlist swap] dip unitlist swap; fbq == ...
少しパワーアップしました。 DEFINE rem2 == swap [integer] [swap rem 0 =] [pop pop false] ifte; lst == [] cons; fbq == [dup] ...
ぜんぜんJoyっぽくないんですが手習い中ということで… DEFINE fizz == 3 rem 0 =; buzz == 5 rem 0 =; fizzbuzz == 15 rem 0 =; fbnum =...
id:propellaさんも記事id:propella:20070518:p1で述べられているとおりJoyにはたくさんのソースコードがあるように見えますが実際は存在しないか、同じものです。 http://www.latr...