EmergingEztoml.date.eq: def of emerging-eztoml@0.9.0.0
Import: import emerging-eztoml@0.9.0.0/main.bend as EmergingEztoml
Lines 2534-2545 of emerging-eztoml@0.9.0.0/main.bend: https://jend.leeeet.dev/read.txt?path=emerging-eztoml@0.9.0.0/main.bend&start_line=2534&end_line=2545

import Base

# YYYY-MM-DD, with D standing for a digit
def date.eq(cs: List<&2, Char>, pat: List<&2, Char>) -> Bool:
  match cs:
    case []:
      date.eq.nil(pat)
    case +h <> t:
      match pat:
        case []:
          False{}
        case +p <> r:
          date.step(date.mode(p), Char.is_digit(h), Char.is_eq(h, p),
            _u => date.eq(t, r))

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=Char.is_eq
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=emerging-eztoml@0.9.0.0/main.bend&name=date.eq.nil
  https://jend.leeeet.dev/definition.txt?path=emerging-eztoml@0.9.0.0/main.bend&name=date.mode
  https://jend.leeeet.dev/definition.txt?path=emerging-eztoml@0.9.0.0/main.bend&name=date.step