Navigation alternative
Figures / Images
BBgraf
MetaPost
PSTricks
Format SVG
Asymptote
EPiX
Gnuplot
TeXGraph
Librairie GD
PostScript
SWFtools
Calculs
BC
Giac / Xcas
Maxima
Pari / GP
Scilab
Scripts p*
Documents
TeX au collège
TeX png
Lua(La)TeX
Cours etc.
Contributions
Le cours d'Ismaël
Astronomie
Bases
Base Brevet
Base Collège
Base Graphisme
Base Ipe
Base JPS (BBgraf)
Base MetaPost
Base PSTricks
Dépôt Git
Fichier JPS
Accueil
Présentation
Exemples
Papiers
Banque d'images
Albums et animations
Formulaires
Célébrités
Postscript
Chimie
Documentation
Sources et téléchargement
Édition du fichier circuit_05.jps
Retour
%% source : reds.eivd.ch/download/manuels/ElecNum_T1_v10.pdf uselogic autocrop -5 7 setxrange -5 6 setxrange 30 setxunit /logicUnit .25 def /loadnodedict true def /logicNInput 3 def (A) node %% declaration du noeud A 3 2 (OR) ccpict %% cellule NOR en (0,1) (cc => plein centre) /logicWireLength .75 def (B) node Ain1 1.5 add () (AND) clpict (C) node Ain1 () (AND) clpict (D) node /logicNInput 3 def Ain1 1.5 sub () (AND) clpict [Bout Ain2] ligne [Dout Ain0] ligne /logicWireLength .25 def /logicUnit .2 def (E) node Cin0 () (INV) clpict (F) node Din2 (hadjust 5) (INV) clpict /A {Bin1 exch pop -3.2 exch} def /B {Cin1 exch pop -3.2 exch} def /C {Cin0 exch pop -3.2 exch} def [A Bin1] ligne [B Cin1] ligne [C Ein] ligne [Fout Din2] ligne /angleA 180 def /angleB 90 def Bin0 Ein (-*) pcangle /angleB -90 def Fin A .5 0 addv (-*) pcangle Din0 C .7 0 addv (-*) pcangle Din1 B 1 0 addv (-*) pcangle setTimesItalic (A) A cltext (B) B cltext (C) C cltext (AC) Bout ultext #tex# $B\overline C$ Cout ultexlabel #tex# $\overline ABC$ Dout (3 0) ultexlabel #tex# $Y = AC \, \# \, B\overline C \, \# \, \overline ABC$ Aout (-10 0) ubtexlabel
Tapez les 3 lettres : AWE