diff options
author | Daniel Wagner Oliveira de Medeiros | 2023-08-21 07:50:37 -0400 |
---|---|---|
committer | Daniel Wagner Oliveira de Medeiros | 2023-08-21 07:50:37 -0400 |
commit | d50930924532f17c1ef8a08adc3f34f1193be84d (patch) | |
tree | ea0f1e88e78e1d5ea6ed62aef09fc7fe45ecc3c5 | |
parent | 28b8d5f9d57bb86e25b4105702f94f15bb456e8f (diff) | |
download | crude-characterization-plugin-DWSIM-d50930924532f17c1ef8a08adc3f34f1193be84d.tar.gz crude-characterization-plugin-DWSIM-d50930924532f17c1ef8a08adc3f34f1193be84d.tar.bz2 crude-characterization-plugin-DWSIM-d50930924532f17c1ef8a08adc3f34f1193be84d.zip |
update
-rw-r--r-- | Characterization/Form1.vb | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/Characterization/Form1.vb b/Characterization/Form1.vb index 2c6e78b..9a6a50f 100644 --- a/Characterization/Form1.vb +++ b/Characterization/Form1.vb @@ -505,11 +505,6 @@ Public Class Form1 If frm.Options.PropertyPackages.Count > 0 Then pp = frm.Options.SelectedPropertyPackage - If TypeOf pp Is DWSIM.Thermodynamics.PropertyPackages.PengRobinsonPropertyPackage Then - DirectCast(pp, DWSIM.Thermodynamics.PropertyPackages.PengRobinsonPropertyPackage).m_pr.BIPChanged = True - ElseIf TypeOf pp Is DWSIM.Thermodynamics.PropertyPackages.SRKPropertyPackage Then - DirectCast(pp, DWSIM.Thermodynamics.PropertyPackages.SRKPropertyPackage).m_pr.BIPChanged = True - End If Else pp = New DWSIM.Thermodynamics.PropertyPackages.PengRobinsonPropertyPackage() End If @@ -624,11 +619,6 @@ Public Class Form1 ms.SetFlowsheet(frm) If frm.Options.PropertyPackages.Count > 0 Then ms.PropertyPackage = frm.Options.SelectedPropertyPackage - If TypeOf ms.PropertyPackage Is DWSIM.Thermodynamics.PropertyPackages.PengRobinsonPropertyPackage Then - DirectCast(ms.PropertyPackage, DWSIM.Thermodynamics.PropertyPackages.PengRobinsonPropertyPackage).m_pr.BIPChanged = True - ElseIf TypeOf ms.PropertyPackage Is DWSIM.Thermodynamics.PropertyPackages.SRKPropertyPackage Then - DirectCast(ms.PropertyPackage, DWSIM.Thermodynamics.PropertyPackages.SRKPropertyPackage).m_pr.BIPChanged = True - End If Else ms.PropertyPackage = New DWSIM.Thermodynamics.PropertyPackages.PengRobinsonPropertyPackage() End If |