#!/usr/bin/tclsh

source handson4.sourceme.tcl

if {$argc < 3} {
   puts "Please execute this script with the following arguments:"
   puts "$argv0 N masseven massodd"
   exit
}

set N [expr int([lindex $argv 0])]
set masseven [expr double([lindex $argv 1])]
set massodd [expr double([lindex $argv 2])]

set mysystem [myLatticeGen $N $masseven $massodd]
set com [myCOMcalc [lindex $mysystem 0] [lindex $mysystem 1] [lindex $mysystem 2]]
puts $com