c begin include file pntype.inc c + + + PARAMETER DECLARATIONS + + + integer ntype,ntype2 parameter (ntype=30) parameter (ntype2=10) c + + + PARAMETER DEFINITIONS + + + c ntype : number of elements c ntype2 : c end include file pntype.inc