anchor.diff:           IF ( EqualRealNos( ZTime, OutTime ) )  THEN 
                              
                  ! Generate glue-code output file
  -            CALL WrOutputLine( ZTime, p_FAST, y_FAST, EDOutput=y_ED%WriteOutput, SrvDOutput=y_SrvD%WriteOutput, IfWOutput=IfW_WriteOutput, ErrStat=ErrStat, ErrMsg=ErrMsg )
  +            CALL WrOutputLine( ZTime, p_FAST, y_FAST, IfW_WriteOutput, y_ED%WriteOutput, y_SrvD%WriteOutput, InitOutData_HD%WriteOutput, ErrStat, ErrMsg )
               CALL CheckError( ErrStat, ErrMsg )
               
                  ! Generate AeroDyn's element data if desired:
  
positive.code:    
        CALL SrvD_DestroyInitInput(  InitInData_SrvD, ErrStat2, ErrMsg2 )
        CALL SrvD_DestroyInitOutput( InitOutData_SrvD, ErrStat2, ErrMsg2 )
        
        
        !............................................................................................................................
  
negative.code:    CALL SrvD_DestroyInitInput(  InitInData_SrvD, ErrStat, ErrMsg )
     CALL SrvD_DestroyInitOutput( InitOutData_SrvD, ErrStat, ErrMsg )
  
  
     !CALL HD_DestroyInitOutput( InitOutData_HD, ErrStat, ErrMsg )
     !
     !...............................................................................................................................
     ! loose coupling
     !...............................................................................................................................
  