*DECK NETON 
          IDENT  NETON
          TITLE  NETON - FIP INTERFACE TO RHFON.
          COMMENT FIP INTERFACE TO RHFON. 
          COMMENT COPYRIGHT (C) CONTROL DATA CORP., 1983. 
          ENTRY  NETON
          SPACE  4,8
***       NETON - FIP INTERFACE TO RHFON. 
* 
*         NETON PROVIDES AN ALTERNATE ENTRY POINT TO FIP ROUTINE
*         RHFON.
* 
*         CALL NETON (PARAMS) 
* 
*         SEE RHFON FOR PARAMETERS. 
          SPACE  4,8
 NETON    SUBR                     ENTRY/EXIT 
          RJ     =XRHFON           CALL RHFON PRESERVING REGISTERS
          EQ     NETON             RETURN 
          END 
