629.jps

629.jps [ retouréditionsource ]

Conversion au format PDF de 629.jps

%% gh

%% Un circuit logique cablant un demi-addtionneur


%% échelle et étendue de l'image

60 setxunit
-2.5 1.5 setxrange 
0 4 setyrange 
% quadrillage


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

%% 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 3 (AND) ccpict 

(B) node %% declaration du noeud

0 1 (XOR) ccpict 

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

%% Les points

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

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

                                  % hauteur de l'entrée 1 de A

/q {Bin1 exch pop -2 exch} def
/p1 {p Ain1 milieu} def
/q1 {Bin0 exch pop -1.5 exch} def

<latex>
$p$
</latex>
p [1.5 dup] cltexlabel

<latex>
$q$
</latex>
q [1.5 dup] cltexlabel

<latex>
$r$
</latex>
Aout [1.5 dup] crtexlabel

<latex>
$a$
</latex>
Bout [1.5 dup] crtexlabel



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

%% Les liaisons

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

p Ain1 (-) line
q Bin1 (-) line
Ain0 Bin1 (-*) line
p1 q1 (*-) line
q1 Bin0 (-) line