mailing-list for TeXmacs Users

[vincent douce <address@concealed>]

for the following code

i would like to put the abscisses and ordonnées in some variable so that i can modity them simply

(the iame is to reduce the width so to have to trees on the same line)

a=1.5 pour le 1.5cm

b=2.5 pour le 2.5c

 les abscisses x1 x2 x3 = -3.34, -0.04, 2.71 (le 2.65 est une erreur je pense que c'est 2.71)

les ordonnes y1 y2 y3 y4= -3.03, -1.97, 1.01, 1.99

i have spent a long time with chatgpt trying to use some (define x1 ''-3.34’’) but with no success : the instruction (point x1 ‘’3’') seems not to work

any idea ?

thanks 

;-----------

;---------------------- arbre de probas ------------------

(kbd-map

(:mode in-text?)

("a z P"

(insert '

;trois abscisses : -3.34 -0.04 2.71 ou 2.65 et

(math (tabular* (tformat (cwith "1" "-1" "2" "2" "cell-halign" "l") (cwith "1" "-1" "2" "2" "cell-height" "1cm") (cwith "1" "-1" "2" "2" "cell-vmode" "exact") (cwith "1" "-1" "1" "-1" "cell-valign" "c") (cwith "1" "-1" "2" "2" "cell-width" "2.5cm") (cwith "1" "-1" "2" "2" "cell-hmode" "exact") (cwith "1" "-1" "4" "4" "cell-width" "2.5cm") (cwith "1" "-1" "4" "4" "cell-hmode" "exact") (cwith "1" "-1" "4" "4" "cell-halign" "l") (cwith "4" "4" "1" "1" "cell-width" "2.5cm") (cwith "4" "4" "1" "1" "cell-hmode" "exact") (cwith "1" "-1" "6" "6" "cell-width" "3.5cm") (cwith "1" "-1" "6" "6" "cell-hmode" "exact") (cwith "1" "-1" "6" "6" "cell-halign" "l")

(table (row (cell "") (cell "") (cell "")

(cell (concat "p" (rsub "A") (around* "(" "B" ")") "=")) (cell "") (cell (concat "p" (around* "(" "A<cap>B" ")") "=")) (cell "")) (row (cell "")

(cell (concat "p" (around* "(" "A" ")") "=")) (cell "") (cell "") (cell "") (cell "") (cell "")) (row (cell "") (cell "") (cell "")

(cell (concat "p" (rsub "A") (around* "(" (wide "B" "<wide-bar>") ")") "=")) (cell "")

(cell (concat "p" (around* "(" (concat "A<cap>" (wide "B" "<wide-bar>")) ")"))) (cell "")) (row (cell "") (cell "")

(cell (draw-over "" (with "gr-mode" (tuple "edit" "line") "gr-frame" (tuple "scale" "1cm" (tuple "0.49gw" "0.5gh")) (graphics (line (point "-0.04" "1.99") (point "-3.34" "-0.08") (point "-0.04" "-1.97")) (line (point "2.71" "3.02") (point "-0.04" "1.99") (point "2.65" "1.01")) (line (point "2.71" "-0.96") (point "-0.04" "-1.97") (point "2.65" "-3.03")))) "4.10cm"))

(cell "") (cell "") (cell "") (cell "")) (row (cell "") (cell "") (cell "") (cell (concat "p" (rsub (wide "A" "<wide-bar>")) (around* "(" "B" ")") "=")) (cell "")

(cell (concat "p" (around* "(" (concat (wide "A" "<wide-bar>") "<cap>B") ")"))) (cell "")) (row (cell "")

(cell (concat "p" (around* "(" (wide "A" "<wide-bar>") ")") "=")) (cell "") (cell "") (cell "") (cell "") (cell "")) (row (cell "") (cell "") (cell "")

(cell (concat "p" (rsub (wide "A" "<wide-bar>")) (around* "(" (wide "B" "<wide-bar>") ")") "=")) (cell "")

(cell (concat "p" (around* "(" (concat (wide "A" "<wide-bar>") "<cap>" (wide "B" "<wide-bar>")) ")"))) (cell ""))

);table

)))

)))

;-----------------------------------------------