anchor.diff:              call create_excited_det(sys%basis, cdet%f, connection, fexcit)
               excitor_level = get_excitation_level(qs%ref%f0(:sys%basis%bit_string_len), fexcit(:sys%basis%bit_string_len))
               call convert_excitor_to_determinant(fexcit, excitor_level, excitor_sign, qs%ref%f0)
  -	        if (ccmcin%multiref) then
  -	            excitor_level_2 = get_excitation_level(ccmcin%second_ref%f0(:sys%basis%bit_string_len), fexcit(:sys%basis%bit_string_len))
  +	        if (ccmc_in%multiref) then
  +	            excitor_level_2 = get_excitation_level(qs%second_ref%f0(:sys%basis%bit_string_len), fexcit(:sys%basis%bit_string_len))
   	            !print*, excitor_level, excitor_level_2
                   if (excitor_level > qs%ref%ex_level .and.  excitor_level_2 >qs%ref%ex_level) nspawn=0
   	        end if
  
positive.code: 
          type(sys_t), intent(in) :: sys
          type(qmc_state_t), intent(in) :: qs
  	    type (ccmc_in_t), intent (in) :: ccmcin
          logical, intent(in) :: linked_ccmc, ex_lvl_sort
          type(det_info_t), intent(inout) :: cdet
          type(cluster_t), intent(in) :: cluster
  
negative.code:     end subroutine spawner_ccmc
  
      subroutine stochastic_ccmc_death(rng, spawn, linked_ccmc, ex_lvl_sort, sys, qs, cdet, cluster, &
                                      logging_info, ndeath_tot, ccmc_in)
  
          ! Attempt to 'die' (ie create an excip on the current excitor, cdet%f)
          ! with probability
  