SUBROUTINE HKNUL1(LINE,ID1,X,W)
      END