//  DEV MODEL
//
//  FILE NAME   : dev.C
//  MODULE TYPE : Dev Class
//  STATUS      : In development 
//  PURPOSE     : Visual depth analisys
//  
//  Instituto Tecnologico Autonomo de Mexico 
//  (c) Copyright 1996
//

#include "nsl_include.h"
#include "dev.h"

Dev::Dev(char *str, NslModule* parent,int sizeX,int sizeY) : 
	NslModule(str, parent), 
	s("s",this,sizeX,sizeY),   
	mp("mp",this,sizeX,sizeY), 
	mf("mf",this,sizeX,sizeY),
	up("up",this,sizeY), 
	uf("uf",this,sizeY), 
	w("w",this,5), 
	tm("tm",this),
	tu("tu",this),
	kmu("kmu",this),
	kum("kum",this),
	hm("hm",this),
	hu("hu",this),
	ks("ks",this),
	k("k",this)
{
}
	
void Dev::initRun()
{
	mp = 0;
	mf = 0;
	up = 0;
	uf = 0;
}

void Dev::simRun()
{
	nslDiff(mp,tm, -mp + w*mf - kum*nslExpandRows(uf,mp.getRows()) + ks*s + hm);
	mf = NSLstep(mp,k);

	nslDiff(up,tu, -up + kmu*nslReduceRows(mf) + hu); 
	uf = NSLramp(up);
}

DevModel::DevModel() : NslModel("DevModel"),
	dev("dev",this,10,8)
{
}

AslSchemaModel<DevModel> _DevModel("DevModel");