User:Tom Allen/ta/AddendumX04P08C
< User:Tom Allen | ta
Jump to navigation
Jump to search
... the electric field ...
load 'plot' pd 'reset' uQ0=:,:@(0.05 1 2 8 1 1 1 _0.1 0"_) xCpts=:_ 0.1 2.5 200,_ 0.5p1 0.5p1 0,_ 0.00p1 0.00p1 0,:_ 0.00p1 0.00p1 0*10"_ pd (uQ0(cy0"_ 1;[(0{])"1@EEMcn yRef@hkyX04A)]) zfyc"1@pTtotal xCpts'' pd (uQ0(cy0"_ 1;[(1{])"1@EEMcn yRef@hkyX04A)]) zfyc"1@pTtotal xCpts'' NB. ... zero ... pd (uQ0(cy0"_ 1;[(2{])"1@EEMcn yRef@hkyX04A)]) zfyc"1@pTtotal xCpts'' NB. ... zero ... pd 'pdf'
... the magnetic field ...
load 'plot' pd 'reset' uQ0=:,:@(0.05 1 2 8 1 1 1 _0.1 0"_) xCpts=:_ 0.1 2.5 200,_ 0.5p1 0.5p1 0,_ 0.00p1 0.00p1 0,:_ 0.00p1 0.00p1 0*10"_ pd (uQ0(cy0"_ 1;[(0{])"1@(-@HEMcn)yRef@hkyX04A)]) zfyc"1@pTtotal xCpts'' NB. ... zero ... pd (uQ0(cy0"_ 1;[(1{])"1@(-@HEMcn)yRef@hkyX04A)]) zfyc"1@pTtotal xCpts'' NB. ... zero ... pd (uQ0(cy0"_ 1;[(2{])"1@(-@HEMcn)yRef@hkyX04A)]) zfyc"1@pTtotal xCpts'' pd 'pdf'
... the Poynting vector ...
load 'plot' pd 'reset' uQ0=:,:@(0.05 1 2 8 1 1 1 _0.1 0"_) xCpts=:_ 0.1 2.5 200,_ 0.5p1 0.5p1 0,_ 0.00p1 0.00p1 0,:_ 0.00p1 0.00p1 0*10"_ pd (uQ0(cy0"_ 1;[(0{])"1@(-@PEMcn)yRef@hkyX04A)]) zfyc"1@pTtotal xCpts'' NB. ... zero ... pd (uQ0(cy0"_ 1;[(1{])"1@(-@PEMcn)yRef@hkyX04A)]) zfyc"1@pTtotal xCpts'' pd (uQ0(cy0"_ 1;[(2{])"1@(-@PEMcn)yRef@hkyX04A)]) zfyc"1@pTtotal xCpts'' NB. ... zero ... pd 'pdf'
load 'plot' pd 'reset' uQ0=:,:@(0.05 1 2 8 1 1 1 _0.1 0"_) xCpts=:_ 0.1 2.5 200,_ 0.5p1 0.5p1 0,_ 0.00p1 0.00p1 0,:_ 0.00p1 0.00p1 0*10"_ pd (uQ0(cy0"_ 1;[(3{])"1@JEMcn yRef@hkyX04A)]) zfyc"1@pTtotal xCpts'' NB. ... charge density ... pd (uQ0(cy0"_ 1;[(0{])"1@EEMcn yRef@hkyX04A)]) zfyc"1@pTtotal xCpts'' NB. ... electric field ... pd 'pdf'
... the charge density and electric field along the positive y0 axis at time=0 (initial configuration) ...
Download: File:LX04P08C00D.txt
Download: File:LX04P08C01C.txt
Download: File:LX04P08C02C.txt