%% gh
%% Les portes logiques

%% échelle et étendue de l'image
60 setxunit
autocrop

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% 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


%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% Les portes
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
5 setlinewidth
setPalatino

coul2
(buf) node
2 4 [.4 dup] (BUF) ccpict
% /in1 pictget circ %% une borne a l’entree 1 (en utilisant 
% (relais) bufccpictpoint cctext

coul1
(and) node
2 3 [.4 dup] (AND) ccpict
(or) node
2 2 [.4 dup] (OR) ccpict
(xor) node
2 1 [.4 dup] (XOR) ccpict


5 4 [.4 dup] (INV) ccpict
5 3 [.4 dup] (NAND) ccpict
5 2 [.4 dup] (NOR) ccpict

coul2
5 1 [.4 dup] (NXOR) ccpict