home *** CD-ROM | disk | FTP | other *** search
/ Computer Shopper 180 / dpcs0203b.iso / editorial / easypc / Easy-Spice / data1.cab / Examples / General / MOV.spi < prev    next >
Encoding:
Text File  |  2002-07-08  |  899 b   |  28 lines
  1. .SUBCKT V120ZA1 1 2 PARAMS: TOL=0
  2. X1    1 2    MOV PARAMS: T={1+TOL/100} L=12nH C=300pF a1=136.1 a2=5.556 a3=-5.075e-6 a4=1.374E-3 a5=11.02
  3. .ENDS
  4. *
  5. .SUBCKT MOV  1 2 PARAMS: T=1 C=1pF L=1nH a1=1 a2=0 a3=0 a4=0 a5=0 a6=100u a7=100u
  6. E_non_lin    3 1     VALUE {T*(
  7. +             a1+a2*(log10(limit(v(4),a7,1g))-3)
  8. +            +a3/limit(v(4)*.001,a7/1e3,1g)
  9. +            +a4*exp(-log10(limit(v(4),a7,1g))+3)
  10. +             +a5*exp(log10(limit(v(4),a7,1g))-3)
  11. +             -(a1+a2*(log10(-limit(v(4),-1g,-a7))-3)
  12. +            -a3/limit(v(4)*.001,-1g,-a7/1e3)
  13. +            +a4*exp(-log10(-limit(v(4),-1g,-a7))+3)
  14. +             +a5*exp(log10(-limit(v(4),-1g,-a7))-3))
  15. +             +limit(v(4)/a7*v(8),-v(8),v(8)))}
  16. L_series    5 6  {L}  
  17. H_H1        4 0  VH_H1 1k
  18. VH_H1        5 7 0V
  19. R_R2        0 4  1G  
  20. R_series    6 2  {a6}  
  21. V_V1        3 7  0V
  22. E_x_zero    8 0     VALUE {a1+a2*(log10(a7/1e3))+a3/(a7/1e3)
  23. +            +a4*exp(-log10(a7/1e3))+a5*exp(log10(a7/1e3))}
  24. R_x_zero    8 0  1G
  25. C_parallel    1 5 {C}
  26. .ENDS
  27. *
  28.