Aspen Touch Solutions ATM-123R Series Specifikace Strana 144

  • Stažení
  • Přidat do mých příruček
  • Tisk
  • Strana
    / 374
  • Tabulka s obsahem
  • KNIHY
  • Hodnocené. / 5. Na základě hodnocení zákazníků
Zobrazit stránku 143
3-60 Extension Unit Operations
3-60
Set Components =
hyContainer.Flowsheet.FluidPackage.Component
s
WaterPresent = False
For Each Component In Components
If Component.Name = "H2O" Then
WaterPresent = True
Next Component
If Not WaterPresent Then GoTo ErrorTrap
Determine if water is present (ensure it
hasn't been removed).
H2O = Components.Index("H2O")
Get the index for water.
Set hyFeedStrm =
hyContainer.FindVariable("FeedStream").Varia
ble.object
Set hyProdStrm =
hyContainer.FindVariable("ProductStream").Va
riable.object
Set hyWatStrm =
hyContainer.FindVariable("WaterStream").Vari
able.object
Set an object reference to the Feed,
Product and Water stream attachment
objects in the EDF.
If hyFeedStrm Is Nothing Then GoTo
ErrorTrap
If hyWatStrm Is Nothing Then GoTo ErrorTrap
If hyProdStrm Is Nothing Then GoTo
ErrorTrap
If the streams are not attached, then
exit.
If hyFeedStrm.TemperatureValue = conEmpty
Then GoTo ErrorTrap
If hyFeedStrm.PressureValue = conEmpty
Then GoTo ErrorTrap
If hyFeedStrm.MolarFlowValue = conEmpty
Then GoTo ErrorTrap
Temp = hyFeedStrm.ComponentMolarFraction
If (Temp(0) = conEmpty) Then GoTo ErrorTrap
Determine if the feed stream has the
information required.
Set WorkFluid = hyFeedStrm.DuplicateFluid
MoleFl = WorkFluid.MolarFractionsValue
Create a duplicate fluid object of
hyFeedStrm and creates an array
containing the mole fraction of each
component in the fluid.
For i = 0 To Components.Count - 1
MoleFl(i) = MoleFl(i) / 10
Next
MoleFl(H2O) = 0.9 + MoleFl(H2O)
WorkFluid.MolarFractionsValue = MoleFl
For every component in the fluid, divide
the mole fraction by a factor of 10. This
means that the current composition of
the stream now only make up 10% of the
fluid composition. Make the remaining
90% water.
Code Explanation
Zobrazit stránku 143
1 2 ... 139 140 141 142 143 144 145 146 147 148 149 ... 373 374

Komentáře k této Příručce

Žádné komentáře