home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 24 / CD_ASCQ_24_0995.iso / vrac / sm331a.zip / INIT.SM < prev    next >
Text File  |  1993-04-07  |  723b  |  45 lines

  1. #    The initial package init.sm
  2. output := off
  3. numeric := off
  4. expand := off
  5.  
  6. inf-inf:=undefined
  7. -inf+inf:=undefined
  8. inf+(-1)*inf:=undefined
  9. (-1)*inf+inf:=undefined
  10. zero-zero:=zero
  11. zero+(-1)*zero:=zero
  12. (-1)*zero+zero:=zero
  13. 0*inf:=undefined
  14. inf*0:=undefined
  15. inf*zero:=undefined
  16. 0/0:=undefined
  17. zero/zero:=undefined
  18. inf/inf:=undefined
  19. 0^0:=undefined
  20. zero^zero:=undefined
  21. #1^inf:=undefined
  22. (-1)^inf:=undefined
  23. inf^0:=undefined
  24.  
  25. #e/inf := 0
  26. #pi/inf := 0
  27. #(-1)^0.5 := i
  28. (-1)^(1/2) := i
  29. e^(pi*i)  :=  -1
  30. e^(i*pi)  :=  -1
  31. e^inf := inf
  32. e^(-inf) := 0
  33. pi^inf := inf
  34. inf^inf := inf
  35. inf^(-inf) := 0
  36. i^(-1) := -i
  37. i^(-2) := -1
  38. i^2 := -1
  39. i^3 := -i
  40. i^4 := 1
  41. i^5 := i
  42.  
  43. degree := pi/180
  44. output := math
  45.