Skip to content
This repository was archived by the owner on Aug 28, 2024. It is now read-only.

Commit

Permalink
Misc. formatting fixes
Browse files Browse the repository at this point in the history
  • Loading branch information
daminton committed Nov 15, 2021
1 parent e44c0d9 commit 001247b
Show file tree
Hide file tree
Showing 2 changed files with 1 addition and 2 deletions.
1 change: 0 additions & 1 deletion src/io/io.f90
Original file line number Diff line number Diff line change
Expand Up @@ -1351,7 +1351,6 @@ subroutine io_read_in_cb(self, param)
close(iu, err = 667, iomsg = errmsg)

if (ierr == 0) then


if (self%j2rp2 /= 0.0_DP) param%loblatecb = .true.
if (param%rmin < 0.0) param%rmin = self%radius
Expand Down
2 changes: 1 addition & 1 deletion src/kick/kick.f90
Original file line number Diff line number Diff line change
Expand Up @@ -189,7 +189,7 @@ module subroutine kick_getacch_int_all_triangular_pl(npl, nplm, x, Gmass, radius
end do
!$omp end parallel do
else
!$omp parallel do default(private) schedule(static)&
!$omp parallel do default(private) schedule(static)&
!$omp shared(npl, nplm, x, Gmass, radius) &
!$omp lastprivate(rji2, xr, yr, zr) &
!$omp reduction(+:ahi) &
Expand Down

0 comments on commit 001247b

Please sign in to comment.