anchor.diff:              exit
            end if
         end do
  +   else
  +      member%i_floor = 0 ! lower end is at or above the seabed
      end if
   
   
  
positive.code:    CASE (3) ! Member-based model: coefficients set using member-specific coefficient tables
         do i = 1, member%NElements + 1
           ! Pull member  end-node data from the tables and then linearly interpolate it onto the interior member nodes    
           s = (i-1) / member%NElements
           if ( member%tMG(i) > 0.0_ReKi ) then
              member%Cd    (i) = CoefMembers(MmbrCoefIDIndx)%MemberCdMG1*(1-s) + CoefMembers(MmbrCoefIDIndx)%MemberCdMG2*s
              member%Ca    (i) = CoefMembers(MmbrCoefIDIndx)%MemberCaMG1*(1-s) + CoefMembers(MmbrCoefIDIndx)%MemberCaMG2*s
  
negative.code:    member%RMG(N+1) = propSet2%PropD / 2.0 + member%tMG(N+1)
     member%Rin(N+1) = propSet2%PropD / 2.0 - propSet2%PropThck 
     do i = 2,  member%NElements
        s = (real(i,ReKi)-1.0) / real(member%NElements,ReKi)
        member%R(  i) =  member%R(  1)*(1-s) + member%R(  N+1)*s
        member%Rin(i) =  member%Rin(1)*(1-s) + member%Rin(N+1)*s
        member%RMG(i) =  member%R(i) + member%tMG(i)
  