pull a
do i=1-a to a-1
b=abs(i)
say copies(" ",b)copies("*",(a-b)*2-1)
end