anchor.diff:        end subroutine Cleanup
   END SUBROUTINE BD_DynamicSolutionGA2
   
  -   SUBROUTINE BD_GenerateDynamicElementGA2(uuN0,uuNf,vvNf,aaNf,                 &
  -                                           Stif0,Mass0,gravity,u,damp_flag,beta,&
  -                                           elem_total,node_elem,dof_node,ngp,   &
  -                                           StifK,RHS,MassM,DampG,&
  -                                           ErrStat,ErrMsg)
  +SUBROUTINE BD_GenerateDynamicElementGA2(uuN0,uuNf,vvNf,aaNf,                 &
  +                                        Stif0,Mass0,gravity,u,damp_flag,beta,&
  +                                        elem_total,node_elem,dof_node,ngp,   &
  +                                        StifK,RHS,MassM,DampG,&
  +                                        ErrStat,ErrMsg)
   
      REAL(ReKi),        INTENT(IN   ):: uuN0(:,:)
      REAL(ReKi),        INTENT(IN   ):: uuNf(:)
  
positive.code: !       BladeInputFileData%mass0(6,:,i) = temp66(5,:)
     ENDDO
  
     END SUBROUTINE BD_ReadBladeFile
  
  SUBROUTINE BD_ValidateInputData( InputFileData, ErrStat, ErrMsg )
  ! This routine validates the inputs from the BeamDyn input files.
  
negative.code:    end subroutine cleanup         
  END SUBROUTINE BD_ReadPrimaryFile
  
  SUBROUTINE BD_ReadBladeFile(BldFile,BladeInputFileData,UnEc,ErrStat,ErrMsg)
  
     ! Passed variables:
     TYPE(BladeInputData), INTENT(  OUT):: BladeInputFileData
  