define l while(set l:readline){ if(eq(l::slice 1 2)(l::slice 2 3)){ echo (l::slice 1 2) } else { echo (l::slice 4 5) } }