home *** CD-ROM | disk | FTP | other *** search
/ Archive Magazine 1996 / ARCHIVE_96.iso / discs / gerald / 7_08 / Matrix / InvMat4 next >
Text File  |  1994-03-24  |  2KB  |  99 lines
  1. %CO:A,12,72%%V%%R%1
  2. %V%%R%2
  3. %V%%R%2
  4. %V%%R%-3
  5.  
  6. %V%%R%%D4%D2*(B3*C4-B4*C3)-D3*(B2*C4-B4*C2)+D4*(B2*C3-B3*C2)
  7. %V%%R%%D4%-D3*(B4*C1-B1*C4)+D4*(B3*C1-B1*C3)-D1*(B3*C4-B4*C3)
  8. %V%%R%%D4%D4*(B1*C2-B2*C1)-D1*(B4*C2-B2*C4)+D2*(B4*C1-B1*C4)
  9. %V%%R%%D4%-D1*(B2*C3-B3*C2)+D2*(B1*C3-B3*C1)-D3*(B1*C2-B2*C1)
  10.  
  11. %V%%R%%D4%A1*A6
  12. %V%%R%%D4%A2*A7
  13. %V%%R%%D4%A3*A8
  14. %V%%R%%D4%A4*A9
  15.  
  16. %V%%R%%D4%sum(A11A14)
  17.  
  18. %V%%R%%D4%A6/A16
  19. %V%%R%%D4%B6/A16
  20. %V%%R%%D4%C6/A16
  21. %V%%R%%D4%D6/A16
  22. %CO:B,12,60%%V%%R%2
  23. %V%%R%-1
  24. %V%%R%4
  25. %V%%R%5
  26.  
  27. %V%%R%%D4%-A2*(C3*D4-C4*D3)+A3*(C2*D4-C4*D2)-A4*(C2*D3-C3*D2)
  28. %V%%R%%D4%A3*(C4*D1-C1*D4)-A4*(C3*D1-C1*D3)+A1*(C3*D4-C4*D3)
  29. %V%%R%%D4%-A4*(C1*D2-C2*D1)+A1*(C4*D2-C2*D4)-A2*(C4*D1-C1*D4)
  30. %V%%R%%D4%A1*(C2*D3-C3*D2)-A2*(C1*D3-C3*D1)+A3*(C1*D2-C2*D1)
  31.  
  32. %V%%R%%D4%B1*B6
  33. %V%%R%%D4%B2*B7
  34. %V%%R%%D4%B3*B8
  35. %V%%R%%D4%B4*B9
  36.  
  37. %V%%R%%D4%sum(B11B14)
  38.  
  39. %V%%R%%D4%A7/A16
  40. %V%%R%%D4%B7/A16
  41. %V%%R%%D4%C7/A16
  42. %V%%R%%D4%D7/A16
  43. %CO:C,12,48%%V%%R%7
  44. %V%%R%3
  45. %V%%R%3
  46. %V%%R%2
  47.  
  48. %V%%R%%D4%B2*(D3*A4-D4*A3)-B3*(D2*A4-D4*A2)+B4*(D2*A3-D3*A2)
  49. %V%%R%%D4%-B3*(D4*A1-D1*A4)+B4*(D3*A1-D1*A3)-B1*(D3*A4-D4*A3)
  50. %V%%R%%D4%B4*(D1*A2-D2*A1)-B1*(D4*A2-D2*A4)+B2*(D4*A1-D1*A4)
  51. %V%%R%%D4%-B1*(D2*A3-D3*A2)+B2*(D1*A3-D3*A1)-B3*(D1*A2-D2*A1)
  52.  
  53. %V%%R%%D4%C1*C6
  54. %V%%R%%D4%C2*C7
  55. %V%%R%%D4%C3*C8
  56. %V%%R%%D4%C4*C9
  57.  
  58. %V%%R%%D4%sum(C11C14)
  59.  
  60. %V%%R%%D4%A8/A16
  61. %V%%R%%D4%B8/A16
  62. %V%%R%%D4%C8/A16
  63. %V%%R%%D4%D8/A16
  64. %CO:D,12,36%%V%%R%4
  65. %V%%R%8
  66. %V%%R%2
  67. %V%%R%-1
  68.  
  69. %V%%R%%D4%-C2*(A3*B4-A4*B3)+C3*(A2*B4-A4*B2)-C4*(A2*B3-A3*B2)
  70. %V%%R%%D4%C3*(A4*B1-A1*B4)-C4*(A3*B1-A1*B3)+C1*(A3*B4-A4*B3)
  71. %V%%R%%D4%-C4*(A1*B2-A2*B1)+C1*(A4*B2-A2*B4)-C2*(A4*B1-A1*B4)
  72. %V%%R%%D4%C1*(A2*B3-A3*B2)-C2*(A1*B3-A3*B1)+C3*(A1*B2-A2*B1)
  73.  
  74. %V%%R%%D4%D1*D6
  75. %V%%R%%D4%D2*D7
  76. %V%%R%%D4%D3*D8
  77. %V%%R%%D4%D4*D9
  78.  
  79. %V%%R%%D4%sum(D11D14)
  80.  
  81. %V%%R%%D4%A9/A16
  82. %V%%R%%D4%B9/A16
  83. %V%%R%%D4%C9/A16
  84. %V%%R%%D4%D9/A16
  85. %CO:E,12,12%
  86.  
  87.  
  88.  
  89.  
  90.  
  91.  
  92.  
  93.  
  94.  
  95. %V%%R%%D4%sum(A11D11)
  96. %V%%R%%D4%sum(A12D12)
  97. %V%%R%%D4%sum(A13D13)
  98. %V%%R%%D4%sum(A14D14)
  99.