rsesgeneticreducer.cpp

粗糙集应用软件

//-------------------------------------------------------------------
// Author........: Aleksander 豩rn
// Date..........: 960307
// Description...:
// Revisions.....:
//===================================================================

#include <stdafx.h> // Precompiled headers.
#include <copyright.h>

#include <kernel/rses/algorithms/rsesgeneticreducer.h>

#include <kernel/algorithms/keyword.h>

#include <kernel/rses/library/trr_calc.h>
#include <kernel/rses/library/tdtable.h>
#include <kernel/rses/library/err.h>

/*
#include <kernel/rses/library/popula.h> // "Old" RSES GA.
#include <kernel/rses/library/mtable.h> // "Old" RSES GA.
*/

#include <kernel/basic/message.h>

//-------------------------------------------------------------------
// RNG used by RSES for GA sampling.
//===================================================================

extern int RANDOM(int);

//-------------------------------------------------------------------
// Methods for class RSESGeneticReducer.
//===================================================================

//-------------------------------------------------------------------
// Constructors/destructor.
//===================================================================

//-------------------------------------------------------------------
// Method........: Constructor
// Author........: Aleksander 豩rn
// Date..........:
// Description...:
// Comments......: Set default values.
// Revisions.....:
//===================================================================

RSESGeneticReducer::RSESGeneticReducer() {
	seed_       = 12345;
	no_reducts_ = 50;
	speed_      = SPEED_NORMAL;
}

//-------------------------------------------------------------------
// Method........: Destructor
// Author........: Aleksander 豩rn
// Date..........: 960628
// Description...:
// Comments......:
// Revisions.....:
//===================================================================

RSESGeneticReducer::~RSESGeneticReducer(){
}

//-------------------------------------------------------------------
// Methods inherited from Identifier.
//===================================================================

IMPLEMENTIDMETHODS(RSESGeneticReducer, RSESGENETICREDUCER, RSESStaticReducer)

//-------------------------------------------------------------------
// Methods inherited from Algorithm.
//===================================================================

//-------------------------------------------------------------------
// Method........: GetParameters
// Author........: Aleksander 豩rn
// Date..........:
// Description...:
// Comments......:
// Revisions.....:
//===================================================================

String
RSESGeneticReducer::GetParameters() const {

	String parameters;

	// Stuff higher up.
	parameters += RSESStaticReducer::GetParameters();

	parameters += Keyword::Separator();

	// Number.
	parameters += Keyword::Number();
	parameters += Keyword::Assignment();
	parameters += String::Format(GetNoReducts());

	parameters += Keyword::Separator();

	// Speed.
	parameters += Keyword::Speed();
	parameters += Keyword::Assignment();
	parameters += GetString(GetSpeed());

	parameters += Keyword::Separator();

	// Seed.
	parameters += Keyword::Seed();
	parameters += Keyword::Assignment();
	parameters += String::Format(GetSeed());

	return parameters;

}

//-------------------------------------------------------------------
// Method........: SetParameter
// Author........: Aleksander 豩rn
// Date..........:
// Description...:
// Comments......:
// Revisions.....:
//===================================================================

bool
RSESGeneticReducer::SetParameter(const String &keyword, const String &value) {

	// Number.
	if (keyword == Keyword::Number() && value.IsInteger())
		return SetNoReducts(value.GetInteger());

	// Speed.
	if (keyword == Keyword::Speed()) {
		if (value == GetString(SPEED_SLOW))
			return SetSpeed(SPEED_SLOW);
		if (value == GetString(SPEED_NORMAL))
			return SetSpeed(SPEED_NORMAL);
		if (value == GetString(SPEED_FAST))
			return SetSpeed(SPEED_FAST);
		return false;
	}

	// Seed.
	if (keyword == Keyword::Seed() && value.IsInteger())
		return SetSeed(value.GetInteger());

	return RSESStaticReducer::SetParameter(keyword, value);

}

//-------------------------------------------------------------------
// Methods inherited from RSESStaticReducer.
//===================================================================

//-------------------------------------------------------------------
// Method........: SetRSESParameters
// Author........: Aleksander 豩rn
// Date..........:
// Description...:
// Comments......:
// Revisions.....: A