public void HandleEventNewMember(View.Console view, Model.MemberRegister register)
{
view.ShowInputInfo(View.Console.MenuEvent.AddNewMember, null);
Model.Member m = new Model.Member(register.GetNextMemberId());
try
{
m.Name = view.InputMemberName();
}
catch (ArgumentException)
{
view.ShowErrorMessage(View.Console.Error.InvalidMemberName, null);
view.Wait();
return;
}
try { m.PersonalNumber = view.InputMemberPersonalNumber(); }
catch (ArgumentException)
{
view.ShowErrorMessage(View.Console.Error.InvalidPersonalNumber, null);
view.Wait();
return;
}
register.AddMember(m);
register.Save();
}
public void SynchronizeModel(Model model)
{
if (_model == null)
{
_model = model;
_model.Save(_modelPath);
return;
}
var newModelHash = model.GetHashCode();
var oldModelHash = _model.GetHashCode();
if (newModelHash == oldModelHash) return;
model.CopyFrom(_model);
_model = model;
_model.Save(_modelPath);
}
public OperationResult Register(People person, Model.BusinessEntities.Certificate cert)
{
try
{
using (Model.EDEntities db = new Model.EDEntities())
{
using (TransactionScope scope = new TransactionScope())
{
person.Save(db);
cert.Save(db);
scope.Complete();
}
}
}
catch (Exception ex)
{
return OperationResult.Fail(-1, ex.Message);
}
return OperationResult.Success(1, "Person has successfully been registered");
}
public void TestMethod1()
{
Model M = new Model();
M.Name = "Cook";
WaterPacket HyporhericWater = new WaterPacket(1);
HyporhericWater.AddChemical(ChemicalFactory.Instance.GetChemical(ChemicalNames.Radon), 0.6 / HyporhericWater.Volume);
for (int i = 0; i < 10; i++)
{
Lake s1 = new Lake("s" + i, XYPolygon.GetSquare(50 * 2));
s1.Depth = 0.3;
StagnantExchangeBoundary seb = new StagnantExchangeBoundary(s1.Volume / 20000);
seb.WaterSample = HyporhericWater.DeepClone(s1.Area * 0.2 * 0.4);
seb.Output.LogAllChemicals = true;
s1.Output.LogAllChemicals = true;
s1.Sinks.Add(seb);
s1.Sources.Add(seb);
if (i > 0)
M._waterBodies[i - 1].AddDownStreamWaterBody(s1);
M._waterBodies.Add(s1);
}
//Bromide injection
TimespanSeries ts = new TimespanSeries();
ts.AddSiValue(DateTime.MinValue, new DateTime(2005, 10, 18, 12, 0, 0), 0);
ts.AddSiValue(new DateTime(2005, 10, 18, 12, 0, 0), new DateTime(2005, 10, 18, 12, 40, 0), 0.001 * 60);
ts.AddSiValue(new DateTime(2005, 10, 18, 12, 40, 0), DateTime.MaxValue, 0);
SinkSourceBoundary Bromide = new SinkSourceBoundary(ts);
WaterPacket P = new WaterPacket(1);
P.AddChemical(new Chemical("Bromide", 1), 1.13);
Bromide.WaterSample = P;
//SF6 injection
TimespanSeries ts2 = new TimespanSeries();
ts2.AddSiValue(DateTime.MinValue, new DateTime(2005, 10, 15, 12, 0, 0), 0);
ts2.AddSiValue(new DateTime(2005, 10, 15, 12, 0, 0), new DateTime(2005, 10, 19, 12, 0, 0), 1e-6);
ts2.AddSiValue(new DateTime(2005, 10, 19, 12, 0, 0), DateTime.MaxValue, 0);
SinkSourceBoundary SF6 = new SinkSourceBoundary(ts2);
WaterPacket SF6w = new WaterPacket(1);
SF6w.AddChemical(new Chemical("SF6", 1), 1.13);
SF6.WaterSample = SF6w;
M._waterBodies.First().Sources.Add(Bromide);
M._waterBodies.First().Sources.Add(SF6);
M._waterBodies.First().Sources.Add(new SinkSourceBoundary(0.2));
DateTime Start = new DateTime(2005, 10, 13);
DateTime End = new DateTime(2005, 10, 19);
M.SetState("Initial", Start, new WaterPacket(1));
M.MoveInTime(new DateTime(2005, 10, 18, 12, 0, 0), TimeSpan.FromHours(2));
M.MoveInTime(new DateTime(2005, 10, 18, 13, 0, 0), TimeSpan.FromHours(0.02));
M.MoveInTime(End, TimeSpan.FromHours(2));
M.Save(@"..\..\..\TestData\CookEtAl.xml");
M.RestoreState("Initial");
TimespanSeries ts3 = new TimespanSeries();
ts3.AddSiValue(DateTime.MinValue, new DateTime(2005, 10, 16, 12, 0, 0), 0);
ts3.AddSiValue(new DateTime(2005, 10, 16, 12, 0, 0), new DateTime(2005, 10, 17, 0, 0, 0), 0.4);
ts3.AddSiValue(new DateTime(2005, 10, 17, 0, 0, 0), DateTime.MaxValue, 0);
M._waterBodies.First().Sources.Add(new SinkSourceBoundary(ts3));
M.MoveInTime(new DateTime(2005, 10, 18, 12, 0, 0), TimeSpan.FromHours(2));
M.MoveInTime(new DateTime(2005, 10, 18, 13, 0, 0), TimeSpan.FromHours(0.02));
M.MoveInTime(End, TimeSpan.FromHours(2));
M.Save(@"..\..\..\TestData\CookEtAl2.xml");
}
private void ShowMainMenu(View.Console view, Model.MemberRegister register)
{
while (true)
{
view.ShowMenu(View.Console.MenuEvent.MainMenu, null);
switch (view.GetMenuSelection())
{
case View.Console.MenuEvent.AddNewMember:
HandleEventNewMember(view, register);
break;
case View.Console.MenuEvent.MemberListMenu:
HandleEventShowMemberListMenu(view, register);
break;
case View.Console.MenuEvent.MemberInfoMenu:
view.ShowInputInfo(View.Console.MenuEvent.MemberInfoMenu, null);
int id = view.InputMemberID();
if (id == 0)
break;
try
{
Model.Member m = register.GetMember(id);
HandleEventShowMemberInfoMenu(m, view, register);
}
catch (ArgumentException)
{
view.ShowErrorMessage(View.Console.Error.NoMemberWithId, id.ToString());
view.Wait();
}
break;
case View.Console.MenuEvent.DeleteMember:
view.ShowInputInfo(View.Console.MenuEvent.DeleteMember, null);
id = view.InputMemberID();
if (id == 0)
break;
try
{
register.DeleteMember(register.GetMember(id));
register.Save();
}
catch (ArgumentException)
{
view.ShowErrorMessage(View.Console.Error.NoMemberWithId, id.ToString());
view.Wait();
}
break;
case View.Console.MenuEvent.Exit:
return;
}
}
}
private void HandleEventShowEditBoatMenu(Model.Member member, Model.Boat boat,
View.Console view, Model.MemberRegister register)
{
while (true)
{
view.ShowMenu(View.Console.MenuEvent.EditBoatMenu, member);
switch (view.GetMenuSelection())
{
case View.Console.MenuEvent.EditBoatModel:
view.ShowInputInfo(View.Console.MenuEvent.EditBoatModel, member);
try
{
boat.Model = (Model.Boat.BoatModel)view.InputBoatModel();
register.Save();
}
catch (ArgumentException)
{
view.ShowErrorMessage(View.Console.Error.InvalidBoatModel, null);
view.Wait();
return;
}
break;
case View.Console.MenuEvent.EditBoatLength:
view.ShowInputInfo(View.Console.MenuEvent.EditBoatLength, member);
try
{
boat.Length = view.InputBoatLenght();
register.Save();
break;
}
catch (ArgumentException)
{
view.ShowErrorMessage(View.Console.Error.InvalidBoatLenght, null);
view.Wait();
break;
}
case View.Console.MenuEvent.Back:
// exit menu
return;
}
}
}
private void HandleEventAddNewBoat(Model.Member member, View.Console view, Model.MemberRegister register)
{
view.ShowInputInfo(View.Console.MenuEvent.AddBoat, member);
Model.Boat boat = new Model.Boat();
boat.ID = register.GetNextBoatIdFor(member);
try
{
boat.Model = (Model.Boat.BoatModel)view.InputBoatModel();
}
catch(ArgumentException)
{
view.ShowErrorMessage(View.Console.Error.InvalidBoatModel, null);
view.Wait();
return;
}
try
{
boat.Length = view.InputBoatLenght();
}
catch (ArgumentException)
{
view.ShowErrorMessage(View.Console.Error.InvalidBoatLenght, null);
view.Wait();
return;
}
member.AddBoat(boat);
register.Save();
}
public void HandleEventShowMemberInfoMenu(Model.Member member, View.Console view, Model.MemberRegister register)
{
while (true)
{
view.ShowMenu(View.Console.MenuEvent.MemberInfoMenu, member);
switch (view.GetMenuSelection())
{
case View.Console.MenuEvent.EditMemberName:
view.ShowInputInfo(View.Console.MenuEvent.EditMemberName, member);
try
{
member.Name = view.InputMemberName();
register.Save();
}
catch (ArgumentException)
{
view.ShowErrorMessage(View.Console.Error.InvalidMemberName, null);
view.Wait();
}
break;
case View.Console.MenuEvent.EditMemberPersonalNumber:
view.ShowInputInfo(View.Console.MenuEvent.EditMemberPersonalNumber, member);
try
{
member.PersonalNumber = view.InputMemberPersonalNumber();
register.Save();
}
catch (ArgumentException)
{
view.ShowErrorMessage(View.Console.Error.InvalidPersonalNumber, null);
view.Wait();
}
break;
case View.Console.MenuEvent.ManageBoatsMenu:
HandleEventShowManageBoatsMenu(member, view, register);
register.Save();
break;
case View.Console.MenuEvent.Back:
// exit menu.
return;
}
}
}
public void GroundWaterTest()
{
WaterPacket GroundWater = new WaterPacket(1);
// GroundWater.AddChemical(ChemicalFactory.Instance.GetChemical(ChemicalNames.Radon), 0.01);
GroundWater.IDForComposition = 4;
Lake Vedsted= LakeFactory.GetLake("Vedsted Sø");
Vedsted.Depth = 5;
Vedsted.WaterLevel = 45.7;
//Create and add a discharge boundary
TimestampSeries Discharge = new TimestampSeries();
Discharge.AddSiValue(new DateTime(2007, 3, 12), 6986 / TimeSpan.FromDays(365).TotalSeconds);
Discharge.AddSiValue(new DateTime(2007, 4, 3), 5894 / TimeSpan.FromDays(365).TotalSeconds);
Discharge.AddSiValue(new DateTime(2007, 4, 25), 1205 / TimeSpan.FromDays(365).TotalSeconds);
Discharge.RelaxationFactor = 1;
Discharge.AllowExtrapolation = true;
Assert.AreEqual(Discharge.GetValue(new DateTime(2007, 4, 25)), Discharge.GetValue(new DateTime(2007, 6, 25)), 0.0000001);
SinkSourceBoundary Kilde = new SinkSourceBoundary(Discharge);
Kilde.Name = "Small spring";
Kilde.ID = 3;
Kilde.WaterSample.IDForComposition = 3;
Vedsted.Sources.Add(Kilde);
Vedsted.Output.LogAllChemicals = true;
Vedsted.Output.LogComposition = true;
//Add to an engine
Model Engine = new Model();
Engine.Name = "Vedsted-opsætning";
Engine._waterBodies.Add(Vedsted);
//Set initial state
WaterPacket InitialStateWater = new WaterPacket(1);
InitialStateWater.IDForComposition = 1;
DateTime Start = new DateTime(2007, 1, 1);
DateTime End = new DateTime(2007, 12, 31);
Engine.SetState("Initial", Start, InitialStateWater);
Engine.SimulationEndTime = End;
Engine.TimeStep = TimeSpan.FromDays(30);
Engine.MoveInTime(End, TimeSpan.FromDays(30));
Vedsted.Name = "Vedsted step 1";
Engine.Save(testDataPath + Vedsted.Name + ".xml");
Engine.RestoreState("Initial");
//Create and add precipitation boundary
TimespanSeries Precipitation = new TimespanSeries();
Precipitation.ExtrapolationMethod = ExtrapolationMethods.RecycleYear;
Precipitation.AllowExtrapolation = true;
double[] values = new double[] { 108, 83, 73, 52, 61, 86, 99, 101, 75, 108, 85, 101 };
AddMonthlyValues(Precipitation, 2007, values);
SinkSourceBoundary Precip = new SinkSourceBoundary(Precipitation);
Precip.ContactGeometry = Vedsted.SurfaceArea;
Precip.Name = "Precipitation";
Precip.ID = 2;
Precip.WaterSample.IDForComposition = 2;
Vedsted.Precipitation.Add(Precip);
//Create and add evaporation boundary
TimespanSeries Evaporation = new TimespanSeries();
Evaporation.AllowExtrapolation = true;
Evaporation.ExtrapolationMethod = ExtrapolationMethods.RecycleYear;
double[] values2 = new double[] {4,11,34,66,110,118,122,103,61,26,7,1 };
AddMonthlyValues(Evaporation, 2007, values2);
EvaporationRateBoundary eva = new EvaporationRateBoundary(Evaporation);
eva.ContactGeometry = Vedsted.SurfaceArea;
eva.Name = "Evapo";
Vedsted.EvaporationBoundaries.Add(eva);
Engine.MoveInTime(End, TimeSpan.FromDays(30));
Vedsted.Name = "Vedsted step 2";
Engine.Save(testDataPath + Vedsted.Name + ".xml");
Engine.RestoreState("Initial");
//To be used by other tests
Engine.Save(testDataPath + "VedstedNoGroundwater.xml");
XYPolygon ContactArea = XYPolygon.GetSquare(Vedsted.Area/10);
#region Groundwater boundaries
//Add groundwater boundaries
GroundWaterBoundary B1 = new GroundWaterBoundary(Vedsted, 1.3e-4, 1, 45.47, ContactArea);
B1.Name = "B1";
B1.ID = 4;
B1.WaterSample = GroundWater;
Vedsted.GroundwaterBoundaries.Add(B1);
GroundWaterBoundary B2 = new GroundWaterBoundary(Vedsted, 1e-6, 1, 44.96, ContactArea);
B2.Name = "B2";
B2.ID = 5;
B2.WaterSample = GroundWater;
Vedsted.GroundwaterBoundaries.Add(B2);
GroundWaterBoundary B3 = new GroundWaterBoundary(Vedsted, 2e-6, 1, 44.63, ContactArea);
B3.Name = "B3";
B3.ID = 6;
B3.WaterSample = GroundWater;
Vedsted.GroundwaterBoundaries.Add(B3);
GroundWaterBoundary B4 = new GroundWaterBoundary(Vedsted, 4.9e-7, 1, 44.75, ContactArea);
B4.Name = "B4";
B4.ID = 7;
B4.WaterSample = GroundWater;
Vedsted.GroundwaterBoundaries.Add(B4);
GroundWaterBoundary B5 = new GroundWaterBoundary(Vedsted, 1.5e-8, 1, 44.27, ContactArea);
B5.Name = "B5";
B5.ID = 8;
B5.WaterSample = GroundWater;
Vedsted.GroundwaterBoundaries.Add(B5);
GroundWaterBoundary B6 = new GroundWaterBoundary(Vedsted, 1.5e-8, 1, 44.16, ContactArea);
B6.Name = "B6";
B6.ID = 9;
B6.WaterSample = GroundWater;
Vedsted.GroundwaterBoundaries.Add(B6);
GroundWaterBoundary B7 = new GroundWaterBoundary(Vedsted, 1.1e-6, 1, 45.15, ContactArea);
B7.Name = "B7";
B7.ID = 10;
B7.WaterSample = GroundWater;
Vedsted.GroundwaterBoundaries.Add(B7);
GroundWaterBoundary B8 = new GroundWaterBoundary(Vedsted, 1.1e-6, 1, 44.54, ContactArea);
B8.Name = "B8";
B8.ID = 11;
B8.WaterSample = GroundWater;
Vedsted.GroundwaterBoundaries.Add(B8);
GroundWaterBoundary B9 = new GroundWaterBoundary(Vedsted, 2.1e-8, 1, 45.4, ContactArea);
B9.Name = "B9";
B9.ID = 12;
B9.WaterSample = GroundWater;
Vedsted.GroundwaterBoundaries.Add(B9);
GroundWaterBoundary B10 = new GroundWaterBoundary(Vedsted, 3.5e-6, 1, 45.16, ContactArea);
B10.Name = "B10";
B10.ID = 13;
B10.WaterSample = GroundWater;
Vedsted.GroundwaterBoundaries.Add(B10);
#endregion
Engine.MoveInTime(End, TimeSpan.FromDays(30));
Vedsted.Name = "Vedsted step 3";
Engine.Save(testDataPath + Vedsted.Name + ".xml");
Engine.RestoreState("Initial");
Vedsted.GroundwaterBoundaries.Clear();
var cl =ChemicalFactory.Instance.GetChemical(ChemicalNames.IsotopeFraction);
GroundWaterBoundary Inflow = new GroundWaterBoundary(Vedsted, 1e-7,1,46.7,XYPolygon.GetSquare(Vedsted.Area/2));
Inflow.Name = "Inflow";
GroundWater.AddChemical(cl, 3);
Inflow.WaterSample = GroundWater;
Vedsted.RealData.AddChemicalTimeSeries(cl);
Vedsted.RealData.ChemicalConcentrations[cl].AddSiValue(new DateTime(2007, 8, 7), 2.5);
((WaterPacket)InitialStateWater).AddChemical(cl, 2.5 * InitialStateWater.Volume);
Engine.SetState("Initial", Start, InitialStateWater);
GroundWaterBoundary Outflow = new GroundWaterBoundary(Vedsted, 1e-7,1,44.7,XYPolygon.GetSquare(Vedsted.Area/2));
Outflow.Name = "Outflow";
Vedsted.GroundwaterBoundaries.Add(Inflow);
Vedsted.GroundwaterBoundaries.Add(Outflow);
Engine.MoveInTime(End, TimeSpan.FromDays(30));
Vedsted.Name = "Vedsted step 4";
Engine.Save(testDataPath + Vedsted.Name + ".xml");
Engine.RestoreState("Initial");
#region ////Add seepage meter boundaries
//GroundWaterBoundary S1 = new GroundWaterBoundary(Vedsted, 4e-5, 1, 2, 46);
//Vedsted.SinkSources.Add(S1);
//GroundWaterBoundary S2 = new GroundWaterBoundary(Vedsted, 4e-5, 1, 2, 46);
//Vedsted.SinkSources.Add(S2);
//GroundWaterBoundary S3 = new GroundWaterBoundary(Vedsted, 4e-5, 1, 2, 46);
//Vedsted.SinkSources.Add(S3);
//GroundWaterBoundary I1 = new GroundWaterBoundary(Vedsted, 4e-5, 1, 2, 46);
//Vedsted.SinkSources.Add(I1);
//GroundWaterBoundary I2 = new GroundWaterBoundary(Vedsted, 4e-5, 1, 2, 46);
//Vedsted.SinkSources.Add(I2);
//GroundWaterBoundary I3 = new GroundWaterBoundary(Vedsted, 4e-5, 1, 2, 46);
//Vedsted.SinkSources.Add(I3);
#endregion
Assert.AreEqual(Evaporation.EndTime, Engine.MaximumEndTime);
Engine.Save(testDataPath + "Vedsted.xml");
Engine.MoveInTime(End, TimeSpan.FromDays(30));
double outflow2 = Vedsted.Output.Outflow.GetValue(Start, End.Subtract(TimeSpan.FromDays(5)));
double evapo2 = Vedsted.Output.Evaporation.GetValue(Start, End.Subtract(TimeSpan.FromDays(5)));
Engine.Save(testDataPath + "Vedsted2.xml");
}
private void writeSave(Model model, string fileName)
{
while (true)
{
try
{
model.Save(fileName);
return;
}
catch (Exception e)
{
if (MessageBox.Show("Unable to save to '"+fileName+"':\n"+e.Message, "Error saving file",
MessageBoxButtons.RetryCancel, MessageBoxIcon.Stop)
!= System.Windows.Forms.DialogResult.Retry)
{
return;
}
}
}
}
public void TestMethod1()
{
Lake L = new Lake("Deep lake", XYPolygon.GetSquare(10000));
L.Depth = 4;
L.Output.LogAllChemicals = true;
Lake L2 = new Lake("Shallow lake", XYPolygon.GetSquare(40000));
L2.Depth = 1;
L2.Output.LogAllChemicals = true;
SinkSourceBoundary flow = new SinkSourceBoundary(L.Volume / (15.0 * 86400.0));
L.Sources.Add(flow);
L2.Sources.Add(flow);
Chemical rn = ChemicalFactory.Instance.GetChemical(ChemicalNames.Radon);
Chemical cl = ChemicalFactory.Instance.GetChemical(ChemicalNames.Cl);
WaterPacket groundwater = new WaterPacket(1);
groundwater.SetConcentration(rn, 200);
groundwater.SetConcentration(cl, 200);
SinkSourceBoundary gwflow = new SinkSourceBoundary(L.Volume / (15.0 * 86400.0));
gwflow.WaterSample = groundwater;
L.Sources.Add(gwflow);
L2.Sources.Add(gwflow);
Model M = new Model();
M.WaterBodies.Add(L);
M.WaterBodies.Add(L2);
DateTime start = new DateTime(2010,1,1);
M.SetState("Initial", start, new WaterPacket(1));
M.MoveInTime(new DateTime(2010, 12, 31), TimeSpan.FromDays(5));
M.Save(@"..\..\..\TestData\Radon.xml");
}
