open list

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