← Back
Editing: tak.vim
" Vim syntax file " Language: TAK2, TAK3, TAK2000 thermal modeling input file " Maintainer: Adrian Nagle, anagle@ball.com " Last Change: 2003 May 11 " Filenames: *.tak " URL: http://www.naglenet.org/vim/syntax/tak.vim " MAIN URL: http://www.naglenet.org/vim/ " quit when a syntax file was already loaded if exists("b:current_syntax") finish endif " Ignore case syn case ignore " " " Begin syntax definitions for tak input file. " " Force free-form fortran format let fortran_free_source=1 " Load FORTRAN syntax file runtime! syntax/fortran.vim unlet b:current_syntax " Define keywords for TAK and TAKOUT syn keyword takOptions AUTODAMP CPRINT CSGDUMP GPRINT HPRINT LODTMP syn keyword takOptions LOGIC LPRINT NCVPRINT PLOTQ QPRINT QDUMP syn keyword takOptions SUMMARY SOLRTN UID DICTIONARIES syn keyword takRoutine SSITER FWDWRD FWDBCK BCKWRD syn keyword takControl ABSZRO BACKUP DAMP DTIMEI DTIMEL DTIMEH IFC syn keyword takControl MAXTEMP NLOOPS NLOOPT NODELIST OUTPUT PLOT syn keyword takControl SCALE SIGMA SSCRIT TIMEND TIMEN TIMEO TRCRIT syn keyword takControl PLOT syn keyword takSolids PLATE CYL syn keyword takSolidsArg ID MATNAM NTYPE TEMP XL YL ZL ISTRN ISTRG NNX syn keyword takSolidsArg NNY NNZ INCX INCY INCZ IAK IAC DIFF ARITH BOUN syn keyword takSolidsArg RMIN RMAX AXMAX NNR NNTHETA INCR INCTHETA END syn case ignore syn keyword takMacro fac pstart pstop syn keyword takMacro takcommon fstart fstop syn keyword takIdentifier flq flx gen ncv per sim siv stf stv tvd tvs syn keyword takIdentifier tvt pro thm " Define matches for TAK syn match takFortran "^F[0-9 ]"me=e-1 syn match takMotran "^M[0-9 ]"me=e-1 syn match takComment "^C.*$" syn match takComment "^R.*$" syn match takComment "\$.*$" syn match takHeader "^header[^,]*" syn match takIncludeFile "include \+[^ ]\+"hs=s+8 contains=fortranInclude syn match takInteger "-\=\<[0-9]*\>" syn match takFloat "-\=\<[0-9]*\.[0-9]*" syn match takScientific "-\=\<[0-9]*\.[0-9]*E[-+]\=[0-9]\+\>" syn match takEndData "END OF DATA" if exists("thermal_todo") execute 'syn match takTodo ' . '"^'.thermal_todo.'.*$"' else syn match takTodo "^?.*$" endif " Define the default highlighting " Only when an item doesn't have highlighting yet hi def link takMacro Macro hi def link takOptions Special hi def link takRoutine Type hi def link takControl Special hi def link takSolids Special hi def link takSolidsArg Statement hi def link takIdentifier Identifier hi def link takFortran PreProc hi def link takMotran PreProc hi def link takComment Comment hi def link takHeader Typedef hi def link takIncludeFile Type hi def link takInteger Number hi def link takFloat Float hi def link takScientific Float hi def link takEndData Macro hi def link takTodo Todo let b:current_syntax = "tak" " vim: ts=8 sw=2
Save File
Cancel