Digrafo de 8 nodos orientado:

gr_orientado(gr_nuevo([[0,0,0,0,1,1,0,1],[0,0,0,0,0,0,1,1],[0,0,0,1,1,0,1,0],[0,0,1,0,1,0,0,1],[1,0,1,1,0,0,0,0],[1,0,0,0,0,0,0,1],[0,1,1,0,0,0,0,1],[1,1,0,1,0,1,1,0]],['v1','v2','v3','v4','v5','v6','v7','v8']))

Grafo en JMEScriptGUI con visor de grafos v0.1:

El grafo subyacente de un digrafo orientado es el grafo orientable inicial:

gr_subyacente(gr_orientado(gr_nuevo([[0,0,0,0,1,1,0,1],[0,0,0,0,0,0,1,1],[0,0,0,1,1,0,1,0],[0,0,1,0,1,0,0,1],[1,0,1,1,0,0,0,0],[1,0,0,0,0,0,0,1],[0,1,1,0,0,0,0,1],[1,1,0,1,0,1,1,0]],['v1','v2','v3','v4','v5','v6','v7','v8'])))

Grafo en JMEScriptGUI con visor de grafos v0.1: