#!/usr/bin/perl -I/nwprod/lib/incmod/perl

# $Id: smoke_sub_fuelload_baseclass.pl,v 1.2 2004/02/17 22:53:27 smo Exp $

#------------------------------------------------------------------------------
# Filename:  sub_fuelload_baseclass.pl
#
# Purpose:  Parent class for the fuelload data source.
#
# By:  smo 12/17/2003
#
#  USDA Forest Service - Pacific Northwest Wildland Fire Labratory
#  Copyright (C) 2003-2004
#------------------------------------------------------------------------------

package Fuelload_Class;

use Text::CSV_XS;
use IO::File;

$cwd = `pwd`;
# $cwd = system(pwd);
print ("luke- in smoke_sub_fuelload_baseclass.pl the cwd is $cwd \n");

sub new
{
    my $class = shift;
    my $self = { };
    bless($self, $class);
    return $self;
};

sub run_model
{
    # virtual placeholder for method implemented in child classes
    die("Fuelload_Class baseclass run_model called");
};

sub is_valid_state
{
    # virtual placeholder for method implemented in child classes
    die("Fuelload_Class baseclass is_valid_state called");
};

return 1;