... {i,1,nM[s]}] ] ] invariants [s_] := Module [ {expr, counter}, counter = 0; Print [" "]; Print [" Computation of invariants [", s, "]"]; nM [s]; Print ...
確定! 回上一頁