Select Code to Download

sub graph_from_degree_sequence {
  # create edge hash and empty graph
...

  return \%g;
}

sub graph_from_degree_sequence {
  my $v = 'a';
...

  return \%g;
}