Tokens.nat_ok: def of bolt@1.27.0.0
Import: import bolt@1.27.0.0/src/rules/tokens.bend as Tokens
Lines 57-65 of bolt@1.27.0.0/src/rules/tokens.bend: https://jend.leeeet.dev/read.txt?path=bolt@1.27.0.0/src/rules/tokens.bend&start_line=57&end_line=65

import Base
import bolt@1.27.0.0/src/lazy/lazy.bend as Lazy

# digits, then one final `n`: a Nat literal's chars
def nat_ok(cs: List<&2, Char>) -> Bool:
  match cs:
    case Con{'n', Nil{}}:
      True{}
    case Con{+c, t}:
      Lazy.and_then(Char.is_digit(c), _u => nat_ok(t))
    case Nil{}:
      False{}

Uses (8):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Char
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Char.is_digit
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Word.Con
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Word.Nil
  https://jend.leeeet.dev/definition.txt?path=bolt@1.27.0.0/src/lazy/lazy.bend&name=and_then