Lines Matching refs:nshl
23 dimension global(nshg,n), rlocal(npro,nshl,n),
24 & ien(npro,nshl), ientmp(npro,nshl)
45 do i = 1, nshl
54 gbytes = gbytes + n*nshl*npro
68 do i = 1, nshl
79 sbytes = sbytes + n*nshl*npro
80 flops = flops + n*nshl*npro
94 do i = 1, nshl
137 & ien(npro,nshl)
356 dimension global(nshg,n), rlocal(npro,nshl,n),
357 & ien(npro,nshl), ientmp(npro,nshl),
371 do i = 1, nshl
378 do i = 1, nshl
412 & ien(npro,nshl), ientmp(npro,nshl)
446 gbytes = gbytes + n*nshl*npro