home *** CD-ROM | disk | FTP | other *** search
/ TopWare 18: Liquid / Image.iso / liquid / top1184 / gepackt.exe / ELEC4.PLT < prev    next >
Encoding:
Text File  |  1994-02-22  |  336 b   |  19 lines
  1. # elec4.plt - phase frequency response
  2.  
  3. paper size 11 by 8.5
  4. y lin
  5. x log
  6. grid
  7. map x 1.1 90000.0
  8. draw x y
  9. frame
  10. title "Phase Frequency Response"
  11. xlabel "jw (radians)"
  12. ylabel "Phase of A(jw) (degrees)"
  13. p1 = 10
  14. p2 = 10000
  15. A(jw) = ({0,1}*jw/({0,1}*jw+p1)) * (1/(1+{0,1}*jw/p2))
  16. dummy jw
  17. color lred
  18. plot 180/pi*arg(A(jw))
  19.