aboutsummaryrefslogtreecommitdiff
path: root/panap.bqn
diff options
context:
space:
mode:
Diffstat (limited to 'panap.bqn')
-rw-r--r--panap.bqn4
1 files changed, 2 insertions, 2 deletions
diff --git a/panap.bqn b/panap.bqn
index 313ff72..33bd5a5 100644
--- a/panap.bqn
+++ b/panap.bqn
@@ -116,8 +116,8 @@ Get_panap_coeff ← { 𝕊 n‿rr‿f:
sv ← (ט ÷ (4×q) + ×⟜((3-r)+2×re)) 1+r-2×re
- GetZ ← ⊢ ≍ √∘-⟜(ט) # 𝕩 is real part and 𝕨 is square magnitude
- (GetZ○⊑ ≍○< GetZ○(⊑+sv×+´))´ ⟨r‿¯1,re‿1⟩
+ GetZ ← ⊢ ⋈ √∘-⟜(ט) # 𝕩 is real part and 𝕨 is square magnitude
+ (GetZ○⊑ ⋈ GetZ○(⊑+sv×+´))´ ⟨r‿¯1,re‿1⟩
}
# ---------------------------------------------------------