Searched refs:NAT3 (Results 1 - 1 of 1) sorted by relevance
| /haiku-buildtools/gcc/gcc/testsuite/gfortran.dg/g77/ |
| H A D | 20010519-1.f | 4 SUBROUTINE NMDIMB(X,Y,Z,NAT3,BNBND,BIMAG,LNOMA,AMASS,DDS,DDSCR,
663 INTEGER NAT3,NADD,NPAR,NFREG,NFRET,BLATOM local in subroutine:NMDIMB
670 REAL(KIND=8) DDV(NAT3,*),PARDDV(PARDIM,*),DDM(*),DDS(*)
706 NATOM=NAT3/3
752 CALL ENERGY(X,Y,Z,DX,DY,DZ,BNBND,BIMAG,NAT3,DD1CMP,.TRUE.,1)
770 CALL TRROT(X,Y,Z,DDV,NAT3,1,DDM)
771 CALL CPARAY(HEAP(TRAROT),DDV,NAT3,1,6,1)
775 CALL ORTHNM(1,6,NTR,HEAP(TRAROT),NAT3,.FALSE.,TOLER)
819 CALL ADJNME(DDV,PARDDV,NAT3,NDIM,NFRE,NFRET,IS1,IS2)
849 CALL ORTHNM(1,NFRET,NFRET,DDV,NAT3,LPUR
[all...] |
Completed in 34 milliseconds