From bd0a62977df5f3536c313722e3f821a1723913d2 Mon Sep 17 00:00:00 2001 From: David A Minton Date: Tue, 22 Jun 2021 12:34:20 -0400 Subject: [PATCH] Removed uninitialized rot_frag from the scaling subroutine --- src/symba/symba_frag_pos.f90 | 1 - 1 file changed, 1 deletion(-) diff --git a/src/symba/symba_frag_pos.f90 b/src/symba/symba_frag_pos.f90 index 4b9e3909b..9c7f6897b 100644 --- a/src/symba/symba_frag_pos.f90 +++ b/src/symba/symba_frag_pos.f90 @@ -192,7 +192,6 @@ subroutine set_scale_factors() m_frag = m_frag / mscale rad_frag = rad_frag / rscale - rot_frag = rot_frag * tscale Qloss = Qloss / Escale return