TABLE OF CONTENTS


::pwtk::latvec3Dto2D

SYNOPSIS

proc ::pwtk::latvec3Dto2D {m} {

PURPOSE

Transform 3D Bravais lattice vectors into 2D vectors, i.e.:

     { {x1 y1 z1} {x2 y2 z2} {x3 y3 z3} }

is transformed to

     { {x1 y1} {x2 y2} }

ARGUMENTS

SOURCE

    lassign $m v1 v2
    return [list [lrange $v1 0 1] [lrange $v2 0 1]]
}