Local Quantum Mechanical Prediction of the Singlet State.

This program is a C port of the mathematica program written by Fred Diether located on the following page:

https://www.wolframcloud.com/obj/fredifizzx/Published/Local-QMprod_calc_archive4.nb

or here:

https://sciphysicsfoundations.com/viewtopic.php?p=877#p877

The theoretical document is available on this page:

http://dx.doi.org/10.13140/RG.2.2.22142.25927

The program does not draw the graph directly but produces a data file in text format to display the graph using gnuplot.
The gnuplot command line is put in the comments at the end of this code.
A directory must be created to receive the data file before executing the code. (default c:gp_data)

Source: loc_qm_FD.C

The program can be compiled with gcc with the command.

gcc -O2 loc_qm_FD.c -o loc_qm_FD.exe

gnuplot result: