outer product by tails

define n

a=$(call b,$c,$(call c,$3,$4))
b=$(if $2,$(if $1,$(call b,$h,$(call h,$2)),-$(words $2)),$(words $1))
c=$(call d,$e,$(call e,$2))
d=$(if $1,$(call d,$h,$2) $2,0)
e=$(wordlist 1,$1,$y$y$y)
f=$(info $(call a,$2,$6,$3,$5) $(call a,$3,$4,$1,$6) $(call a,$1,$5,$2,$4))
h=$(wordlist 2,99,$1)
y=0 0 0 
$(foreach i,$(subst $n, ,$(subst $x ,$z,$(STDIN))),$(eval $$(call f,$i)))

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

To protect the system from spam, please input your favorite sport (hint: I believe its name must start with 'g', case insensitive)


return to the top page