Output the angular velocities of a blade segment

Wind & Water Computer-Aided Engineering Software Tools
8

Dear Jason,
I really appreciate your help!
I try to adapt your code but went into some compiling errors. So, I reduced the code to just write a constant because I first want to get the new variable in the output files. Everything else will be the next step.

What I did so far:
ElastoDyn_Registry.txt

typedef	^	ED_RtHndSide	ReKi	AngVelEM	{:}{:}{:}

ElastoDyn.f90 @ SUBROUTINE CalculateAngularPosVelPAcc( p, x, CoordSys, RtHSdat ) 

DO K = 1,p%NumBl ! Loop through all blades
DO J = 1,p%BldNodes ! Loop through the blade nodes / elements
...
RtHSdat%AngVelEM(K,J,:) = 5.0 ! some constant
...
END DO !J = 1,p%BldNodes ! Loop through the blade nodes / elements
END DO !K = 1,p%NumBl

I’m now completely lost what to enter in ElastoDyn_IO.f90 to get the parameterizable output.

PS: Somehow nrel seems to be down. I cannot download the programmers instructions, which may also contain the necessary information. So please excuse my poor fortran skills…