Dang it! I still didn't have the Mathematica code correct using r1 and r2. Here is the correct code.FrediFizzx wrote: ↑Thu Dec 23, 2021 2:46 am Here is updated Mathematica code for the update. I missed a cross product term in r0 but it didn't affect the results. I put r1 and r2 back into the code because it is more faithful to Joy's analytical formula.
Cloud File.
https://www.wolframcloud.com/obj/fredif ... alc-joy.nb
Direct Files.
sims/newCS-51-S3quat-3D-new-prodcalc-joy.pdf
sims/newCS-51-S3quat-3D-new-prodcalc-joy.nb
Blue is the data, magenta is the negative cosine curve for an exact match.
Enjoy this as it destroys Bell's junk physics theory!
Cloud File.
https://www.wolframcloud.com/obj/fredif ... alc-joy.nb
Direct files.
sims/newCS-52-S3quat-3D-new-prodcalc-joy.pdf
sims/newCS-52-S3quat-3D-new-prodcalc-joy.nb
.