User:Tom Allen/ta/AddendumW02P05
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:
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:
NB. ... script experimentalW02.ijs ... pUDw02=:pUDw00+pUDw01 pUDw02XX=:pUDw00XX+&.>pUDw01XX
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
NB. ... script experimentalW02.ijs ... pUDw04=:cy0*pUDw03 pUDw04XX=:[cfMP5 cy0XX,:pUDw03XX
NB. ... script experimentalW02.ijs ... pUDw05=:-@cy1*pUDw03 pUDw05XX=:[cfMP5 -&.>@cy1XX,:pUDw03XX
NB. ... script experimentalW02.ijs ... pUDw06=:arctan@(cy0,cy1) pUDw06XX=:<@arctan@(cy0,cy1),(<@:>"1)@(0|:])@:(}:"1)@(pUDw05XX,pUDw04XX,pUKb12XX,:pUKb12XX)
NB. ... script experimentalW02.ijs ... pUDw07=:(pUKb06*pUDw06)+pUKb07*cy3 pUDw07XX=:([cfMP5 pUKb06XX,:pUDw06XX)+&.>[cfMP5 pUKb07XX,:cy3XX
NB. ... script experimentalW02.ijs ... pUDw08=:sin@pUDw07 pUDw08XX=:[cfFN5(sin@pUDw07;cos@pUDw07;-@sin@pUDw07;-@cos@pUDw07;sin@pUDw07;cos@pUDw07),:pUDw07XX
NB. ... script experimentalW02.ijs ... pUDw09=:cos@pUDw07 pUDw09XX=:[cfFN5(cos@pUDw07;-@sin@pUDw07;-@cos@pUDw07;sin@pUDw07;cos@pUDw07;-@sin@pUDw07),:pUDw07XX
... 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
... 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
...
...
...
NB. ... script experimentalW02.ijs ... pUDw12=:sin@pUDw06 pUDw12XX=:[cfFN5(sin@pUDw06;cos@pUDw06;-@sin@pUDw06;-@cos@pUDw06;sin@pUDw06;cos@pUDw06),:pUDw06XX
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