1 SUBROUTINE USERS(Y,YH,YWT,SAVE1,SAVE2,T,H,EL,IMPL,N,NDE,IFLAG) 2C***BEGIN PROLOGUE USERS 3C***REFER TO SDRIV3 4C 5C THIS IS A USER-PROVIDED ROUTINE, WHICH IS PROVIDED 6C HERE TO AVOID LOADER ERRORS ONLY. 7C 8C***ROUTINES CALLED NONE 9C***END PROLOGUE USERS 10 REAL Y(*),YH(*),YWT(*),SAVE1(*),SAVE2(*),T,H,EL 11 CALL XERROR('SDRIV -- USERS IS A USER-SUPPLIED ROUTINE',42,1,2) 12 RETURN 13 END 14