Define LibPub splitor(expression)= Prgm :Local i,pos,prev_pos,num_or,len :len:=dim(string(expression)) :num_or:=0 :prev_pos:=1 : :While prev_pos≤len : pos:=inString(string(expression)," or ",prev_pos) : If pos=0 Then : Exit : Else : num_or:=num_or+1 : prev_pos:=pos+4 : EndIf :EndWhile : :r.list:=newList(num_or+1) : :prev_pos:=1 :For i,1,num_or : pos:=inString(string(expression)," or ",prev_pos) : r.list[i]:=expr(mid(string(ex...