pyEQL 1.4.0rc9__cp313-cp313-macosx_10_13_x86_64.whl

pyEQL/phreeqc/ext/iphreeqc-3.8.6-17100/src/phreeqcpp/Solution.cxx

@@ -0,0 +1,1795 @@
+// Solution.cxx: implementation of the cxxSolution class.
+//
+//////////////////////////////////////////////////////////////////////
+#ifdef _DEBUG
+#pragma warning(disable : 4786)	// disable truncation warning (Only used by debugger)
+#endif
+
+#include <set>
+#include <cassert>				// assert
+#include <algorithm>			// std::sort
+#include "Utils.h"				// define first
+#include "Phreeqc.h"
+#include "Solution.h"
+#include "cxxMix.h"
+#include "phqalloc.h"
+#include "Dictionary.h"
+
+#if defined(PHREEQCI_GUI)
+#ifdef _DEBUG
+#define new DEBUG_NEW
+#undef THIS_FILE
+static char THIS_FILE[] = __FILE__;
+#endif
+#endif
+
+//////////////////////////////////////////////////////////////////////
+// Construction/Destruction
+//////////////////////////////////////////////////////////////////////
+
+
+cxxSolution::cxxSolution(PHRQ_io * io)
+	//
+	// default constructor for cxxSolution 
+	//
+:	cxxNumKeyword(io)
+{
+	this->io = io;
+	this->new_def = false;
+	this->patm = 1.0;
+	this->potV = 0.0;
+	this->tc = 25.0;
+	this->ph = 7.0;
+	this->pe = 4.0;
+	this->mu = 1e-7;
+	this->ah2o = 1.0;
+	this->total_h = 111.1;
+	this->total_o = 55.55;
+	this->cb = 0.0;
+	this->density = 1.0;
+	this->viscosity = 1.0;
+	this->viscos_0 = 1.0;
+	this->mass_water = 1.0;
+	this->soln_vol = 1.0;
+	this->total_alkalinity = 0.0;
+	this->totals.type = cxxNameDouble::ND_ELT_MOLES;
+	this->master_activity.type = cxxNameDouble::ND_SPECIES_LA;
+	this->species_gamma.type = cxxNameDouble::ND_SPECIES_GAMMA;
+	this->initial_data = NULL;
+}
+cxxSolution::cxxSolution(const cxxSolution &old_sol)
+:	initial_data(NULL)
+{
+	*this = old_sol;
+}
+const cxxSolution &
+cxxSolution::operator =(const cxxSolution &rhs)
+{
+	if (this != &rhs)
+	{
+		this->io                         = rhs.io;
+		this->n_user                     = rhs.n_user;
+		this->n_user_end                 = rhs.n_user_end;
+		this->description                = rhs.description;
+		this->new_def                    = rhs.new_def;
+		this->patm                       = rhs.patm;
+		this->potV                       = rhs.potV;
+		this->tc                         = rhs.tc;
+		this->ph                         = rhs.ph;
+		this->pe                         = rhs.pe;
+		this->mu                         = rhs.mu;
+		this->ah2o                       = rhs.ah2o;
+		this->total_h                    = rhs.total_h;
+		this->total_o                    = rhs.total_o;
+		this->density                    = rhs.density;
+		this->viscosity                  = rhs.viscosity;
+		this->viscos_0                   = rhs.viscos_0;
+		this->cb                         = rhs.cb;
+		this->mass_water                 = rhs.mass_water;
+		this->soln_vol                   = rhs.soln_vol;
+		this->total_alkalinity           = rhs.total_alkalinity;
+		this->totals		             = rhs.totals;
+		this->master_activity            = rhs.master_activity;
+		this->species_gamma              = rhs.species_gamma;
+		this->isotopes                   = rhs.isotopes;
+		this->species_map                = rhs.species_map;
+		this->log_gamma_map              = rhs.log_gamma_map;
+		this->log_molalities_map         = rhs.log_molalities_map;
+		if (this->initial_data)
+			delete initial_data;
+		if (rhs.initial_data != NULL)
+			this->initial_data           = new cxxISolution(*rhs.initial_data);
+		else
+			this->initial_data           = NULL;
+	}
+	return *this;
+}
+cxxSolution::cxxSolution(std::map < int, cxxSolution > &solutions,
+						 cxxMix & mix, int l_n_user, PHRQ_io * io)
+//
+// constructor for cxxSolution from mixture of solutions
+//
+: cxxNumKeyword(io)
+{
+//
+//   Zero out solution data
+//
+	this->zero();
+	this->n_user = this->n_user_end = l_n_user;
+	this->new_def = false;
+	this->ah2o = 0;
+	// potV is an external variable, imposed in a given solution, not mixed.
+	std::map < int, cxxSolution >::const_iterator sol = solutions.find(mix.Get_n_user());
+	const cxxSolution *cxxsoln_ptr1;
+	if (sol != solutions.end())
+	{
+		cxxsoln_ptr1 = &(sol->second);
+		if (cxxsoln_ptr1->new_def)
+			this->potV = 0.0;
+		else
+			this->potV = cxxsoln_ptr1->potV;
+	}
+//
+//   Mix solutions
+//
+	const std::map < int, LDBLE >&mixcomps = mix.Get_mixComps();
+	std::map < int, LDBLE >::const_iterator it;
+	for (it = mixcomps.begin(); it != mixcomps.end(); it++)
+	{
+		sol = solutions.find(it->first);
+		if (sol == solutions.end())
+		{
+			std::ostringstream msg;
+			msg << "Solution " << it->first << " not found in mix_cxxSolutions.";
+			error_msg(msg.str(), CONTINUE);
+		}
+		else
+		{
+			cxxsoln_ptr1 = &(sol->second);
+			this->add(*cxxsoln_ptr1, it->second);
+		}
+	}
+
+}
+cxxSolution::~cxxSolution()
+{
+	delete this->initial_data;
+}
+
+void
+cxxSolution::dump_xml(std::ostream & s_oss, unsigned int indent) const
+{
+	unsigned int i;
+	s_oss.precision(DBL_DIG - 1);
+	std::string indent0(""), indent1("");
+	for (i = 0; i < indent; ++i)
+		indent0.append(Utilities::INDENT);
+	for (i = 0; i < indent + 1; ++i)
+		indent1.append(Utilities::INDENT);
+
+	// Solution element and attributes
+	s_oss << indent0;
+	s_oss << "<solution " << "\n";
+
+	s_oss << indent1;
+	s_oss << "soln_n_user=\"" << this->n_user << "\" " << "\n";
+
+	s_oss << indent1;
+	s_oss << "soln_description=\"" << this->description << "\"" << "\n";
+
+	s_oss << indent1;
+	s_oss << "soln_tc=\"" << this->tc << "\"" << "\n";
+
+	s_oss << indent1;
+	s_oss << "soln_ph=\"" << this->ph << "\"" << "\n";
+
+	s_oss << indent1;
+	s_oss << "soln_solution_pe=\"" << this->pe << "\"" << "\n";
+
+	s_oss << indent1;
+	s_oss << "soln_mu=\"" << this->mu << "\"" << "\n";
+
+	s_oss << indent1;
+	s_oss << "soln_ah2o=\"" << this->ah2o << "\"" << "\n";
+
+	s_oss << indent1;
+	s_oss << "soln_total_h=\"" << this->total_h << "\"" << "\n";
+
+	s_oss << indent1;
+	s_oss << "soln_total_o=\"" << this->total_o << "\"" << "\n";
+
+	s_oss << indent1;
+	s_oss << "soln_cb=\"" << this->cb << "\"" << "\n";
+
+	s_oss << indent1;
+	s_oss << "soln_mass_water=\"" << this->mass_water << "\"" << "\n";
+
+	s_oss << indent1;
+	s_oss << "soln_vol=\"" << this->soln_vol << "\"" << "\n";
+
+	s_oss << indent1;
+	s_oss << "soln_total_alkalinity=\"" << this->
+		total_alkalinity << "\"" << "\n";
+
+	s_oss << indent1;
+	s_oss << "\">" << "\n";
+
+	// soln_total conc structures
+	this->totals.dump_xml(s_oss, indent + 1);
+
+	// master_activity map
+	this->master_activity.dump_xml(s_oss, indent + 1);
+
+	// species_gamma map
+	this->species_gamma.dump_xml(s_oss, indent + 1);
+
+	// End of solution
+	s_oss << indent0;
+	s_oss << "</solution>" << "\n";
+
+	return;
+}
+
+void
+cxxSolution::dump_raw(std::ostream & s_oss, unsigned int indent, int *n_out) const
+{
+	unsigned int i;
+	s_oss.precision(DBL_DIG - 1);
+	std::string indent0(""), indent1(""), indent2("");
+	for (i = 0; i < indent; ++i)
+		indent0.append(Utilities::INDENT);
+	for (i = 0; i < indent + 1; ++i)
+		indent1.append(Utilities::INDENT);
+	for (i = 0; i < indent + 2; ++i)
+		indent2.append(Utilities::INDENT);
+
+	// Solution element and attributes
+	s_oss << indent0;
+	int n_user_local = (n_out != NULL) ? *n_out : this->n_user;
+	s_oss << "SOLUTION_RAW                 " << n_user_local << " " << this->description << "\n";
+
+	s_oss << indent1;
+	s_oss << "-temp                      " << this->tc << "\n";
+
+	s_oss << indent1;
+	s_oss << "-pressure                  " << this->patm << "\n";
+
+	s_oss << indent1;
+	s_oss << "-potential                 " << this->potV << "\n";
+
+	// new identifier
+	s_oss << indent1;
+	s_oss << "-total_h                   " << this->total_h << "\n";
+
+	// new identifier
+	s_oss << indent1;
+	s_oss << "-total_o                   " << this->total_o << "\n";
+
+	// new identifier
+	s_oss << indent1;
+	s_oss << "-cb                        " << this->cb << "\n";
+
+	// new identifier
+	s_oss << indent1;
+	s_oss << "-density                   " << this->density << "\n";
+
+	// new identifier
+	s_oss << indent1;
+	s_oss << "-viscosity                 " << this->viscosity << "\n";
+	s_oss << indent1;
+	s_oss << "-viscos_0                  " << this->viscos_0 << "\n";
+
+	// soln_total conc structures
+	s_oss << indent1;
+	s_oss << "-totals" << "\n";
+	this->totals.dump_raw(s_oss, indent + 2);
+
+	// Isotopes
+	{
+		for (std::map < std::string, cxxSolutionIsotope >::const_iterator it =
+			this->isotopes.begin(); it != isotopes.end(); ++it)
+		{
+			s_oss << indent1 << "-Isotope" << "\n";
+			it->second.dump_raw(s_oss, indent + 2);
+		}
+	}
+
+	s_oss << indent1;
+	s_oss << "-pH                        " << this->ph << "\n";
+
+	s_oss << indent1;
+	s_oss << "-pe                        " << this->pe << "\n";
+
+	// new identifier
+	s_oss << indent1;
+	s_oss << "-mu                        " << this->mu << "\n";
+
+	// new identifier
+	s_oss << indent1;
+	s_oss << "-ah2o                      " << this->ah2o << "\n";
+
+	// new identifier
+	s_oss << indent1;
+	s_oss << "-mass_water                " << this->mass_water << "\n";
+
+	// new identifier
+	s_oss << indent1;
+	s_oss << "-soln_vol                  " << this->soln_vol << "\n";
+
+	// new identifier
+	s_oss << indent1;
+	s_oss << "-total_alkalinity          " << this->total_alkalinity << "\n";
+
+	// master_activity map
+	s_oss << indent1;
+	s_oss << "-activities" << "\n";
+	this->master_activity.dump_raw(s_oss, indent + 2);
+
+	// species_gamma map
+	s_oss << indent1;
+	s_oss << "-gammas" << "\n";
+	this->species_gamma.dump_raw(s_oss, indent + 2);
+
+	// species_map
+	if (species_map.size() > 0)
+	{
+		s_oss << indent1;
+		s_oss << "-species_map" << "\n";
+		std::map<int, double>::const_iterator it = this->species_map.begin();
+		for ( ; it != species_map.end(); it++)
+		{
+			s_oss << indent2;
+			s_oss << it->first << " " << it->second << "\n";
+		}
+	}
+
+	// log_gamma_map
+	if (log_gamma_map.size() > 0)
+	{
+		s_oss << indent1;
+		s_oss << "-log_gamma_map" << "\n";
+		std::map<int, double>::const_iterator it = this->log_gamma_map.begin();
+		for ( ; it != log_gamma_map.end(); it++)
+		{
+			s_oss << indent2;
+			s_oss << it->first << " " << it->second << "\n";
+		}
+	}
+
+	// log_molalities_map
+	if (log_molalities_map.size() > 0)
+	{
+		s_oss << indent1;
+		s_oss << "-log_molalities_map" << "\n";
+		std::map<int, double>::const_iterator it = this->log_molalities_map.begin();
+		for (; it != log_molalities_map.end(); it++)
+		{
+			s_oss << indent2;
+			s_oss << it->first << " " << it->second << "\n";
+		}
+	}
+	return;
+}
+
+#ifdef USE_REVISED_READ_RAW
+void
+cxxSolution::read_raw(CParser & parser, bool check)
+{
+
+	// Used if it is modify
+	cxxNameDouble original_totals = this->totals;
+	cxxNameDouble original_activities(this->master_activity);
+
+	this->master_activity.clear();
+
+	std::istream::pos_type ptr;
+	std::istream::pos_type next_char;
+	std::string token;
+	int opt_save;
+
+	// Read solution number and description
+	this->read_number_description(parser.line());
+	this->Set_new_def(false);
+
+	opt_save = CParser::OPT_ERROR;
+	bool tc_defined(false);
+	bool ph_defined(false);
+	bool pe_defined(false);
+	bool mu_defined(false);
+	bool ah2o_defined(false);
+	bool total_h_defined(false);
+	bool total_o_defined(false);
+	bool cb_defined(false);
+	bool mass_water_defined(false);
+	bool total_alkalinity_defined(false);
+
+	for (;;)
+	{
+		int opt = parser.get_option(vopts, next_char);
+		if (opt == CParser::OPT_DEFAULT)
+		{
+			opt = opt_save;
+		}
+
+		switch (opt)
+		{
+		case CParser::OPT_EOF:
+			break;
+		case CParser::OPT_KEYWORD:
+			break;
+		case CParser::OPT_DEFAULT:
+		case CParser::OPT_ERROR:
+			opt = CParser::OPT_EOF;
+			parser.error_msg("Unknown input in SOLUTION_RAW keyword.",
+							 PHRQ_io::OT_CONTINUE);
+			parser.error_msg(parser.line().c_str(), PHRQ_io::OT_CONTINUE);
+			continue;
+
+		case 0:				// totals
+			{
+				cxxNameDouble temp_totals;
+				if (temp_totals.read_raw(parser, next_char) !=	CParser::PARSER_OK)
+				{
+					parser.incr_input_error();
+					parser.
+						error_msg("Expected element name and moles for totals.",
+						PHRQ_io::OT_CONTINUE);
+				}
+				else
+				{
+					this->totals.merge_redox(temp_totals);
+				}
+			}
+			opt_save = 0;
+			break;
+
+		case 1:				// activities
+			if (this->master_activity.read_raw(parser, next_char) !=
+				CParser::PARSER_OK)
+			{
+				parser.incr_input_error();
+				parser.
+					error_msg
+					("Expected species name and log activity for activities.",
+					 PHRQ_io::OT_CONTINUE);
+			}
+			opt_save = 1;
+			break;
+
+		case 2:				// gammas
+			if (this->species_gamma.read_raw(parser, next_char) !=
+				CParser::PARSER_OK)
+			{
+				parser.incr_input_error();
+				parser.
+					error_msg
+					("Expected species name and activity coefficient for gammas.",
+					 PHRQ_io::OT_CONTINUE);
+			}
+			opt_save = 2;
+			break;
+
+		case 3:				// isotope
+			{
+				std::string name;
+				if (!(parser.get_iss() >> name))
+				{
+					parser.incr_input_error();
+					parser.error_msg("Expected character value for isotope name.",
+									 PHRQ_io::OT_CONTINUE);
+				}
+				else
+				{
+					cxxSolutionIsotope iso(this->Get_io());
+					iso.Set_isotope_name(name.c_str());
+					iso.read_raw(parser, check);
+					this->isotopes[name] = iso;
+				}
+			}
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 4:				// temp
+		case 5:				// tc_avoid_conflict_with_technetium
+		case 6:				// temperature                  
+			if (!(parser.get_iss() >> this->tc))
+			{
+				this->tc = 25.0;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for temperature.",
+								 PHRQ_io::OT_CONTINUE);
+			}
+			tc_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 7:				// ph
+			if (!(parser.get_iss() >> this->ph))
+			{
+				this->ph = 7.0;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for pH.",
+								 PHRQ_io::OT_CONTINUE);
+			}
+			ph_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 8:				// pe
+			if (!(parser.get_iss() >> this->pe))
+			{
+				this->pe = 4.0;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for pe.",
+								 PHRQ_io::OT_CONTINUE);
+			}
+			pe_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 9:				// mu
+		case 10:				// ionic_strength
+			if (!(parser.get_iss() >> this->mu))
+			{
+				this->mu = 1e-7;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for ionic strength.",
+								 PHRQ_io::OT_CONTINUE);
+			}
+			mu_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 11:				// ah2o
+		case 12:				// activity_water
+			if (!(parser.get_iss() >> this->ah2o))
+			{
+				this->ah2o = 1.0;
+				parser.incr_input_error();
+				parser.
+					error_msg("Expected numeric value for activity of water.",
+							  PHRQ_io::OT_CONTINUE);
+			}
+			ah2o_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 13:				// total_h
+			if (!(parser.get_iss() >> this->total_h))
+			{
+				this->total_h = 111.1;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for total hydrogen.",
+								 PHRQ_io::OT_CONTINUE);
+			}
+			total_h_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 14:				// total_o
+			if (!(parser.get_iss() >> this->total_o))
+			{
+				this->total_o = 55.55;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for total oxygen.",
+								 PHRQ_io::OT_CONTINUE);
+			}
+			total_o_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 15:				// mass_water
+		case 16:				// mass_h2o
+			if (!(parser.get_iss() >> this->mass_water))
+			{
+				this->mass_water = 1.0;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for mass of water.",
+								 PHRQ_io::OT_CONTINUE);
+			}
+			mass_water_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 17:				// total_alkalinity
+		case 18:				// total_alk
+			if (!(parser.get_iss() >> this->total_alkalinity))
+			{
+				this->total_alkalinity = 0;
+				parser.incr_input_error();
+				parser.
+					error_msg("Expected numeric value for total_alkalinity.",
+							  PHRQ_io::OT_CONTINUE);
+			}
+			total_alkalinity_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 19:				// cb
+		case 20:				// charge_balance
+			if (!(parser.get_iss() >> this->cb))
+			{
+				this->cb = 0;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for charge balance.",
+								 PHRQ_io::OT_CONTINUE);
+			}
+			cb_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+		case 21:				// density
+			if (!(parser.get_iss() >> this->density))
+			{
+				this->density = 1.0;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for density.",
+								 PHRQ_io::OT_CONTINUE);
+			}
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+		}
+
+		if (opt == CParser::OPT_EOF || opt == CParser::OPT_KEYWORD)
+			break;
+	}
+	if (check)
+	{
+		// all members must be defined
+		if (tc_defined == false)
+		{
+			parser.incr_input_error();
+			parser.error_msg("Temp not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+		if (ph_defined == false)
+		{
+			parser.incr_input_error();
+			parser.error_msg("pH not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+		if (pe_defined == false)
+		{
+			parser.incr_input_error();
+			parser.error_msg("pe not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+		if (mu_defined == false)
+		{
+			parser.incr_input_error();
+			parser.error_msg("Ionic strength not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+		if (ah2o_defined == false)
+		{
+			parser.incr_input_error();
+			parser.
+				error_msg("Activity of water not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+		if (total_h_defined == false)
+		{
+			parser.incr_input_error();
+			parser.error_msg("Total hydrogen not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+		if (total_o_defined == false)
+		{
+			parser.incr_input_error();
+			parser.error_msg("Total oxygen not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+		if (cb_defined == false)
+		{
+			parser.incr_input_error();
+			parser.error_msg("Charge balance not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+		if (mass_water_defined == false)
+		{
+			parser.incr_input_error();
+			parser.error_msg("Temp not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+		if (total_alkalinity_defined == false)
+		{
+			parser.incr_input_error();
+			parser.
+				error_msg("Total alkalinity not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+	}
+
+	// Update activities
+	
+	if (original_activities.size() > 0)
+	{
+		cxxNameDouble new_activities = this->master_activity;
+		this->master_activity = original_activities;
+		this->Update_activities(original_totals);
+		cxxNameDouble::iterator it = new_activities.begin();
+		for ( ; it != new_activities.end(); it++)
+		{
+			this->master_activity[it->first] = it->second;
+		}
+	}
+	return;
+}
+#endif
+void
+cxxSolution::read_raw(CParser & parser, bool check)
+{
+
+	// Used if it is modify
+	cxxNameDouble simple_original_totals = this->totals.Simplify_redox();
+	cxxNameDouble original_activities(this->master_activity);
+
+	this->master_activity.clear();
+
+	std::istream::pos_type ptr;
+	std::istream::pos_type next_char;
+	std::string token;
+	int opt_save;
+
+	// Read solution number and description
+	this->read_number_description(parser.line());
+
+	opt_save = CParser::OPT_ERROR;
+	bool tc_defined(false);
+	bool ph_defined(false);
+	bool pe_defined(false);
+	bool mu_defined(false);
+	bool ah2o_defined(false);
+	bool total_h_defined(false);
+	bool total_o_defined(false);
+	bool cb_defined(false);
+	bool mass_water_defined(false);
+	bool total_alkalinity_defined(false);
+
+	for (;;)
+	{
+		int opt = parser.get_option(vopts, next_char);
+		if (opt == CParser::OPT_DEFAULT)
+		{
+			opt = opt_save;
+		}
+
+		switch (opt)
+		{
+		case CParser::OPT_EOF:
+			break;
+		case CParser::OPT_KEYWORD:
+			break;
+		case CParser::OPT_DEFAULT:
+		case CParser::OPT_ERROR:
+			opt = CParser::OPT_EOF;
+			parser.error_msg("Unknown input in SOLUTION_RAW keyword.",
+							 PHRQ_io::OT_CONTINUE);
+			parser.error_msg(parser.line().c_str(), PHRQ_io::OT_CONTINUE);
+			continue;
+
+		case 0:				// totals
+			{
+				cxxNameDouble temp_totals;
+				if (temp_totals.read_raw(parser, next_char) !=	CParser::PARSER_OK)
+				{
+					parser.incr_input_error();
+					parser.
+						error_msg("Expected element name and moles for totals.",
+						PHRQ_io::OT_CONTINUE);
+				}
+				else
+				{
+					this->totals.merge_redox(temp_totals);
+				}
+			}
+			opt_save = 0;
+			break;
+
+		case 1:				// activities
+			if (this->master_activity.read_raw(parser, next_char) !=
+				CParser::PARSER_OK)
+			{
+				parser.incr_input_error();
+				parser.
+					error_msg
+					("Expected species name and log activity for activities.",
+					 PHRQ_io::OT_CONTINUE);
+			}
+			opt_save = 1;
+			break;
+
+		case 2:				// gammas
+			if (this->species_gamma.read_raw(parser, next_char) !=
+				CParser::PARSER_OK)
+			{
+				parser.incr_input_error();
+				parser.
+					error_msg
+					("Expected species name and activity coefficient for gammas.",
+					 PHRQ_io::OT_CONTINUE);
+			}
+			opt_save = 2;
+			break;
+
+		case 3:				// isotope
+			{
+				std::string name;
+				if (!(parser.get_iss() >> name))
+				{
+					parser.incr_input_error();
+					parser.error_msg("Expected character value for isotope name.",
+									 PHRQ_io::OT_CONTINUE);
+				}
+				else
+				{
+					cxxSolutionIsotope iso(this->Get_io());
+					iso.Set_isotope_name(name.c_str());
+					iso.read_raw(parser, check);
+					this->isotopes[name] = iso;
+				}
+			}
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 4:				// temp
+		case 5:				// tc_avoid_conflict_with_technetium
+		case 6:				// temperature                  
+			if (!(parser.get_iss() >> this->tc))
+			{
+				this->tc = 25.0;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for temperature.",
+								 PHRQ_io::OT_CONTINUE);
+			}
+			tc_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 7:				// ph
+			if (!(parser.get_iss() >> this->ph))
+			{
+				this->ph = 7.0;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for pH.",
+								 PHRQ_io::OT_CONTINUE);
+			}
+			ph_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 8:				// pe
+			if (!(parser.get_iss() >> this->pe))
+			{
+				this->pe = 4.0;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for pe.",
+								 PHRQ_io::OT_CONTINUE);
+			}
+			pe_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 9:				// mu
+		case 10:				// ionic_strength
+			if (!(parser.get_iss() >> this->mu))
+			{
+				this->mu = 1e-7;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for ionic strength.",
+								 PHRQ_io::OT_CONTINUE);
+			}
+			mu_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 11:				// ah2o
+		case 12:				// activity_water
+			if (!(parser.get_iss() >> this->ah2o))
+			{
+				this->ah2o = 1.0;
+				parser.incr_input_error();
+				parser.
+					error_msg("Expected numeric value for activity of water.",
+							  PHRQ_io::OT_CONTINUE);
+			}
+			ah2o_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 13:				// total_h
+			if (!(parser.get_iss() >> this->total_h))
+			{
+				this->total_h = 111.1;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for total hydrogen.",
+								 PHRQ_io::OT_CONTINUE);
+			}
+			total_h_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 14:				// total_o
+			if (!(parser.get_iss() >> this->total_o))
+			{
+				this->total_o = 55.55;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for total oxygen.",
+								 PHRQ_io::OT_CONTINUE);
+			}
+			total_o_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 15:				// mass_water
+		case 16:				// mass_h2o
+			if (!(parser.get_iss() >> this->mass_water))
+			{
+				this->mass_water = 1.0;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for mass of water.",
+								 PHRQ_io::OT_CONTINUE);
+			}
+			mass_water_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 17:				// total_alkalinity
+		case 18:				// total_alk
+			if (!(parser.get_iss() >> this->total_alkalinity))
+			{
+				this->total_alkalinity = 0;
+				parser.incr_input_error();
+				parser.
+					error_msg("Expected numeric value for total_alkalinity.",
+							  PHRQ_io::OT_CONTINUE);
+			}
+			total_alkalinity_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 19:				// cb
+		case 20:				// charge_balance
+			if (!(parser.get_iss() >> this->cb))
+			{
+				this->cb = 0;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for charge balance.",
+								 PHRQ_io::OT_CONTINUE);
+			}
+			cb_defined = true;
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+		case 21:				// density
+			if (!(parser.get_iss() >> this->density))
+			{
+				this->density = 1.0;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for density.",
+					PHRQ_io::OT_CONTINUE);
+			}
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+		case 22:				// pressure
+			if (!(parser.get_iss() >> this->patm))
+			{
+				this->patm = 1.0;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for pressure.",
+					PHRQ_io::OT_CONTINUE);
+			}
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 23:				// soln_vol
+			if (!(parser.get_iss() >> this->soln_vol))
+			{
+				this->soln_vol = 1.0;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for solution volume.",
+								 PHRQ_io::OT_CONTINUE);
+			}
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+
+		case 24:				// species_map
+			{
+				int s_num;
+				if (parser.peek_token() != CParser::TT_EMPTY)
+				{
+					if (!(parser.get_iss() >> s_num))
+					{
+						parser.incr_input_error();
+						parser.error_msg("Expected integer for species number.",
+										 PHRQ_io::OT_CONTINUE);
+					}
+					else
+					{
+						double d; 
+						if (!(parser.get_iss() >> d))
+						{
+							parser.incr_input_error();
+							parser.error_msg("Expected double for species concentration.",
+											 PHRQ_io::OT_CONTINUE);
+						}
+						this->species_map[s_num] = d;
+					}
+				}
+				opt_save = 24;
+			}
+			break;
+		case 25:				// log_gamma_map
+			{
+				int s_num;
+				if (parser.peek_token() != CParser::TT_EMPTY)
+				{
+					if (!(parser.get_iss() >> s_num))
+					{
+						parser.incr_input_error();
+						parser.error_msg("Expected integer for species number.",
+										 PHRQ_io::OT_CONTINUE);
+					}
+					else
+					{
+						double d; 
+						if (!(parser.get_iss() >> d))
+						{
+							parser.incr_input_error();
+							parser.error_msg("Expected double for species concentration.",
+											 PHRQ_io::OT_CONTINUE);
+						}
+						this->log_gamma_map[s_num] = d;
+					}
+				}
+				opt_save = 25;
+			}
+			break;
+
+		case 26:				// potential
+			if (!(parser.get_iss() >> this->potV))
+			{
+				this->potV = 0.0;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for potential (V).",
+					PHRQ_io::OT_CONTINUE);
+			}
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+		case 27:				// log_molalities_map
+		{
+			int s_num;
+			if (parser.peek_token() != CParser::TT_EMPTY)
+			{
+				if (!(parser.get_iss() >> s_num))
+				{
+					parser.incr_input_error();
+					parser.error_msg("Expected integer for species number.",
+						PHRQ_io::OT_CONTINUE);
+				}
+				else
+				{
+					double d;
+					if (!(parser.get_iss() >> d))
+					{
+						parser.incr_input_error();
+						parser.error_msg("Expected double for species molality.",
+							PHRQ_io::OT_CONTINUE);
+					}
+					this->log_molalities_map[s_num] = d;
+				}
+			}
+			opt_save = 27;
+		}
+		break;
+		case 28:				// viscosity
+			if (!(parser.get_iss() >> this->viscosity))
+			{
+				this->viscosity = 1.0;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for viscosity.",
+					PHRQ_io::OT_CONTINUE);
+			}
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+		case 29:				// viscos_0
+			if (!(parser.get_iss() >> this->viscos_0))
+			{
+				this->viscos_0 = 1.0;
+				parser.incr_input_error();
+				parser.error_msg("Expected numeric value for viscos_0.",
+					PHRQ_io::OT_CONTINUE);
+			}
+			opt_save = CParser::OPT_DEFAULT;
+			break;
+		}
+		if (opt == CParser::OPT_EOF || opt == CParser::OPT_KEYWORD)
+			break;
+	}
+	if (check)
+	{
+		// all members must be defined
+		if (tc_defined == false)
+		{
+			parser.incr_input_error();
+			parser.error_msg("Temp not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+		if (ph_defined == false)
+		{
+			parser.incr_input_error();
+			parser.error_msg("pH not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+		if (pe_defined == false)
+		{
+			parser.incr_input_error();
+			parser.error_msg("pe not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+		if (mu_defined == false)
+		{
+			parser.incr_input_error();
+			parser.error_msg("Ionic strength not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+		if (ah2o_defined == false)
+		{
+			parser.incr_input_error();
+			parser.
+				error_msg("Activity of water not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+		if (total_h_defined == false)
+		{
+			parser.incr_input_error();
+			parser.error_msg("Total hydrogen not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+		if (total_o_defined == false)
+		{
+			parser.incr_input_error();
+			parser.error_msg("Total oxygen not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+		if (cb_defined == false)
+		{
+			parser.incr_input_error();
+			parser.error_msg("Charge balance not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+		if (mass_water_defined == false)
+		{
+			parser.incr_input_error();
+			parser.error_msg("Temp not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+		if (total_alkalinity_defined == false)
+		{
+			parser.incr_input_error();
+			parser.
+				error_msg("Total alkalinity not defined for SOLUTION_RAW input.",
+				PHRQ_io::OT_CONTINUE);
+		}
+	}
+
+	// Update activities
+	if (original_activities.size() > 0)
+	{
+		
+		cxxNameDouble simple_this_totals = this->totals.Simplify_redox();
+		cxxNameDouble::iterator it = simple_original_totals.begin();
+		for ( ; it != simple_original_totals.end(); it++)
+		{
+			cxxNameDouble::iterator jit = simple_this_totals.find(it->first);
+			if (jit != simple_this_totals.end())
+			{
+				if (it->second > 0 && jit->second > 0.0)
+				{
+					LDBLE f = jit->second / it->second;
+					if (f != 1)
+					{
+						original_activities.Multiply_activities_redox(it->first, f);
+					}
+				}
+			}
+		}
+		original_activities.merge_redox(this->master_activity);
+		this->master_activity = original_activities;
+	}
+
+	return;
+}
+
+void
+cxxSolution::Update(LDBLE h_tot, LDBLE o_tot, LDBLE charge, const cxxNameDouble &const_nd)
+{
+	// H, O, charge, totals, and activities of solution are updated
+	this->total_h = h_tot;
+	this->total_o = o_tot;
+	this->cb = charge;
+	this->mass_water = o_tot / 55.5;
+
+	// Don`t bother to update activities?
+	this->Update(const_nd);
+	//this->totals = const_nd;
+	cxxNameDouble::iterator it;
+	for (it = this->totals.begin(); it != this->totals.end(); it++)
+	{
+		if (it->second < 1e-25)
+		{
+			it->second = 0.0;
+		}
+	}
+}
+void
+cxxSolution::Update_activities(const cxxNameDouble &original_tot)
+{
+	// Totals and activities of solution are updated
+	// nd does not have H, O, charge
+	cxxNameDouble simple_original = original_tot.Simplify_redox();
+	// totals after read
+	cxxNameDouble simple_new = this->totals.Simplify_redox();
+
+	// make factors 
+	cxxNameDouble factors;
+	{
+		cxxNameDouble::iterator it = simple_new.begin();
+		cxxNameDouble::iterator jit = simple_original.begin();
+		while (it != simple_new.end() && jit != simple_original.end())
+		{
+			int j = strcmp(it->first.c_str(), jit->first.c_str());
+			if (j < 0)
+			{
+				it++;
+			}
+			else if (j == 0)
+			{
+				if (jit->second != it->second)
+				{
+					if (it->second > 0 && jit->second > 0)
+					{
+						factors[it->first] = log10(jit->second / it->second);
+					}
+				}
+				it++;
+				jit++;
+			}
+			else
+			{
+				jit++;
+			}
+		}
+
+
+		// simple_new now has factors for master activities
+		// Now add factors to activities
+		{
+			cxxNameDouble::iterator activity_it = this->master_activity.begin();
+			cxxNameDouble::iterator factors_it = factors.begin();
+			std::string activity_ename;
+			std::basic_string < char >::size_type indexCh;
+			while (activity_it != master_activity.end() && factors_it != factors.end())
+			{
+				activity_ename = activity_it->first;
+				if (activity_ename.size() > 3)
+				{
+					indexCh = activity_ename.find("(");
+					if (indexCh != std::string::npos)
+					{
+						activity_ename = activity_ename.substr(0, indexCh);
+					}
+				}
+				int j = strcmp(factors_it->first.c_str(), activity_ename.c_str());
+				if (j < 0)
+				{
+					factors_it++;
+				}
+				else if (j == 0)
+				{
+					activity_it->second += factors_it->second;
+					activity_it++;
+				}
+				else 
+				{
+					activity_it++;
+				}
+			}
+		}
+	}
+}
+void
+cxxSolution::Update(const cxxNameDouble &const_nd)
+{
+	// const_nd is a list of new totals, assumed to be inclusive of all elements
+	// Totals and activities of solution are updated
+	// nd does not have H, O, charge
+	cxxNameDouble simple_original = this->totals.Simplify_redox();
+	cxxNameDouble simple_new = const_nd.Simplify_redox();
+
+	cxxNameDouble factors;
+	{
+		// make factors 
+		cxxNameDouble::iterator it = simple_new.begin();
+		cxxNameDouble::iterator jit = simple_original.begin();
+		while (it != simple_new.end() && jit != simple_original.end())
+		{
+			int j = strcmp(it->first.c_str(), jit->first.c_str());
+			if (j < 0)
+			{
+				it++;
+			}
+			else if (j == 0)
+			{
+				if (jit->second != it->second)
+				{
+					if (it->second > 0 && jit->second > 0)
+					{
+						factors[it->first] = log10(it->second / jit->second);
+					}
+				}
+				it++;
+				jit++;
+			}
+			else
+			{
+				jit++;
+			}
+		}
+		// simple_new now has factors for master activities
+		// Now add log factors to log activities
+		{
+			cxxNameDouble::iterator activity_it = this->master_activity.begin();
+			cxxNameDouble::iterator factors_it = factors.begin();
+			std::string activity_ename;
+			std::basic_string < char >::size_type indexCh;
+			while (activity_it != master_activity.end() && factors_it != factors.end())
+			{
+				activity_ename = activity_it->first;
+				if (factors_it->first[0] < activity_ename[0])
+				{
+					factors_it++;
+					continue;
+				}
+				else if (factors_it->first[0] > activity_ename[0])
+				{
+					activity_it++;
+					continue;
+				}
+				if (activity_ename.size() > 3)
+				{
+					indexCh = activity_ename.find("(");
+					if (indexCh != std::string::npos)
+					{
+						activity_ename = activity_ename.substr(0, indexCh);
+					}
+				}
+				int j = strcmp(factors_it->first.c_str(), activity_ename.c_str());
+				if (j < 0)
+				{
+					factors_it++;
+				}
+				else if (j == 0)
+				{
+					activity_it->second += factors_it->second;
+					activity_it++;
+				}
+				else 
+				{
+					activity_it++;
+				}
+			}
+		}
+	}
+
+	// update totals
+	this->totals = simple_new;
+}
+void
+cxxSolution::zero()
+{
+	this->tc = 0.0;
+	this->ph = 0.0;
+	this->pe = 0.0;
+	this->mu = 0.0;
+	this->ah2o = 0.0;
+	this->total_h = 0.0;
+	this->total_o = 0.0;
+	this->cb = 0.0;
+	this->density = 1.0;
+	this->viscosity = 1.0;
+	this->viscos_0 = 1.0;
+	this->mass_water = 0.0;
+	this->soln_vol = 0.0;
+	this->total_alkalinity = 0.0;
+	this->totals.type = cxxNameDouble::ND_ELT_MOLES;
+	this->master_activity.type = cxxNameDouble::ND_SPECIES_LA;
+	this->species_gamma.type = cxxNameDouble::ND_SPECIES_GAMMA;
+	this->patm = 1.0;
+	this->potV = 0.0;
+	this->initial_data = NULL;
+}
+
+void
+cxxSolution::add(const cxxSolution & addee, LDBLE extensive)
+		//
+		// Add existing solution to "this" solution
+		//
+{
+	if (extensive == 0.0)
+		return;
+	LDBLE ext1 = this->mass_water;
+	LDBLE ext2 = addee.mass_water * extensive;
+	LDBLE f1 = ext1 / (ext1 + ext2);
+	LDBLE f2 = ext2 / (ext1 + ext2);
+	this->tc = f1 * this->tc + f2 * addee.tc;
+	this->ph = f1 * this->ph + f2 * addee.ph;
+	this->pe = f1 * this->pe + f2 * addee.pe;
+	this->mu = f1 * this->mu + f2 * addee.mu;
+	this->ah2o = f1 * this->ah2o + f2 * addee.ah2o;
+	this->total_h += addee.total_h * extensive;
+	this->total_o += addee.total_o * extensive;
+	this->cb += addee.cb * extensive;
+	this->density = f1 * this->density + f2 * addee.density;
+	this->viscosity = f1 * this->viscosity + f2 * addee.viscosity;
+	this->viscos_0 = f1 * this->viscos_0 + f2 * addee.viscos_0;
+	this->patm = f1 * this->patm + f2 * addee.patm;
+	// this->potV = f1 * this->potV + f2 * addee.potV; // appt
+	this->mass_water += addee.mass_water * extensive;
+	this->soln_vol += addee.soln_vol * extensive;
+	this->total_alkalinity += addee.total_alkalinity * extensive;
+	this->totals.add_extensive(addee.totals, extensive);
+	this->master_activity.add_log_activities(addee.master_activity, f1, f2);
+	this->species_gamma.add_intensive(addee.species_gamma, f1, f2);
+	this->Add_isotopes(addee.isotopes, f2, extensive);
+	{
+		// Add species
+		std::map<int, double>::const_iterator it = addee.species_map.begin();
+		for ( ; it != addee.species_map.end(); it++)
+		{
+			if (this->species_map.find(it->first) != this->species_map.end())
+			{
+				this->species_map[it->first] = this->species_map[it->first] * f1 + it->second * f2;
+			}
+			else
+			{
+				this->species_map[it->first] = it->second;
+			}
+		}
+		// Add gammas
+		std::map<int, double>::const_iterator git = addee.log_gamma_map.begin();
+		for ( ; git != addee.log_gamma_map.end(); git++)
+		{
+			if (this->log_gamma_map.find(git->first) != this->log_gamma_map.end())
+			{
+				this->log_gamma_map[git->first] = this->log_gamma_map[git->first] * f1 + git->second * f2;
+			}
+			else
+			{
+				this->log_gamma_map[git->first] = git->second;
+			}
+		}
+		// Add molalities
+		std::map<int, double>::const_iterator mit = addee.log_molalities_map.begin();
+		for (; mit != addee.log_molalities_map.end(); mit++)
+		{
+			if (this->log_molalities_map.find(mit->first) != this->log_molalities_map.end())
+			{
+				this->log_molalities_map[mit->first] = this->log_molalities_map[mit->first] * f1 + mit->second * f2;
+			}
+			else
+			{
+				this->log_molalities_map[mit->first] = mit->second;
+			}
+		}
+	}
+}
+
+void
+cxxSolution::multiply(LDBLE extensive)
+		//
+		// Multiply existing solution by extensive
+		//
+{
+	if (extensive == 0.0 || extensive == 1.0)
+		return;
+	this->total_h *= extensive;
+	this->total_o *= extensive;
+	this->cb *= extensive;
+	this->mass_water *= extensive;
+	this->soln_vol *= extensive;
+	this->total_alkalinity *= extensive;
+	this->totals.multiply(extensive);
+	this->Multiply_isotopes(extensive);
+}
+
+LDBLE
+cxxSolution::Get_total(const char *string) const
+{
+	cxxNameDouble::const_iterator it = this->totals.find(string);
+	if (it == this->totals.end())
+	{
+		return (0.0);
+	}
+	else
+	{
+		return (it->second);
+	}
+}
+
+void
+cxxSolution::Set_total(char *string, LDBLE d)
+{
+	this->totals[string] = d;
+}
+
+LDBLE
+cxxSolution::Get_master_activity(char *string) const
+{
+	cxxNameDouble::const_iterator it = this->master_activity.find(string);
+	if (it == this->master_activity.end())
+	{
+		return (0.0);
+	}
+	else
+	{
+		return (it->second);
+	}
+}
+
+void
+cxxSolution::Set_master_activity(char *string, LDBLE d)
+{
+	this->master_activity[string] = d;
+}
+void
+cxxSolution::Add_isotopes(const std::map < std::string, cxxSolutionIsotope > & old, LDBLE intensive, LDBLE extensive)
+{
+	for (std::map < std::string, cxxSolutionIsotope >::const_iterator itold = old.begin(); itold != old.end(); ++itold)
+	{
+		std::map < std::string, cxxSolutionIsotope >::iterator it_this;
+		it_this = this->isotopes.find(itold->first);
+		if (it_this != this->isotopes.end())
+		{
+			LDBLE t = it_this->second.Get_total();
+			t += itold->second.Get_total() * extensive;
+			it_this->second.Set_total(t);
+
+			t = it_this->second.Get_ratio();
+			t += itold->second.Get_ratio() * intensive;
+			it_this->second.Set_ratio(t);
+
+			t = it_this->second.Get_ratio_uncertainty();
+			t += itold->second.Get_ratio_uncertainty() * intensive;
+			it_this->second.Set_ratio_uncertainty(t);
+			it_this->second.Set_ratio_uncertainty_defined(it_this->second.Get_ratio_uncertainty_defined()
+												 || itold->second.Get_ratio_uncertainty_defined());
+		}
+		else
+		{
+			cxxSolutionIsotope iso(itold->second);
+			iso.Set_total(itold->second.Get_total() * extensive);
+			this->Get_isotopes()[iso.Get_isotope_name()] = iso;
+		}
+	}
+}
+void
+cxxSolution::Multiply_isotopes(LDBLE extensive)
+{
+	std::map < std::string, cxxSolutionIsotope>::iterator it;
+	for (it = this->isotopes.begin(); it != this->isotopes.end(); it++)
+	{
+		LDBLE total = it->second.Get_total();
+		total *= extensive;
+		it->second.Set_total(total);
+	}
+}
+
+/* ---------------------------------------------------------------------- */
+void
+cxxSolution::Serialize(Dictionary & dictionary, std::vector < int >&ints, 
+	std::vector < double >&doubles)
+/* ---------------------------------------------------------------------- */
+{
+/*
+ *   Make list of list of ints and doubles from solution structure
+ *   This list is not the complete structure, but only enough
+ *   for batch-reaction, advection, and transport calculations
+ */
+	ints.push_back(this->n_user);
+	ints.push_back(this->new_def ? 1 : 0);
+	doubles.push_back(this->patm);
+	doubles.push_back(this->potV);
+	doubles.push_back(this->tc);
+	doubles.push_back(this->ph);
+	doubles.push_back(this->pe);
+	doubles.push_back(this->mu);
+	doubles.push_back(this->ah2o);
+	doubles.push_back(this->total_h);
+	doubles.push_back(this->total_o);
+	doubles.push_back(this->cb);
+	doubles.push_back(this->mass_water);
+	doubles.push_back(this->density);
+	doubles.push_back(this->viscosity);
+	doubles.push_back(this->soln_vol);
+	doubles.push_back(this->total_alkalinity);
+/*
+ *	struct conc *totals;
+*/
+	this->totals.Serialize(dictionary, ints, doubles);
+/*
+ *	struct master_activity *master_activity;
+ */
+	this->master_activity.Serialize(dictionary, ints, doubles);
+/*
+ *	struct master_activity *species_gamma
+ */
+	this->species_gamma.Serialize(dictionary, ints, doubles);
+/*
+ *  isotopes
+ */
+	ints.push_back((int) isotopes.size());
+	{
+		std::map < std::string, cxxSolutionIsotope >::iterator it;
+		for (it = isotopes.begin(); it != isotopes.end(); it++) 
+		{
+			ints.push_back(dictionary.Find(it->first));
+			it->second.Serialize(dictionary, ints, doubles);
+		}
+	}
+/*
+ *  species_map
+ */
+	ints.push_back((int) species_map.size());
+	{
+		std::map < int, double >::iterator it;
+		for (it = species_map.begin(); it != species_map.end(); it++) 
+		{
+			ints.push_back(it->first);
+			doubles.push_back(it->second);
+		}
+	}
+/*
+ *  log_gamma_map
+ */
+	ints.push_back((int) log_gamma_map.size());
+	{
+		std::map < int, double >::iterator it;
+		for (it = log_gamma_map.begin(); it != log_gamma_map.end(); it++) 
+		{
+			ints.push_back(it->first);
+			doubles.push_back(it->second);
+		}
+	}
+	/*
+	 *  log_molalities_map
+	 */
+	ints.push_back((int)log_molalities_map.size());
+	{
+		std::map < int, double >::iterator it;
+		for (it = log_molalities_map.begin(); it != log_molalities_map.end(); it++)
+		{
+			ints.push_back(it->first);
+			doubles.push_back(it->second);
+		}
+	}
+}
+
+/* ---------------------------------------------------------------------- */
+void
+cxxSolution::Deserialize(Dictionary & dictionary, std::vector < int >&ints, std::vector < double >&doubles, int &ii, int &dd)
+/* ---------------------------------------------------------------------- */
+{
+	this->n_user = ints[ii++];
+	this->n_user_end = this->n_user;
+	this->description = "  ";
+
+	this->new_def = (ints[ii++] != 0);
+	this->patm = doubles[dd++];
+	this->potV = doubles[dd++];
+	this->tc = doubles[dd++];
+	this->ph = doubles[dd++];
+	this->pe = doubles[dd++];
+	this->mu = doubles[dd++];
+	this->ah2o = doubles[dd++];
+	this->total_h = doubles[dd++];
+	this->total_o = doubles[dd++];
+	this->cb = doubles[dd++];
+	this->mass_water = doubles[dd++];
+	this->density = doubles[dd++];
+	this->viscosity = doubles[dd++];
+	this->soln_vol = doubles[dd++];
+	this->total_alkalinity = doubles[dd++];
+/*
+ *	struct conc *totals;
+*/
+	this->totals.Deserialize(dictionary, ints, doubles, ii, dd);
+/*
+ *	struct master_activity *master_activity;
+ */
+	this->master_activity.Deserialize(dictionary, ints, doubles, ii, dd);
+/*
+ *	struct master_activity *species_gamma;
+ */
+	this->species_gamma.Deserialize(dictionary, ints, doubles, ii, dd);
+/*
+ *  isotopes
+ */
+	{
+		isotopes.clear();
+		int n = ints[ii++];
+		for (int i = 0; i < n; i++)
+		{
+			std::string str = dictionary.GetWords()[ints[ii++]];
+			cxxSolutionIsotope iso;
+			iso.Deserialize(dictionary, ints, doubles, ii, dd);
+			isotopes[str] = iso;
+		}
+	}
+/*
+ *  species_map
+ */
+	{
+		species_map.clear();
+		int n = ints[ii++];
+		for (int i = 0; i < n; i++)
+		{
+			species_map[ints[ii++]] = doubles[dd++];
+		}
+	}
+/*
+ *  log_gamma_map
+ */
+	{
+		log_gamma_map.clear();
+		int n = ints[ii++];
+		for (int i = 0; i < n; i++)
+		{
+			log_gamma_map[ints[ii++]] = doubles[dd++];
+		}
+	}
+	/*
+	 *  log_molalities_map
+	 */
+	{
+		log_molalities_map.clear();
+		int n = ints[ii++];
+		for (int i = 0; i < n; i++)
+		{
+			log_molalities_map[ints[ii++]] = doubles[dd++];
+		}
+	}
+}
+
+
+const std::vector< std::string >::value_type temp_vopts[] = {
+	std::vector< std::string >::value_type("totals"),	                            // 0 
+	std::vector< std::string >::value_type("activities"),	                        // 1 
+	std::vector< std::string >::value_type("gammas"),	                            // 2 
+	std::vector< std::string >::value_type("isotopes"),	                            // 3 
+	std::vector< std::string >::value_type("temp"),	                                // 4 
+	std::vector< std::string >::value_type("tc_avoid_conflict_with_technetium"),	// 5 
+	std::vector< std::string >::value_type("temperature"),	                        // 6 
+	std::vector< std::string >::value_type("ph"),	                                // 7 
+	std::vector< std::string >::value_type("pe"),	                                // 8 
+	std::vector< std::string >::value_type("mu"),	                                // 9 
+	std::vector< std::string >::value_type("ionic_strength"),	                    // 10
+	std::vector< std::string >::value_type("ah2o"),	                                // 11
+	std::vector< std::string >::value_type("activity_water"),	                    // 12
+	std::vector< std::string >::value_type("total_h"),	                            // 13
+	std::vector< std::string >::value_type("total_o"),	                            // 14
+	std::vector< std::string >::value_type("mass_water"),	                        // 15
+	std::vector< std::string >::value_type("mass_h2o"),	                            // 16
+	std::vector< std::string >::value_type("total_alkalinity"),	                    // 17
+	std::vector< std::string >::value_type("total_alk"),	                        // 18
+	std::vector< std::string >::value_type("cb"),	                                // 19
+	std::vector< std::string >::value_type("charge_balance"),	                    // 20
+	std::vector< std::string >::value_type("density"),	                            // 21
+	std::vector< std::string >::value_type("pressure"),	                            // 22
+	std::vector< std::string >::value_type("soln_vol"),	                            // 23
+	std::vector< std::string >::value_type("species_map"), 	                        // 24
+	std::vector< std::string >::value_type("log_gamma_map"), 	                    // 25
+	std::vector< std::string >::value_type("potential"), 	                        // 26
+	std::vector< std::string >::value_type("log_molalities_map"),                   // 27
+	std::vector< std::string >::value_type("viscosity"),                            // 28
+	std::vector< std::string >::value_type("viscos_0")                              // 29
+};									   
+const std::vector< std::string > cxxSolution::vopts(temp_vopts, temp_vopts + sizeof temp_vopts / sizeof temp_vopts[0]);