Source PostScript (nullc.pps)

Retour Texte non formaté 

%% syntaxe : z nullc --> true si z = 0, false sinon
/nullc {
2 dict begin
   /b exch def
   /a exch def
   a 0 eq 
      {b 0 eq}
      {false}
   ifelse
end
} def