User:Tom Allen/ta/AddendumX03P05
< User:Tom Allen | ta
Jump to navigation
Jump to search
load 'plot' pd 'reset' pd ((0.90*cos@]"0);0.90*sin@]"0) pTsteps (_,0p1,(5%0.90"_),160"_)'' pd ((0.95*cos@]"0);0.95*sin@]"0) pTsteps (_,0p1,(5%0.95"_),160"_)'' pd ((1.00*cos@]"0);1.00*sin@]"0) pTsteps (_,0p1,(5%1.00"_),160"_)'' pd ((1.05*cos@]"0);1.05*sin@]"0) pTsteps (_,0p1,(5%1.05"_),160"_)'' pd ((1.10*cos@]"0);1.10*sin@]"0) pTsteps (_,0p1,(5%1.10"_),160"_)'' pd 'aspect 1' pd 'pdf'
NB. ... execute (ijx) ... pdEMBlue =:((0.90*cos@]),(0.90*sin@]),0,5"_) {: pTsteps (_,0p1,(5%0.90"_),160"_)'' pdEMred =:((0.95*cos@]),(0.95*sin@]),0,5"_) {: pTsteps (_,0p1,(5%0.95"_),160"_)'' pdEMgreen =:((1.00*cos@]),(1.00*sin@]),0,5"_) {: pTsteps (_,0p1,(5%1.00"_),160"_)'' pdEMpurple=:((1.05*cos@]),(1.05*sin@]),0,5"_) {: pTsteps (_,0p1,(5%1.05"_),160"_)'' pdEMpink =:((1.10*cos@]),(1.10*sin@]),0,5"_) {: pTsteps (_,0p1,(5%1.10"_),160"_)'' NB. ... five 4-dimensional spacetime coordinates ... (10j6":]) pdEMBlue,pdEMred,pdEMgreen,pdEMpurple,:pdEMpink 0.672078 _0.598591 0.000000 5.000000 0.497175 _0.809516 0.000000 5.000000 0.283662 _0.958924 0.000000 5.000000 0.051970 _1.048713 0.000000 5.000000 _0.182776 _1.084709 0.000000 5.000000 NB. ... the rate of rotation decreases from blue to pink ... NB. ... but ... NB. ... the rate of rotation of the energy distribution used to calculate the torsion tensor ... NB. ... which is used to calculate ... NB. ... the divergence of space and the divergence of time (gravity) ... NB. ... and ... NB. ... the electric field, the magnetic field and the charge distribution ... NB. ... at each point in 4-dimensional spacetime ... NB. ... is constant ... NB. ... NB. ... this system does not get back to it's initial condition ... NB. ... and ... NB. ... it is not cyclic and evolves with time ...
Download: File:LX03P0500D.txt
Download: File:LX03P0501C.txt
Download: File:LX03P0502C.txt
Next Page:
Prev Page: User:Tom Allen/ta/AddendumX03P04