Format

Author: Anand

src/common/m_helper_basic.fpp

@@ -143,7 +143,7 @@ contains
             buff_size = max(buff_size, 6)
         end if
 
-        if(ib) then 
+        if (ib) then
             buff_size = max(buff_size, 6)
         end if
 

src/simulation/m_ibm.fpp

@@ -404,8 +404,8 @@ contains
                     do while ((temp_loc < s_cc(index) &
                                .or. temp_loc > s_cc(index + 1)))
                         index = index + dir
-                        if(index < -buff_size .or. index > bound) then
-                            EXIT
+                        if (index < -buff_size .or. index > bound) then
+                            exit
                         end if
                     end do
                     ghost_points_in(q)%ip_grid(dim) = index