diff --git a/Overlap/overlap.f90 b/Overlap/overlap.f90 index 5a4174b187cedd1322c62eeab01d30b0aa810d1d..057c2cf9d5897efcf2f6a9cd7126961e3d12f03e 100644 --- a/Overlap/overlap.f90 +++ b/Overlap/overlap.f90 @@ -83,9 +83,8 @@ contains DO l = 1, n_select i2 = selection(l) associate (e2 => flow(j)%list(i2)) - ! Assertion: {e1%delta_out >= delta .or. e2%delta_in - ! >= delta} - + ! Assertion: {e1%delta_out >= delta .or. e2%delta_in >= + ! delta} delta_long = e1%extr%coord(1) - e2%extr%coord(1) if (e2%speed_cont%n_points /= 0) then