home *** CD-ROM | disk | FTP | other *** search
/ Geek Gadgets 1 / ADE-1.bin / ade-dist / eispack-1.0-src.tgz / tar.out / contrib / eispack / ex / cover < prev    next >
Text File  |  1996-09-28  |  2KB  |  76 lines
  1. .EQ 
  2. gsize 12
  3. delim @@
  4. .EN
  5. .EQ 
  6. left ( ~~ matrix {
  7. ccol {e above nothing above nothing above nothing above nothing above 
  8.       nothing above nothing }
  9. ccol {i above i above nothing above nothing above nothing above 
  10.       nothing above nothing }
  11. ccol {s above s above s above nothing above nothing above 
  12.       nothing above nothing }
  13. ccol {p above p above p above p above nothing above 
  14.       nothing above nothing }
  15. ccol {a above a above a above a above a above 
  16.       nothing above nothing }
  17. ccol {c above c above c above c above c above 
  18.       c above nothing }
  19. ccol {k above k above k above k above k above 
  20.       k above k }
  21. } ~~ right )
  22. .EN
  23. .sp 10
  24. .EQ
  25. lambda sub 1 ~=~ e ~~~~~ x sub 1 ~=~ left ( ~~ matrix {
  26. ccol { e above 0 above 0 above 0 above 0 above 0 above 0 } 
  27. } ~~ right )
  28. .EN
  29. .sp 2
  30. .EQ
  31. lambda sub 2 ~=~ i ~~~~~ x sub 2 ~=~ left ( ~~ matrix {
  32. ccol { -i above e-i above 0 above 0 above 0 above 0 above 0 } 
  33. } ~~ right )
  34. .EN
  35. .sp 2
  36. .bp
  37. .EQ
  38. lambda sub 3 ~=~ s ~~~~~ x sub 3 ~=~ left ( ~~ matrix {
  39. ccol { s sup 2 above -s(e-s) above (e-s)(i-s) above 0 above 0 above 0 above 0 } 
  40. } ~~ right )
  41. .EN
  42. .sp 2
  43. .EQ
  44. lambda sub 4 ~=~ p ~~~~~ x sub 4 ~=~ left ( ~~ matrix {
  45. ccol { -p sup 3 above p sup 2 (e-p) above -p(e-p)(i-p) above (e-p)(i-p)(s-p) 
  46. above 0 above 0 above 0 } 
  47. } ~~ right )
  48. .EN
  49. .bp
  50. .sp 2
  51. .EQ
  52. lambda sub 5 ~=~ a ~~~~~ x sub 5 ~=~ left ( ~~ matrix {
  53. ccol { a sup 4 above -a sup 3 (e-a) above a sup 2 (e-a)(i-a) 
  54. above -a(e-a)(i-a)(s-a) above (e-a)(i-a)(s-a)(p-a) 
  55. above 0 above 0 } 
  56. } ~~ right )
  57. .EN
  58. .sp 2
  59. .EQ
  60. lambda sub 6 ~=~ c ~~~~~ x sub 6 ~=~ left ( ~~ matrix {
  61. ccol { -c sup 5 above c sup 4 (e-c) above -c sup 3 (e-c)(i-c) 
  62. above c sup 2 (e-c)(i-c)(s-c) above -c(e-c)(i-c)(s-c)(p-c) 
  63. above (e-c)(i-c)(s-c)(p-c)(a-c) above 0 } 
  64. } ~~ right )
  65. .EN
  66. .bp
  67. .sp 2
  68. .EQ
  69. lambda sub 7 ~=~ k ~~~~~ x sub 7 ~=~ left ( ~~ matrix {
  70. ccol { k sup 6 above -k sup 5 (e-k) above k sup 4 (e-k)(i-k) 
  71. above -k sup 3 (e-k)(i-k)(s-k) above k sup 2 (e-k)(i-k)(s-k)(p-k) 
  72. above -k(e-k)(i-k)(s-k)(p-k)(a-k) above (e-k)(i-k)(s-k)(p-k)(a-k)(c-k) } 
  73. } ~~ right )
  74. .EN
  75. .sp 2
  76.