anchor.diff:      enddo
       
     enddo 
  +  deallocate( minilist, minilist_gen, idx_minilist )
     
   end
   
  
positive.code:     enddo
      
    enddo 
    
  end
  
  
negative.code:   call create_minilist_find_previous(key_mask, psi_det_generators, miniList_gen, i_generator-1, N_minilist_gen, fullMatch, Nint)
    
    if(fullMatch) then
      deallocate( minilist, minilist_gen, idx_minilist )
      return
    end if
    
  