EPR code

This Scheme code (in this context) produces a pair of functions that ‘behave’ as an EPR (or entangled) pair of particles x & y.

If you place a polarizing filter at angle α in the path of x, and then a detector, you will detect with probability 1/2 of the detection probability without the filter. If you then place another filter at angle β in the path of y, and then another detector, you will detect a particle with probability cos2(α – β). Curiously, x=y.

In the code:

(fileVal "EPR")
is the value of the first expression in the file and that value is a generator of particle pair generators.
((fileVal "EPR") seed) = ppg
makes a generator of particle pairs; seed provides God’s entropy.
makes an entangled pair of particles: (x . y)
(x angle)
sets a polarized filter at angle and puts a photodetector behind it. It returns the detector report.
I believe that the behavior of the virtual particle pair is correct—true to nature. The code that produces this behavior is according to the Copenhagen interpretation of QM. To wit when one of the particles is first measured a particular polarization is chosen, th, and the ‘wave function collapses’ and subsequent observations conform to the new wave function. It was and is remarkable that one need not decide which particle is observed first. Possible observations cannot statistically determine this, even with many trials. The function of the code is not a feasible for nature to operate for the two particles seem to communicate via the shared state. Perhaps I will write code for different interpretations. Perhaps with Scheme’s continuations I can program Everett’s interpretation.

When I studied EPR at Berkeley in 1954 we learned that despite nature seeming to violate superluminal signals, it was impossible to exploit entangled pairs to send ‘real’ superluminal signals. Thus was relativity spared in a peculiar way. Actually I think we showed only that a few simple exploits all failed; giving the impression that there was some as yet unexpressed law agains QM superluminal signals.