Re: last question…

Giovanni Piredda <[email protected]> Mon, 23 Dec 2024 12:31:58 +0000
Newsgroups gmane.editors.texmacs.user
Message-ID <[email protected]>
I think it is absolutely necessary ;-) that you learn basic Scheme. If 
you don't, you are going to use your time to debug pieces of code, if 
you do, you will succeed :-)

In this case, I *think* (because I did not read the code that you 
posted, I am guessing ;-) ) that you need to learn the so-called 
quoting, quasiquoting and unquoting. They are the means that Scheme uses 
to control code evaluation, which will help you building a list, letting 
Scheme know that it is not a function (so that Scheme does not execute 
the list as if it were code), and all the same execute code _inside_ the 
list.

The think at the beginning of this message was without asterisks ;-) let 
me know and I can send you some references.

Moreover it is extremely helpful, when debugging code and when showing 
one's code, to try and construct the shortest example that shows the 
issue one is working on: the one you posted contains pieces of code 
which do not influence the functioning of a TeXmacs `point` tag.

Giovanni





On 23/12/24 12:14, vincent douce wrote:
> 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
> )))
> )))
> ;-----------------------------------------------