TABLE OF CONTENTS
::pwtk::pwi::fixAtomsLast
SYNOPSIS
proc ::pwtk::pwi::fixAtomsLast {natoms {fixString "0 0 0"}} {
PURPOSE
Fix the last $natoms atoms by setting if_pos(:) flags to $fixString (default = {0 0 0}).
ARGUMENTS
- natoms -- number of atoms to fix as specified by $fixString
- fixString -- list of 3 if_pos(:) values (optional, default = {0 0 0})
SOURCE
set nat [::pwtk::pwi::getNAtoms] ::pwtk::pwi::fixAtomsRange $nat-$natoms+1 $nat $fixString }