User:Tom Allen/TensorExperimentsZ17

From J Wiki
Jump to: navigation, search


...

... or (Cartesian) ...

...


NB. ... script experimentalZ.ijs ...

gXS=:_ _ _ _ _ _"_,:gXsAll

cu0=:0{]
cu1=:1{]
cu2=:2{]
cu3=:3{]


NB. ... script experimentalZ.ijs ...

hkMc=:<@:>"1@(0|:])@:(((1 0 0 0,0 1 0 0,0 0 1 0,:0 0 0 _1"_);((3$4:)$0:);((4$4:)$0:);((5$4:)$0:);((6$4:)$0:);1$_"_)"_ 1)

hkuR=:(6$a:"_),(6$a:"_),hkMc,(6$a:"_),OzCXX,:6$a:"_

uRef=:(0{]),(1{]),(2{]),:4{]


...

... in Cartesian coordinates ...

... in every inertial reference frame ...

... the covariant tensor used to lower indices ...

... is ...

...


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

   gXsAll=: _1  1  1  1  1  0"_

   (gXS([mcv uRef@hkuR)]) ,: 1 1 1 2
1 0 0  0
0 1 0  0
0 0 1  0
0 0 0 _1


...

... in Cartesian coordinates ...

... in every inertial reference frame ...

... the contravariant tensor used to raise indices ...

... is ...

...


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

   gXsAll=: _1  1  1  1  1  0"_

   (gXS([mcn uRef@hkuR)]) ,: 1 1 1 2
1 0 0  0
0 1 0  0
0 0 1  0
0 0 0 _1


GTEZ1703D.jpg


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

   gXsAll=: _1  1  1  1  1  0"_

   (gXS((1 0 0 0.2,0 1 0 0 ,0 0 1 0,:0 0 0 1"_)"_ 1([smx"2 smx"2)[mcn uRef@hkuR)]) ,: 1 1 1 2
0.96 0 0 _0.2
   0 1 0    0
   0 0 1    0
_0.2 0 0   _1


GTEZ1704C.jpg


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

   gXsAll=: _1  1  1  1  1  0"_

   uCpts=:_ 0.1 4 27,_ 0.1 4 27,_ 0.1 4 27,:_ 0 6 27"_

   (0=]) ((2^_44)qtsz]) +/@((<0 1)|:])"2 (gXS cfXX1@OzCXXS"_ 1]) ((0;50"_)pTRandom uCpts)''
1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1


GTEZ1705E.jpg



Download: File:LTEZ1703D.txt
Download: File:LTEZ1704C.txt
Download: File:LTEZ1705E.txt




Download MoinMoin source: File:TensorExperimentsZ17.ijs