(TeX-add-style-hook "s18tichy"
 (function
  (lambda ()
    (TeX-add-symbols
     "al"
     "be"
     "Om"
     "om"
     "F")
    (TeX-run-style-hooks
     "amstex"
     "amsppt"))))