au BufRead,BufNewfile *.pdl set filetype=pladcl
au BufRead,BufNewfile *.pladcl set filetype=pladcl