packages feed

phino-0.0.164: test-resources/evaluate-packs/refuses-a-meta-bound-to-a-term-that-is-not-a-normal-form.yaml

# SPDX-FileCopyrightText: Copyright (c) 2025 Objectionary.com
# SPDX-License-Identifier: MIT
---
# yamllint disable rule:line-length
# A meta 𝑛 of an entry may hold only a normal form (#2343). The 'rewrite'
# line normalizes nothing, and its rule wraps the term into a dispatch off a
# formation, which 'dot' of normalization would still take, so the firing
# refuses to bind '𝑛2' to it.
symbolic: |
  - Ξ»: L_wrap
    morph:
      𝑛1: $.x
    rewrite:
      𝑛2:
        of: 𝑛1
        rules:
          - name: wrap
            pattern: ⟦ 𝐡1 ⟧
            result: ⟦ k ↦ ⟦ 𝐡1 ⟧ ⟧.k
    𝑛: 𝑛2
location: 'Q.y'
input: '⟦ y ↦ ⟦ x ↦ ⟦ Ξ” ‍ 01- ⟧, Ξ» ‍ L_wrap ⟧.Ο† ⟧'
fails: "The meta '𝑛2' of Ξ» function 'L_wrap' may hold only a normal form"
protocol: |
  𝕄(Ξ¦.y):
    𝔼(L_wrap):
      𝕄(ΞΎ.x):
        morphed 𝑛·1Β·1 := 01-:Ξ”
      𝑛1Β·1 := 01-:Ξ”  # 𝕄(ΞΎ.x)
      𝑛2Β·1 := 01-:Ξ”:k.k  # rewrite(𝑛1)