| 1 |
786 |
skrzyp |
========================================
|
| 2 |
|
|
Testing 4x4 int matrix:
|
| 3 |
|
|
========================================
|
| 4 |
|
|
load_identity(m1)
|
| 5 |
|
|
m1 = ((1,0,0,0)(0,1,0,0)(0,0,1,0)(0,0,0,1))
|
| 6 |
|
|
m1 = m2
|
| 7 |
|
|
m2 = ((1,0,0,0)(0,1,0,0)(0,0,1,0)(0,0,0,1))
|
| 8 |
|
|
m1 += m2
|
| 9 |
|
|
m1 = ((2,0,0,0)(0,2,0,0)(0,0,2,0)(0,0,0,2))
|
| 10 |
|
|
m1 /= 2
|
| 11 |
|
|
m1 = ((1,0,0,0)(0,1,0,0)(0,0,1,0)(0,0,0,1))
|
| 12 |
|
|
m1 = m1 * m2
|
| 13 |
|
|
m1 = ((1,0,0,0)(0,1,0,0)(0,0,1,0)(0,0,0,1))
|
| 14 |
|
|
m1 += 3
|
| 15 |
|
|
m1 = ((4,3,3,3)(3,4,3,3)(3,3,4,3)(3,3,3,4))
|
| 16 |
|
|
m1 *= I(2)
|
| 17 |
|
|
m1 = ((8,6,6,6)(6,8,6,6)(6,6,8,6)(6,6,6,8))
|
| 18 |
|
|
m1 = iota(1)
|
| 19 |
|
|
m1 = ((1,2,3,4)(5,6,7,8)(9,10,11,12)(13,14,15,16))
|
| 20 |
|
|
m1 row [1] = (5,6,7,8)
|
| 21 |
|
|
m1 column [2] = (3,7,11,15)
|
| 22 |
|
|
m1 *= I(2)
|
| 23 |
|
|
m1 = ((2,4,6,8)(10,12,14,16)(18,20,22,24)(26,28,30,32))
|
| 24 |
|
|
v = iota(1)
|
| 25 |
|
|
v = (1,2,3,4)
|
| 26 |
|
|
m2 = I(2) + T(1)
|
| 27 |
|
|
m2 = ((2,0,0,0)(0,2,0,0)(0,0,2,0)(1,1,1,2))
|
| 28 |
|
|
vt = v * m2
|
| 29 |
|
|
vt = (6,8,10,8)
|
| 30 |
|
|
========================================
|
| 31 |
|
|
Testing 4x4 float matrix:
|
| 32 |
|
|
========================================
|
| 33 |
|
|
load_identity(m1)
|
| 34 |
|
|
m1 = ((1.0,0.0,0.0,0.0)(0.0,1.0,0.0,0.0)(0.0,0.0,1.0,0.0)(0.0,0.0,0.0,1.0))
|
| 35 |
|
|
m1 = m2
|
| 36 |
|
|
m2 = ((1.0,0.0,0.0,0.0)(0.0,1.0,0.0,0.0)(0.0,0.0,1.0,0.0)(0.0,0.0,0.0,1.0))
|
| 37 |
|
|
m1 += m2
|
| 38 |
|
|
m1 = ((2.0,0.0,0.0,0.0)(0.0,2.0,0.0,0.0)(0.0,0.0,2.0,0.0)(0.0,0.0,0.0,2.0))
|
| 39 |
|
|
m1 /= 2
|
| 40 |
|
|
m1 = ((1.0,0.0,0.0,0.0)(0.0,1.0,0.0,0.0)(0.0,0.0,1.0,0.0)(0.0,0.0,0.0,1.0))
|
| 41 |
|
|
m1 = m1 * m2
|
| 42 |
|
|
m1 = ((1.0,0.0,0.0,0.0)(0.0,1.0,0.0,0.0)(0.0,0.0,1.0,0.0)(0.0,0.0,0.0,1.0))
|
| 43 |
|
|
m1 += 3
|
| 44 |
|
|
m1 = ((4.0,3.0,3.0,3.0)(3.0,4.0,3.0,3.0)(3.0,3.0,4.0,3.0)(3.0,3.0,3.0,4.0))
|
| 45 |
|
|
m1 *= I(2)
|
| 46 |
|
|
m1 = ((8.0,6.0,6.0,6.0)(6.0,8.0,6.0,6.0)(6.0,6.0,8.0,6.0)(6.0,6.0,6.0,8.0))
|
| 47 |
|
|
m1 = iota(1)
|
| 48 |
|
|
m1 = ((1.0,2.0,3.0,4.0)(5.0,6.0,7.0,8.0)(9.0,10.0,11.0,12.0)(13.0,14.0,15.0,16.0))
|
| 49 |
|
|
m1 row [1] = (5.0,6.0,7.0,8.0)
|
| 50 |
|
|
m1 column [2] = (3.0,7.0,11.0,15.0)
|
| 51 |
|
|
m1 *= I(2)
|
| 52 |
|
|
m1 = ((2.0,4.0,6.0,8.0)(10.0,12.0,14.0,16.0)(18.0,20.0,22.0,24.0)(26.0,28.0,30.0,32.0))
|
| 53 |
|
|
v = iota(1)
|
| 54 |
|
|
v = (1.0,2.0,3.0,4.0)
|
| 55 |
|
|
m2 = I(2) + T(1)
|
| 56 |
|
|
m2 = ((2.0,0.0,0.0,0.0)(0.0,2.0,0.0,0.0)(0.0,0.0,2.0,0.0)(1.0,1.0,1.0,2.0))
|
| 57 |
|
|
vt = v * m2
|
| 58 |
|
|
vt = (6.0,8.0,10.0,8.0)
|
