      integer function ncvid(idum)
c
      character*70 msg
      data msg/
     >   '?? dummy integer function ncvid called (generic_dummy lib)'/
c
      write(6,'(A)') msg
      ncvid=0
      return
      end
c-------------------------------------
      integer function nctlen(idum)
c
      character*70 msg
      data msg/
     >   '?? dummy integer function nctlen called (generic_dummy lib)'/
c
      write(6,'(A)') msg
      nctlen=0
      return
      end
c-------------------------------------
      integer function ncsfil(idum)
c
      character*70 msg
      data msg/
     >   '?? dummy integer function ncsfil called (generic_dummy lib)'/
c
      write(6,'(A)') msg
      ncsfil=0
      return
      end
c-------------------------------------
