fix return in accelerator statements

Author: sbryngelson

src/simulation/m_pressure_relaxation.fpp

@@ -101,10 +101,10 @@ contains
 
     end subroutine s_relax_cell_pressure
 
-    !> Check if pressure relaxation is needed for this cell
+        !> Check if pressure relaxation is needed for this cell
     pure logical function s_needs_pressure_relaxation(q_cons_vf, j, k, l)
         !$acc routine seq
-
+        
         type(scalar_field), dimension(sys_size), intent(in) :: q_cons_vf
         integer, intent(in) :: j, k, l
         integer :: i
@@ -114,7 +114,6 @@ contains
         do i = 1, num_fluids
             if (q_cons_vf(i + advxb - 1)%sf(j, k, l) > (1._wp - sgm_eps)) then
                 s_needs_pressure_relaxation = .false.
-                return
             end if
         end do