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

Commit

Permalink
Fixed typo
Browse files Browse the repository at this point in the history
  • Loading branch information
@daminton
daminton committed Jul 23, 2021
1 parent 4c0dd0c commit 2a2700f
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/symba/symba_encounter_check.f90
View file
Original file line number Diff line number Diff line change
Expand Up @@ -19,7 +19,7 @@ module function symba_encounter_check_pl(self, system, dt, irec) result(lencount

associate(pl => self, npl => self%nbody)
lencounter = .false.
do concurrent(j = 1:npl, pl%lminty(j))
do concurrent(j = 1:npl, pl%lmtiny(j))
do i = 1, npl
rcrit = (pl%rhill(i) + pl%rhill(j)) * RHSCALE * (RSHELL**(irec))
r2crit = r2crit**2
Expand Down

0 comments on commit 2a2700f

Please sign in to comment.