Essays/Tensor Experiments/TensorExperiments02

From J Wiki
Jump to navigation Jump to search


GTE0200C.jpg


NB. ... script experimental.ijs ...

cfMP=:cfAL*/cfAR


cfMPdct0=:cfAL  */cfARdc
cfMPdct1=:cfALdc*/cfAR

cfMPdc=:cfMPdct0+cfMPdct1


cfMPdcdct0=:(   ])@(cfAL    */cfARdcdc)
cfMPdcdct1=:(0|:])@(cfALdc  */cfARdc  )
cfMPdcdct2=:(   ])@(cfALdc  */cfARdc  )
cfMPdcdct3=:(   ])@(cfALdcdc*/cfAR    )

cfMPdcdc=:cfMPdcdct0+cfMPdcdct1+cfMPdcdct2+cfMPdcdct3


cfMPdcdcdct0=:(     ])@(cfAL      */cfARdcdcdc)
cfMPdcdcdct1=:(  0|:])@(cfALdc    */cfARdcdc  )
cfMPdcdcdct2=:(0 2|:])@(cfALdc    */cfARdcdc  )
cfMPdcdcdct3=:(0 1|:])@(cfALdcdc  */cfARdc    )
cfMPdcdcdct4=:(     ])@(cfALdc    */cfARdcdc  )
cfMPdcdcdct5=:(  1|:])@(cfALdcdc  */cfARdc    )
cfMPdcdcdct6=:(     ])@(cfALdcdc  */cfARdc    )
cfMPdcdcdct7=:(     ])@(cfALdcdcdc*/cfAR      )

cfMPdcdcdc=:cfMPdcdcdct0+cfMPdcdcdct1+cfMPdcdcdct2+cfMPdcdcdct3+cfMPdcdcdct4+cfMPdcdcdct5+cfMPdcdcdct6+cfMPdcdcdct7


cfMPdcdcdcdct00=:(       ])@(cfAL        */cfARdcdcdcdc)
cfMPdcdcdcdct01=:(    0|:])@(cfALdc      */cfARdcdcdc  )
cfMPdcdcdcdct02=:(  0 3|:])@(cfALdc      */cfARdcdcdc  )
cfMPdcdcdcdct03=:(  0 1|:])@(cfALdcdc    */cfARdcdc    )
cfMPdcdcdcdct10=:(0 2 3|:])@(cfALdc      */cfARdcdcdc  )
cfMPdcdcdcdct11=:(0 3 1|:])@(cfALdcdc    */cfARdcdc    )
cfMPdcdcdcdct12=:(0 1 3|:])@(cfALdcdc    */cfARdcdc    )
cfMPdcdcdcdct13=:(0 1 2|:])@(cfALdcdcdc  */cfARdc      )
cfMPdcdcdcdct20=:(       ])@(cfALdc      */cfARdcdcdc  )
cfMPdcdcdcdct21=:(    1|:])@(cfALdcdc    */cfARdcdc    )
cfMPdcdcdcdct22=:(  1 3|:])@(cfALdcdc    */cfARdcdc    )
cfMPdcdcdcdct23=:(  1 2|:])@(cfALdcdcdc  */cfARdc      )
cfMPdcdcdcdct30=:(       ])@(cfALdcdc    */cfARdcdc    )
cfMPdcdcdcdct31=:(    2|:])@(cfALdcdcdc  */cfARdc      )
cfMPdcdcdcdct32=:(       ])@(cfALdcdcdc  */cfARdc      )
cfMPdcdcdcdct33=:(       ])@(cfALdcdcdcdc*/cfAR        )

cfMPdcdcdcdct0=:cfMPdcdcdcdct00+cfMPdcdcdcdct01+cfMPdcdcdcdct02+cfMPdcdcdcdct03
cfMPdcdcdcdct1=:cfMPdcdcdcdct10+cfMPdcdcdcdct11+cfMPdcdcdcdct12+cfMPdcdcdcdct13
cfMPdcdcdcdct2=:cfMPdcdcdcdct20+cfMPdcdcdcdct21+cfMPdcdcdcdct22+cfMPdcdcdcdct23
cfMPdcdcdcdct3=:cfMPdcdcdcdct30+cfMPdcdcdcdct31+cfMPdcdcdcdct32+cfMPdcdcdcdct33

cfMPdcdcdcdc=:cfMPdcdcdcdct0+cfMPdcdcdcdct1+cfMPdcdcdcdct2+cfMPdcdcdcdct3


cfMPdcdcdcdcdct000=:(         ])@(cfAL          */cfARdcdcdcdcdc)
cfMPdcdcdcdcdct001=:(      0|:])@(cfALdc        */cfARdcdcdcdc  )
cfMPdcdcdcdcdct002=:(    0 4|:])@(cfALdc        */cfARdcdcdcdc  )
cfMPdcdcdcdcdct003=:(    0 1|:])@(cfALdcdc      */cfARdcdcdc    )
cfMPdcdcdcdcdct010=:(  0 3 4|:])@(cfALdc        */cfARdcdcdcdc  )
cfMPdcdcdcdcdct011=:(  0 4 1|:])@(cfALdcdc      */cfARdcdcdc    )
cfMPdcdcdcdcdct012=:(  0 1 4|:])@(cfALdcdc      */cfARdcdcdc    )
cfMPdcdcdcdcdct013=:(  0 1 2|:])@(cfALdcdcdc    */cfARdcdc      )
cfMPdcdcdcdcdct020=:(0 2 3 4|:])@(cfALdc        */cfARdcdcdcdc  )
cfMPdcdcdcdcdct021=:(0 3 4 1|:])@(cfALdcdc      */cfARdcdcdc    )
cfMPdcdcdcdcdct022=:(0 3 1 4|:])@(cfALdcdc      */cfARdcdcdc    )
cfMPdcdcdcdcdct023=:(0 4 1 2|:])@(cfALdcdcdc    */cfARdcdc      )
cfMPdcdcdcdcdct030=:(0 1 3 4|:])@(cfALdcdc      */cfARdcdcdc    )
cfMPdcdcdcdcdct031=:(0 1 4 2|:])@(cfALdcdcdc    */cfARdcdc      )
cfMPdcdcdcdcdct032=:(0 1 2 4|:])@(cfALdcdcdc    */cfARdcdc      )
cfMPdcdcdcdcdct033=:(0 1 2 3|:])@(cfALdcdcdcdc  */cfARdc        )
cfMPdcdcdcdcdct100=:(         ])@(cfALdc        */cfARdcdcdcdc  )
cfMPdcdcdcdcdct101=:(      1|:])@(cfALdcdc      */cfARdcdcdc    )
cfMPdcdcdcdcdct102=:(    1 4|:])@(cfALdcdc      */cfARdcdcdc    )
cfMPdcdcdcdcdct103=:(    1 2|:])@(cfALdcdcdc    */cfARdcdc      )
cfMPdcdcdcdcdct110=:(  1 3 4|:])@(cfALdcdc      */cfARdcdcdc    )
cfMPdcdcdcdcdct111=:(  1 4 2|:])@(cfALdcdcdc    */cfARdcdc      )
cfMPdcdcdcdcdct112=:(  1 2 4|:])@(cfALdcdcdc    */cfARdcdc      )
cfMPdcdcdcdcdct113=:(  1 2 3|:])@(cfALdcdcdcdc  */cfARdc        )
cfMPdcdcdcdcdct120=:(         ])@(cfALdcdc      */cfARdcdcdc    )
cfMPdcdcdcdcdct121=:(      2|:])@(cfALdcdcdc    */cfARdcdc      )
cfMPdcdcdcdcdct122=:(    2 4|:])@(cfALdcdcdc    */cfARdcdc      )
cfMPdcdcdcdcdct123=:(    2 3|:])@(cfALdcdcdcdc  */cfARdc        )
cfMPdcdcdcdcdct130=:(         ])@(cfALdcdcdc    */cfARdcdc      )
cfMPdcdcdcdcdct131=:(      3|:])@(cfALdcdcdcdc  */cfARdc        )
cfMPdcdcdcdcdct132=:(         ])@(cfALdcdcdcdc  */cfARdc        )
cfMPdcdcdcdcdct133=:(         ])@(cfALdcdcdcdcdc*/cfAR          )

cfMPdcdcdcdcdct00=:cfMPdcdcdcdcdct000+cfMPdcdcdcdcdct001+cfMPdcdcdcdcdct002+cfMPdcdcdcdcdct003
cfMPdcdcdcdcdct01=:cfMPdcdcdcdcdct010+cfMPdcdcdcdcdct011+cfMPdcdcdcdcdct012+cfMPdcdcdcdcdct013
cfMPdcdcdcdcdct02=:cfMPdcdcdcdcdct020+cfMPdcdcdcdcdct021+cfMPdcdcdcdcdct022+cfMPdcdcdcdcdct023
cfMPdcdcdcdcdct03=:cfMPdcdcdcdcdct030+cfMPdcdcdcdcdct031+cfMPdcdcdcdcdct032+cfMPdcdcdcdcdct033
cfMPdcdcdcdcdct10=:cfMPdcdcdcdcdct100+cfMPdcdcdcdcdct101+cfMPdcdcdcdcdct102+cfMPdcdcdcdcdct103
cfMPdcdcdcdcdct11=:cfMPdcdcdcdcdct110+cfMPdcdcdcdcdct111+cfMPdcdcdcdcdct112+cfMPdcdcdcdcdct113
cfMPdcdcdcdcdct12=:cfMPdcdcdcdcdct120+cfMPdcdcdcdcdct121+cfMPdcdcdcdcdct122+cfMPdcdcdcdcdct123
cfMPdcdcdcdcdct13=:cfMPdcdcdcdcdct130+cfMPdcdcdcdcdct131+cfMPdcdcdcdcdct132+cfMPdcdcdcdcdct133

cfMPdcdcdcdcdct0=:cfMPdcdcdcdcdct00+cfMPdcdcdcdcdct01+cfMPdcdcdcdcdct02+cfMPdcdcdcdcdct03
cfMPdcdcdcdcdct1=:cfMPdcdcdcdcdct10+cfMPdcdcdcdcdct11+cfMPdcdcdcdcdct12+cfMPdcdcdcdcdct13

cfMPdcdcdcdcdc=:cfMPdcdcdcdcdct0+cfMPdcdcdcdcdct1


cfMP0=:cfMP;     _;       _;         _;           _;             _"_
cfMP1=:cfMP;cfMPdc;       _;         _;           _;             _"_
cfMP2=:cfMP;cfMPdc;cfMPdcdc;         _;           _;             _"_
cfMP3=:cfMP;cfMPdc;cfMPdcdc;cfMPdcdcdc;           _;             _"_
cfMP4=:cfMP;cfMPdc;cfMPdcdc;cfMPdcdcdc;cfMPdcdcdcdc;             _"_
cfMP5=:cfMP;cfMPdc;cfMPdcdc;cfMPdcdcdc;cfMPdcdcdcdc;cfMPdcdcdcdcdc



Download: File:LTE0200C.txt




Download MoinMoin source: File:TensorExperiments02.ijs




Next Page: Essays/Tensor Experiments/TensorExperiments03
Prev Page: Essays/Tensor Experiments/TensorExperiments01