phino-0.0.154: test-resources/evaluate-packs/parks-an-evaluate-line-over-a-branch-left-unreduced.yaml
# SPDX-FileCopyrightText: Copyright (c) 2025 Objectionary.com
# SPDX-License-Identifier: MIT
---
# yamllint disable rule:line-length
# Under '--partial' a branch that got stuck comes back as the term it was
# parked at, which is no formation and so nothing πΌ can be asked of: the
# 'evaluate' line gets stuck on the fork itself, and the site the fork
# stands at is parked (#1874).
symbolic: |
- Ξ»: L_fork
morph:
π1: $.a
evaluate:
π2: π1
π: π2
location: 'Q.y'
partial: true
input: 'β¦ y β¦ β¦ a β¦ β¦ Ξ» β€ L_none β§.x, Ξ» β€ L_fork β§.Ο β§'
result: 'β¦ a β¦ β¦ Ξ» β€ L_none β§.x, Ξ» β€ L_fork β§.Ο'
protocol: |
π(Ξ¦.y):
πΌ(L_fork):
π(Ξ¦.aπ΅0):
unanswered(L_none) # π(L_none:Ξ»)
π1Β·1 := L_none:Ξ».x # π(ΞΎ.a)
stuck(L_fork)