Resistive Circuit - Finding equivalent resistance and fixing special cases

Question

i am trying to solve an exercise for SWI Prolog. An example circuit/resistive network, build with row- and parallel-resistances is given in the form of verb/3 verb(Node1, Resist