* fourier: the .control-mode form of .four (compute after a run)
Vs in 0 SIN(0 1 1k)
R1 in a 50
D1 a out DMOD
Rout out 0 1k
.model DMOD D(IS=1e-14 N=1)
.tran 2u 20m
.control
  run
  fourier 1k v(out)      $ same result as the .four card, but on demand
.endc
.end