From 85162128c0163470f1e1379e7f83d5962a50be8e Mon Sep 17 00:00:00 2001
From: Jeffrey Curtis <jcurtis2@illinois.edu>
Date: Fri, 8 Dec 2023 08:22:53 -0800
Subject: [PATCH] fix formatting issues

---
 src/partmc.F90    | 6 +++---
 src/run_exact.F90 | 2 +-
 src/run_part.F90  | 2 +-
 src/run_sect.F90  | 2 +-
 4 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/src/partmc.F90 b/src/partmc.F90
index c59475985..360050cbc 100644
--- a/src/partmc.F90
+++ b/src/partmc.F90
@@ -542,7 +542,7 @@ subroutine partmc_part(file)
     ! initialize the chemistry solver
     if (run_part_opt%do_camp_chem) then
 #ifdef PMC_USE_CAMP
-      call camp_core%solver_initialize()
+       call camp_core%solver_initialize()
 #endif
     end if
 
@@ -719,7 +719,7 @@ subroutine partmc_exact(file)
     end if
 
     call spec_file_read_run_exact(file, run_exact_opt, aero_data, &
-       bin_grid, gas_data, env_state, aero_dist_init, scenario)
+         bin_grid, gas_data, env_state, aero_dist_init, scenario)
 
     call run_exact(bin_grid, scenario, env_state, aero_data, &
          aero_dist_init, gas_data, run_exact_opt)
@@ -828,7 +828,7 @@ subroutine partmc_sect(file)
     end if
 
     call spec_file_read_run_sect(file, run_sect_opt, aero_data, bin_grid, &
-       gas_data, env_state, aero_dist_init, scenario)
+         gas_data, env_state, aero_dist_init, scenario)
 
     call run_sect(bin_grid, gas_data, aero_data, aero_dist_init, scenario, &
          env_state, run_sect_opt)
diff --git a/src/run_exact.F90 b/src/run_exact.F90
index df736bd0f..c75dfc49a 100644
--- a/src/run_exact.F90
+++ b/src/run_exact.F90
@@ -99,7 +99,7 @@ subroutine spec_file_read_run_exact(file, run_exact_opt, aero_data, &
     !> Bin grid.
     type(bin_grid_t), intent(out) :: bin_grid
     !> Initial aerosol state.
-    type(aero_dist_t), intent(out)  :: aero_dist_init
+    type(aero_dist_t), intent(out) :: aero_dist_init
     !> Scenario data.
     type(scenario_t), intent(out) :: scenario
     !> Environmental state.
diff --git a/src/run_part.F90 b/src/run_part.F90
index 7f96ea74b..70340eae5 100644
--- a/src/run_part.F90
+++ b/src/run_part.F90
@@ -506,7 +506,7 @@ subroutine spec_file_read_run_part(file, run_part_opt, aero_data, &
        call spec_file_read_real(file, 't_progress', run_part_opt%t_progress)
 
        call spec_file_read_logical(file, 'do_camp_chem', &
-               run_part_opt%do_camp_chem)
+            run_part_opt%do_camp_chem)
        if (run_part_opt%do_camp_chem) then
 #ifdef PMC_USE_CAMP
           call spec_file_read_string(file, 'camp_config', &
diff --git a/src/run_sect.F90 b/src/run_sect.F90
index 1c7416804..9b3a07d94 100644
--- a/src/run_sect.F90
+++ b/src/run_sect.F90
@@ -212,7 +212,7 @@ subroutine spec_file_read_run_sect(file, run_sect_opt, aero_data, &
     !> Bin grid.
     type(bin_grid_t), intent(out) :: bin_grid
     !> Initial aerosol state.
-    type(aero_dist_t), intent(out)  :: aero_dist_init
+    type(aero_dist_t), intent(out) :: aero_dist_init
     !> Scenario data.
     type(scenario_t), intent(out) :: scenario
     !> Environmental state.