genmidnodes.f

In this routine the middle nodes are created in the geometric middle of the end nodes of each edge. So there is a one-to-one relationship between the edges and the middle nodes. The middle node i on edge j is given by i=iedgmid(j).