From 8df8847599ff2a6a0f261139d6a21afec4f211d4 Mon Sep 17 00:00:00 2001 From: David A Minton Date: Thu, 9 Sep 2021 17:17:37 -0400 Subject: [PATCH] Fixed typo in metadata tag for hit and run fragment --- src/symba/symba_collision.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/symba/symba_collision.f90 b/src/symba/symba_collision.f90 index c5ca6426f..a3990cabd 100644 --- 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