subroutine mspint ()
      save
100      return
      end
      subroutine mspcae ()
      save
100      return
      end
      subroutine mspune ()
      save
100      return
      end
      subroutine mspwcn ()
      save
100      return
      end
      subroutine mspwct ()
      save
100      return
      end
      subroutine mspobo ()
      save
100      return
      end
c     mspwct  msp_wcslist
c     mspint  msp_init
c     mspobo  msp_objinfo
c     mspcae  msp_cache
c     mspune  msp_uncache
c     mspwcn  msp_wcstran