User:Tom Allen/ta/AddendumX01P02

From J Wiki
Jump to navigation Jump to search


NB. ... execute (ijx) ...

   zS0=:,:@(0 1 2 8 0 0 0 0 0"_)

   xCpts=:_ 0.7 1.3 26,_ 0.4p1 0.6p1 26,_ 0 2p1 26,:_ 0 2p1 26"_

   (zS0(zSbQ30-:>@(0{])@zSbQ30XX)"_ 1])                                                                zfyc"1@((0.1;50"_)pTRandom xCpts)''
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

   (zS0(>@(1{])@zSbQ30XX"_ 1(((2^_44);2^_13)qteq[;])"1(0|:[:(zS0>@(0{])@zSbQ30XX])D.1])"_ 1)])         zfyc"1@((0.1;50"_)pTRandom xCpts)''
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

   (zS0(>@(2{])@zSbQ30XX"_ 1(((2^_44);2^_10)qteq[;])"2(0|:[:(zS0>@(1{])@zSbQ30XX])D.1])"_ 1)])         zfyc"1@((0.1;50"_)pTRandom xCpts)''
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

   (zS0(>@(3{])@zSbQ30XX"_ 1(((2^_44);2^_15)qteq[;])"3(0|:[:(zS0>@(2{])@zSbQ30XX])D.1])"_ 1)])         zfyc"1@((0.1;50"_)pTRandom xCpts)''
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

   (zS0(>@(4{])@zSbQ30XX"_ 1(((2^_44);2^_14)qteq[;])"4(0|:[:(zS0>@(3{])@zSbQ30XX])D.1])"_ 1)])         zfyc"1@((0.1;50"_)pTRandom xCpts)''
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. ... execute (ijx) ...

load jpath '~temp\experimentalW00.ijs'

NB. ... check zSbQ30 consistent with rfaV05 ...

   gX0=:,:@(0 1 2 8 0 0 0 0 0 0"_)

   zS0=:,:@(0 1 2 8 0 0 0 0 0"_)

   xCpts=:_ 0.7 1.3 26,_ 0.4p1 0.6p1 26,_ 0 2p1 26,:_ 0 2p1 26"_

   ((gX0>@(0{])@([rfTT4([zfxXXS zfyc),:rfaV05XX)"_ 1])(((2^_44);2^_44)qteq[;])"0 zS0(([>@(0{])@zSbQ30XX zfyc)"_ 1)]) ((0;50"_)pTRandom xCpts)''
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
   
   ((gX0>@(1{])@([rfTT4([zfxXXS zfyc),:rfaV05XX)"_ 1])(((2^_44);2^_44)qteq[;])"1 zS0(([>@(1{])@zSbQ30XX zfyc)"_ 1)]) ((0;50"_)pTRandom xCpts)''
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
   
   ((gX0>@(2{])@([rfTT4([zfxXXS zfyc),:rfaV05XX)"_ 1])(((2^_44);2^_44)qteq[;])"2 zS0(([>@(2{])@zSbQ30XX zfyc)"_ 1)]) ((0;50"_)pTRandom xCpts)''
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
   
   ((gX0>@(3{])@([rfTT4([zfxXXS zfyc),:rfaV05XX)"_ 1])(((2^_44);2^_43)qteq[;])"3 zS0(([>@(3{])@zSbQ30XX zfyc)"_ 1)]) ((0;50"_)pTRandom xCpts)''
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

   ((gX0>@(4{])@([rfTT4([zfxXXS zfyc),:rfaV05XX)"_ 1])(((2^_40);2^_42)qteq[;])"4 zS0(([>@(4{])@zSbQ30XX zfyc)"_ 1)]) ((0;50"_)pTRandom xCpts)''
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