diff options
Diffstat (limited to 'Simulator/Simulator/Files/ThermodynamicFunctions/SolublityParameter.mo')
-rw-r--r-- | Simulator/Simulator/Files/ThermodynamicFunctions/SolublityParameter.mo | 25 |
1 files changed, 0 insertions, 25 deletions
diff --git a/Simulator/Simulator/Files/ThermodynamicFunctions/SolublityParameter.mo b/Simulator/Simulator/Files/ThermodynamicFunctions/SolublityParameter.mo deleted file mode 100644 index 15d2afd..0000000 --- a/Simulator/Simulator/Files/ThermodynamicFunctions/SolublityParameter.mo +++ /dev/null @@ -1,25 +0,0 @@ -within Simulator.Files.ThermodynamicFunctions; - - function SolublityParameter - extends Modelica.Icons.Function; - - input Integer Nc; - input Real V_c[Nc]; - input Real SP_c[Nc]; - input Real x_c[Nc]; - - output Real S; - protected Real Vs,V; - - algorithm - - V := sum(x_c[:] .* V_c[:]); - Vs := sum(x_c[:] .* V_c[:] .* SP_c[:]); - - if(V==0) then - S :=0; - else - S := Vs / V; - end if; - - end SolublityParameter; |