H A D | hecht.f | 396 nbs = nbs +1 509 integer nbs,c(2,nbs),nu(6,nbs+nbs-2),tete,s local 538 integer nbs,c(1:2,1:nbs),tri(1:nbs),nu(1:nbs),iop,err local 686 integer nbs,c(2,nbs),nu(6,nbs+nbs-2),pfold,iop,err local 772 integer nbs,c(2,nbs),nu(6,2*nbs-2),tri(nbs),tete,iop local 782 nu(1,nbs+nbs-2)=0 871 integer nbs,c(2,nbs),nu(6,nbs+nbs-2),t,a,iop,err local 992 integer nbs,c(2,nbs),nu(6,nbs+nbs-2),reft(2*(nbs-1)) local 1004 nbt = nbs+nbs-2 1278 integer nbs,c(2,nbs),nu(6,nbs+nbs-2),it,is1,s2,err,it1,ita,iop local [all …]
|