anchor.diff:  !*********************************************************************************************************************************
   MODULE IceFloe_Types
  -! this is a simplified version for use with IceFloe not in FAST
  +! this is a simplified version for use with IceFloe with codes other than FAST
   !---------------------------------------------------------------------------------------------------------------------------------
   use precision
   IMPLICIT NONE
  
positive.code:     LOGICAL  :: initFlag      ! Flag for successful initialization [-]
    END TYPE IceFloe_ParameterType
  ! =======================
  END MODULE IceFloe_Types
  
negative.code:     REAL(ReKi)  :: iceDirection      ! ice floe direction [degrees]
      REAL(ReKi)  :: minStrength      ! minimum dynamic ice strength [Pa]
      REAL(ReKi)  :: minStrengthNegVel      ! minimum dynamic ice strength for negative velocity [Pa]
      REAL(ReKi)  :: defaultArea       ! width to use for coupled crushing
      REAL(ReKi)  :: crushArea      ! cross sectional area of ice against tower [m^2]
      REAL(ReKi)  :: coeffStressRate      ! coefficient to calc stress rate from relative vellocity [Pa/m]
      REAL(ReKi)  :: C(4)      ! coefficient of cubic transition curve for negative stress rates [-]
      REAL(ReKi)  :: dt        ! time step [sec]
      REAL(ReKi)  :: rampTime  ! ramp time for forces at beginning of simulation [sec]
      REAL(ReKi) , DIMENSION(:), ALLOCATABLE  :: legX      ! - [x position of each leg relative to structure center]
      REAL(ReKi) , DIMENSION(:), ALLOCATABLE  :: legY      ! - [y position of each leg relative to structure center]
      REAL(ReKi) , DIMENSION(:), ALLOCATABLE  :: ks      ! - [shelter factor due to upstream leg]
  