augroup stpfiletype
  au BufNewFile,BufRead *.stp	set filetype=stp
  au BufNewFile,BufRead *.stpm	set filetype=stp
augroup end