This page needs to be proofread.
2
A.1 LEX Specification
%{
#include "4sight_t .h"
%}
integer [0-9]+
dreal ([0-9]+"." [0-9]*) ([0-9]*"."[0-9]+)
ereal ({dreal} {integer}) [eE] [+-] ? [0-9]+
real {dreal}|{ereal}
diff [Dd] [Ii] [Ff] [Ff]
perm [Pp] [Ee] [Rr] [Mm]
wc [Ww] [Cc]
thick [Tt] [Hh] [Ii] [Cc] [Kk] [Nn] [Ee] [Ss] [Ss]
neuax [Nn] [Aa] [Xx] [Ii] [Ss]
youngs [Yy] [Oo] [Uu] [Nn] [Gg] [Ss]
beta [Bb] [Ee] [Tt] [Aa]
ce [Cc] [Ee]
rough [Rr] [Oo] [Uu] [Gg] [Hh] [Nn] [Ee] [Ss] [Ss]
gamma [Gg] [Aa] [Mm] [Mm] [Aa]
poisson [Pp] [0o] [Ii] [Ss] [Ss] [Oo] [Nn]
extrn [Ee] [Xx] [Tt] [Ee] [Rr] [Nn] [Aa] [Ll]
intrn [Ii] [Nn] [Tt] [Ee] [Rr] [Nn] [Aa] [Ll]
time [Tt] [Ii] [Mm] [Ee]
depth [Dd] [Ee] [Pp] [Tt] [Hh]
rebar [Rr] [Ee] [Bb] [Aa] [Rr]
output [Oo] [Uu] [Tt] [Pp] [Uu] [Tt]
head [Hh] [Ee] [Aa] [Dd]
crack [Cc] [Rr] [Aa] [Cc] [Kk]
joint [Jj] [0o] [Ii] [Nn] [Tt]
at [Aa] [Tt]
until [Uu] [Nn] [Tt] [Ii] [Ll]
assign "="|":"
wspace [ \t] +
kill (([Qq]([Uu] [Ii] [Tt])?)|([Ee]([Xx][Ii][Tt])?))
nl \n
%%
{wspace} ;
OH { return HYDROXIDE;}
Cl { return CHLORINE;}
S04 { return SULFATE;}