Commit d1d514ad2f56e2ca3b10ea2231a191ed7be219c2

Split the DIM command into its own level for eventual processing


134	134	DOUBLE ("-"?{DIGIT}+"."{DIGIT}+("E""-"?{DIGIT}+)?\|"-"?{DIGIT}+"."("E""-"?{DIGIT}+)?\|"-"?"."{DIGIT}+("E""-"?{DIGIT}+)?)
135	135
136	136	BOOL \.TRUE\.\|\.FALSE\.
137		COMMAND ^(DIM\|PART\|DERIV\|DUMP\|DAMP\|SAVE\|NEXT\|CASEID\|BUILD\|PLOT\|TRIM)
	137	COMMAND ^(PART\|DERIV\|DUMP\|DAMP\|SAVE\|NEXT\|CASEID\|BUILD\|PLOT\|TRIM)
	138	DIMENSION ^(DIM)
138	139	NAMELIST "$"{ID}
139	140	VAR {ID}({WS}*"=")
140	141	ARRVAR {ID}"(1)"{WS}*"="
…	…
217	217
218	218	{COMMAND}{NEOL}* {
219	219	if (verbose > 2) fprintf(stderr,"datcom-parser:Command: %s\n", yytext);
	220
	221	/* Drop uninteresting commands */
	222	ClearLineRead();
	223	}
	224
	225	{DIMENSION}{NEOL}* {
	226	if (verbose) fprintf(stderr,"datcom-parser:Dimension: %s\n", yytext);
220	227
221	228	/* Drop uninteresting commands */
222	229	ClearLineRead();