R LINK OUP:FORTRA[-1]=INP:FROOT///S INP:F0,INLINE,OUP:DEFLTS/O:1 INP:F1/O:1 INP:F2/O:1 INP:F3/O:1 INP:F4/O:1 INP:F5/O:1 INP:F6/O:1 INP:F7/O:1 INP:F8/O:1 INP:F9/O:1 INP:F10/O:1 INP:LOOP/O:1 INP:F11/O:1 INP:F12/O:1 INP:F13/O:1 INP:F14/O:1 INP:F15/O:1 INP:F16/O:1 INP:F17/O:1 INP:CDUMP/O:1// ^C