User:Tom Allen/TensorExperimentsB07

load 'plot'

gXcw   =:  1     0     _      _      _   "_
gXpAll =:  1e_3  1e_3  1e_3   3     _1e_3"_
gXq2All=:  1e_3  1e_3  1e_3   3      _   "_
gXq3All=:  0     0     1     _1e_3   0   "_
gXq4All=:  1e_3  1e_3  1e_3   1      _   "_
gXq5All=:  2     0     1      1     _2   "_
gXq6All=:  1e_3  1e_3  1e_3   1      _   "_
gXq7All=:  1     1     3      1     _2   "_

xCpts=:(_,(6.28*%1e_3),(6.28*%1e_3),0),_ 0.25p1 0.25p1 0,_ 0.25p1 0.25p1 0,:_,(1.48*%1e_3),(15.00*%1e_3),600"_

pd (gXB(cx3"_ 1;(10^_1.7)*[B2kCEr0 xRef@hkxI)]) pTtotal xCpts''   NB. blue

pd (gXB(cx3"_ 1;(10^_0.3)*[SBkEMr0 xRef@hkxI)]) pTtotal xCpts''   NB. red

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

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

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

pd 'pdf'
pd 'show'

... invariants ...

load 'plot'

gXcw   =:  1     0     _      _      _   "_
gXpAll =:  1e0   1e0   1e0    3     _1e0 "_
gXq2All=:  1e0   1e0   1e0    3      _   "_
gXq3All=:  0     0     1     _1e0    0   "_
gXq4All=:  1e0   1e0   1e0    1      _   "_
gXq5All=:  2     0     1      1     _2   "_
gXq6All=:  1e0   1e0   1e0    1      _   "_
gXq7All=:  1     1     3      1     _2   "_

xCpts=:(_,(6.28*%1e0),(6.28*%1e0),0),_ 0.25p1 0.25p1 0,_ 0.25p1 0.25p1 0,:_,(3.20*%1e0),(16.48*%1e0),600"_

pd (gXB(cx3"_ 1;(10^_1.4)*[B2kCEr0 xRef@hkxI)]) pTtotal xCpts''   NB. blue

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

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

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

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

pd 'pdf'
pd 'show'

... invariants ...

load 'plot'

gXcw   =:  1     0     _      _      _   "_
gXpAll =:  4e1   4e1   4e1    3     _4e1 "_
gXq2All=:  4e1   4e1   4e1    3      _   "_
gXq3All=:  0     0     1     _4e1    0   "_
gXq4All=:  4e1   4e1   4e1    1      _   "_
gXq5All=:  2     0     1      1     _2   "_
gXq6All=:  4e1   4e1   4e1    1      _   "_
gXq7All=:  1     1     3      1     _2   "_

xCpts=:(_,(6.28*%4e1),(6.28*%4e1),0),_ 0.25p1 0.25p1 0,_ 0.25p1 0.25p1 0,:_,(2.80*%4e1),(16.08*%4e1),600"_

pd (gXB(cx3"_ 1;(10^_0.3)*[B2kCEr0 xRef@hkxI)]) pTtotal xCpts''   NB. blue

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

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

pd (gXB(cx3"_ 1;(10^_0.3)*[SBkCEr0 xRef@hkxI)]) pTtotal xCpts''   NB. purple

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

pd 'pdf'
pd 'show'

... invariants ...

---

Download MoinMoin source: File:TensorExperimentsB07.ijs

---