

See also

 Related task: Comments
 Related task: Here_document


      SUBROUTINE SHOW(A,N)   !Prints details to I/O unit LINPR.
        REAL*8 A    !Distance to the next node.
        INTEGER N   !Number of the current node.