fix plotting of qsat (#1673)

erf-model · Jul 9, 2024 · 60c1245 · 60c1245
1 parent 2e1e040
commit 60c1245
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Source/IO/Plotfile.cpp b/Source/IO/Plotfile.cpp
@@ -1001,7 +1001,7 @@ ERF::WritePlotFile (int which, Vector<std::string> plot_var_names)
                 {
                     Real       qv = S_arr(i,j,k,RhoQ1_comp) / S_arr(i,j,k,Rho_comp);
                     Real       T  = getTgivenRandRTh(S_arr(i,j,k,Rho_comp), S_arr(i,j,k,RhoTheta_comp), qv);
-                    Real pressure = getPgivenRTh(S_arr(i,j,k,RhoTheta_comp), qv);
+                    Real pressure = getPgivenRTh(S_arr(i,j,k,RhoTheta_comp), qv) * Real(0.01);
                     erf_qsatw(T, pressure, derdat(i,j,k,mf_comp));
                 });
             }