theorem
  InsCode (SubFrom(a,b)) = 3
proof
  ex A,B st a = A & b = B & SubFrom(a,b) = SubFrom(A,B) by Def8;
  hence thesis;
end;
