SPACE x
TIME t
SET DELTA_T=.1
SET TFINAL=.5
SET GRID=10
SET PLOTVAR=u
SET BUFSIZE=1000
SET RGB=1
SET LENGTH=1
SET METHOD=2
SET FAST=1
SET NOUT=400
PAR a=1,eps=0.01,e1=0.01,e2=0.001,beta=0.1
CPAR none junk=1
CVAR s=1-x*(1-beta)
CVAR en=1
CVAR c=0
BDRY s 0 leaky {0} {1} {1}
BDRY s 1 leaky {0} {1} {beta}
BDRY en 0 noflux
BDRY en 1 noflux
BDRY c 0 noflux
BDRY c 1 noflux
FUN  f  3 -arg1*arg2+a*arg3
CAUX SUM=en+c
s'=e1*s_xx+f(s,en,c)
en'=e2*en_xx+f(s,en,c)/eps
c'=e2*c_xx-f(s,en,c)/eps
DONE