$/=get.Rat.nude;put (<C A B>[1+$1%2-$0%2],$0+$1-2+$/.sum+>1+abs($0-$1)+>1)