Searched refs:iFac1 (Results 1 – 2 of 2) sorted by relevance
/dports/science/libgridxc/libgridxc-libgridxc-0.9.6/src/ |
H A D | mesh3d.F90 | 1890 integer :: fac(maxFac), i2, i3, i5, iFac1, iFac2, iRem, & local 1949 do iFac1 = 1,nFac 1950 nod1 = fac(iFac1)
|
/dports/science/siesta/siesta-4.1.5/Src/SiestaXC/ |
H A D | mesh3d.F90 | 1889 integer :: fac(maxFac), i2, i3, i5, iFac1, iFac2, iRem, & local 1948 do iFac1 = 1,nFac 1949 nod1 = fac(iFac1)
|