Source
%% gh
%% Un circuit mystère

%% échelle et étendue de l'image
25 setxunit
-4 7 setxrange
1 4 setyrange

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% définitions des couleurs
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

/coul0 {0 0 0 0.5 setcmykcolor} def %gris
/coul1 {noir} def
/coul2 {orange} def
/coul3 {rouge} def
/coul4 {bleu} def

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% Bibliothèque logic
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
uselogic
1.5 setlinewidth
/logicUnit .25 def

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%% Les portes
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%% gh
%% Un circuit logique pour afficher 4
%% P = \overline{a} + \overlin{(b \oplus c)}

%% échelle et étendue de l'image
60 setxunit
-5 6 setxrange
1 4 setyrange

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% définitions des couleurs
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

/coul0 {0 0 0 0.5 setcmykcolor} def %gris
/coul1 {noir} def
/coul2 {orange} def
/coul3 {rouge} def
/coul4 {bleu} def

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% Bibliothèque logic
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
uselogic
1.5 setlinewidth
/logicUnit .15 def

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% Les portes
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
(E) node %% declaration du noeud de sortie
5 3 (AND) ccpict

(D) node
Ein1 -1 0 addv (OR) ccpict

(C) node
Din1 -1 0 addv (AND) ccpict

/posA {Cin0 exch pop -0.5 exch} def % hauteur entrée 0 de C
(A) node
posA (INV) ccpict

(B) node
-0.5 2 (OR) ccpict

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% Les points
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
/A1 {Cin1 exch pop -2 exch} def
/A2 {Ain exch pop -2 exch} def
/A3 {Bin0 exch pop -2 exch} def

<latex>
$x$
</latex>
A1 [1.5 dup] cltexlabel

<latex>
$y$
</latex>
A2 [1.5 dup] cltexlabel

<latex>
$z$
</latex>
A3 [1.5 dup] cltexlabel

<latex>
$f(x,y,z)$
</latex>
Eout [1.5 dup] crtexlabel

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% Les liaisons
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Dout Ein1 (-) line
Cout Din1 (-) line
Aout Cin0 (-) line
Cin1 A1 (-) line
Ain A2 (-) line
Bin0 A3 (-) line
[Bin1 Ain -0.1 0 addv] (*-*) ligne
/angleA -90 def %% dessin du pont
/armA 30 def
Bin0 Ein0 (*-*)pcbar

/angleA 0 def %% dessin du pont
/armA 0.1 def
Bout Din0 (-*)pcbar