phino-0.0.156: test-resources/evaluate-packs/parks-a-firing-whose-remint-comes-to-no-symbol.yaml
# SPDX-FileCopyrightText: Copyright (c) 2025 Objectionary.com
# SPDX-License-Identifier: MIT
---
# yamllint disable rule:line-length
# The very firing that fails without '--partial', with it: a 'remint' step
# with no symbol to answer gets the firing stuck, so '--partial' parks the
# site, as it parks a fork whose branches do not join (#1923).
symbolic: |
- Ξ»: L_shrink
morph:
π1: $.x
rewrite:
π2:
of: π1
rules:
- name: small-pair
pattern: β¦ !B1, head β¦ π1, tail β¦ π2, !B2 β§
result: β¦ !B1, head β¦ π3, tail β¦ π4, !B2 β§
where:
- meta: π3
function: remint
args: [π1]
- meta: π4
function: remint
args: [π2]
π: π2
location: 'Q.y'
partial: true
input: 'β¦ y β¦ β¦ x β¦ β¦ head β¦ β¦ Ξ» β€ π1 β§, tail β¦ β¦ k β¦ β¦ Ξ» β€ π2 β§ β§ β§, Ξ» β€ L_shrink β§.tail β§'
result: 'β¦ x β¦ β¦ head β¦ π1:Ξ», tail β¦ π2:Ξ»:k β§, Ξ» β€ L_shrink β§.tail'
protocol: |
π(Ξ¦.y):
πΌ(L_shrink):
π1Β·1 := β¦ head β¦ π1:Ξ», tail β¦ π2:Ξ»:k β§ # π(ΞΎ.x)
unreminted(L_shrink) # π2:Ξ»:k