<commit_before>/* example of a Maxima program */

foo (x, y, z) := block ([bar : 1.2345b0, baz : -0.5432e0, quux : 9876543210, mumble : 123.456],
  if bar > 1 + baz
    then atan2 (bar, baz) + log(quux)*exp(mumble)
    elseif baz <= 100!
    then ['bar^2, 'baz/2, sqrt('quux)]
    else '[true, false, unknown]);

display2d : false $<commit_msg>Reorganized Maxima code examples.<commit_after>/* Maxima computer algebra system */

/* symbolic constants */

[true, false, %pi, %e, %phi, inf, minf, unknown];

/* built-in flags */

[display2d, simp, dispflag, stringdisp, lispdisp];

/* built-in functions */

[sin, cosh, exp, atan2, sqrt, log, struve_h, sublist_indices, read_array];

/* user-defined symbols */

[foo, ?bar, baz%, quux_mumble_blurf];

/* different kinds of integers */

[0, 1234, 1234., 0abcdefgh];

/* floats and bigfloats */

[0.0, 123.45, 123e45, 123.45e67, 1234b5, 12.345b67];

/* strings */

["now is", "the \"time\" for all", "'good' men", "to
 come to the
 aid of their country"];

/* expressions */

foo (x, y, z) :=
  if x > 1 + y
    then z - x*y
  elseif y <= 100!
    then x/(y + z)^2
  else z - y . x . y;

display2d : false $
{'fraction_non_alphanumeric': 0.1795316565481353, 'fraction_numerical': 0.07372072853425846, 'mean_word_length': 3.1963636363636363, 'pattern_counts': {'":': 0, '<': 5, '<?xml version=': 0, '>': 5, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '4894422', 'n_tokens_mistral': 518, 'n_tokens_neox': 456, 'n_words': 142}