#!/bin/bash

BaseDir=$HOME/bin/Perl/WIEN2k

if [ "$1" == "" ]; then
	echo 'usage: perl WIEN2k.pl --Action=MakeStruct File_Name'
	exit;
fi

perl $BaseDir/WIEN2k.pl --Action=MakeStruct $@

sgroup -wi $2 | tee $2.out
mv $2 $2.original
sgroup -wi -wo $2.original $2
instgen