/*
Input format
network_nn_edges(+NN, +EDGES) where:
NN is the number of nodes
EDGES is a list of pipes, i.e. terms e(I,J,S) 
where I and J are nodes. We specify only the cases with I<J.
S is the weight of the pipe
*/

network_nn_edges(
23,
[e(1, 2, 57), e(1, 19, 95), e(1, 5, 66), e(2, 3, 155), e(2, 4, 129), e(3, 4, 78), e(3, 9, 65), e(4, 6, 78), e(5, 6, 63), e(5, 18, 73), e(6, 7, 36), e(6, 16, 129), e(7, 8, 30), e(7, 15, 117), e(8, 14, 107), e(8, 22, 74), e(9, 11, 27), e(9, 10, 152), e(10, 11, 70), e(10, 13, 70), e(11, 12, 83), e(12, 13, 68), e(13, 22, 166), e(14, 15, 27), e(14, 20, 138), e(15, 16, 41), e(16, 17, 54), e(17, 18, 81), e(17, 21, 94), e(18, 19, 62), e(19, 23, 137), e(20, 21, 129), e(21, 23, 70)]).

