digraph(MixedGraph) -- extract the digraph component of a mixed graph

i1 : G= mixedGraph(graph{{a,b},{b,c}},digraph {{a,d},{c,e},{f,g}},bigraph {{d,e}})

o1 = MixedGraph{Bigraph => Bigraph{d => {e}}}
                                   e => {d}
                Digraph => Digraph{a => {d}}
                                   c => {e}
                                   d => {}
                                   e => {}
                                   f => {g}
                                   g => {}
                Graph => Graph{a => {b}   }
                               b => {a, c}
                               c => {b}

o1 : MixedGraph

i2 : digraph G

o2 = Digraph{a => {d}}
             c => {e}
             d => {}
             e => {}
             f => {g}
             g => {}

o2 : Digraph