SUBROUTINE HKNULI(LINE,ID1,X,Y,W)
      END