Internal function
local.network(n, distrib, param, one.connection = TRUE) global.network(n, p, distrib, param = 0, distrib2 = "full", param2 = 0)