List comprehensions: Difference between revisions

m
→‎horizontal list: added a SAY.
m (→‎vertical list: added the showing of a blank line in the output.)
m (→‎horizontal list: added a SAY.)
Line 2,124:
end /*b*/
end /*a*/
#= words($); say
do j=1 until p==0; p= lastPos('}', $, sw) /*find the last } */
if p\==0 then do; _= left($, p)
Line 2,131:
end
end /*j*/
say strip($); say
say
say # ' members listed.' /*stick a fork in it, we're all done. */</lang>
{{out|output|text=&nbsp; when using the following input: &nbsp; <tt> 35 </tt>}}