theorem
  PP_imp(PP_BottomPred(D),PP_True(D)) = PP_True(D)
  proof
    thus PP_imp(PP_BottomPred(D),PP_True(D))
     = PP_or(PP_BottomPred(D),PP_True(D)) by Th56
    .= PP_True(D) by Th57;
  end;
