User:Tom Allen/ta/AddendumW02P05

From J Wiki
Jump to navigation Jump to search


GpUDwDocA.png


GpUDw00C.png


NB. ... script experimentalW02.ijs ...

pUDw00=:cy0^2:

pUDw00XX=:(cy0^2:);((2*cy0),3$0:);(2 0 0 0,3 4$0:);((3$4:)$0:);((4$4:)$0:);(5$4:)$0:


GpUDw01C.png


NB. ... script experimentalW02.ijs ...

pUDw01=:cy1^2:

pUDw01XX=:(cy1^2:);(0,(2*cy1),2$0:);((4$0:),0 2 0 0,2 4$0:);((3$4:)$0:);((4$4:)$0:);(5$4:)$0:


GpUDw02C.png


NB. ... script experimentalW02.ijs ...

pUDw02=:pUDw00+pUDw01

pUDw02XX=:pUDw00XX+&.>pUDw01XX


GpUDw03C.png


NB. ... script experimentalW02.ijs ...

pUDw03=:pUDw02^_1:

pUDw02U0=:                                       pUDw02^_1:
pUDw02U1=:                                    _1*pUDw02^_1+_1:
pUDw02U2=:                           (_1+_1:)*_1*pUDw02^_1+_2:
pUDw02U3=:                  (_1+_2:)*(_1+_1:)*_1*pUDw02^_1+_3:
pUDw02U4=:         (_1+_3:)*(_1+_2:)*(_1+_1:)*_1*pUDw02^_1+_4:
pUDw02U5=:(_1+_4:)*(_1+_3:)*(_1+_2:)*(_1+_1:)*_1*pUDw02^_1+_5:

pUDw03XX=:[cfFN5(pUDw02U0;pUDw02U1;pUDw02U2;pUDw02U3;pUDw02U4;pUDw02U5),:pUDw02XX


GpUDw04C.png


NB. ... script experimentalW02.ijs ...

pUDw04=:cy0*pUDw03

pUDw04XX=:[cfMP5 cy0XX,:pUDw03XX


GpUDw05C.png


NB. ... script experimentalW02.ijs ...

pUDw05=:-@cy1*pUDw03

pUDw05XX=:[cfMP5 -&.>@cy1XX,:pUDw03XX


GpUDw06C.png


NB. ... script experimentalW02.ijs ...

pUDw06=:arctan@(cy0,cy1)

pUDw06XX=:<@arctan@(cy0,cy1),(<@:>"1)@(0|:])@:(}:"1)@(pUDw05XX,pUDw04XX,pUKb12XX,:pUKb12XX)


GpUDw07C.png


NB. ... script experimentalW02.ijs ...

pUDw07=:(pUKb06*pUDw06)+pUKb07*cy3

pUDw07XX=:([cfMP5 pUKb06XX,:pUDw06XX)+&.>[cfMP5 pUKb07XX,:cy3XX


GpUDw08C.png


NB. ... script experimentalW02.ijs ...

pUDw08=:sin@pUDw07

pUDw08XX=:[cfFN5(sin@pUDw07;cos@pUDw07;-@sin@pUDw07;-@cos@pUDw07;sin@pUDw07;cos@pUDw07),:pUDw07XX


GpUDw09C.png


NB. ... script experimentalW02.ijs ...

pUDw09=:cos@pUDw07

pUDw09XX=:[cfFN5(cos@pUDw07;-@sin@pUDw07;-@cos@pUDw07;sin@pUDw07;cos@pUDw07;-@sin@pUDw07),:pUDw07XX


GpUDw10C.png


... the derivatives for pUDw10 are checked in AddendumX06P02 using the D. primitive (D.1) available in j64-807 ...


NB. ... script experimentalW02.ijs ...

pUDw10=:pUDw08+pUDw09

pUDw10XX=:pUDw08XX+&.>pUDw09XX


GpUDw11C.png


... the derivatives for pUDw11 are checked in AddendumX06P02 using the D. primitive (D.1) available in j64-807 ...


NB. ... script experimentalW02.ijs ...

pUDw11=:pUDw08+-@pUDw09

pUDw11XX=:pUDw08XX+&.>-&.>@pUDw09XX


...
...
...


GpUDw12C.png


NB. ... script experimentalW02.ijs ...

pUDw12=:sin@pUDw06

pUDw12XX=:[cfFN5(sin@pUDw06;cos@pUDw06;-@sin@pUDw06;-@cos@pUDw06;sin@pUDw06;cos@pUDw06),:pUDw06XX


GpUDw13C.png


NB. ... script experimentalW02.ijs ...

pUDw13=:cos@pUDw06

pUDw13XX=:[cfFN5(cos@pUDw06;-@sin@pUDw06;-@cos@pUDw06;sin@pUDw06;cos@pUDw06;-@sin@pUDw06),:pUDw06XX



Download: File:LpUDwDocA.txt
Download: File:LpUDw00C.txt
Download: File:LpUDw01C.txt
Download: File:LpUDw02C.txt
Download: File:LpUDw03C.txt
Download: File:LpUDw04C.txt
Download: File:LpUDw05C.txt
Download: File:LpUDw06C.txt
Download: File:LpUDw07C.txt
Download: File:LpUDw08C.txt
Download: File:LpUDw09C.txt
Download: File:LpUDw10C.txt
Download: File:LpUDw11C.txt
Download: File:LpUDw12C.txt
Download: File:LpUDw13C.txt




Next Page: User:Tom Allen/ta/AddendumW02P06
Prev Page: User:Tom Allen/ta/AddendumW02P04