" Vim syntax file " Language: FORM " Version: 2.0 " Maintainer: Michael M. Tung <michael.tung@uni-mainz.de> " Last Change: <Thu Oct 23 13:11:21 CEST 2008> " Past Change: <October 2008 Thomas Reiter thomasr@nikhef.nl> " Past Change: <Wed, 2005/05/25 09:24:58 arwagner wptx44> " First public release based on 'Symbolic Manipulation with FORM' " by J.A.M. Vermaseren, CAN, Netherlands, 1991. " This syntax file is still in development. Please send suggestions " to the maintainer. " quit when a syntax file was already loaded if exists("b:current_syntax") finish endif syn case ignore " a bunch of useful FORM keywords syn keyword formType global local syn keyword formHeaderStatement symbol symbols cfunction cfunctions syn keyword formHeaderStatement function functions vector vectors syn keyword formHeaderStatement tensor tensors ctensor ctensors syn keyword formHeaderStatement set sets index indices table ctable syn keyword formHeaderStatement dimension dimensions unittrace syn keyword formConditional if else elseif endif while syn keyword formConditional repeat endrepeat label goto syn keyword formConditional argument endargument exit syn keyword formConditional inexpression inside term syn keyword formConditional endinexpression endinside endterm syn keyword formStatement abrackets also antibrackets antisymmetrize syn keyword formStatement argexplode argimplode apply auto autodeclare syn keyword formStatement brackets chainin chainout chisholm cleartable syn keyword formStatement collect commuting compress contract syn keyword formStatement cyclesymmetrize deallocatetable delete syn keyword formStatement dimension discard disorder drop factarg fill syn keyword formStatement fillexpression fixindex format funpowers hide syn keyword formStatement identify idnew idold ifmatch inparallel syn keyword formStatement insidefirst keep load makeinteger many metric syn keyword formStatement moduleoption modulus multi multiply ndrop syn keyword formStatement nfunctions nhide normalize notinparallel syn keyword formStatement nprint nskip ntable ntensors nunhide nwrite syn keyword formStatement off on once only polyfun pophide print syn keyword formStatement printtable propercount pushhide ratio syn keyword formStatement rcyclesymmetrize redefine renumber syn keyword formStatement replaceinarg replaceloop save select syn keyword formStatement setexitflag skip slavepatchsize sort splitarg syn keyword formStatement splitfirstarg splitlastarg sum symmetrize syn keyword formStatement tablebase testuse threadbucketsize totensor syn keyword formStatement tovector trace4 tracen tryreplace unhide syn keyword formStatement unittrace vectors write " for compatibility with older FORM versions: syn keyword formStatement id bracket count match traceN " some special functions syn keyword formStatement abs_ bernoulli_ binom_ conjg_ count_ syn keyword formStatement d_ dd_ delta_ deltap_ denom_ distrib_ syn keyword formStatement dum_ dummy_ dummyten_ e_ exp_ fac_ syn keyword formStatement factorin_ firstbracket_ g5_ g6_ g7_ syn keyword formStatement g_ gcd_ gi_ integer_ invfac_ match_ syn keyword formStatement max_ maxpowerof_ min_ minpowerof_ syn keyword formStatement mod_ nargs_ nterms_ pattern_ poly_ syn keyword formStatement polyadd_ polydiv_ polygcd_ polyintfac_ syn keyword formStatement polymul_ polynorm_ polyrem_ polysub_ syn keyword formStatement replace_ reverse_ root_ setfun_ sig_ syn keyword formStatement sign_ sum_ sump_ table_ tbl_ term_ syn keyword formStatement termsin_ termsinbracket_ theta_ thetap_ syn keyword formStatement 5_ 6_ 7_ syn keyword formReserved sqrt_ ln_ sin_ cos_ tan_ asin_ acos_ syn keyword formReserved atan_ atan2_ sinh_ cosh_ tanh_ asinh_ syn keyword formReserved acosh_ atanh_ li2_ lin_ syn keyword formTodo contained TODO FIXME XXX syn match formSpecial display contained "\\\(n\|t\|b\|\\\|\"\)" syn match formSpecial display contained "%\(%\|e\|E\|s\|f\|\$\)" syn match formSpecial "\<N\d\+_[?]" " pattern matching for keywords syn match formComment "^\ *\*.*$" contains=formTodo syn match formComment "\;\ *\*.*$" contains=formTodo syn region formString start=+"+ end=+"+ contains=formSpecial syn region formString start=+'+ end=+'+ syn region formNestedString start=+`+ end=+'+ contains=formNestedString syn match formPreProc "^\=\#[a-zA-Z][a-zA-Z0-9]*\>" syn match formNumber "\<\d\+\>" syn match formNumber "\<\d\+\.\d*\>" syn match formNumber "\.\d\+\>" syn match formNumber "-\d" contains=Number syn match formNumber "-\.\d" contains=Number syn match formNumber "i_\+\>" syn match formNumber "fac_\+\>" " pattern matching wildcards syn match formNumber "?[a-zA-Z0-9]*" " dollar-variables (new in 3.x) syn match formNumber "\\$[a-zA-Z0-9]*" " scalar products syn match formNumber "^\=[a-zA-Z][a-zA-Z0-9]*\.[a-zA-Z][a-zA-Z0-9]*\>" syn match formDirective "^\=\.[a-zA-Z][a-zA-Z0-9]*\>" " hi User Labels syn sync ccomment formComment minlines=10 " Define the default highlighting. " Only when an item doesn't have highlighting yet hi def link formConditional Conditional hi def link formNumber Number hi def link formStatement Statement hi def link formComment Comment hi def link formPreProc PreProc hi def link formDirective PreProc hi def link formType Type hi def link formString String hi def link formNestedString String hi def link formReserved Error hi def link formTodo Todo hi def link formSpecial SpecialChar if !exists("form_enhanced_color") hi def link formHeaderStatement Statement else " enhanced color mode hi def link formHeaderStatement HeaderStatement " dark and a light background for local types if &background == "dark" hi HeaderStatement term=underline ctermfg=LightGreen guifg=LightGreen gui=bold else hi HeaderStatement term=underline ctermfg=DarkGreen guifg=SeaGreen gui=bold endif " change slightly the default for dark gvim if has("gui_running") && &background == "dark" hi Conditional guifg=LightBlue gui=bold hi Statement guifg=LightYellow endif endif let b:current_syntax = "form" " vim: ts=8