home *** CD-ROM | disk | FTP | other *** search
/ PC Open 13 / pcopen13.iso / Zip / SM34A.ZIP / DSOLVE.SM < prev    next >
Encoding:
Text File  |  1993-11-12  |  670 b   |  23 lines
  1. #    This is demo of solving differential equations by dsolve() or inte()
  2.  
  3. #output:=basic
  4. expand:=on
  5.  
  6. dsolve(y'(x) = sin(x), y(x),x)
  7. dsolve(y'(x) = x/(2+y(x)), y(x),x)
  8. dsolve(y'(x) = x*exp(y(x)), y(x),x)
  9. dsolve(y'(x) = y(x)^2+5*y(x)+6, y(x),x)
  10. dsolve(y'(x) = y(x)/x, y(x),x)
  11. dsolve(y'(x) = x*y(x)+1, y(x),x)
  12. dsolve(y'(x) = x + y(x), y(x),x)
  13.  
  14. # example 11
  15. inte(y'(x)*(1+1/y(x)) = -1, x)            # solve eq by inte()
  16. dsolve(y'(x) = -y(x)/(y(x)+1), y(x),x)        # solve eq by dsolve()
  17.  
  18. # example 12
  19. dsolve(y'(x) = sqrt(y(x)), y(x),x)
  20. #y'(x) = sqrt(y(x))        
  21. #last/sqrt(y(x))        # move sqrt(y(x)) to right side of =
  22. #inte(last,x)            # solve y'(x)/sqrt(y(x))=1 by inte()
  23.