Source PostScript (addc.pps)

%% addition de 2 complexes
%% syntaxe : a b a' b' addc --> z + z'
/addc {
4 dict begin
   /b' exch def
   /a' exch def
   /b exch def
   /a exch def
   a a' add
   b b' add
end
} def