Illustrations to present TeXmacs

I propose this graph to illustrate TeXmacs, for example to include it in a presentation about this software. The source code to generate it is given below. The graph is not oriented because it seems to me that the relations can be interpreted in both directions.

Moreover, depending on the point of view, one can even read the graph, from bottom to top, from top to bottom, from left to right and finally from right to left!

This graph appears in an article on the history of word processing [1]. This graph even seems to have been proposed in 1955 to illustrate the future of word processors!!!

As soon as I saw this graph, I immediately made the link with what TeXmacs really does, and so, a (very)? good illustration of it. We are back to the Future McFly !!!

[1] T. Haigh, “Remembering the Office of the Future: The Origins of Word Processing and Office Automation” in IEEE Annals of the History of Computing, vol. 28, no. 04, pp. 6-31, 2006. doi: 10.1109/MAHC.2006.70.

%==============================================================================
% Graph to illustrate TeXmacs
%------------------------------------------------------------------------------
% pdflatex texmacs-chart.tex
% pdftoppm texmacs-chart.pdf texmacs-chart -png
%------------------------------------------------------------------------------
% Version 1.0: (C) Nicolas Ratier, 23 march 2022
%==============================================================================

\documentclass[border=3mm]{standalone}
\newcommand{\TeXmacs}{T\kern-.1667em\lower.5ex\hbox{E}\kern-.125emX\kern-.1em\lower.5ex\hbox{\textsc{m\kern-.05ema\kern-.125emc\kern-.05ems}}}
\usepackage{tikz}
\begin{document}
\begin{tikzpicture}[node distance={33mm}, thick, main/.style = {draw}]
\usetikzlibrary{shapes}
\tikzstyle{every node}=[draw, ellipse, align=center,
  minimum width  = 30mm, 
  minimum height = 17mm,
  fill           = cyan!20]
\node[main] (1) {Think};
\node[main] (2) [below left  of=1] {Write};
\node[main] (3) [below right of=1] {Calculate};
\node[main] (4) [below left  of=2] {Text};
\node[main] (5) [below right of=2] {Text\\\&\\Data};
\node[main] (6) [below right of=3] {Data};
\node[main] (7) [below left  of=5] {Word\\Processing};
\node[main] (8) [below right of=5] {Data\\Processing};
\node[main] (9) [below right of=7] {\TeXmacs};
\draw (1) -- (2);
\draw (1) -- (3);
\draw (2) -- (4);
\draw (2) -- (5);
\draw (3) -- (5);
\draw (3) -- (6);
\draw (4) -- (7);
\draw (5) -- (7);
\draw (5) -- (8);
\draw (6) -- (8);
\draw (7) -- (9);
\draw (8) -- (9);
\end{tikzpicture}
\end{document}
1 Like