load("c:\\Users\\whereman.NATH\\data\\maxima-5.44.0\\s-NLS-run0-Sep8-2020.lsp");

batchload("c:\\Users\\whereman.NATH\\data\\maxima-5.44.0\\symmgrp2020.max")$

printeqn(lode);

printselecteqn(lode,1,11);

printselecteqn(lode,11,20);

/* Select the output cell with determining equations, */
/* right click to copy it in different formats, e.g., as an image which can be */
/* inserted into a Word document for easy printing. */ 

/* you can also test a solution of the determining equations. Note that kkk should be 1. */

eta[1] : k5*x[1]+2*k4*x[2]+k1;

eta[2] : 2*k5*x[2]+k2;

phi[1] : -k5*u[1]+(k3-k4*x[1])*u[2];

phi[2] : -kkk*k5*u[2]-(k3-k4*x[1])*u[1];

lodeevaluated : printeqn(factor(ev(lode,diff)));