formatting and spelling

Author: Daniel Vickers

src/simulation/m_particle_bed.fpp

@@ -157,16 +157,17 @@ contains
             end do
 
             if (n_placed < particle_bed(b)%num_particles) then
-              print *, "Error :: Failed to place all IBs ib particle bed"
-              stop
+                print *, "Error :: Failed to place all IBs ib particle bed"
+                stop
             end if
 
             n_total_placed = n_total_placed + n_placed
             deallocate (placed, hash_head, chain_next)
         end do
 
         call cpu_time(t_end)
-        if (proc_rank == 0) print '(a,i0,a,f0.3,a)', 'Particle beds placed ', n_total_placed, ' particles in ', t_end - t_start, ' seconds.'
+        if (proc_rank == 0) print '(a,i0,a,f0.3,a)', 'Particle beds placed ', n_total_placed, ' particles in ', t_end - t_start, &
+            & ' seconds.'
 
     end subroutine s_generate_particle_beds
 

src/simulation/m_start_up.fpp

@@ -923,7 +923,7 @@ contains
             else if (t_step_start > 0) then
                 call s_read_ib_restart_data(t_step_start)
             else
-                ! particle bed generated on first tiem step
+                ! particle bed generated on first time step
                 call s_generate_particle_beds()
             end if
             call s_instantiate_STL_models()
@@ -1219,6 +1219,7 @@ contains
         logical                                :: is_in_neighborhood, is_local
 
         ! do all set up for moving immersed boundaries
+
         moving_immersed_boundary_flag = .false.
         do i = 1, num_ibs
             if (patch_ib(i)%moving_ibm /= 0) then