User:Tom Allen/ta/AddendumX03P02

From J Wiki
Jump to navigation Jump to search


NB. ... script experimentalX03.ijs ...

uQX03C0=:([jNyXX([wXwc vZzc)"_ 1),:jNwXX

uQX03C1=:(0 1{]),jNhcvXX,jNgcvXX,jNhcnXX,:jNgcnXX

uQX03C2=:<@:>"1@(0|:])@:(zSbQ59XX"_ 1)

hkyX03C=:[(],OcAXX)([uQX03C1 uQX03C0),uQX03C2


GX03P0200E.png


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

   uQ0=:1 1 2 8 1 1 8 _8 0,:0.9"_

   xCpts=:_ 0.7 1.3 51,_ 0.4p1 0.6p1 51,_ 0 2p1 51,:_ 0 2p1 51"_
   
NB. ... R is a tensor ...

   vA =:[R wRef
   vB0=:((0|:[)smx])"2 5
   vB1=:((0|:[)smx])"2 5
   vB2=:((0|:[)smx])"2 5
   vB3=:((0|:[)smx])"2 5
   vB4=:((   [)smx])"2 5
   vB =:[(wdy vB4 ydw vB3 ydw vB2 ydw vB1 ydw vB0 R)yRef

   (uQ0([(vA(((2^_34);2^_28)qteq[;])"5 vB)hkyX03C)]) (uQ0 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


... for Maxwell's equations ...


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

   uQ0=:1 1 2 8 1 1 8 _8 0,:0.9"_

   xCpts=:_ 0.7 1.3 51,_ 0.4p1 0.6p1 51,_ 0 2p1 51,:_ 0 2p1 51"_
   
   *./^:3"3 (0=]) ((2^_44)qtsz]) (uQ0([(]+0|:])"2@:((0 1|:])"3)@(+/"1@((<0 1)|:])"5@R)yRef@hkyX03C)]) (uQ0 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
   
   *./^:3"3 (0=]) ((2^_35)qtsz]) (uQ0([(]+0|:])"2@:((0 1|:])"3)@(+/"1@((<0 1)|:])"5@R)wRef@hkyX03C)]) (uQ0 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
   
   
   *./^:3"3 (0=]) ((2^_44)qtsz]) (uQ0([(]+(0 1|:])+0|:])"3@(+/"1@((<0 1)|:])"5@R)yRef@hkyX03C)])      (uQ0 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
   
   *./^:3"3 (0=]) ((2^_35)qtsz]) (uQ0([(]+(0 1|:])+0|:])"3@(+/"1@((<0 1)|:])"5@R)wRef@hkyX03C)])      (uQ0 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


NB. ... script experimentalX03.ijs ...

uQX03D0=:([jNyXX([wXwc vZzc)"_ 1),:jNwXX

uQX03D1=:(0 1{]),jNhcvXX,jNgcvXX,jNhcnXX,:jNgcnXX

uQX03D2=:<@:>"1@(0|:])@:(zSbQ59XX"_ 1(+&.>)"1(((1 1 1 1 1 1 1 _1 1,:1)*[)zSbQ59XX])"_ 1)

hkyX03D=:[(],OcAXX)([uQX03D1 uQX03D0),uQX03D2


GX03P0201E.png


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

   uQ0=:1 1 2 8 1 1 8 _8 0,:0.9"_

   xCpts=:_ 0.7 1.3 51,_ 0.4p1 0.6p1 51,_ 0 2p1 51,:_ 0 2p1 51"_
   
NB. ... R is a tensor ...

   vA =:[R wRef
   vB0=:((0|:[)smx])"2 5
   vB1=:((0|:[)smx])"2 5
   vB2=:((0|:[)smx])"2 5
   vB3=:((0|:[)smx])"2 5
   vB4=:((   [)smx])"2 5
   vB =:[(wdy vB4 ydw vB3 ydw vB2 ydw vB1 ydw vB0 R)yRef

   (uQ0([(vA(((2^_34);2^_31)qteq[;])"5 vB)hkyX03D)]) (uQ0 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


... for Maxwell's equations ...


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

   uQ0=:1 1 2 8 1 1 8 _8 0,:0.9"_

   xCpts=:_ 0.7 1.3 51,_ 0.4p1 0.6p1 51,_ 0 2p1 51,:_ 0 2p1 51"_
   
   *./^:3"3 (0=]) ((2^_44)qtsz]) (uQ0([(]+0|:])"2@:((0 1|:])"3)@(+/"1@((<0 1)|:])"5@R)yRef@hkyX03D)]) (uQ0 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
   
   *./^:3"3 (0=]) ((2^_33)qtsz]) (uQ0([(]+0|:])"2@:((0 1|:])"3)@(+/"1@((<0 1)|:])"5@R)wRef@hkyX03D)]) (uQ0 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
   
   
   *./^:3"3 (0=]) ((2^_44)qtsz]) (uQ0([(]+(0 1|:])+0|:])"3@(+/"1@((<0 1)|:])"5@R)yRef@hkyX03D)])      (uQ0 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
   
   *./^:3"3 (0=]) ((2^_33)qtsz]) (uQ0([(]+(0 1|:])+0|:])"3@(+/"1@((<0 1)|:])"5@R)wRef@hkyX03D)])      (uQ0 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



Download: File:LX03P0200E.txt
Download: File:LX03P0201E.txt




Next Page: User:Tom Allen/ta/AddendumX03P03
Prev Page: User:Tom Allen/ta/AddendumX03P01