Fixed typo in metadata tag for hit and run fragment

MintonGroup · Sep 9, 2021 · 8df8847 · 8df8847
1 parent ef8ac1d
commit 8df8847
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/symba/symba_collision.f90 b/src/symba/symba_collision.f90
@@ -775,7 +775,7 @@ subroutine symba_collision_mergeaddsub(system, param, colliders, frag, status)
                   plnew%status(1) = OLD_PARTICLE
                   do i = 2, nfrag
                      write(newname, FRAGFMT) frag%id(i)
-                     call plnew%info(i)%set_value(origin_type="Hit and run fragmention", origin_time=param%t, name=newname, origin_xh=plnew%xh(:,i), origin_vh=plnew%vh(:,i))
+                     call plnew%info(i)%set_value(origin_type="Hit and run fragment", origin_time=param%t, name=newname, origin_xh=plnew%xh(:,i), origin_vh=plnew%vh(:,i))
                   end do
                   do i = 1, ncolliders
                      if (colliders%idx(i) == ibiggest) cycle