anchor.diff:        IF ( ALLOCATED(MeshMapData%Jacobian_pivot      ) ) DEALLOCATE(MeshMapData%Jacobian_pivot      ) 
         IF ( ALLOCATED(MeshMapData%Jac_u_indx          ) ) DEALLOCATE(MeshMapData%Jac_u_indx          ) 
      
  +         ! Copies of input meshes:      
  +      CALL MeshDestroy( MeshMapData%u_ED_PlatformPtMesh,   ErrStat2, ErrMsg2 ); CALL CheckError( )
  +      CALL MeshDestroy( MeshMapData%u_ED_PlatformPtMesh_2, ErrStat2, ErrMsg2 ); CALL CheckError( )
  +      CALL MeshDestroy( MeshMapData%u_SD_TPMesh,           ErrStat2, ErrMsg2 ); CALL CheckError( )
  +      CALL MeshDestroy( MeshMapData%u_SD_LMesh,            ErrStat2, ErrMsg2 ); CALL CheckError( )
  +      CALL MeshDestroy( MeshMapData%u_SD_LMesh_2,          ErrStat2, ErrMsg2 ); CALL CheckError( )
  +      CALL MeshDestroy( MeshMapData%u_HD_M_LumpedMesh,     ErrStat2, ErrMsg2 ); CALL CheckError( )
  +      CALL MeshDestroy( MeshMapData%u_HD_M_DistribMesh,    ErrStat2, ErrMsg2 ); CALL CheckError( )
  +      CALL MeshDestroy( MeshMapData%u_HD_Mesh,             ErrStat2, ErrMsg2 ); CALL CheckError( )
  +            
  +      
      CONTAINS
      
         SUBROUTINE CheckError( )
         
  -         IF ( ErrStat2 /= ErrID_None ) THEN
  -            ErrStat = MAX(ErrStat, ErrStat2)           
  -            IF ( LEN_TRIM(ErrMsg) > 0 ) ErrMsg = TRIM(ErrMsg)//NewLine
  -            ErrMsg = TRIM(ErrMsg)//TRIM(ErrMsg2)
  -         END IF
  +         CALL SetErrStat(ErrStat2, ErrMsg2, ErrStat, ErrMsg,'Destroy_FAST_ModuleMapType' )      
               
         END SUBROUTINE CheckError
      
  
positive.code: 
              ! ED <-> HD
        TYPE(MeshMapType)                 :: ED_P_2_HD_W_P                            ! Map ElastoDyn PlatformPtMesh to HydroDyn WAMIT Point
        TYPE(MeshMapType)                 :: HD_W_P_2_ED_P                            ! Map HydroDyn WAMIT Point to ElastoDyn PlatformPtMesh
        
        TYPE(MeshMapType)                 :: ED_P_2_HD_M_P                            ! Map ElastoDyn PlatformPtMesh to HydroDyn Morison Point
        TYPE(MeshMapType)                 :: HD_M_P_2_ED_P                            ! Map HydroDyn Morison Point to ElastoDyn PlatformPtMesh
  
negative.code:    USE NWTC_Library
  
     TYPE(ProgDesc), PARAMETER :: FAST_Ver    = &
                                  ProgDesc( 'FAST', 'v8.05.01d-bjj', '7-Mar-2014' ) ! The version number of this module
     
     
     INTEGER(IntKi), PARAMETER :: Module_Unknown = -1
  