Essays/Tensor Experiments/TensorExperiments20

load 'plot'

gXcw  =: 1  0  _  _   _"_
gXpAll=: 1  1  1  3  _1"_

xCpts=:_ 2p1 2p1 0,_ 0.25p1 0.25p1 0,_ 0.25p1 0.25p1 0,:_ 0.35p1 1.65p1 100"_

pd (gXT(cx3"_ 1;(10^_1.6)*[B2kCEr0 xRef@hkxF)]) pTtotal xCpts''   NB. blue (scaled)

pd (gXT(cx3"_ 1;          [SBkEMr0 xRef@hkxF)]) pTtotal xCpts''   NB. red

pd (gXT(cx3"_ 1;          [B2kEMr0 xRef@hkxF)]) pTtotal xCpts''   NB. green

pd (gXT(cx3"_ 1;          [SBkCEr0 xRef@hkxF)]) pTtotal xCpts''   NB. purple

pd (gXT(cx3"_ 1;          [LamCEr0 xRef@hkxF)]) pTtotal xCpts''   NB. pink

pd 'pdf'
pd 'show'

... cycle of invariants ...

load 'plot'

gXcw  =: 1  0  _  _   _"_
gXpAll=: 1  1  1  3  _1"_

xCpts=:_ 2p1 2p1 0,_ 0.25p1 0.25p1 0,_ 0.25p1 0.25p1 0,:_ 0.35p1 1.65p1 100"_

pd (gXT(cx3"_ 1;(10^_1.6)*[(B2kCEr0        )xRef@hkxF)]) pTtotal xCpts''   NB. blue (scaled)

pd (gXT(cx3"_ 1;          [(SBkEMr0        )xRef@hkxF)]) pTtotal xCpts''   NB. red

pd (gXT(cx3"_ 1;          [(B2kEMr0        )xRef@hkxF)]) pTtotal xCpts''   NB. green

pd (gXT(cx3"_ 1;          [(SBkEMr0+B2kEMr0)xRef@hkxF)]) pTtotal xCpts''   NB. purple

pd 'pdf'
pd 'show'

... cycle EM ...

load 'plot'

gXcw  =: 1  0  _  _   _"_
gXpAll=: 1  1  1  3  _1"_

xCpts=:_ 2p1 2p1 0,_ 0.25p1 0.25p1 0,_ 0.25p1 0.25p1 0,:_ 0.35p1 1.65p1 100"_

pd (gXT(cx3"_ 1;(10^_1.6)*[(  B2kCEr0+-@LamCEr0)xRef@hkxF)]) pTtotal xCpts''   NB. blue  (scaled)

pd (gXT(cx3"_ 1;          [(  SBkCEr0+-@XiCEr0 )xRef@hkxF)]) pTtotal xCpts''   NB. red

pd (gXT(cx3"_ 1;          [(  SBkCEr0          )xRef@hkxF)]) pTtotal xCpts''   NB. green

pd (gXT(cx3"_ 1;          [(-@XiCEr0           )xRef@hkxF)]) pTtotal xCpts''   NB. purple

pd 'pdf'
pd 'show'

... cycle CE ...

---

Download: File:LTE2000C.txt

---

---

Download MoinMoin source: File:TensorExperiments20.ijs

---

---

Next Page: Essays/Tensor Experiments/TensorExperiments21
Prev Page: Essays/Tensor Experiments/TensorExperiments19

---