aboutsummaryrefslogtreecommitdiff
path: root/examples
diff options
context:
space:
mode:
Diffstat (limited to 'examples')
-rw-r--r--examples/fifty.bqn6
1 files changed, 3 insertions, 3 deletions
diff --git a/examples/fifty.bqn b/examples/fifty.bqn
index 593f9e12..ad80a4b2 100644
--- a/examples/fifty.bqn
+++ b/examples/fifty.bqn
@@ -64,14 +64,14 @@ NewtonsMethod ← (2 ÷˜ ⊢ + ÷)´¨∘(1↓↑) ⥊
! 1e¯5 > | (7 NewtonsMethod 2) - 2‿1.5‿1.41667‿1.41422‿1.41421‿1.41421‿1.41421
# 11
-InnerProduct ← (+´<˘)∘(ר)⎉1‿2
+InnerProduct ← +˝∘(ר)⎉1‿2
! (>⟨2‿3⋄4‿1⟩) ≡ (>⟨1‿0⋄¯1‿1⟩) InnerProduct >⟨2‿3⋄6‿4⟩
# 12
CayleysTheorem ← {R←∾⊐⊢ ⋄ (R𝕩) ≡ R ⊏˜⌜˜ <˘R𝕩}
! {
t ← 2‿2⊸⥊¨ (⌽2|⌊∘÷⟜2⍟(↕4))¨ 9‿6‿7‿11‿13‿14
- g ← (≠´<˘)∘(∧¨)⎉1‿2⌜˜t
+ g ← ≠˝∘(∧¨)⎉1‿2⌜˜t
CayleysTheorem g
}
@@ -81,7 +81,7 @@ IntervalIndex ← 1-˜≠∘⊣(⊣↓⊢⍋⊸⊏+`∘>)⍋∘∾ # Or ⍋, of
! 0‿1‿0‿¯1‿4‿4 ≡ "Fi Jay John Morten Roger" IntervalIndex○Words "JD Jd Geoff Anna Scott Zeus"
# 15
-CentralLimit ← { 41 ↑ /⁼ (5×↕40) ⍋ +´<˘ •Rand 𝕩⥊21 }
+CentralLimit ← { 41 ↑ /⁼ (5×↕40) ⍋ +˝ •Rand 𝕩⥊21 }
# 5‿8 ⥊ CentralLimit 10 1e3
# 17