From 4bfee960fdcd95163417b2891cdcb881397b4239 Mon Sep 17 00:00:00 2001
From: Faisal H Bhuiyan <faisalhbhuiyan@gmail.com>
Date: Wed, 29 May 2024 16:57:48 -0600
Subject: [PATCH] Update MoorDyn_Body.f90

Initialize the 6x6 temporary mass matrix to avoid setting them to NaNs
---
 modules/moordyn/src/MoorDyn_Body.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/modules/moordyn/src/MoorDyn_Body.f90 b/modules/moordyn/src/MoorDyn_Body.f90
index acf6f92098..33cbcea043 100644
--- a/modules/moordyn/src/MoorDyn_Body.f90
+++ b/modules/moordyn/src/MoorDyn_Body.f90
@@ -63,7 +63,7 @@ SUBROUTINE Body_Setup( Body, tempArray, p, ErrStat, ErrMsg)
 !      INTEGER(4)                          :: K             ! Generic index
 !      INTEGER(IntKi)                      :: N
 
-      REAL(DbKi)                          :: Mtemp(6,6)   
+      REAL(DbKi)                          :: Mtemp(6,6) = 0.0_DbKi  ! temporary mass matrix
       
       ErrStat = ErrID_None
       ErrMsg = ""