restart;read("Jets.s");Deriving di\357\254\200erential consequencesExample: Symmetries of KdV - againcoordinates([t,x], [u], 9);equation (u_t = u_xxx + 6*u*u_x);S := symmetries(u = U);dependence(U(x,t,u,u_x,u_xx,u_xxx,u_4x,u_5x));length(S),length(evalTD(S));vars(S);Among vars(S), u_8x is of highest order. When differentiating S with respect to u_8x , one may expect that the result will be a rather simple expression:pd(S,u_8x);T := pd(S,u_7x);vars(T);pd(T,u_6x);The algorithm to automate derivation of differential consequences is implemented as the procedure derive (which is one of the subroutines called by run):unknowns(U);derive(S);To exclude certain \357\254\201bre variables from derivation (along with all jet variables they generate), use noderive(list of \357\254\201bre variables);