Searched refs:nshell_tot (Results 1 – 4 of 4) sorted by relevance
2363 nshell_tot local2376 nshell_tot = 02406 nshell_tot = nshell_tot + natom2427 IF (iw > 0) WRITE (iw, *) "Total number of particles with a shell :: ", nshell_tot2432 IF (nshell_tot > 0) THEN2436 CALL allocate_particle_set(shell_particle_set, nshell_tot)2437 CALL allocate_particle_set(core_particle_set, nshell_tot)2461 CPASSERT(counter == nshell_tot)2470 IF (nshell_tot > 0) THEN2533 CPASSERT(first_shell - 1 == nshell_tot)[all …]
32 nshell_tot:: total number of shells (in the normal sense).