remote diagnostic output

Author: mattldawson

test/unit_rxn_data/test_rxn_SIMPOL_phase_transfer.F90

@@ -60,9 +60,7 @@ logical function run_SIMPOL_phase_transfer_tests() result(passed)
     camp_solver_data => camp_solver_data_t()
 
     if (camp_solver_data%is_solver_available()) then
-      write(*,*) "Running SIMPOL phase transfer reaction test for single particle aerosol"
       passed = run_SIMPOL_phase_transfer_test(1)
-      write(*,*) "Running SIMPOL phase transfer reaction test for modal aerosol"
       passed = passed .and. run_SIMPOL_phase_transfer_test(2)
     else
       call warn_msg(713064651, "No solver available")