diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-10-14 16:01:03 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-10-14 16:01:03 -0400 |
| commit | fcd6f3feb1d12e4a1ec271e560ebe804f4ae5d68 (patch) | |
| tree | 00e72a7d377a09949b863af280729fcf629daa2a /src/pr.bqn | |
| parent | 7c388daec05b65a810aae6917ae28a9c9b910254 (diff) | |
Move from •EX to •Import
Diffstat (limited to 'src/pr.bqn')
| -rwxr-xr-x | src/pr.bqn | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -26,6 +26,7 @@ Inc ← { # Required functionality passed in as an argument def ← ⟨"IsArray","Type","Log","GroupLen","GroupOrd"⟩ keep ← "!+-×÷⋆⌊=≤≢⥊⊑↕⌜`⊘" +len ⇐ def+○≠keep ki ← chr⊐keep kt ← (+`nc)(∾((≠def)∾¯1↓⊣)+⊔⟜⊒∘⍋)ki names ↩ (⥊¨kt⊏chr)⌾(ki⊸⊏)names @@ -43,5 +44,4 @@ E_redef ← { # handles [fmd] [←↩] (E_proc 1↑𝕩) ∾ "←" ∾ tail } -ref ← ∾∾⟜(@+10)¨ E_isdef◶E_proc‿E_redef¨ impl∾<"⟨"∾"⟩"∾˜1↓⥊","⊸∾˘chr -⟨ref, def+○≠keep⟩ +ref ⇐ ∾∾⟜(@+10)¨ E_isdef◶E_proc‿E_redef¨ impl∾<"⟨"∾"⟩"∾˜1↓⥊","⊸∾˘chr |
