From 2ccdc23db7e3da0cb3159b78acfeebcd90993f70 Mon Sep 17 00:00:00 2001
From: Nick Wogan <nicholaswogan@gmail.com>
Date: Mon, 29 Apr 2024 11:44:45 -0700
Subject: [PATCH] fix test

---
 test/test_equilibrate.f90 | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/test/test_equilibrate.f90 b/test/test_equilibrate.f90
index e3322ce..9c67be9 100644
--- a/test/test_equilibrate.f90
+++ b/test/test_equilibrate.f90
@@ -1,5 +1,5 @@
 program main
-  use equilibrate, only: ChemEquiAnalysis, dp, reac_str_len, atom_str_len
+  use equilibrate, only: ChemEquiAnalysis, dp, s_str_len
   implicit none
 
   call test()
@@ -9,8 +9,8 @@ program main
   subroutine test()
     type(ChemEquiAnalysis) :: cea, cea2
     character(:), allocatable :: err
-    character(reac_str_len), allocatable :: species(:)
-    character(atom_str_len), allocatable :: atoms(:)
+    character(s_str_len), allocatable :: species(:)
+    character(s_str_len), allocatable :: atoms(:)
     real(dp), allocatable :: X(:), correct_answer(:)
     integer :: i