3766def termListToTermSequence =
3767 (lambda unrestricted terms : (family TermList) .
3768 (eliminate
3769 TermList
3770 (lambda unrestricted value : (family TermList) . (family Term))
3771 terms
3772 (branch TermListEnd . (constructor Term TermSequenceEnd))
3773 (branch
3774 TermListNext
3775 listedTerm
3776 listedRest
3777 ih_listedRest
3778 .
3779 (constructor Term TermSequenceNext listedTerm ih_listedRest))))The compiler supplied declaration spans and resolved links from this source snapshot. This page does not assert that this file belongs to a checked closure.