User:Tom Allen/TensorExperimentsZ25
Jump to navigation
Jump to search
NB. ... script experimentalZ.ijs ... OnF0=:OnD0+OnE0 OnF3=:OnD3+OnE3 OnF =:OnF0,0,0,OnF3 OnF0n0=:OnD0n0+OnE0n0 OnF0n3=:OnD0n3+OnE0n3 OnF3n0=:OnD3n0+OnE3n0 OnF3n3=:OnD3n3+OnE3n3 OnFdn =:(OnF0n0,0,0,OnF0n3),0 0 0 0,0 0 0 0,:OnF3n0,0,0,OnF3n3
NB. ... execute (ijx) ... gXm0All=: 1.3 1.4 _ 1.6"_ gXm1All=: 1.4 1.5 1.6 1.7"_ nCpts=:_ _4 4 161,_ 0 0 0,_ 0 0 0,:_ _4 4 161"_ (gXM(OnFdn"_ 1(((2^_44);2^_16)qteq[;])"2(0|:[:(gXM OnF])D.1])"_ 1)]) ((0;50"_)pTRandom nCpts)'' 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 NB. ... divergence is 0 ... (0=]) ((2^_44)qtsz]) +/@((<0 1)|:])"2 (gXM OnFdn"_ 1]) ((0;50"_)pTRandom nCpts)'' 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
load 'plot' gXm0All=: 1 0 _ 1"_ gXm1All=: 1 0 1 1"_ nCpts=:_ _2p1 2p1 161,_ 0 0 0,_ 0 0 0,:_ 0.00p1 0.00p1 0"_ NB. ... blue ... pd (gXM(cn0"_ 1;OnF3"_ 1)]) pTtotal nCpts'' nCpts=:_ _2p1 2p1 161,_ 0 0 0,_ 0 0 0,:_ 0.25p1 0.25p1 0"_ NB. ... red ... pd (gXM(cn0"_ 1;OnF3"_ 1)]) pTtotal nCpts'' nCpts=:_ _2p1 2p1 161,_ 0 0 0,_ 0 0 0,:_ 0.50p1 0.50p1 0"_ NB. ... green ... pd (gXM(cn0"_ 1;OnF3"_ 1)]) pTtotal nCpts'' nCpts=:_ _2p1 2p1 161,_ 0 0 0,_ 0 0 0,:_ 0.75p1 0.75p1 0"_ NB. ... purple ... pd (gXM(cn0"_ 1;OnF3"_ 1)]) pTtotal nCpts'' nCpts=:_ _2p1 2p1 161,_ 0 0 0,_ 0 0 0,:_ 1.00p1 1.00p1 0"_ NB. ... pink ... pd (gXM(cn0"_ 1;OnF3"_ 1)]) pTtotal nCpts'' pd 'pdf' pd 'show'
load 'plot' gXm0All=: 1 _1 _ 1"_ gXm1All=: 1 _1 1 1"_ nCpts=:_ _2p1 3p1 161,_ 0 0 0,_ 0 0 0,:_ 0.00p1 0.00p1 0"_ pd (gXM(cn0"_ 1;OnF0"_ 1)]) pTtotal nCpts'' NB. ... blue ... nCpts=:_ _2p1 3p1 161,_ 0 0 0,_ 0 0 0,:_ 0.15p1 0.15p1 0"_ pd (gXM(cn0"_ 1;OnF0"_ 1)]) pTtotal nCpts'' NB. ... red ... nCpts=:_ _2p1 3p1 161,_ 0 0 0,_ 0 0 0,:_ 0.50p1 0.50p1 0"_ pd (gXM(cn0"_ 1;OnF0"_ 1)]) pTtotal nCpts'' NB. ... green ... nCpts=:_ _2p1 3p1 161,_ 0 0 0,_ 0 0 0,:_ 0.85p1 0.85p1 0"_ pd (gXM(cn0"_ 1;OnF0"_ 1)]) pTtotal nCpts'' NB. ... purple ... nCpts=:_ _2p1 3p1 161,_ 0 0 0,_ 0 0 0,:_ 1.00p1 1.00p1 0"_ pd (gXM(cn0"_ 1;OnF0"_ 1)]) pTtotal nCpts'' NB. ... pink ... pd 'pdf' pd 'show'
load 'plot' gXm0All=: 1 _1 _ 1"_ gXm1All=: 1 _1 1 1"_ nCpts=:_ _1p1 4p1 161,_ 0 0 0,_ 0 0 0,:_ 1.00p1 1.00p1 0"_ pd (gXM(cn0"_ 1;OnF0"_ 1)]) pTtotal nCpts'' NB. ... blue ... nCpts=:_ _1p1 4p1 161,_ 0 0 0,_ 0 0 0,:_ 1.15p1 1.15p1 0"_ pd (gXM(cn0"_ 1;OnF0"_ 1)]) pTtotal nCpts'' NB. ... red ... nCpts=:_ _1p1 4p1 161,_ 0 0 0,_ 0 0 0,:_ 1.50p1 1.50p1 0"_ pd (gXM(cn0"_ 1;OnF0"_ 1)]) pTtotal nCpts'' NB. ... green ... nCpts=:_ _1p1 4p1 161,_ 0 0 0,_ 0 0 0,:_ 1.85p1 1.85p1 0"_ pd (gXM(cn0"_ 1;OnF0"_ 1)]) pTtotal nCpts'' NB. ... purple ... nCpts=:_ _1p1 4p1 161,_ 0 0 0,_ 0 0 0,:_ 2.00p1 2.00p1 0"_ pd (gXM(cn0"_ 1;OnF0"_ 1)]) pTtotal nCpts'' NB. ... pink ... pd 'pdf' pd 'show'
load 'plot' gXm0All=: 1 _1 _ 1"_ gXm1All=: 1 _1 1 1"_ nCpts=:_ _2p1 3p1 161,_ 0 0 0,_ 0 0 0,:_ 0.00p1 0.00p1 0"_ pd (gXM(cn0"_ 1;OnF3"_ 1)]) pTtotal nCpts'' NB. ... blue ... nCpts=:_ _2p1 3p1 161,_ 0 0 0,_ 0 0 0,:_ 0.25p1 0.25p1 0"_ pd (gXM(cn0"_ 1;OnF3"_ 1)]) pTtotal nCpts'' NB. ... red ... nCpts=:_ _2p1 3p1 161,_ 0 0 0,_ 0 0 0,:_ 0.50p1 0.50p1 0"_ pd (gXM(cn0"_ 1;OnF3"_ 1)]) pTtotal nCpts'' NB. ... green ... nCpts=:_ _2p1 3p1 161,_ 0 0 0,_ 0 0 0,:_ 0.75p1 0.75p1 0"_ pd (gXM(cn0"_ 1;OnF3"_ 1)]) pTtotal nCpts'' NB. ... purple ... nCpts=:_ _2p1 3p1 161,_ 0 0 0,_ 0 0 0,:_ 1.00p1 1.00p1 0"_ pd (gXM(cn0"_ 1;OnF3"_ 1)]) pTtotal nCpts'' NB. ... pink ... pd 'pdf' pd 'show'
load 'plot' gXm0All=: 1 _1 _ 1"_ gXm1All=: 1 _1 1 1"_ nCpts=:_ _1p1 4p1 161,_ 0 0 0,_ 0 0 0,:_ 1.00p1 1.00p1 0"_ pd (gXM(cn0"_ 1;OnF3"_ 1)]) pTtotal nCpts'' NB. ... blue ... nCpts=:_ _1p1 4p1 161,_ 0 0 0,_ 0 0 0,:_ 1.25p1 1.25p1 0"_ pd (gXM(cn0"_ 1;OnF3"_ 1)]) pTtotal nCpts'' NB. ... red ... nCpts=:_ _1p1 4p1 161,_ 0 0 0,_ 0 0 0,:_ 1.40p1 1.40p1 0"_ pd (gXM(cn0"_ 1;OnF3"_ 1)]) pTtotal nCpts'' NB. ... green ... nCpts=:_ _1p1 4p1 161,_ 0 0 0,_ 0 0 0,:_ 1.60p1 1.60p1 0"_ pd (gXM(cn0"_ 1;OnF3"_ 1)]) pTtotal nCpts'' NB. ... purple ... nCpts=:_ _1p1 4p1 161,_ 0 0 0,_ 0 0 0,:_ 1.75p1 1.75p1 0"_ pd (gXM(cn0"_ 1;OnF3"_ 1)]) pTtotal nCpts'' NB. ... pink ... nCpts=:_ _1p1 4p1 161,_ 0 0 0,_ 0 0 0,:_ 2.00p1 2.00p1 0"_ pd (gXM(cn0"_ 1;OnF3"_ 1)]) pTtotal nCpts'' NB. ... dark green ... pd 'pdf' pd 'show'
Download: File:LTEZ2500C.txt
Download MoinMoin source: File:TensorExperimentsZ25.ijs