#!/usr/bin/perl
#
# $Author: mm238 $ $Revision: 1.1 $ $Date: 2003/09/05 10:23:02 $
#
# Copyright (C) 2002 MRC and Martin Madera
#
# This program may be freely redistributed and/or modified 
# under the terms of the GNU General Public License as published
# by the Free Software Foundation; either version 2 of the 
# License, or (at your option) any later version.
#
#use lib "$ENV{HOME}/scripts/mm238/lib"; # insert your lib directory
use HiddenMarkovModel_mw;
use strict;

my $usage = "Usage: model_convert.pl <input file> <output file> <global>\n";
my ($infile, $outfile, $global) = @ARGV;
my $model;

die "$usage\n" unless @ARGV>=3;


$model = HiddenMarkovModel->clever_read($infile, $global);
$model->clever_write($outfile, $global);
