!****************************************************************************** ! specs in same order as in perqimports file %routine %spec subc (%integer x, y) %routine %spec dm (%integer x,y) %routine %spec pm (%integer x,y) %routine %spec pdms (%integer x, y) %routine %spec pdmn (%integer x, y) %routine %spec pdmw (%integer x, y) %routine %spec pdme (%integer x, y) %routine %spec pdbns (%integer x, y) %routine %spec pdbew (%integer x, y) %routine %spec pdcn (%integer x, y) %routine %spec pdcs (%integer x, y) %routine %spec pdce (%integer x, y) %routine %spec pdcw (%integer x, y) %routine %spec pdbn (%integer x, y) %routine %spec pdbs (%integer x, y) %routine %spec pdbe (%integer x, y) %routine %spec pdbw (%integer x, y) !****************************************************************************** %constant %string (2) blue ="M", metal ="M", nm="M" %constant %string (2) green ="D", diffusion="D", nd="D" %constant %string (2) red ="P", poly ="P", np="P" %constant %string (2) implant ="I", ni="I" %constant %string (2) glass ="G", ng="G" %constant %string (2) contact ="C", nc="C" %constant %string (2) buried ="B", nb="B" %external %routine %spec box %alias "ILAPBOX" (%integer xl, yl, xu, yu) %external %routine %spec layer (%string (4) colour) %external %string (4) %function %spec clayer !*******************************************************************************