.subckt TRANSFORMER in1 in2 out1 out2 Lin=100 Lout=100 R1=1m R2=1m
* in1 .---x  x---. out1
*         )||(
*         )||(
* in2 .---x  x---. out2

* Inductances
Lin in1 intin {Lin}
Lout out1 intout {Lout}

* Resistances
R1 intin in2 {R1}
R2 intout out2 {R2}

* Coupled Factor
K1 Lin Lout 1

.ends TRANSFORMER

.subckt RECTIFIER ac1 ac2 out gnd
D1 ac1 out DI_ABS10A
D2 ac2 out DI_ABS10A
D3 gnd ac2 DI_ABS10A
D4 gnd ac1 DI_ABS10A
.MODEL DI_ABS10A D  ( IS=3.47n RS=42.6m BV=1000 IBV=5.00u
+ CJO=25.2p  M=0.333 N=1.70 TT=4.32u )
.ends RECTIFIER