(a:=File standardInput readLines map(asNumber))map(i,v,if(a slice(0,i)reverse doString(d:="detect(j,j<v or break;v-j>9)")and a slice(i+1)doString(d),v .."*",v)println)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).