anchor.diff:              CALL CheckError( ErrStat, ErrMsg )
         END IF
      
  -
  +      !............................................................................................................................
  +      ! reset the remap flags (do this before making the copies else the copies will always have remap = true)
  +      !............................................................................................................................
         CALL ResetRemapFlags()      
  +            
  +      !............................................................................................................................
  +      ! initialize the temporary input meshes (for input-output solves):
  +      ! (note that we do this after ResetRemapFlags() so that the copies have remap=false)
  +      !............................................................................................................................
  +      IF ( p_FAST%CompHydro == Module_HD .OR. p_FAST%CompSub == Module_SD ) THEN
  +                  
  +            ! Temporary meshes for transfering inputs to ED, HD, and SD
  +         CALL MeshCopy ( ED_Input(1)%PlatformPtMesh, MeshMapData%u_ED_PlatformPtMesh, MESH_NEWCOPY, ErrStat, ErrMsg )      
  +            CALL CheckError( ErrStat, 'Message from MeshMapCreate u_ED_PlatformPtMesh: '//NewLine//ErrMsg )
  +
  +         CALL MeshCopy ( ED_Input(1)%PlatformPtMesh, MeshMapData%u_ED_PlatformPtMesh_2, MESH_NEWCOPY, ErrStat, ErrMsg )      
  +            CALL CheckError( ErrStat, 'Message from MeshMapCreate u_ED_PlatformPtMesh_2: '//NewLine//ErrMsg )
  +                        
  +         IF ( p_FAST%CompSub == Module_SD ) THEN
  +         
  +            CALL MeshCopy ( SD_Input(1)%TPMesh, MeshMapData%u_SD_TPMesh, MESH_NEWCOPY, ErrStat, ErrMsg )      
  +               CALL CheckError( ErrStat, 'Message from MeshMapCreate u_SD_TPMesh: '//NewLine//ErrMsg )
  +               
  +            IF ( p_FAST%CompHydro == Module_HD ) THEN
  +               
  +               CALL MeshCopy ( SD_Input(1)%LMesh, MeshMapData%u_SD_LMesh, MESH_NEWCOPY, ErrStat, ErrMsg )      
  +                  CALL CheckError( ErrStat, 'Message from MeshMapCreate u_SD_LMesh: '//NewLine//ErrMsg )
  +                  
  +               CALL MeshCopy ( SD_Input(1)%LMesh, MeshMapData%u_SD_LMesh_2, MESH_NEWCOPY, ErrStat, ErrMsg )      
  +                  CALL CheckError( ErrStat, 'Message from MeshMapCreate u_SD_LMesh_2: '//NewLine//ErrMsg )
  +                              
  +            END IF
  +               
  +         END IF
  +         
  +         IF ( p_FAST%CompHydro == Module_HD ) THEN
  +            
  +            CALL MeshCopy ( HD_Input(1)%Mesh, MeshMapData%u_HD_Mesh, MESH_NEWCOPY, ErrStat, ErrMsg )      
  +               CALL CheckError( ErrStat, 'Message from MeshMapCreate u_HD_Mesh: '//NewLine//ErrMsg )
  +                  
  +            CALL MeshCopy ( HD_Input(1)%Morison%LumpedMesh, MeshMapData%u_HD_M_LumpedMesh, MESH_NEWCOPY, ErrStat, ErrMsg )      
  +               CALL CheckError( ErrStat, 'Message from MeshMapCreate u_HD_M_LumpedMesh: '//NewLine//ErrMsg )
  +
  +            CALL MeshCopy ( HD_Input(1)%Morison%DistribMesh, MeshMapData%u_HD_M_DistribMesh, MESH_NEWCOPY, ErrStat, ErrMsg )      
  +               CALL CheckError( ErrStat, 'Message from MeshMapCreate u_HD_M_DistribMesh: '//NewLine//ErrMsg )
  +                                    
  +         END IF
  +                              
  +      END IF
  +
  +      !............................................................................................................................
  +
         
      END SUBROUTINE InitModuleMappings
      !...............................................................................................................................
  
positive.code:         !FEAM_OutputTimes(1) = t_global_next 
           
        END IF  ! MAP/FEAM
         
        
        ! predictor-corrector loop:
        DO j_pc = 0, p_FAST%NumCrctn
  
negative.code:       IF ( p_FAST%CompHydro == Module_HD ) THEN
           IF (HD_Input(1)%Mesh%Committed) THEN
               HD_Input(1)%Mesh%RemapFlag               = .FALSE.
                      y_HD%Mesh%RemapFlag               = .FALSE.  
                      y_HD%AllHdroOrigin%RemapFlag      = .FALSE.
           END IF
           IF (HD_Input(1)%Morison%LumpedMesh%Committed) THEN
  