Searched refs:nbas_lu (Results 1 – 1 of 1) sorted by relevance
1414 integer :: nbas_lu(nsym) local1426 call izero(nbas_lu,nsym)1433 read(lu,*) (nbas_lu(i),i=1, nsym_lu)1448 nao_tot = nao_tot + nbas_lu(i)