% `mosfet+.m4'
.PS
cct_init

define(`demo_mosfet',
  `$1(`$2',`$3',`$4',`$5',`$6')
  "\sl S" below at last [].S
  "\sl B" ljust at last [].B
  "{\sl G}sp_" rjust at last [].G
  "\sl D" above at last [].D ')

up_
{[demo_mosfet(`mosfet',,,,B,)]
`"{\tt mosfet(,,,B,)}"' at last [].s+(0,-0.2) below}

{move right_ 1.5; up_
[demo_mosfet(`mosfet',,,,DB,)]
`"{\tt mosfet(,,,DB)}"' at last [].s+(0,-0.2) below}

.PE