home *** CD-ROM | disk | FTP | other *** search
- .param eff=0.8
-
- .subckt powerconv VOUTP VOUTN VINP VINN VCP VCN params: eff=0.9
- BIin1 VINP VINN I=-V(VOUTP,VOUTN)/V(VINP,VINN)*I(VOUT1)/eff
- VOUT1 BMULT1_N VOUTN 0
- BMULT1 VOUTP BMULT1_N V=V(VINP,VINN)*V(VCP,VCN)
- R1 VCP VCN 1meg
- .ends
-
- .subckt loadcycle n1 n2
- i1 n1 n2 pwl(
- + 0 0.2
- + 25m 0.2
- + 26m 0.8
- + 37.5m 0.8
- + 38.5m 0.7
- + 75m 0.7
- + 76m 0.25)
- .ends
-
- .model IDEAL D (IS=1p)
-