(* d_7lax.m *)

debug = False;

(* Seventh order KdV-Lax Case *)

eq[1][x,t] = D[u[1][x,t],t]+aa*u[1][x,t]^3*D[u[1][x,t],x]+bb*D[u[1][x,t],x]^3+
             cc*u[1][x,t]*D[u[1][x,t],x]*D[u[1][x,t],{x,2}]+
             dd*u[1][x,t]^2*D[u[1][x,t],{x,3}]+
             ee*D[u[1][x,t],{x,2}]*D[u[1][x,t],{x,3}]+
             ff*D[u[1][x,t],x]*D[u[1][x,t],{x,4}]+
             gg*u[1][x,t]*D[u[1][x,t],{x,5}]+D[u[1][x,t],{x,7}]; 
noeqs = 1;
name = "Seventh order KdV - Lax Equation";
aa = 140; bb = 70; cc = 280; dd = 70; ee = 70; ff = 42; gg = 14;
parameters = {};
weightpars = {};

formrho[x,t] = {};

(* d_7lax.m *)