integer idim,nsmx,maxsp,npar,nfar,maxtb,npcmx,nvmx parameter (idim=@nreactions@,nsmx=@nspecies@,maxsp=6,npar=3) parameter (nfar=8) parameter (maxtb=10) parameter (npcmx=1) ! max no. of terms in pol.chaos expan. (P) parameter (nvmx=nsmx+3)