User:Tom Allen/ta/AddendumX05P01

From J Wiki
Jump to navigation Jump to search



Supplement to the page AddendumW00R05 (the energy distributions W00 and W01)



JX05P0100C.png


JX05P0101C.png


GX05P0100F.jpg



Implementing



GX05P0101H.jpg


load 'plot'

x5Rx2=.(0{])+((1{])-0{])*(i.@>:%])@(2{])

pd 'reset'

pd (];(]^_1.0"_)                )     r=.x5Rx2 0.9  4 10000    NB. ... blue ...

NB. ... a multiplier for the energy flow as a function of r ...

pd (];(]^_1.0"_)*1-^@-@(]^8.0"_))     r=.x5Rx2 0    4 10000    NB. ... red ...

pd (];-@((]^_2.0"_)                )) r=.x5Rx2 0.9  4 10000    NB. ... green ...

NB. ... a multiplier for the energy density as a function of r ...

pd (];-@((]^_2.0"_)*1-^@-@(]^8.0"_))) r=.x5Rx2 0    4 10000    NB. ... purple ...

pd 'pdf'


JX05P0102E.png



Continuous Functions (Heading in 'Essays/Christoffel/Christoffel01')



GX05P0102I.jpg


GX05P0103D.jpg


load 'plot'

pd 'reset'

pd (];(]^2:)*^@-@(]^8:)) ((0{])+((1{])-0{])*(i.@>:%])@(2{])) 0  0.03 10000    NB. ... blue ...
pd (];(]^1:)*^@-@(]^8:)) ((0{])+((1{])-0{])*(i.@>:%])@(2{])) 0  0.03 10000    NB. ... red ...

pd 'pdf'


JX05P0103D.jpg


GX05P0104C.jpg


load 'plot'

pd 'reset'

pd (];(]^_6:)*1-^@-@(]^8:)) ((0{])+((1{])-0{])*(i.@>:%])@(2{])) 0  0.03 10000    NB. ... blue ...
pd (];(]^_7:)*1-^@-@(]^8:)) ((0{])+((1{])-0{])*(i.@>:%])@(2{])) 0  0.03 10000    NB. ... red ...

pd 'pdf'


JX05P0104C.jpg
... shows calculation limit near zero ...



Download: File:LX05P0100F.txt
Download: File:LX05P0101H.txt
Download: File:LX05P0102I.txt
Download: File:LX05P0103D.txt
Download: File:LX05P0104C.txt




Next Page: User:Tom Allen/ta/AddendumX05P02
Prev Page: User:Tom Allen/ta/AddendumX05P00