Move !$OMP THREADPRIVATE(TRH) in TSsubs.f90 to after the variable declaration for IFX compiler

Author: deslaughter

modules/turbsim/src/TSsubs.f90

@@ -55,8 +55,8 @@ SUBROUTINE CalcFourierCoeffs_IEC( p, U, PhaseAngles, S, V, TRH_in, ErrStat, ErrM
 INTEGER(IntKi),              INTENT(OUT)    :: ErrStat
 CHARACTER(*),                INTENT(OUT)    :: ErrMsg
 
-!$OMP THREADPRIVATE(TRH)
 REAL(ReKi), allocatable, save :: TRH(:)         ! Each OMP thread gets its own copy of this array
+!$OMP THREADPRIVATE(TRH)
 REAL(ReKi), ALLOCATABLE       :: Dist(:)        ! The distance between points
 REAL(ReKi), ALLOCATABLE       :: DistU(:)