User:Tom Allen/ta/AddendumCS02
< User:Tom Allen | ta
Jump to navigation
Jump to search
... from TensorExperimentsR09 ...
NB. ... script experimentalCS.ijs ... zfhcn =:1 0 0 0,0 1 0 0,0 0 1 0,:0 0 0 _1"_ zfhcndy =:(3$4:)$0: zfhcndydy =:(4$4:)$0: zfhcndydydy =:(5$4:)$0: zfhcndydydydy=:(6$4:)$0: zfhcnXXS=:zfhcn;zfhcndy;zfhcndydy;zfhcndydydy;zfhcndydydydy;1$_"_ zfhcnXX =:<@:>"1@(0|:])@([zfhcnXXS"_ 1 ypts) hkxV03=:[(],zfhcnXX)hkxV02 hkyV03=:[(],zfhcnXX)hkyV02
NB. ... script experimentalCS.ijs ... zfgcn=:xdy([smx"2 smx"2)zfhcn
NB. ... script experimentalCS.ijs ... zfgcndx0=:(1|:])"3@(xdy(( [)smx ])"2 3 ydx ((0|:[)smx 1|:])"2 3 xdydy((1|:[)smx ])"3 2 zfhcn) zfgcndx1=:(0|:])"3@(ydx((0|:[)smx 1|:])"2 3 xdydy((1|:[)smx ])"3 2 xdy (( [)smx ])"2 2 zfhcn) zfgcndx=:zfgcndx0+zfgcndx1
NB. ... script experimentalCS.ijs ... zfgcndxdx00=:(1 2|:])"4@(xdy(( [)smx ])"2 4 ydx((0|:[)smx 2|:])"2 4 ydx((0|:[)smx 2|:])"2 4 xdydydy((1|:[)smx ])"4 2 zfhcn) zfgcndxdx01=:(1 2|:])"4@( xdy(( [)smx ])"2 4 ydxdx((0|:[)smx 1|:])"3 3 xdydy((1|:[)smx ])"3 2 zfhcn) zfgcndxdx02=:(2 0|:])"4@(ydx((0|:[)smx 1|:])"2 4 xdydy((1|:[)smx ])"3 3 ydx((0|:[)smx 1|:])"2 3 xdydy((1|:[)smx ])"3 2 zfhcn) zfgcndxdx10=:(0 2|:])"4@(ydx((0|:[)smx 1|:])"2 4 xdydy((1|:[)smx ])"3 3 ydx((0|:[)smx 1|:])"2 3 xdydy((1|:[)smx ])"3 2 zfhcn) zfgcndxdx11=:(0 1|:])"4@(ydx((0|:[)smx 2|:])"2 4 ydx((0|:[)smx 2|:])"2 4 xdydydy((1|:[)smx ])"4 2 xdy((1|:[)smx ])"2 2 zfhcn) zfgcndxdx12=:(0 1|:])"4@( ydxdx((0|:[)smx 1|:])"3 3 xdydy((1|:[)smx ])"3 2 xdy((1|:[)smx ])"2 2 zfhcn) zfgcndxdx0=:zfgcndxdx00+zfgcndxdx01+zfgcndxdx02 zfgcndxdx1=:zfgcndxdx10+zfgcndxdx11+zfgcndxdx12 zfgcndxdx=:zfgcndxdx0+zfgcndxdx1
NB. ... script experimentalCS.ijs ... zfgcndxdxdx000=:(1 2 3|:])"5@(xdy((1|:[)smx ])"2 5 ydx((0|:[)smx 3|:])"2 5 ydx((0|:[)smx 3|:])"2 5 ydx((0|:[)smx 3|:])"2 5 xdydydydy((1|:[)smx ])"5 2 zfhcn) zfgcndxdxdx001=:(1 2 3|:])"5@( xdy((1|:[)smx ])"2 5 ydx((0|:[)smx 3|:])"2 5 ydxdx((0|:[)smx 2|:])"3 4 xdydydy((1|:[)smx ])"4 2 zfhcn) zfgcndxdxdx002=:(1 3 2|:])"5@( xdy((1|:[)smx ])"2 5 ydxdx((0|:[)smx 2|:])"3 4 ydx((0|:[)smx 2|:])"2 4 xdydydy((1|:[)smx ])"4 2 zfhcn) zfgcndxdxdx003=:(2 3 0|:])"5@(ydx((0|:[)smx 1|:])"2 5 xdydy((1|:[)smx ])"3 4 ydx((0|:[)smx 2|:])"2 4 ydx((0|:[)smx 2|:])"2 4 xdydydy((1|:[)smx ])"4 2 zfhcn) zfgcndxdxdx010=:(1 2 3|:])"5@( xdy((1|:[)smx ])"2 5 ydxdx((0|:[)smx 2|:])"3 4 ydx((0|:[)smx 2|:])"2 4 xdydydy((1|:[)smx ])"4 2 zfhcn) zfgcndxdxdx011=:(1 2 3|:])"5@( xdy((1|:[)smx ])"2 5 ydxdxdx((0|:[)smx 1|:])"4 3 xdydy((1|:[)smx ])"3 2 zfhcn) zfgcndxdxdx012=:(2 3 0|:])"5@( ydx((0|:[)smx 1|:])"2 5 xdydy((1|:[)smx ])"3 4 ydxdx((0|:[)smx 1|:])"3 3 xdydy((1|:[)smx ])"3 2 zfhcn) zfgcndxdxdx020=:(2 0 3|:])"5@(ydx((0|:[)smx 1|:])"2 5 xdydy((1|:[)smx ])"3 4 ydx((0|:[)smx 2|:])"2 4 ydx((0|:[)smx 2|:])"2 4 xdydydy((1|:[)smx ])"4 2 zfhcn) zfgcndxdxdx021=:(2 0 3|:])"5@( ydx((0|:[)smx 1|:])"2 5 xdydy((1|:[)smx ])"3 4 ydxdx((0|:[)smx 1|:])"3 3 xdydy((1|:[)smx ])"3 2 zfhcn) zfgcndxdxdx022=:(3 0 1|:])"5@(ydx((0|:[)smx 2|:])"2 5 ydx((0|:[)smx 2|:])"2 5 xdydydy((1|:[)smx ])"4 3 ydx((0|:[)smx 1|:])"2 3 xdydy((1|:[)smx ])"3 2 zfhcn) zfgcndxdxdx023=:(3 0 1|:])"5@( ydxdx((0|:[)smx 1|:])"3 4 xdydy((1|:[)smx ])"3 3 ydx((0|:[)smx 1|:])"2 3 xdydy((1|:[)smx ])"3 2 zfhcn) zfgcndxdxdx100=:(0 2 3|:])"5@(ydx((0|:[)smx 1|:])"2 5 xdydy((1|:[)smx ])"3 4 ydx((0|:[)smx 2|:])"2 4 ydx((0|:[)smx 2|:])"2 4 xdydydy((1|:[)smx ])"4 2 zfhcn) zfgcndxdxdx101=:(0 2 3|:])"5@( ydx((0|:[)smx 1|:])"2 5 xdydy((1|:[)smx ])"3 4 ydxdx((0|:[)smx 1|:])"3 3 xdydy((1|:[)smx ])"3 2 zfhcn) zfgcndxdxdx102=:(0 3 1|:])"5@(ydx((0|:[)smx 2|:])"2 5 ydx((0|:[)smx 2|:])"2 5 xdydydy((1|:[)smx ])"4 3 ydx((0|:[)smx 1|:])"2 3 xdydy((1|:[)smx ])"3 2 zfhcn) zfgcndxdxdx103=:(0 3 1|:])"5@( ydxdx((0|:[)smx 1|:])"3 4 xdydy((1|:[)smx ])"3 3 ydx((0|:[)smx 1|:])"2 3 xdydy((1|:[)smx ])"3 2 zfhcn) zfgcndxdxdx110=:(0 1 3|:])"5@(ydx((0|:[)smx 2|:])"2 5 ydx((0|:[)smx 2|:])"2 5 xdydydy((1|:[)smx ])"4 3 ydx((0|:[)smx 1|:])"2 3 xdydy((1|:[)smx ])"3 2 zfhcn) zfgcndxdxdx111=:(0 1 2|:])"5@(ydx((0|:[)smx 3|:])"2 5 ydx((0|:[)smx 3|:])"2 5 ydx((0|:[)smx 3|:])"2 5 xdydydydy((1|:[)smx ])"5 2 xdy((1|:[)smx ])"2 2 zfhcn) zfgcndxdxdx112=:(0 1 2|:])"5@( ydx((0|:[)smx 3|:])"2 5 ydxdx((0|:[)smx 2|:])"3 4 xdydydy((1|:[)smx ])"4 2 xdy((1|:[)smx ])"2 2 zfhcn) zfgcndxdxdx113=:(0 2 1|:])"5@( ydxdx((0|:[)smx 2|:])"3 4 ydx((0|:[)smx 2|:])"2 4 xdydydy((1|:[)smx ])"4 2 xdy((1|:[)smx ])"2 2 zfhcn) zfgcndxdxdx120=:(0 1 3|:])"5@( ydxdx((0|:[)smx 1|:])"3 4 xdydy((1|:[)smx ])"3 3 ydx((0|:[)smx 1|:])"2 3 xdydy((1|:[)smx ])"3 2 zfhcn) zfgcndxdxdx121=:(0 1 2|:])"5@( ydxdx((0|:[)smx 2|:])"3 4 ydx((0|:[)smx 2|:])"2 4 xdydydy((1|:[)smx ])"4 2 xdy((1|:[)smx ])"2 2 zfhcn) zfgcndxdxdx122=:(0 1 2|:])"5@( ydxdxdx((0|:[)smx 1|:])"4 3 xdydy((1|:[)smx ])"3 2 xdy((1|:[)smx ])"2 2 zfhcn) zfgcndxdxdx00=:zfgcndxdxdx000+zfgcndxdxdx001+zfgcndxdxdx002+zfgcndxdxdx003 zfgcndxdxdx01=:zfgcndxdxdx010+zfgcndxdxdx011+zfgcndxdxdx012 zfgcndxdxdx02=:zfgcndxdxdx020+zfgcndxdxdx021+zfgcndxdxdx022+zfgcndxdxdx023 zfgcndxdxdx10=:zfgcndxdxdx100+zfgcndxdxdx101+zfgcndxdxdx102+zfgcndxdxdx103 zfgcndxdxdx11=:zfgcndxdxdx110+zfgcndxdxdx111+zfgcndxdxdx112+zfgcndxdxdx113 zfgcndxdxdx12=:zfgcndxdxdx120+zfgcndxdxdx121+zfgcndxdxdx122 zfgcndxdxdx0=:zfgcndxdxdx00+zfgcndxdxdx01+zfgcndxdxdx02 zfgcndxdxdx1=:zfgcndxdxdx10+zfgcndxdxdx11+zfgcndxdxdx12 zfgcndxdxdx=:zfgcndxdxdx0+zfgcndxdxdx1
NB. ... script experimentalCS.ijs ... zfgcnXX=:zfgcn;zfgcndx;zfgcndxdx;zfgcndxdxdx;([(1$_"_)"_ 1 xpts);[(1$_"_)"_ 1 xpts hkxV04=:[(],zfgcnXX)hkxV03 hkyV04=:[(],zfgcnXX)hkyV03
Download: File:LCS0200C.txt
Download: File:LCS0201C.txt
Download: File:LCS0202C.txt
Download: File:LCS0203C.txt
Download: File:LCS0204C.txt