CircleTimes[x_, y_] := Mod[x, 10] Mod[y, 10]
14\[CircleTimes]13