rotateScalar Function

private function rotateScalar() result(rotationIndices)

Arguments

None

Return Value integer, (1)

The coordinate transformation you apply. Rotation indices for the given transformation


Called by

proc~~rotatescalar~~CalledByGraph proc~rotatescalar rotateScalar proc~appendrotatedvariable appendRotatedVariable proc~appendrotatedvariable->proc~rotatescalar proc~initcoordinaterotation initCoordinateRotation proc~initcoordinaterotation->proc~appendrotatedvariable

Contents

Source Code

rotateScalar

Source Code

  function rotateScalar() result(rotationIndices)
    ! ---------------------------------------------------------------------------
    !> The coordinate transformation you apply.
    ! integer, intent(in) :: coordTrans
    !> Rotation indices for the given transformation
    integer :: rotationIndices(1)
    ! ---------------------------------------------------------------------------
    rotationIndices = [1]

  end function rotateScalar