(* data file d_kac.m *) (* Kac-van Moerbeke equation *) debug = False; u[1][n_]'[t]:= u[1][n][t]*(u[1][n+1][t]-u[1][n-1][t]); noeqs = 1; name = "Kac-van Moerbeke Equation"; parameters = {}; weightpars = {}; (* varscalelist = {{u[1][n][t],1}}; *) formrho = 0; (* rhorank = 5; *) (* end data file d_kac.m *)