1071d4279SBram Moolenaar" Vim syntax file 2071d4279SBram Moolenaar" Language: TRASYS input file 3071d4279SBram Moolenaar" Maintainer: Adrian Nagle, [email protected] 4071d4279SBram Moolenaar" Last Change: 2003 May 11 5071d4279SBram Moolenaar" Filenames: *.inp 6071d4279SBram Moolenaar" URL: http://www.naglenet.org/vim/syntax/trasys.vim 7071d4279SBram Moolenaar" MAIN URL: http://www.naglenet.org/vim/ 8071d4279SBram Moolenaar 9071d4279SBram Moolenaar 10071d4279SBram Moolenaar 1189bcfda6SBram Moolenaar" quit when a syntax file was already loaded 1289bcfda6SBram Moolenaarif exists("b:current_syntax") 13071d4279SBram Moolenaar finish 14071d4279SBram Moolenaarendif 15071d4279SBram Moolenaar 16071d4279SBram Moolenaar 17071d4279SBram Moolenaar" Force free-form fortran format 18071d4279SBram Moolenaarlet fortran_free_source=1 19071d4279SBram Moolenaar 20071d4279SBram Moolenaar" Load FORTRAN syntax file 21071d4279SBram Moolenaarruntime! syntax/fortran.vim 22071d4279SBram Moolenaarunlet b:current_syntax 23071d4279SBram Moolenaar 24071d4279SBram Moolenaar 25071d4279SBram Moolenaar" Ignore case 26071d4279SBram Moolenaarsyn case ignore 27071d4279SBram Moolenaar 28071d4279SBram Moolenaar 29071d4279SBram Moolenaar 30071d4279SBram Moolenaar" Define keywords for TRASYS 31071d4279SBram Moolenaarsyn keyword trasysOptions model rsrec info maxfl nogo dmpdoc 32071d4279SBram Moolenaarsyn keyword trasysOptions rsi rti rso rto bcdou cmerg emerg 33071d4279SBram Moolenaarsyn keyword trasysOptions user1 nnmin erplot 34071d4279SBram Moolenaar 35071d4279SBram Moolenaarsyn keyword trasysSurface icsn tx ty tz rotx roty rotz inc bcsn 36071d4279SBram Moolenaarsyn keyword trasysSurface nnx nny nnz nnax nnr nnth unnx 37071d4279SBram Moolenaarsyn keyword trasysSurface unny unnz unnax unnr unnth type idupsf 38071d4279SBram Moolenaarsyn keyword trasysSurface imagsf act active com shade bshade axmin 39071d4279SBram Moolenaarsyn keyword trasysSurface axmax zmin zmax rmin rmax thmin thmin 40071d4279SBram Moolenaarsyn keyword trasysSurface thmax alpha emiss trani trans spri sprs 41071d4279SBram Moolenaarsyn keyword trasysSurface refno posit com dupbcs dimensions 42071d4279SBram Moolenaarsyn keyword trasysSurface dimension position prop surfn 43071d4279SBram Moolenaar 44071d4279SBram Moolenaarsyn keyword trasysSurfaceType rect trap disk cyl cone sphere parab 45071d4279SBram Moolenaarsyn keyword trasysSurfaceType box5 box6 shpero tor ogiv elem tape poly 46071d4279SBram Moolenaar 47071d4279SBram Moolenaarsyn keyword trasysSurfaceArgs ff di top bottom in out both no only 48071d4279SBram Moolenaar 49071d4279SBram Moolenaarsyn keyword trasysArgs fig smn nodea zero only ir sol 50071d4279SBram Moolenaarsyn keyword trasysArgs both wband stepn initl 51071d4279SBram Moolenaar 52071d4279SBram Moolenaarsyn keyword trasysOperations orbgen build 53071d4279SBram Moolenaar 54071d4279SBram Moolenaar"syn keyword trasysSubRoutine call 55071d4279SBram Moolenaarsyn keyword trasysSubRoutine chgblk ndata ndatas odata odatas 56071d4279SBram Moolenaarsyn keyword trasysSubRoutine pldta ffdata cmdata adsurf rbdata 57071d4279SBram Moolenaarsyn keyword trasysSubRoutine rtdata pffshd orbit1 orbit2 orient 58071d4279SBram Moolenaarsyn keyword trasysSubRoutine didt1 didt1s didt2 didt2s spin 59071d4279SBram Moolenaarsyn keyword trasysSubRoutine spinav dicomp distab drdata gbdata 60071d4279SBram Moolenaarsyn keyword trasysSubRoutine gbaprx rkdata rcdata aqdata stfaq 61071d4279SBram Moolenaarsyn keyword trasysSubRoutine qodata qoinit modar modpr modtr 62071d4279SBram Moolenaarsyn keyword trasysSubRoutine modprs modshd moddat rstoff rston 63071d4279SBram Moolenaarsyn keyword trasysSubRoutine rsmerg ffread diread ffusr1 diusr1 64071d4279SBram Moolenaarsyn keyword trasysSubRoutine surfp didt3 didt3s romain stfrc 65071d4279SBram Moolenaarsyn keyword trasysSubRoutine rornt rocstr romove flxdata title 66071d4279SBram Moolenaar 67071d4279SBram Moolenaarsyn keyword trassyPrcsrSegm nplot oplot plot cmcal ffcal rbcal 68071d4279SBram Moolenaarsyn keyword trassyPrcsrSegm rtcal dical drcal sfcal gbcal rccal 69071d4279SBram Moolenaarsyn keyword trassyPrcsrSegm rkcal aqcal qocal 70071d4279SBram Moolenaar 71071d4279SBram Moolenaar 72071d4279SBram Moolenaar 73071d4279SBram Moolenaar" Define matches for TRASYS 74071d4279SBram Moolenaarsyn match trasysOptions "list source" 75071d4279SBram Moolenaarsyn match trasysOptions "save source" 76071d4279SBram Moolenaarsyn match trasysOptions "no print" 77071d4279SBram Moolenaar 78071d4279SBram Moolenaar"syn match trasysSurface "^K *.* [^$]" 79071d4279SBram Moolenaar"syn match trasysSurface "^D *[0-9]*\.[0-9]\+" 80071d4279SBram Moolenaar"syn match trasysSurface "^I *.*[0-9]\+\.\=" 81071d4279SBram Moolenaar"syn match trasysSurface "^N *[0-9]\+" 82071d4279SBram Moolenaar"syn match trasysSurface "^M *[a-z[A-Z0-9]\+" 83071d4279SBram Moolenaar"syn match trasysSurface "^B[C][S] *[a-zA-Z0-9]*" 84071d4279SBram Moolenaar"syn match trasysSurface "^S *SURFN.*[0-9]" 85071d4279SBram Moolenaarsyn match trasysSurface "P[0-9]* *="he=e-1 86071d4279SBram Moolenaar 87071d4279SBram Moolenaarsyn match trasysIdentifier "^L "he=e-1 88071d4279SBram Moolenaarsyn match trasysIdentifier "^K "he=e-1 89071d4279SBram Moolenaarsyn match trasysIdentifier "^D "he=e-1 90071d4279SBram Moolenaarsyn match trasysIdentifier "^I "he=e-1 91071d4279SBram Moolenaarsyn match trasysIdentifier "^N "he=e-1 92071d4279SBram Moolenaarsyn match trasysIdentifier "^M "he=e-1 93071d4279SBram Moolenaarsyn match trasysIdentifier "^B[C][S]" 94071d4279SBram Moolenaarsyn match trasysIdentifier "^S "he=e-1 95071d4279SBram Moolenaar 96071d4279SBram Moolenaarsyn match trasysComment "^C.*$" 97071d4279SBram Moolenaarsyn match trasysComment "^R.*$" 98071d4279SBram Moolenaarsyn match trasysComment "\$.*$" 99071d4279SBram Moolenaar 100071d4279SBram Moolenaarsyn match trasysHeader "^header[^,]*" 101071d4279SBram Moolenaar 102071d4279SBram Moolenaarsyn match trasysMacro "^FAC" 103071d4279SBram Moolenaar 104071d4279SBram Moolenaarsyn match trasysInteger "-\=\<[0-9]*\>" 105071d4279SBram Moolenaarsyn match trasysFloat "-\=\<[0-9]*\.[0-9]*" 106071d4279SBram Moolenaarsyn match trasysScientific "-\=\<[0-9]*\.[0-9]*E[-+]\=[0-9]\+\>" 107071d4279SBram Moolenaar 108071d4279SBram Moolenaarsyn match trasysBlank "' \+'"hs=s+1,he=e-1 109071d4279SBram Moolenaar 110071d4279SBram Moolenaarsyn match trasysEndData "^END OF DATA" 111071d4279SBram Moolenaar 112071d4279SBram Moolenaarif exists("thermal_todo") 113071d4279SBram Moolenaar execute 'syn match trasysTodo ' . '"^'.thermal_todo.'.*$"' 114071d4279SBram Moolenaarelse 115071d4279SBram Moolenaar syn match trasysTodo "^?.*$" 116071d4279SBram Moolenaarendif 117071d4279SBram Moolenaar 118071d4279SBram Moolenaar 119071d4279SBram Moolenaar 120071d4279SBram Moolenaar" Define regions for TRASYS 121071d4279SBram Moolenaarsyn region trasysComment matchgroup=trasysHeader start="^HEADER DOCUMENTATION DATA" end="^HEADER[^,]*" 122071d4279SBram Moolenaar 123071d4279SBram Moolenaar 124071d4279SBram Moolenaar 125071d4279SBram Moolenaar" Define synchronizing patterns for TRASYS 126071d4279SBram Moolenaarsyn sync maxlines=500 127071d4279SBram Moolenaarsyn sync match trasysSync grouphere trasysComment "^HEADER DOCUMENTATION DATA" 128071d4279SBram Moolenaar 129071d4279SBram Moolenaar 130071d4279SBram Moolenaar 131071d4279SBram Moolenaar" Define the default highlighting 13289bcfda6SBram Moolenaar" Only when an item doesn't have highlighting yet 133071d4279SBram Moolenaar 134*f37506f6SBram Moolenaarhi def link trasysOptions Special 135*f37506f6SBram Moolenaarhi def link trasysSurface Special 136*f37506f6SBram Moolenaarhi def link trasysSurfaceType Constant 137*f37506f6SBram Moolenaarhi def link trasysSurfaceArgs Constant 138*f37506f6SBram Moolenaarhi def link trasysArgs Constant 139*f37506f6SBram Moolenaarhi def link trasysOperations Statement 140*f37506f6SBram Moolenaarhi def link trasysSubRoutine Statement 141*f37506f6SBram Moolenaarhi def link trassyPrcsrSegm PreProc 142*f37506f6SBram Moolenaarhi def link trasysIdentifier Identifier 143*f37506f6SBram Moolenaarhi def link trasysComment Comment 144*f37506f6SBram Moolenaarhi def link trasysHeader Typedef 145*f37506f6SBram Moolenaarhi def link trasysMacro Macro 146*f37506f6SBram Moolenaarhi def link trasysInteger Number 147*f37506f6SBram Moolenaarhi def link trasysFloat Float 148*f37506f6SBram Moolenaarhi def link trasysScientific Float 149071d4279SBram Moolenaar 150*f37506f6SBram Moolenaarhi def link trasysBlank SpecialChar 151071d4279SBram Moolenaar 152*f37506f6SBram Moolenaarhi def link trasysEndData Macro 153071d4279SBram Moolenaar 154*f37506f6SBram Moolenaarhi def link trasysTodo Todo 155071d4279SBram Moolenaar 156071d4279SBram Moolenaar 157071d4279SBram Moolenaar 158071d4279SBram Moolenaarlet b:current_syntax = "trasys" 159071d4279SBram Moolenaar 160071d4279SBram Moolenaar" vim: ts=8 sw=2 161