abrudz

      {1,2=/⍵}'rooobert'
1 0 1 1 0 0 0 0
      {1,2≠/⍵}'rooobert'
1 1 0 0 1 1 1 1
      {⍵/⍨1,2≠/⍵}'rooobert'
robert
      ≢'⎕←{⍵/⍨1,2≠/⍵}⍞'
14
      'UTF-8'⎕UCS'⎕←{⍵/⍨1,2≠/⍵}⍞'
226 142 149 226 134 144 123 226 141 181 47 226 141 168 49 44 50 226 137 160

abrudz

Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\SOFTWARE\Dyalog\Dyalog APL/W-64 18.0 Unicode\Colours\Schemes\Nord]
"Data"=hex:4b,00,00,00,80,00,00,00,00,81,20,ec,ef,f4,81,40,bf,61,6a,84,20,8f,\
  bc,bb,84,40,2e,34,40,83,20,8f,bc,bb,83,40,2e,34,40,8c,20,d8,de,e9,8c,40,2e,\
  34,40,8d,20,eb,cb,8b,8d,40,2e,34,40,85,20,81,a1,c1,85,40,2e,34,40,86,20,d8,\
  de,e9,86,40,2e,34,40,87,20,eb,cb,8b,87,40,2e,34,40,88,20,b4,8e,ad,88,40,2e,\
  34,40,8b,20,a3,be,8c,8b,40,2e,34,40,89,20,61,6e,88,89,40,2e,34,40,8a,20,81,\
  a1,c1,8a,40,2e,34,40,82,20,4c,56,6a,82,40,2e,34,40,8e,20,d8,de,e9,8e,40,2e,\
  34,40,8f,20,00,c0,00,8f,40,2e,34,40,90,20,00,c0,00,90,40,2e,34,40,91,20,eb,\

abrudz

← define denotes inplace let means naming only redefine update
+ across addition complex conj conjugating cross greek mirroring negateimaginary not reflecting reflection
- additiveinverse dash difference from invert negating negation opposite signchange subtraction
× chance condition conjunction fuzzy multiplication others probability product real satisfying sign trend zero
÷ division inverting multiplicativeinverse opposite over per reciprocating
* antiln antilog etothepowerof exp exponentiation ln log naturalexponential pow raised raisedtothepowerof raising
⍟ ln log logarithms logs
⌹ coefficients equation inverse inversed inversion pseudo pseudoinversion system values variable
○ angle archimedesconstant arcus big circle functions goniometric large ring times
! combinatorics condition countcombinations countpermutations fact from function gamma one others outof picking pling satisfying selecting selections size unordered

abrudz

Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\Dyalog\Dyalog APL/W-64 18.0 Unicode\Colours]
"Settings"="15"
"ShowIdioms"="1"
"SingleBcol"="0"
"SchemeName"="AdamB"
"SessionSchemeName"="AdamB"

[HKEY_CURRENT_USER\Software\Dyalog\Dyalog APL/W-64 18.0 Unicode\Colours\Schemes\Adam]

abrudz

Background

While the yearly get-togethers are called user meetings (previously known as conferences), I found that the social setting allowed Dyalog's staff to discuss and develop ideas in a way that would not happen in the office setting of Bramley.

I had a vague idea about an operator that would ease working with value tolerances and ranges. During our ride up Mount Etna, I by chance had the pleasure of sitting next to Geoff Streeter. We started discussing some things, and before long I had my laptop out and we were prototyping a new operator.

I discussed my idea with Nick Nickolov, who told me that being a fan of ⎕CT←0, he has considered ≈ to denote tolerant equality. I think we then naturally would want ≉, and ≲, and

abrudz

Post Link,Score,AnswerCount,ClosedDate
"{
  ""id"": 108170,
  ""title"": ""Totally Cubular""
}","17","0",""
"{
  ""id"": 101222,
  ""title"": ""Hexasweep (part 1): The Solver""
}","15","0",""
"{

abrudz

 P7S←{
     ⍝ Implement recursive topological sort
     Segs←#.U.Segs
     Trim←#.U.Trim
     data←⍉⊃¨@2⍉' 'Segs¨Trim↑'->'∘Segs¨⍵
     results←¯1⍴⍨≢data
     ToBin←(16⍴2)∘⊤
     FromBin←2∘⊥
     NOT←=
     AND←∧

abrudz

;(_=>{
let hc={'<':'&lt;','&':'&amp;',"'":'&apos;','"':'&quot;'},he=x=>x.replace(/[<&'"]/g,c=>hc[c]) //html chars and escape fn
,tcs='<-←xx×/\\×:-÷*O⍟[-⌹-]⌹OO○77⌈FF⌈ll⌊LL⌊|_⊥TT⊤-|⊣|-⊢=/≠L-≠<=≤<_≤>=≥>_≥==≡=_≡/_≢L=≢vv∨^^∧^~⍲v~⍱^|↑v|↓((⊂cc⊂(_⊆))⊃[|⌷|]⌷A|⍋V|⍒ii⍳i_⍸ee∊e_⍷'+
'uu∪UU∪nn∩/-⌿\\-⍀,-⍪rr⍴pp⍴O|⌽O-⊖O\\⍉::¨""¨~:⍨~"⍨*:⍣*"⍣oo∘o:⍤o"⍤[\'⍞\']⍞[]⎕[:⍠:]⍠[=⌸=]⌸[<⌺>]⌺o_⍎oT⍕o-⍕<>⋄on⍝->→aa⍺ww⍵VV∇--¯0~⍬'+
'^-∆^=⍙[?⍰?]⍰:V⍢∇"⍢||∥ox¤)_⊇_)⊇O:⍥O"⍥V~⍫\'\'`'
,lbs=['←←\nASSIGN',' ','++\nconjugate\nplus','--\nnegate\nminus','××\ndirection\ntimes','÷÷\nreciprocal\ndivide','**\nexponential\npower','⍟⍟\nnatural logarithm\nlogarithm',
'⌹⌹\nmatrix inverse\nmatrix divide','○○\npi times\ncircular','!!\nfactorial\nbinomial','??\nroll\ndeal',' ','||\nmagnitude\nresidue',
'⌈⌈\nceiling\nmaximum','⌊⌊\nfloor\nminimum','⊥⊥\ndecode','⊤⊤\nencode','⊣⊣\nsame\nleft','⊢⊢\nsame\nright',' ','==\nequal','≠≠\nnot equal',
'≤≤\nless than or equal to','<<\nless than','>>\ngreater than','≥≥\ngreater than or equal to','≡≡\ndepth\nmatch','≢≢\ntally\nnot matc

abrudz

abrudz