home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0020 - 0029 / ibm0020-0029 / ibm0028.tar / ibm0028 / MCAD254.ZIP / CONFORM.MCD < prev    next >
Encoding:
Text File  |  1989-06-21  |  1.1 KB  |  52 lines
  1. .MCD 25000 0
  2. .CMD SURFACEFORMAT rot=10 tilt=35 vScale=20 size=15,30
  3. .CMD SKETCHFORMAT mag=1.000000,1.000000 center=0.500000,0.500000 size=15,30 box=y
  4. .CMD PLOTFORMAT logs=0,0 subdivs=1,1 size=5,15 type=l
  5. .CMD FORMAT  rd=d ct=10 im=i et=3 zt=15 pr=3 mass length time charge
  6. .CMD SET ORIGIN 0
  7. .CMD SET TOL 0.001000
  8. .CMD MARGIN 0
  9. .CMD LINELENGTH 78
  10. .CMD SET PRNCOLWIDTH 8
  11. .CMD SET PRNPRECISION 4
  12. .TXT 1 2 2 48 
  13. a2,47,45,88
  14. Conformal Mapping by a Linear Transformation: 
  15.    First, define a "box" in the z-plane:
  16. .EQN 3 3 2 9 
  17. z[0:0
  18. .EQN 0 11 2 10 
  19. z[1:.4
  20. .EQN 0 13 2 16 
  21. z[2:.4+.4i
  22. .EQN 0 16 2 11 
  23. z[3:.4i
  24. .EQN 0 12 2 9 
  25. z[4:0
  26. .EQN 3 -53 1 12 
  27. j:0;4
  28. .EQN 0 26 8 24 
  29. 1&-1&Im(z[j){1,1,6,15,l}@1&-1&Re(z[j)
  30. .TXT 1 26 3 12 
  31. a3,12,10,31
  32. Plot the 
  33. box in the 
  34. z-plane.
  35. .TXT 1 -56 1 28 
  36. a1,28,26,27
  37. Define the transformation:
  38. .EQN 2 4 4 11 
  39. α:e^.7i/.8
  40. .EQN 2 13 1 9 
  41. ß:.5
  42. .EQN 3 -13 2 16 
  43. w[j:α*z[j+ß
  44. .EQN 0 26 8 24 
  45. 1&-1&Im(w[j){1,1,6,15,l}@1&-1&Re(w[j)
  46. .TXT 1 26 4 15 
  47. a4,15,13,45
  48. Plot the 
  49. image of the 
  50. box in the 
  51. w-plane.
  52.