346.jps

%% gh

%% Un circuit mystère


%% échelle et étendue de l'image

25 setxunit
-3 7 setxrange 
0 6 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
/loadnodedict true def
1.5 setlinewidth
/logicUnit .25 def

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

%% Les portes

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

(A) node %% déclaration du noeud 

0 5 (NAND) ccpict 

(B) node %% déclaration du noeud 

0 3 (NAND) ccpict 

(C) node %% declaration du noeud

0 1 (NAND) ccpict 

(D) node
2.5 2 (XOR) ccpict

(E) node
5 3.5 (XOR) ccpict

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

%% Les points

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

/R {Ain1 exch pop -2 exch} def % le point d'abscisse -2 à la

                                  % hauteur de l'entrée 1 de A

/A1 {Ain1 R milieu} def
/S {Bin1 exch pop -2 exch} def
/T {Cin1 exch pop -2 exch} def
/C1 {Cin0 exch pop -2 exch Cin0 milieu} def

<latex>
$a$
</latex>
R [1.5 dup] cltexlabel

<latex>
$b$
</latex>
S [1.5 dup] cltexlabel

<latex>
$c$
</latex>
T [1.5 dup] cltexlabel

<latex>
$S$
</latex>
Eout [1.5 dup] crtexlabel


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

%% Les liaisons

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

Bin1 Ain0 (*-) line
Cin1 Bin0 (*-) line
A1 C1 (*-) line
R Ain1 (-) line
S Bin1 (-) line
T Cin1 (-) line
C1 Cin0 (-) line

Cout Din0 (-) pcline
Bout Din1 (-) pcline
Dout Ein0 (-) pcline
Aout Ein1 (-) pcline