anchor.diff:  	         ierr = 0
   			 
   			 original_diffusion_dt_limit = s% diffusion_dt_limit			          
  +			 s% other_wind => VW_superwind
   	      end subroutine extras_controls
               
   	      integer function extras_startup(s, id, restart, ierr)
  
positive.code: 			 endif
  	      end function extras_finish_step
        
  	      subroutine extras_after_evolve(s, id, id_extra, ierr)
  	         type (star_info), pointer :: s
  	         integer, intent(in) :: id, id_extra
  
negative.code:       use star_lib
        use star_def
        use const_def
  	  use crlibm_lib
        ! use run_star_support
        
        implicit none
  