1 2 3 4 5 6 7 8 9 10 11 12 13 |
integer nlegborn,nlegreal
parameter (nlegborn= 5 )
parameter (nlegreal=nlegborn+1)
integer ndiminteg
parameter (ndiminteg=(nlegreal-2)*3-4+2-1)
integer maxprocborn,maxprocreal
parameter (maxprocborn=999,maxprocreal=999)
integer maxalr
parameter (maxalr=maxprocreal*nlegreal*(nlegreal-1)/2)
|