Program ex3_10  (input,output);

Const
   %include 'ilap:nmos.consts'

Type
   %include 'ilap:nmos.types'

Var
   Phi1y, Phi2y : Integer;
   Pin, Pout    : Array [1..10] Of Integer;

%include 'ilap:nmos.specs'

Begin
   Initialise ('platest');

   Tpla ('pla', 'pla', Phi1y, Phi2y, Pin, Pout);

   Finish;
End.