cue note problem

[David Bobroff]

In this example I show three sets of cue notes.  In each case the rests
for the instrument part are also indicated.  In the first two cases the
rests are printed full size, as I want them.  In the third case I cannot
get the rest to print full size without getting some of the cue notes
also coming out full size.  I'm missing something here but I have not
been able to determine what.

-David


cue = {    
    \set fontSize = #-3
    \override Stem  #'length = #3.5
    \override Beam  #'thickness = #0.384
    \override Beam  #'space-function =
    #(lambda (beam mult) (* 0.8 (Beam::space_function beam mult)))
}

euc = {
    \set fontSize = #0
    \revert Stem #'length
    \revert Beam #'thickness
    \revert Beam #'space-function
}

\score { 
    
    \context Staff \relative c'' {
        \clef F
        \set Score.skipBars = ##t
        <<
            { \set doubleSlurs = ##t \cue
              <dis,, gis b>4-> ~ <dis gis b>8 r8 r2
              s1
              <dis gis b>2-( ~ <cisis eis ais-)>4.-) r8
              
          }
            
            \\ 
            {
                R1*3
            }
        >>
        R1*7
        <<
            { 
                
                \stemDown
                << \cue
                   { des'1 ~ des2. ~ des8 r} 
                   \\ 
                   \cue 
                   { \set doubleSlurs = ##t   <bes ges>2_\( <f des>-( <ges 
des>2.-) ~ 
<ges des>8\) r} 
                >> 
            } 
            \\
            {   
                R1*2 % These rests should be full size.
            }
        >>\euc
    }
}