Merge pull request #2134 from andrew-platt/b/SrvD_SumFileSegFault

SrvD: Fix seg fault if blade StC used while writing summary file
OpenFAST · Apr 1, 2024 · c5ff09d · c5ff09d
2 parents 531dbe9 + 0b594dd
commit c5ff09d
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/docs/changelogs/v3.5.3.md b/docs/changelogs/v3.5.3.md
@@ -103,6 +103,7 @@ Other notable improvements include corrections to turbine indexing when coupled
 ### ServoDyn
 
 #2079 Handling of Paths for SrvD UserSubs Input Files (@rdamiani)
+#2134 Bugfix seg fault if blade StC used while writing summary file (@aplatt)
 
 
 ### TurbSim

diff --git a/modules/servodyn/src/ServoDyn.f90 b/modules/servodyn/src/ServoDyn.f90
@@ -1486,7 +1486,7 @@ subroutine StC_Blade_Setup(SrvD_InitInp,SrvD_p,InputFileData,SrvD_u,SrvD_y,SrvD_
          ! A little bit of information about the StC location
          if (unsum >0) then
             write(UnSum, '(A24,i2)')                  '    Blade StC instance: ',j
-            write(UnSum, '(10x,A)')                   'Input file: '//trim(InputFileData%NStCfiles(j))
+            write(UnSum, '(10x,A)')                   'Input file: '//trim(InputFileData%BStCfiles(j))
             do k=1,StC_InitInp%NumMeshPts
                write(UnSum, '(10x,A6,I1,A29)')        'Blade ',k,' location (global/inertial): '
                write(UnSum, '(20x,3(2x,ES10.3e2))')   u(1,j)%Mesh(k)%Position(1:3,1)