/* debugmode(true); */ /* Symbolic solution */ symb_part () := ( solve([me = M / kg, h = M * L ^ 2 / T * sec/ (kg * meters ^ 2 ),c = L / T * sec / meters], [L, M, T]) ); main() := ( init_glob(), symb_part() ); main();