TRANS : (thm -> thm -> thm)
A1 |- t1 = t2 A2 |- t2 = t3 ------------------------------- TRANS A1 u A2 |- t1 = t3
- val t1 = ASSUME ``a:bool = b`` and t2 = ASSUME ``b:bool = c``; val t1 = [.] |- a = b : thm val t2 = [.] |- b = c : thm - TRANS t1 t2; val it = [..] |- a = c : thm