Compose.longer: def of yaml-for-bend@0.1.1.0
Import: import yaml-for-bend@0.1.1.0/compose.bend as Compose
Lines 215-225 of yaml-for-bend@0.1.1.0/compose.bend: https://jend.leeeet.dev/read.txt?path=yaml-for-bend@0.1.1.0/compose.bend&start_line=215&end_line=225

import Base

# Whether +s+ has more than +n+ characters, looking at no more than that.
def longer(s: String, n: Nat) -> Bool:
  match s:
    case SNil{}:
      False{}
    case SCon{c, t}:
      match n:
        case 0n:
          True{}
        case 1n+k:
          longer(t, k)

Uses (3):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=String