--open list

#eval "α₁".length
#eval "α₁ → β₁".length
#eval "∀ α : nat → nat, α 0 ≥ 0".length
#print "------------"