Code development platform for open source projects from the European Union institutions :large_blue_circle: EU Login authentication by SMS has been phased out. To see alternatives please check here

Skip to content
Snippets Groups Projects
Commit 5b91ebc4 authored by Markus Quaritsch's avatar Markus Quaritsch
Browse files

Merge pull request #183 in VECTO/vecto-sim from...

Merge pull request #183 in VECTO/vecto-sim from ~EMQUARIMA/vecto-sim:hotfix/VECTO-270-input-data-parsing-not-language to develop

* commit 'a98520f0':
  code formatting to make it compile
parents a4c27ecd a98520f0
No related branches found
No related tags found
No related merge requests found
......@@ -1658,7 +1658,7 @@ lbFound:
sender.ReportProgress(0,
New _
With {.Target = "ListBox",
.Message =
.Message = _
String.Format("Starting Simulation ({0} Jobs, {1} Runs)", JobFileList.Count, jobContainer.GetProgress().Count)})
jobContainer.Execute(True)
......@@ -1677,7 +1677,7 @@ lbFound:
Dim duration As Double = (DateTime.Now() - start).TotalSeconds
sender.ReportProgress(Int((sumProgress * 100.0) / progress.Count), New With {.Target = "Status",
.Message =
.Message = _
String.Format("Duration: {0:0}s, Current Progress: {1:P} ({2})", duration, sumProgress / progress.Count,
String.Join(", ", progress.Select(Function(pair) String.Format("{0,4:P}", pair.Value.Progress))))})
......@@ -1737,8 +1737,9 @@ lbFound:
Private Shared Sub PrintRuns(progress As Dictionary(Of Integer, JobContainer.ProgressEntry),
fileWriters As Dictionary(Of Integer, FileOutputWriter))
For Each p As KeyValuePair(Of Integer, JobContainer.ProgressEntry) In progress
Dim modFilename As String = fileWriters(p.Key).GetModDataFileName(p.Value.RunName, p.Value.CycleName, p.Value.RunSuffix + IIf(Cfg.Mod1Hz, "_1Hz", ""))
p.Value.RunSuffix)
Dim modFilename As String = fileWriters(p.Key).GetModDataFileName(p.Value.RunName, p.Value.CycleName,
p.Value.RunSuffix + IIf(Cfg.Mod1Hz, "_1Hz", ""))
Dim runName As String = String.Format("{0} {1} {2}", p.Value.RunName, p.Value.CycleName, p.Value.RunSuffix)
If Not p.Value.Error Is Nothing Then
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment