File: 6-7-2.m4

package info (click to toggle)
texlive-doc 2009-2
  • links: PTS
  • area: main
  • in suites: squeeze
  • size: 192,004 kB
  • ctags: 4,774
  • sloc: perl: 12,760; xml: 11,870; makefile: 1,033; lisp: 394; sh: 229; awk: 205; java: 159; sed: 4
file content (22 lines) | stat: -rw-r--r-- 499 bytes parent folder | download | duplicates (11)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
\documentclass{ppex}
\nonstopmode

\pagestyle{empty}
\setlength\textwidth{111.0pt}
\begin{document}
\ResetPreambleCommands
\ReadyForTheFray

.PS
cct_init
linethick=1.6
define(`dimen_',0.6)
loopwid = 0.9; loopht = 0.7
  source(left_ loopwid,AC); llabel(,V_{ac},)
  resistor(up_ loopht,5); llabel(,R,)
  inductor(right_ loopwid,W); rlabel(,L,); llabel(,iL\omega,)
  capacitor(down_ loopht,); llabel(,C,)
                    rlabel(,\displaystyle\frac{1}{iC\omega},)
.PE
\usebox{\graph}
\end{document}