fact: Definition compose_λ : lambda 2 := abs (app (var (make_stn 3 0 (idpath true))) (app (var (make_stn 3 1 (idpath true))) (var (make_stn 3 2 (idpath true))))).
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.Combinatorics.Tuples UniMath.Combinatorics.Vectors UniMath.Combinatorics.StandardFiniteSets UniMath.AlgebraicTheories.LambdaCalculus