TABLE OF CONTENTS
::pwtk::pwi::deleteAtomsRange
SYNOPSIS
proc ::pwtk::pwi::deleteAtomsRange {from to} {
PURPOSE
Delete atoms from ATOMIC_POSITIONS card starting from atom $from to atom $to.
ARGUMENTS
- from,to -- specify the [from,to] range of atoms to delete
SOURCE
if { $from == "begin" } { set from 1 } if { $to == "end" } { set to [getNAtoms] } ::pwtk::pwi::deleteAtoms [::tclu::seq $from $to] ::pwtk::pwi::setNAtoms }