From c44c904445d52b334d0e7e9aabe40c8a008a24ae Mon Sep 17 00:00:00 2001
From: Lizzie Lundgren <elundgren@seas.harvard.edu>
Date: Fri, 13 Oct 2023 14:32:57 -0600
Subject: [PATCH] Fix typo in error message

Signed-off-by: Lizzie Lundgren <elundgren@seas.harvard.edu>
---
 src/physics/cam/constituents.F90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/physics/cam/constituents.F90 b/src/physics/cam/constituents.F90
index cda9c82db4..b93cf060b3 100644
--- a/src/physics/cam/constituents.F90
+++ b/src/physics/cam/constituents.F90
@@ -173,7 +173,7 @@ subroutine cnst_add (name, mwc, cpc, qminc, &
    padv = padv+1
    ind  = padv
    if (padv > pcnst) then
-      write(errmsg, *) sub//': FATAL: advected tracer (', trim(name), ') index for greater than pcnst=', pcnst
+      write(errmsg, *) sub//': FATAL: advected tracer (', trim(name), ') index is greater than number of constituents'
       call endrun(errmsg)
    end if