max/iphreeqc
1
0
Fork 0
mirror of https://git.gfz-potsdam.de/naaice/iphreeqc.git synced 2025-12-16 16:44:49 +01:00
Code Issues Packages Projects Releases Wiki Activity

tweak if tidy_min_surface is invoked on a _raw definition.

Browse Source 
git-svn-id: svn://136.177.114.72/svn_GW/phreeqc3/trunk@10633 1feff8c3-07ed-0310-ac33-dd36852eb9cd
This commit is contained in:
David L Parkhurst 2015-12-30 18:23:01 +00:00
parent ae2286eb41
commit dec66bb848
1 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
tidy.cpp
View File

@ -3917,8 +3917,15 @@ tidy_min_surface(void)
free_check_null(temp_formula);
}
{
cxxNameDouble nd = elt_list_NameDouble();
surface_comp_ptr->Set_totals(nd);
if (surface_ptr->Get_new_def())
{
cxxNameDouble nd = elt_list_NameDouble();
surface_comp_ptr->Set_totals(nd);
}
else
{
surface_comp_ptr->Get_totals()[surface_comp_ptr->Get_master_element()] = conc;
}
}
/* area */