package Molecule;
use Crystal::MoleculeObject;
@ISA = qw(MoleculeObject);

#公開したいサブルーチン
@EXPORT = qw();

use strict;

BEGIN {
}

sub new
{
	my ($module) = @_;
	my $this = {};
	bless $this;
	$this->Initialize();
	return $this;
}

sub DESTROY
{
	my $this = shift;
}

sub SetOutputMode { my ($this, $mode) = @_; return $this->{OutputMode} = $mode; }
sub OutputMode    { my ($this) = @_; return $this->{OutputMode}; }

1;