* Multiple calc commands with orgbabel @ 2021-05-05 5:46 pietru 2021-05-05 6:33 ` Eric S Fraga 2021-05-05 7:12 ` Multiple calc commands with orgbabel Dr. Arne Babenhauserheide 0 siblings, 2 replies; 25+ messages in thread From: pietru @ 2021-05-05 5:46 UTC (permalink / raw) To: help Emacs Orgmode Have been trying to execute multiple calc commands, but when I evaluate the calc expressions, I get just one result. -------- This does not work #+begin_src calc fsolve(x*2+x=4,x) fsolve([x + y = a, x - y = b],[x,y]) #+end_src -------- But this works #+begin_src calc fsolve(x*2+x=4,x) #+end_src #+begin_src calc fsolve([x + y = a, x - y = b],[x,y]) #+end_src> ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-05 5:46 Multiple calc commands with orgbabel pietru @ 2021-05-05 6:33 ` Eric S Fraga 2021-05-05 6:40 ` pietru 2021-05-05 15:11 ` Matt Price 2021-05-05 7:12 ` Multiple calc commands with orgbabel Dr. Arne Babenhauserheide 1 sibling, 2 replies; 25+ messages in thread From: Eric S Fraga @ 2021-05-05 6:33 UTC (permalink / raw) To: pietru; +Cc: help Emacs Orgmode On Wednesday, 5 May 2021 at 07:46, pietru@caramail.com wrote: > Have been trying to execute multiple calc commands, but when I > evaluate the calc expressions, I get just one result. ob-calc returns the top element of the stack when finished and this will be the result of the last operation in the src block. I don't think there's any way around this. I use embedded Calc for this reason. You could rewrite your equations as simple lines (separated by empty lines from the surroundings) and evaluate each in turn with "C-x * u": fsolve(x 2 + x = 4, x) => x = 1.33333333333 fsolve([x + y = a, x - y = b], [x, y]) => [x = a + (b - a) / 2, y = (a - b) / 2] I added the "=>" at the end of each expression so that the result is shown to the right instead of replacing the expression itself (default embedded Calc behaviour). -- : Eric S Fraga via Emacs 28.0.50, Org release_9.4.5-395-g82fbdd ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-05 6:33 ` Eric S Fraga @ 2021-05-05 6:40 ` pietru 2021-05-05 6:41 ` Eric S Fraga 2021-05-05 15:11 ` Matt Price 1 sibling, 1 reply; 25+ messages in thread From: pietru @ 2021-05-05 6:40 UTC (permalink / raw) To: Eric S Fraga; +Cc: help Emacs Orgmode > Sent: Wednesday, May 05, 2021 at 6:33 PM > From: "Eric S Fraga" <e.fraga@ucl.ac.uk> > To: pietru@caramail.com > Cc: "help Emacs Orgmode" <emacs-orgmode@gnu.org> > Subject: Re: Multiple calc commands with orgbabel > > On Wednesday, 5 May 2021 at 07:46, pietru@caramail.com wrote: > > Have been trying to execute multiple calc commands, but when I > > evaluate the calc expressions, I get just one result. > > ob-calc returns the top element of the stack when finished and this will > be the result of the last operation in the src block. I don't think > there's any way around this. Is the top stack element just with ob-calc? > I use embedded Calc for this reason. You could rewrite your equations > as simple lines (separated by empty lines from the surroundings) and > evaluate each in turn with "C-x * u": > > fsolve(x 2 + x = 4, x) => x = 1.33333333333 > > fsolve([x + y = a, x - y = b], [x, y]) => [x = a + (b - a) / 2, y = (a - b) / 2] > > I added the "=>" at the end of each expression so that the result is > shown to the right instead of replacing the expression itself (default > embedded Calc behaviour). Will check it out, thanks. > -- > : Eric S Fraga via Emacs 28.0.50, Org release_9.4.5-395-g82fbdd > > ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-05 6:40 ` pietru @ 2021-05-05 6:41 ` Eric S Fraga 2021-05-05 6:45 ` pietru 0 siblings, 1 reply; 25+ messages in thread From: Eric S Fraga @ 2021-05-05 6:41 UTC (permalink / raw) To: pietru; +Cc: help Emacs Orgmode On Wednesday, 5 May 2021 at 08:40, pietru@caramail.com wrote: >> ob-calc returns the top element of the stack when finished and this will >> be the result of the last operation in the src block. I don't think >> there's any way around this. > > Is the top stack element just with ob-calc? I am not sure what you are asking here. Other languages do not have the concept of a stack necessarily. However, for other languages, there is often the option to have the results be "output" instead of "value". -- : Eric S Fraga via Emacs 28.0.50, Org release_9.4.5-395-g82fbdd ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-05 6:41 ` Eric S Fraga @ 2021-05-05 6:45 ` pietru 0 siblings, 0 replies; 25+ messages in thread From: pietru @ 2021-05-05 6:45 UTC (permalink / raw) To: Eric S Fraga; +Cc: help Emacs Orgmode > Sent: Wednesday, May 05, 2021 at 6:41 PM > From: "Eric S Fraga" <e.fraga@ucl.ac.uk> > To: pietru@caramail.com > Cc: "help Emacs Orgmode" <emacs-orgmode@gnu.org> > Subject: Re: Multiple calc commands with orgbabel > > On Wednesday, 5 May 2021 at 08:40, pietru@caramail.com wrote: > >> ob-calc returns the top element of the stack when finished and this will > >> be the result of the last operation in the src block. I don't think > >> there's any way around this. > > > > Is the top stack element just with ob-calc? > > I am not sure what you are asking here. Other languages do not have the > concept of a stack necessarily. However, for other languages, there is > often the option to have the results be "output" instead of "value". I understand, thank you. > > -- > : Eric S Fraga via Emacs 28.0.50, Org release_9.4.5-395-g82fbdd > > ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-05 6:33 ` Eric S Fraga 2021-05-05 6:40 ` pietru @ 2021-05-05 15:11 ` Matt Price 2021-05-05 15:29 ` pietru 2021-05-05 16:39 ` Eric S Fraga 1 sibling, 2 replies; 25+ messages in thread From: Matt Price @ 2021-05-05 15:11 UTC (permalink / raw) To: Org Mode List; +Cc: pietru [-- Attachment #1: Type: text/plain, Size: 1173 bytes --] Can you explain how you get calc embedded mode working in org? I have never used it and it sounds interesting, but I don't understand what hte delimiters are. On Wed, May 5, 2021 at 2:35 AM Eric S Fraga <e.fraga@ucl.ac.uk> wrote: > On Wednesday, 5 May 2021 at 07:46, pietru@caramail.com wrote: > > Have been trying to execute multiple calc commands, but when I > > evaluate the calc expressions, I get just one result. > > ob-calc returns the top element of the stack when finished and this will > be the result of the last operation in the src block. I don't think > there's any way around this. > > I use embedded Calc for this reason. You could rewrite your equations > as simple lines (separated by empty lines from the surroundings) and > evaluate each in turn with "C-x * u": > > fsolve(x 2 + x = 4, x) => x = 1.33333333333 > > fsolve([x + y = a, x - y = b], [x, y]) => [x = a + (b - a) / 2, y = (a - > b) / 2] > > I added the "=>" at the end of each expression so that the result is > shown to the right instead of replacing the expression itself (default > embedded Calc behaviour). > > -- > : Eric S Fraga via Emacs 28.0.50, Org release_9.4.5-395-g82fbdd > > [-- Attachment #2: Type: text/html, Size: 1637 bytes --] ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-05 15:11 ` Matt Price @ 2021-05-05 15:29 ` pietru 2021-05-05 16:19 ` Tom Gillespie 2021-05-05 16:39 ` Eric S Fraga 1 sibling, 1 reply; 25+ messages in thread From: pietru @ 2021-05-05 15:29 UTC (permalink / raw) To: Matt Price; +Cc: Org Mode List [-- Attachment #1: Type: text/html, Size: 3443 bytes --] ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-05 15:29 ` pietru @ 2021-05-05 16:19 ` Tom Gillespie 0 siblings, 0 replies; 25+ messages in thread From: Tom Gillespie @ 2021-05-05 16:19 UTC (permalink / raw) To: pietru; +Cc: Org Mode List Looking at ob-calc there is a call to calc-push-list. Knowing the length of that list (i.e. the number of arguments) it should be possible to inspect calc-stack to retrieve the other values on the stack from the current block. You can see this if you run M-: calc-stack. This would probably need a specialized result type if it were implemented. Best, Tom On Wed, May 5, 2021 at 8:33 AM <pietru@caramail.com> wrote: > > > Example > > (require 'ob-calc) > (org-babel-do-load-languages > 'org-babel-load-languages > '( (calc . t) ) > > -------- calc.org -------- > > # To execute, place cursor point on a line, then hit "C-c * u" hard with no harm. > > #+name: Simplifying Formulas > #+begin_src calc > > simplify((x + y) (x + y)) => > > simplify(a x^2 b / (c x^3 d)) => > > simplify((4 x + 6) / (8 x)) => > > simplify((1 + 2 i) (3 + 4 i)) => > > simplify(5 + i^2 + i - 8 i) => > > simplify((1, 2) + (3, 4)) => > > simplify((1, 2) (3, 4)) => > > #+end_src > > > > Sent: Thursday, May 06, 2021 at 3:11 AM > From: "Matt Price" <moptop99@gmail.com> > To: "Org Mode List" <emacs-orgmode@gnu.org> > Cc: pietru@caramail.com > Subject: Re: Multiple calc commands with orgbabel > Can you explain how you get calc embedded mode working in org? I have never used it and it sounds interesting, but I don't understand what hte delimiters are. > > On Wed, May 5, 2021 at 2:35 AM Eric S Fraga <e.fraga@ucl.ac.uk> wrote: >> >> On Wednesday, 5 May 2021 at 07:46, pietru@caramail.com wrote: >> > Have been trying to execute multiple calc commands, but when I >> > evaluate the calc expressions, I get just one result. >> >> ob-calc returns the top element of the stack when finished and this will >> be the result of the last operation in the src block. I don't think >> there's any way around this. >> >> I use embedded Calc for this reason. You could rewrite your equations >> as simple lines (separated by empty lines from the surroundings) and >> evaluate each in turn with "C-x * u": >> >> fsolve(x 2 + x = 4, x) => x = 1.33333333333 >> >> fsolve([x + y = a, x - y = b], [x, y]) => [x = a + (b - a) / 2, y = (a - b) / 2] >> >> I added the "=>" at the end of each expression so that the result is >> shown to the right instead of replacing the expression itself (default >> embedded Calc behaviour). >> >> -- >> : Eric S Fraga via Emacs 28.0.50, Org release_9.4.5-395-g82fbdd >> ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-05 15:11 ` Matt Price 2021-05-05 15:29 ` pietru @ 2021-05-05 16:39 ` Eric S Fraga 2021-05-05 17:03 ` Tom Gillespie ` (3 more replies) 1 sibling, 4 replies; 25+ messages in thread From: Eric S Fraga @ 2021-05-05 16:39 UTC (permalink / raw) To: Matt Price; +Cc: pietru, Org Mode List On Wednesday, 5 May 2021 at 11:11, Matt Price wrote: > Can you explain how you get calc embedded mode working in org? I have > never used it and it sounds interesting, but I don't understand what > hte delimiters are. Sure. Here is a mini-tutorial! :-) I recently gave an interactive talk on embedded Calc... The out-of-the-box settings for Emacs embedded mode are such that any line surrounded by empty lines (i.e. couple of blank lines before and after) can be interpreted as an expression to evaluate by Calc using "C-x * u". You do not need to place these expressions in any src block. The detection can be somewhat fragile so extra blank lines are sometimes necessary for some reason. For instance, copy the following few lines to a text buffer and type "C-x * u" on each line in turn: --8<---------------cut here---------------start------------->8--- x := 180 => y := sin(x / 4) => z := 2 y^2 => --8<---------------cut here---------------end--------------->8--- The general format for an embedded calc expression is var := expression => value where only "expression" is required. If you don't have "=>", evaluating the expression will replace the expression with its value. If you have lines as above, with assignments and values after the actual expression, you can then go back to the first line and change the value, say to 90, type "C-x *u" on that line again and all of them should update. The calculations can involve calculus (derivatives, integration), linear algebra, and units. Calc is actually an incredibly powerful (and relatively unknown) computer algebra system hiding within Emacs. The variables that could be customised to have org specific recognition would be calc-embedded-open-formula and calc-embedded-close-formula. It might be useful for the community to think about whether org should have org specific settings for these variables. I actually define settings for org so that only lines that look like this: #+calc: expression are interpreted (without requiring empty lines around such lines) [1]. I then have code for processing these lines on export to LaTeX to present the equations and results in a more accessible way as I use embedded calc a lot for teaching (beamer slides). Final note: the info manual for embedded Calc mode emphasises editing the expressions and interacting with Calc while doing so. I find that method of working rather confusing, tiring, and unproductive (for my use case) so I write the calc lines using normal editing and only "update" the expressions to get the results. YMMV, of course. Let me know if this helped at all, eric Footnotes: [1] it would be nice to have some generic way to hijack C-c C-c on such lines to do what I want, e.g. calc-embedded-update-formula. -- : Eric S Fraga via Emacs 28.0.50, Org release_9.4.5-395-g82fbdd ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-05 16:39 ` Eric S Fraga @ 2021-05-05 17:03 ` Tom Gillespie 2021-05-06 11:16 ` Bastien 2021-05-05 20:24 ` pietru ` (2 subsequent siblings) 3 siblings, 1 reply; 25+ messages in thread From: Tom Gillespie @ 2021-05-05 17:03 UTC (permalink / raw) To: pietru; +Cc: Org Mode List [-- Attachment #1: Type: text/plain, Size: 584 bytes --] Here is a quick and dirty implementation that more or less does what you want (I think). The if t would probably need to be replaced by a value that corresponded to an option that indicated that ob-calc should resolve all expressions on the stack. This isn't really an issue of return value, it is due to the fact that ob-calc makes stateful modifications to calc. If you want a stateless (idempotent?) ob-calc block you would need to do something like this as well, and then you would need an option to discard the additional values instead of retruning them as I do here. Best! Tom [-- Attachment #2: ob-calc-multi-return.patch --] [-- Type: text/x-patch, Size: 1606 bytes --] diff --git a/lisp/ob-calc.el b/lisp/ob-calc.el index 39ebce100..e2102feca 100644 --- a/lisp/ob-calc.el +++ b/lisp/ob-calc.el @@ -48,6 +48,7 @@ "Execute a block of calc code with Babel." (unless (get-buffer "*Calculator*") (save-window-excursion (calc) (calc-quit))) + (let ((unpopped 0)) (let* ((vars (org-babel--get-vars params)) (org--var-syms (mapcar #'car vars)) (var-names (mapcar #'symbol-name org--var-syms))) @@ -58,12 +59,14 @@ vars) (mapc (lambda (line) + (setq unpopped (1+ unpopped)) ; ICK (when (> (length line) 0) (cond ;; simple variable name ((member line var-names) (calc-recall (intern line))) ;; stack operation ((string= "'" (substring line 0 1)) + (setq unpopped (- unpopped 2)) (funcall (lookup-key calc-mode-map (substring line 1)) nil)) ;; complex expression (t @@ -89,9 +92,17 @@ (split-string (org-babel-expand-body:calc body params) "[\n\r]")))) (save-excursion (with-current-buffer (get-buffer "*Calculator*") - (prog1 - (calc-eval (calc-top 1)) - (calc-pop 1))))) + (if t + (let ((out + (cl-loop for i from 1 to unpopped + do (message "%S %S" unpopped calc-stack) + collect (calc-eval (calc-top 1)) + do (calc-pop 1)))) + (message "%S" out) + (mapcar #'list (reverse out))) + (prog1 + (calc-eval (calc-top 1)) + (calc-pop 1))))))) (defun org-babel-calc-maybe-resolve-var (el) (if (consp el) ^ permalink raw reply related [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-05 17:03 ` Tom Gillespie @ 2021-05-06 11:16 ` Bastien 2021-05-06 15:21 ` Tom Gillespie 0 siblings, 1 reply; 25+ messages in thread From: Bastien @ 2021-05-06 11:16 UTC (permalink / raw) To: Tom Gillespie; +Cc: pietru, Org Mode List Hi Tom, Tom Gillespie <tgbugs@gmail.com> writes: > Here is a quick and dirty implementation that more or less does what > you want (I think). Mandatory question: would you like to be ob-calc.el maintainer? -- Bastien ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-06 11:16 ` Bastien @ 2021-05-06 15:21 ` Tom Gillespie 2021-05-07 4:04 ` Bastien 0 siblings, 1 reply; 25+ messages in thread From: Tom Gillespie @ 2021-05-06 15:21 UTC (permalink / raw) To: Bastien; +Cc: pietru, Org Mode List Hi Bastien, Given the short length of the file, the fact that I now have a fairly good idea of how it works, and the fact that I share a last name with the original author of calc, I would be happy to. I'll hunt down the steps you mentioned for becoming an ob- maintainer and ping back when they are done. Best! Tom ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-06 15:21 ` Tom Gillespie @ 2021-05-07 4:04 ` Bastien 2021-05-07 7:01 ` Tom Gillespie 0 siblings, 1 reply; 25+ messages in thread From: Bastien @ 2021-05-07 4:04 UTC (permalink / raw) To: Tom Gillespie; +Cc: pietru, Org Mode List Hi Tom, that's really kind of you! Thanks a lot. If other people share the last name of original authors of ob-* files, please raise your voice and ask for your share :) Best, -- Bastien ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-07 4:04 ` Bastien @ 2021-05-07 7:01 ` Tom Gillespie 2021-05-07 7:31 ` Bastien 0 siblings, 1 reply; 25+ messages in thread From: Tom Gillespie @ 2021-05-07 7:01 UTC (permalink / raw) To: Bastien; +Cc: pietru, Org Mode List [-- Attachment #1: Type: text/plain, Size: 59 bytes --] Hi Bastien, Here's a patch to make it official. :) Tom [-- Attachment #2: 0001-lisp-ob-calc.el-Add-Tom-Gillespie-as-the-maintainer.patch --] [-- Type: text/x-patch, Size: 716 bytes --] From 3a61289e8fa4442f6d340138dcb67b950e980212 Mon Sep 17 00:00:00 2001 From: Tom Gillespie <tgbugs@gmail.com> Date: Thu, 6 May 2021 23:52:21 -0700 Subject: [PATCH] lisp/ob-calc.el: Add Tom Gillespie as the maintainer * lisp/ob-calc.el: Add Tom Gillespie as the maintainer. --- lisp/ob-calc.el | 1 + 1 file changed, 1 insertion(+) diff --git a/lisp/ob-calc.el b/lisp/ob-calc.el index 39ebce100..520f39145 100644 --- a/lisp/ob-calc.el +++ b/lisp/ob-calc.el @@ -3,6 +3,7 @@ ;; Copyright (C) 2010-2021 Free Software Foundation, Inc. ;; Author: Eric Schulte +;; Maintainer: Tom Gillespie <tgbugs@gmail.com> ;; Keywords: literate programming, reproducible research ;; Homepage: https://orgmode.org -- 2.26.3 ^ permalink raw reply related [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-07 7:01 ` Tom Gillespie @ 2021-05-07 7:31 ` Bastien 0 siblings, 0 replies; 25+ messages in thread From: Bastien @ 2021-05-07 7:31 UTC (permalink / raw) To: Tom Gillespie; +Cc: pietru, Org Mode List Tom Gillespie <tgbugs@gmail.com> writes: > Here's a patch to make it official. :) Applied in master, thanks! -- Bastien ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-05 16:39 ` Eric S Fraga 2021-05-05 17:03 ` Tom Gillespie @ 2021-05-05 20:24 ` pietru 2021-05-05 23:09 ` ob-fortran behaviour Christopher Dimech 2021-05-06 2:24 ` ob-fortran fixes to column position 6 and subroutine keywords pietru 3 siblings, 0 replies; 25+ messages in thread From: pietru @ 2021-05-05 20:24 UTC (permalink / raw) To: Eric S Fraga; +Cc: Org Mode List > Sent: Thursday, May 06, 2021 at 4:39 AM > From: "Eric S Fraga" <e.fraga@ucl.ac.uk> > To: "Matt Price" <moptop99@gmail.com> > Cc: pietru@caramail.com, "Org Mode List" <emacs-orgmode@gnu.org> > Subject: Re: Multiple calc commands with orgbabel > > On Wednesday, 5 May 2021 at 11:11, Matt Price wrote: > > Can you explain how you get calc embedded mode working in org? I have > > never used it and it sounds interesting, but I don't understand what > > hte delimiters are. > > Sure. Here is a mini-tutorial! :-) I recently gave an interactive talk > on embedded Calc... > > The out-of-the-box settings for Emacs embedded mode are such that any > line surrounded by empty lines (i.e. couple of blank lines before and > after) can be interpreted as an expression to evaluate by Calc using > "C-x * u". You do not need to place these expressions in any src block. > > The detection can be somewhat fragile so extra blank lines are sometimes > necessary for some reason. > > For instance, copy the following few lines to a text buffer and type > "C-x * u" on each line in turn: > > --8<---------------cut here---------------start------------->8--- > > > x := 180 => > > > y := sin(x / 4) => > > > z := 2 y^2 => > > > --8<---------------cut here---------------end--------------->8--- > > The general format for an embedded calc expression is > > var := expression => value > > where only "expression" is required. If you don't have "=>", evaluating > the expression will replace the expression with its value. > > If you have lines as above, with assignments and values after the actual > expression, you can then go back to the first line and change the value, > say to 90, type "C-x *u" on that line again and all of them should > update. > > The calculations can involve calculus (derivatives, integration), linear > algebra, and units. Calc is actually an incredibly powerful (and > relatively unknown) computer algebra system hiding within Emacs. Calc is a great piece of work. Has it been long that work was done on it? > The variables that could be customised to have org specific recognition > would be calc-embedded-open-formula and calc-embedded-close-formula. It > might be useful for the community to think about whether org should have > org specific settings for these variables. I actually define settings > for org so that only lines that look like this: > > #+calc: expression > > are interpreted (without requiring empty lines around such lines) > [1]. I then have code for processing these lines on export to LaTeX to > present the equations and results in a more accessible way as I use > embedded calc a lot for teaching (beamer slides). > > Final note: the info manual for embedded Calc mode emphasises editing > the expressions and interacting with Calc while doing so. I find that > method of working rather confusing, tiring, and unproductive (for my use > case) so I write the calc lines using normal editing and only "update" > the expressions to get the results. YMMV, of course. > > Let me know if this helped at all, > eric > > > Footnotes: > [1] it would be nice to have some generic way to hijack C-c C-c on such > lines to do what I want, e.g. calc-embedded-update-formula. > > -- > : Eric S Fraga via Emacs 28.0.50, Org release_9.4.5-395-g82fbdd > > ^ permalink raw reply [flat|nested] 25+ messages in thread
* ob-fortran behaviour 2021-05-05 16:39 ` Eric S Fraga 2021-05-05 17:03 ` Tom Gillespie 2021-05-05 20:24 ` pietru @ 2021-05-05 23:09 ` Christopher Dimech 2021-05-05 23:29 ` Christopher Dimech 2021-05-06 2:24 ` ob-fortran fixes to column position 6 and subroutine keywords pietru 3 siblings, 1 reply; 25+ messages in thread From: Christopher Dimech @ 2021-05-05 23:09 UTC (permalink / raw) To: Eric S Fraga; +Cc: Org Mode List Fortran is behaving in a weird way #+BEGIN_SRC fortran program matrx_vectr_mult implicit none integer :: m, n, i, j, k real :: a(5,3), u(3), v(5), rsum m = 5; n = 3 a = 0.0; u = 0.0; v = 0.0 k = 0 do j = 1, n do i = 1, m k = i + j a(i,j) = real(k) u(i) = real(3*i) end do end do do i = 1, m rsum = 0.0 do j = 1, n rsum = (a(i,j) * u(j)) + rsum end do v(i) = rsum end do write (*,*) "a * *", " * ", "u", " * ", "v" write (*,*) a(1,:), "*", u(1), "*", v(1) write (*,*) a(2,:), "*", u(2), "*", v(2) write (*,*) a(3,:), "*", u(3), "*", v(3) write (*,*) a(4,:), "* * *", v(4) write (*,*) a(5,:), "* * *", v(5) print *, "---" write (*,*) a end program #+END_SRC #+RESULTS: | a | * | * | * | u | * | v | | | | | | | | | | 12.0 | 3.0 | 4.0 | * | 3.0 | * | 90.0 | | | | | | | | | | 15.0 | 4.0 | 5.0 | * | 6.0 | * | 114.0 | | | | | | | | | | 4.0 | 5.0 | 6.0 | * | 9.0 | * | 96.0 | | | | | | | | | | 5.0 | 6.0 | 7.0 | * | * | * | 114.0 | | | | | | | | | | 6.0 | 7.0 | 8.0 | * | * | * | 132.0 | | | | | | | | | | --- | | | | | | | | | | | | | | | | 12.0 | 15.0 | 4.0 | 5.0 | 6.0 | 3.0 | 4.0 | 5.0 | 6.0 | 7.0 | 4.0 | 5.0 | 6.0 | 7.0 | 8.0 | --------------------- Christopher Dimech General Administrator - Naiad Informatics - GNU Project (Geocomputation) - Geophysical Simulation - Geological Subsurface Mapping - Disaster Preparedness and Mitigation - Natural Resource Exploration and Production - Free Software Advocacy ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: ob-fortran behaviour 2021-05-05 23:09 ` ob-fortran behaviour Christopher Dimech @ 2021-05-05 23:29 ` Christopher Dimech 0 siblings, 0 replies; 25+ messages in thread From: Christopher Dimech @ 2021-05-05 23:29 UTC (permalink / raw) To: Christopher Dimech; +Cc: Org Mode List, Eric S Fraga There exists no problem with fortran. My brain was not open because u(i) gets beyond its bounds. > Sent: Thursday, May 06, 2021 at 11:09 AM > From: "Christopher Dimech" <dimech@gmx.com> > To: "Eric S Fraga" <e.fraga@ucl.ac.uk> > Cc: "Org Mode List" <emacs-orgmode@gnu.org> > Subject: ob-fortran behaviour > > Fortran is behaving in a weird way > > #+BEGIN_SRC fortran > program matrx_vectr_mult > implicit none > > integer :: m, n, i, j, k > real :: a(5,3), u(3), v(5), rsum > > m = 5; n = 3 > a = 0.0; u = 0.0; v = 0.0 > > k = 0 > do j = 1, n > do i = 1, m > k = i + j > a(i,j) = real(k) > u(i) = real(3*i) > end do > end do > > do i = 1, m > rsum = 0.0 > do j = 1, n > rsum = (a(i,j) * u(j)) + rsum > end do > v(i) = rsum > end do > > write (*,*) "a * *", " * ", "u", " * ", "v" > write (*,*) a(1,:), "*", u(1), "*", v(1) > write (*,*) a(2,:), "*", u(2), "*", v(2) > write (*,*) a(3,:), "*", u(3), "*", v(3) > write (*,*) a(4,:), "* * *", v(4) > write (*,*) a(5,:), "* * *", v(5) > > print *, "---" > write (*,*) a > > end program > #+END_SRC > > #+RESULTS: > | a | * | * | * | u | * | v | | | | | | | | | > | 12.0 | 3.0 | 4.0 | * | 3.0 | * | 90.0 | | | | | | | | | > | 15.0 | 4.0 | 5.0 | * | 6.0 | * | 114.0 | | | | | | | | | > | 4.0 | 5.0 | 6.0 | * | 9.0 | * | 96.0 | | | | | | | | | > | 5.0 | 6.0 | 7.0 | * | * | * | 114.0 | | | | | | | | | > | 6.0 | 7.0 | 8.0 | * | * | * | 132.0 | | | | | | | | | > | --- | | | | | | | | | | | | | | | > | 12.0 | 15.0 | 4.0 | 5.0 | 6.0 | 3.0 | 4.0 | 5.0 | 6.0 | 7.0 | 4.0 | 5.0 | 6.0 | 7.0 | 8.0 | > > > --------------------- > Christopher Dimech > General Administrator - Naiad Informatics - GNU Project (Geocomputation) > - Geophysical Simulation > - Geological Subsurface Mapping > - Disaster Preparedness and Mitigation > - Natural Resource Exploration and Production > - Free Software Advocacy > > ^ permalink raw reply [flat|nested] 25+ messages in thread
* ob-fortran fixes to column position 6 and subroutine keywords 2021-05-05 16:39 ` Eric S Fraga ` (2 preceding siblings ...) 2021-05-05 23:09 ` ob-fortran behaviour Christopher Dimech @ 2021-05-06 2:24 ` pietru 3 siblings, 0 replies; 25+ messages in thread From: pietru @ 2021-05-06 2:24 UTC (permalink / raw) To: Eric S Fraga; +Cc: Org Mode List ob-fortran treats code highlighting as "fortran 77" code, starting highlighting from column position 6. Can this be changed to use free format? Also the following call fails, meaning that currently you cannot use keywords. call system_clock(cnt_mx=count_max, cnt_rt=count_rate) ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-05 5:46 Multiple calc commands with orgbabel pietru 2021-05-05 6:33 ` Eric S Fraga @ 2021-05-05 7:12 ` Dr. Arne Babenhauserheide 2021-05-05 7:20 ` pietru 2021-05-05 7:23 ` Eric S Fraga 1 sibling, 2 replies; 25+ messages in thread From: Dr. Arne Babenhauserheide @ 2021-05-05 7:12 UTC (permalink / raw) To: pietru; +Cc: emacs-orgmode [-- Attachment #1: Type: text/plain, Size: 288 bytes --] pietru@caramail.com writes: > Have been trying to execute multiple calc commands, but when I evaluate the calc > expressions, I get just one result. could you try the header :results output? Best wishes, Arne -- Unpolitisch sein heißt politisch sein ohne es zu merken [-- Attachment #2: signature.asc --] [-- Type: application/pgp-signature, Size: 1125 bytes --] ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-05 7:12 ` Multiple calc commands with orgbabel Dr. Arne Babenhauserheide @ 2021-05-05 7:20 ` pietru 2021-05-05 7:23 ` Eric S Fraga 1 sibling, 0 replies; 25+ messages in thread From: pietru @ 2021-05-05 7:20 UTC (permalink / raw) To: Dr. Arne Babenhauserheide; +Cc: emacs-orgmode I still get the lost result #+begin_src calc :results output fsolve(x*2+x=4,x) fsolve([x + y = a, x - y = b],[x,y]) #+end_src #+RESULTS: : [x = a + (b - a) / 2, y = (a - b) / 2] > Sent: Wednesday, May 05, 2021 at 7:12 PM > From: "Dr. Arne Babenhauserheide" <arne_bab@web.de> > To: pietru@caramail.com > Cc: emacs-orgmode@gnu.org > Subject: Re: Multiple calc commands with orgbabel > > > pietru@caramail.com writes: > > > Have been trying to execute multiple calc commands, but when I evaluate the calc > > expressions, I get just one result. > > could you try the header :results output? > > Best wishes, > Arne > -- > Unpolitisch sein > heißt politisch sein > ohne es zu merken > ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-05 7:12 ` Multiple calc commands with orgbabel Dr. Arne Babenhauserheide 2021-05-05 7:20 ` pietru @ 2021-05-05 7:23 ` Eric S Fraga 2021-05-05 7:26 ` pietru 1 sibling, 1 reply; 25+ messages in thread From: Eric S Fraga @ 2021-05-05 7:23 UTC (permalink / raw) To: Dr. Arne Babenhauserheide; +Cc: pietru, emacs-orgmode On Wednesday, 5 May 2021 at 09:12, Dr. Arne Babenhauserheide wrote: > could you try the header :results output? Doesn't make any difference as Calc itself does not actually output anything. All results are put on the stack. -- : Eric S Fraga via Emacs 28.0.50, Org release_9.4.5-503-g501b2a ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-05 7:23 ` Eric S Fraga @ 2021-05-05 7:26 ` pietru 2021-05-05 7:59 ` Eric S Fraga 0 siblings, 1 reply; 25+ messages in thread From: pietru @ 2021-05-05 7:26 UTC (permalink / raw) To: Eric S Fraga; +Cc: Dr. Arne Babenhauserheide, emacs-orgmode Does anybody has some experience using calc for factoring, matrix computation and taking derivatives. The manual overwhelmed me. > Sent: Wednesday, May 05, 2021 at 7:23 PM > From: "Eric S Fraga" <e.fraga@ucl.ac.uk> > To: "Dr. Arne Babenhauserheide" <arne_bab@web.de> > Cc: pietru@caramail.com, emacs-orgmode@gnu.org > Subject: Re: Multiple calc commands with orgbabel > > On Wednesday, 5 May 2021 at 09:12, Dr. Arne Babenhauserheide wrote: > > could you try the header :results output? > > Doesn't make any difference as Calc itself does not actually output > anything. All results are put on the stack. > > -- > : Eric S Fraga via Emacs 28.0.50, Org release_9.4.5-503-g501b2a > ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-05 7:26 ` pietru @ 2021-05-05 7:59 ` Eric S Fraga 2021-05-05 8:00 ` pietru 0 siblings, 1 reply; 25+ messages in thread From: Eric S Fraga @ 2021-05-05 7:59 UTC (permalink / raw) To: pietru; +Cc: emacs-orgmode On Wednesday, 5 May 2021 at 09:26, pietru@caramail.com wrote: > Does anybody has some experience using calc for factoring, matrix > computation and taking derivatives. The manual overwhelmed me. You might be better off asking on the Emacs help list as this is rather off-topic for the org mailing list. -- : Eric S Fraga via Emacs 28.0.50, Org release_9.4.5-503-g501b2a ^ permalink raw reply [flat|nested] 25+ messages in thread
* Re: Multiple calc commands with orgbabel 2021-05-05 7:59 ` Eric S Fraga @ 2021-05-05 8:00 ` pietru 0 siblings, 0 replies; 25+ messages in thread From: pietru @ 2021-05-05 8:00 UTC (permalink / raw) To: Eric S Fraga; +Cc: emacs-orgmode > Sent: Wednesday, May 05, 2021 at 7:59 PM > From: "Eric S Fraga" <e.fraga@ucl.ac.uk> > To: pietru@caramail.com > Cc: emacs-orgmode@gnu.org > Subject: Re: Multiple calc commands with orgbabel > > On Wednesday, 5 May 2021 at 09:26, pietru@caramail.com wrote: > > Does anybody has some experience using calc for factoring, matrix > > computation and taking derivatives. The manual overwhelmed me. > > You might be better off asking on the Emacs help list as this is rather > off-topic for the org mailing list. Fair enough. > -- > : Eric S Fraga via Emacs 28.0.50, Org release_9.4.5-503-g501b2a > ^ permalink raw reply [flat|nested] 25+ messages in thread
end of thread, other threads:[~2021-05-07 7:32 UTC | newest] Thread overview: 25+ messages (download: mbox.gz follow: Atom feed -- links below jump to the message on this page -- 2021-05-05 5:46 Multiple calc commands with orgbabel pietru 2021-05-05 6:33 ` Eric S Fraga 2021-05-05 6:40 ` pietru 2021-05-05 6:41 ` Eric S Fraga 2021-05-05 6:45 ` pietru 2021-05-05 15:11 ` Matt Price 2021-05-05 15:29 ` pietru 2021-05-05 16:19 ` Tom Gillespie 2021-05-05 16:39 ` Eric S Fraga 2021-05-05 17:03 ` Tom Gillespie 2021-05-06 11:16 ` Bastien 2021-05-06 15:21 ` Tom Gillespie 2021-05-07 4:04 ` Bastien 2021-05-07 7:01 ` Tom Gillespie 2021-05-07 7:31 ` Bastien 2021-05-05 20:24 ` pietru 2021-05-05 23:09 ` ob-fortran behaviour Christopher Dimech 2021-05-05 23:29 ` Christopher Dimech 2021-05-06 2:24 ` ob-fortran fixes to column position 6 and subroutine keywords pietru 2021-05-05 7:12 ` Multiple calc commands with orgbabel Dr. Arne Babenhauserheide 2021-05-05 7:20 ` pietru 2021-05-05 7:23 ` Eric S Fraga 2021-05-05 7:26 ` pietru 2021-05-05 7:59 ` Eric S Fraga 2021-05-05 8:00 ` pietru
Code repositories for project(s) associated with this public inbox https://git.savannah.gnu.org/cgit/emacs/org-mode.git This is a public inbox, see mirroring instructions for how to clone and mirror all data and code used for this inbox; as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).