anchor.diff:  
       PRIVATE
   
  -   TYPE(ProgDesc), PARAMETER            :: FEAM_Ver = ProgDesc( 'FEAMooring', 'v1.01.00-yhb', '14-Dec-2014' )
  +   TYPE(ProgDesc), PARAMETER            :: FEAM_Ver = ProgDesc( 'FEAMooring', 'v1.01.01-yhb', '4-Aug-2015' )
   
   ! ==================================================================================================="
   ! NOTE: The following lines of code were generated by a Matlab script called "Write_ChckOutLst.m"
  
positive.code:     INTEGER(IntKi)                                 :: ErrStat2        ! Error status of the operation (occurs after initial error)
      CHARACTER(ErrMsgLen)                           :: ErrMsg2         ! Error message if ErrStat2 /= ErrID_None
      INTEGER(IntKi)                                 :: I               ! Generic loop index
  
  
      ! Initialize ErrStat
  
  
negative.code:     CALL CheckError( ErrStat2, ErrMsg2 )
      IF (ErrStat >= AbortErrLev) RETURN
  
      do i=1,p%NumOuts    
         InitOut%WriteOutputHdr(i) = p%OutParam(i)%Name
         InitOut%WriteOutputUnt(i) = p%OutParam(i)%Units     
      end do
      InitOut%Ver = FEAM_Ver  
  
      !............................................................................................
  