change ReturnLogMap flag to ReturnSmallAngle in BeamDyn.f90

OpenFAST · May 9, 2022 · 8130a1b · 8130a1b
1 parent 8364b53
commit 8130a1b
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/modules/beamdyn/src/BeamDyn.f90 b/modules/beamdyn/src/BeamDyn.f90
@@ -6547,7 +6547,7 @@ SUBROUTINE BD_GetOP( t, u, p, x, xd, z, OtherState, y, m, ErrStat, ErrMsg, u_op,
    CHARACTER(ErrMsgLen)                                          :: ErrMsg2
    CHARACTER(*), PARAMETER                                       :: RoutineName = 'BD_GetOP'
    LOGICAL                                                       :: FieldMask(FIELDMASK_SIZE)
-   LOGICAL                                                       :: ReturnLogMap
+   LOGICAL                                                       :: ReturnSmallAngle
    TYPE(BD_ContinuousStateType)                                  :: dx          ! derivative of continuous states at operating point
 
 
@@ -6585,9 +6585,9 @@ SUBROUTINE BD_GetOP( t, u, p, x, xd, z, OtherState, y, m, ErrStat, ErrMsg, u_op,
 
    IF ( PRESENT( y_op ) ) THEN
       if (present(NeedLogMap)) then
-         ReturnLogMap = NeedLogMap
+         ReturnSmallAngle = NeedLogMap
       else
-         ReturnLogMap = .false.
+         ReturnSmallAngle = .false.
       end if
 
       if (.not. allocated(y_op)) then
@@ -6609,7 +6609,7 @@ SUBROUTINE BD_GetOP( t, u, p, x, xd, z, OtherState, y, m, ErrStat, ErrMsg, u_op,
       FieldMask(MASKID_RotationVel)     = .true.
       FieldMask(MASKID_TranslationAcc)  = .true.
       FieldMask(MASKID_RotationAcc)     = .true.
-      call PackMotionMesh(y%BldMotion, y_op, index, FieldMask=FieldMask, UseSmlAngle=ReturnLogMap)
+      call PackMotionMesh(y%BldMotion, y_op, index, FieldMask=FieldMask, UseSmlAngle=ReturnSmallAngle)
 
       index = index - 1
       do i=1,p%NumOuts + p%BldNd_TotNumOuts