⍝ Probability of coincident birthdays: ⎕pp←14 365 birthday 23 0.50729723432399 FR ⎕FR ⎕PP ← ⎕FR 1287 34 365 birthday 23 0.5072972343239854072254172283370321 ⍝ probability of collision of 10,000 BuildIDs (2*32)birthday 1e4 0.0115728899862167876602666530438722 ⎕FR←FR ⍝ must restore ⎕FR as it has workspace extent ⍝∇ birthday Back to: code Back to: Workspaces