--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/runtime/syntax/snnspat.vim	Sat Nov 10 15:07:22 2007 +0900
@@ -0,0 +1,68 @@
+" Vim syntax file
+" Language:	SNNS pattern file
+" Maintainer:	Davide Alberani <alberanid@bigfoot.com>
+" Last Change:	28 Apr 2001
+" Version:	0.2
+" URL:		http://digilander.iol.it/alberanid/vim/syntax/snnspat.vim
+"
+" SNNS http://www-ra.informatik.uni-tuebingen.de/SNNS/
+" is a simulator for neural networks.
+
+if version < 600
+  syntax clear
+elseif exists("b:current_syntax")
+  finish
+endif
+
+
+" anything that isn't part of the header, a comment or a number
+" is wrong
+syn match	snnspatError	".*"
+" hoping that matches any kind of notation...
+syn match	snnspatAccepted	"\([-+]\=\(\d\+\.\|\.\)\=\d\+\([Ee][-+]\=\d\+\)\=\)"
+syn match	snnspatAccepted "\s"
+syn match	snnspatBrac	"\[\s*\d\+\(\s\|\d\)*\]" contains=snnspatNumbers
+
+" the accepted fields in the header
+syn match	snnspatNoHeader	"No\. of patterns\s*:\s*" contained
+syn match	snnspatNoHeader	"No\. of input units\s*:\s*" contained
+syn match	snnspatNoHeader	"No\. of output units\s*:\s*" contained
+syn match	snnspatNoHeader	"No\. of variable input dimensions\s*:\s*" contained
+syn match	snnspatNoHeader	"No\. of variable output dimensions\s*:\s*" contained
+syn match	snnspatNoHeader	"Maximum input dimensions\s*:\s*" contained
+syn match	snnspatNoHeader	"Maximum output dimensions\s*:\s*" contained
+syn match	snnspatGen	"generated at.*" contained contains=snnspatNumbers
+syn match	snnspatGen	"SNNS pattern definition file [Vv]\d\.\d" contained contains=snnspatNumbers
+
+" the header, what is not an accepted field, is an error
+syn region	snnspatHeader	start="^SNNS" end="^\s*[-+\.]\=[0-9#]"me=e-2 contains=snnspatNoHeader,snnspatNumbers,snnspatGen,snnspatBrac
+
+" numbers inside the header
+syn match	snnspatNumbers	"\d" contained
+syn match	snnspatComment	"#.*$" contains=snnspatTodo
+syn keyword	snnspatTodo	TODO XXX FIXME contained
+
+if version >= 508 || !exists("did_snnspat_syn_inits")
+  if version < 508
+    let did_snnspat_syn_inits = 1
+    command -nargs=+ HiLink hi link <args>
+  else
+    command -nargs=+ HiLink hi def link <args>
+  endif
+
+  HiLink snnspatGen		Statement
+  HiLink snnspatHeader		Error
+  HiLink snnspatNoHeader	Define
+  HiLink snnspatNumbers		Number
+  HiLink snnspatComment		Comment
+  HiLink snnspatError		Error
+  HiLink snnspatTodo		Todo
+  HiLink snnspatAccepted	NONE
+  HiLink snnspatBrac		NONE
+
+  delcommand HiLink
+endif
+
+let b:current_syntax = "snnspat"
+
+" vim: ts=8 sw=2