theorem add22 (a: nat): $ a + 2 = suc (suc a) $;
    
      
        | Step | Hyp | Ref | Expression | 
        
          | 1 | 
           | 
          eqtr | 
          a + 2 = suc (a + 1) -> suc (a + 1) = suc (suc a) -> a + 2 = suc (suc a)  | 
        
        
          | 2 | 
           | 
          addS | 
          a + suc 1 = suc (a + 1)  | 
        
        
          | 3 | 
          2 | 
          conv d2 | 
          a + 2 = suc (a + 1)  | 
        
        
          | 4 | 
          1, 3 | 
          ax_mp | 
          suc (a + 1) = suc (suc a) -> a + 2 = suc (suc a)  | 
        
        
          | 5 | 
           | 
          suceq | 
          a + 1 = suc a -> suc (a + 1) = suc (suc a)  | 
        
        
          | 6 | 
           | 
          add12 | 
          a + 1 = suc a  | 
        
        
          | 7 | 
          5, 6 | 
          ax_mp | 
          suc (a + 1) = suc (suc a)  | 
        
        
          | 8 | 
          4, 7 | 
          ax_mp | 
          a + 2 = suc (suc a)  | 
        
      
    
    Axiom use
    axs_prop_calc
     (ax_1,
      ax_2,
      ax_3,
      ax_mp),
    
axs_pred_calc
     (ax_gen,
      ax_4,
      ax_5,
      ax_6,
      ax_7),
    
axs_peano
     (peano2,
      add0,
      addS)