From 60c12455359f0f006f8bc2fbc2db4cd3da83f8a9 Mon Sep 17 00:00:00 2001
From: Ann Almgren <asalmgren@lbl.gov>
Date: Tue, 9 Jul 2024 11:51:35 -0700
Subject: [PATCH] fix plotting of qsat (#1673)

---
 Source/IO/Plotfile.cpp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Source/IO/Plotfile.cpp b/Source/IO/Plotfile.cpp
index c0a971f97..09be7891a 100644
--- 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));
                 });
             }