andre maute | 13 Jul 2012 01:39
Picon
Picon

linel in maxima-init.lisp

I would like to set the line length in my maxima-init.lisp

but

(let (($linel 1000)))

doesn't work.

Regards
Andre
Raymond Toy | 13 Jul 2012 01:49
Picon

Re: linel in maxima-init.lisp



On Thu, Jul 12, 2012 at 4:39 PM, andre maute <andre.maute <at> gmx.de> wrote:
I would like to set the line length in my maxima-init.lisp

but

(let (($linel 1000)))

doesn't work.


You probably want

(setf $linel 1000)

But I'd just do

linel:1000;

in my maxima-init.mac.

Ray
 
_______________________________________________
Maxima mailing list
Maxima <at> math.utexas.edu
http://www.math.utexas.edu/mailman/listinfo/maxima
andre maute | 13 Jul 2012 02:06
Picon
Picon

Re: linel in maxima-init.lisp

On 07/13/2012 01:49 AM, Raymond Toy wrote:
> On Thu, Jul 12, 2012 at 4:39 PM, andre maute <andre.maute <at> gmx.de> wrote:
>
>> I would like to set the line length in my maxima-init.lisp
>>
>> but
>>
>> (let (($linel 1000)))
>>
>> doesn't work.
>>
>>
> You probably want
>
> (setf $linel 1000)
>
> But I'd just do
>
> linel:1000;
>
> in my maxima-init.mac.
>
> Ray

Thanks, that works.
Sometimes I'm mixing languages. Sorry.

Andre
andre maute | 13 Jul 2012 02:17
Picon
Picon

Re: linel in maxima-init.lisp

Hi Ray,

okay linel is set via my maxima-init.lisp,
but without the effect I hoped.

See the SSS marked output line below,
where the fraction is on the next line.

I have an extensive test suite written for my numerical code
and the output of the line changed between
Maxima 5.24.0 and 5.26.0.

Regards
Andre

--------------------------------------------
$ cat linebreak.mac
display2d : false;

print(linel);

k1:1;
k2:1;
k3:1;
a1:0;
ga1:5;
a2:2;
ga2:3;
a3:1;
ga3:2;
b1:0;
gb1:6;
b2:2;
gb2:4;
b3:2;
gb3:2;
h : 29/329313600;

print( "SSS ", k1, " ", k2, " ", k3, " ", a1, " ", ga1, " ", a2, " ", 
ga2, " ",
a3, " ", ga3, " ", b1, " ", gb1, " ", b2, " ", gb2, " ", b3, " ", gb3, " 
| ", h );
--------------------------------------------------

--------- output ---------------------------------
$ maxima -b linebreak.mac
Maxima 5.27.0 http://maxima.sourceforge.net
using Lisp SBCL 1.0.57-1.fc17
Distributed under the GNU Public License. See the file COPYING.
Dedicated to the memory of William Schelter.
The function bug_report() provides bug reporting information.
STYLE-WARNING: redefining MAXIMA::$FILE_TYPE in DEFUN
(%i1)                        batch(linebreak.mac)

read and interpret file: /home/user/linebreak.mac
(%i2)                          display2d : false
(%o2) false
(%i3) print(linel)
1000
(%o3) 1000
(%i4) k1:1
(%o4) 1
(%i5) k2:1
(%o5) 1
(%i6) k3:1
(%o6) 1
(%i7) a1:0
(%o7) 0
(%i8) ga1:5
(%o8) 5
(%i9) a2:2
(%o9) 2
(%i10) ga2:3
(%o10) 3
(%i11) a3:1
(%o11) 1
(%i12) ga3:2
(%o12) 2
(%i13) b1:0
(%o13) 0
(%i14) gb1:6
(%o14) 6
(%i15) b2:2
(%o15) 2
(%i16) gb2:4
(%o16) 4
(%i17) b3:2
(%o17) 2
(%i18) gb3:2
(%o18) 2
(%i19) h:29/329313600
(%o19) 29/329313600
(%i20) print("SSS ",k1," ",k2," ",k3," ",a1," ",ga1," ",a2," ",ga2," 
",a3," ",
              ga3," ",b1," ",gb1," ",b2," ",gb2," ",b3," ",gb3," | ",h)
SSS  1   1   1   0   5   2   3   1   2   0   6   2   4   2   2  |
     29/329313600
(%o20) 29/329313600
(%o20) "/home/user/linebreak.mac"
--------------------------------------------------

On 07/13/2012 02:06 AM, andre maute wrote:
> On 07/13/2012 01:49 AM, Raymond Toy wrote:
>> On Thu, Jul 12, 2012 at 4:39 PM, andre maute <andre.maute <at> gmx.de> wrote:
>>
>>> I would like to set the line length in my maxima-init.lisp
>>>
>>> but
>>>
>>> (let (($linel 1000)))
>>>
>>> doesn't work.
>>>
>>>
>> You probably want
>>
>> (setf $linel 1000)
>>
>> But I'd just do
>>
>> linel:1000;
>>
>> in my maxima-init.mac.
>>
>> Ray
>
>
> Thanks, that works.
> Sometimes I'm mixing languages. Sorry.
>
> Andre
>
> _______________________________________________
> Maxima mailing list
> Maxima <at> math.utexas.edu
> http://www.math.utexas.edu/mailman/listinfo/maxima
>
Robert Dodier | 13 Jul 2012 03:50
Picon

Re: linel in maxima-init.lisp

andre maute <andre.maute <at> gmx.de> writes:

> (%i3) print(linel)
> 1000

> SSS  1   1   1   0   5   2   3   1   2   0   6   2   4   2   2  |
>      29/329313600

(setq $linel 1000) isn't enough -- the Lisp variable linel
(no dollar sign) also needs to be set. linel:1000 in Maxima
code causes both variables to be assigned.

Try putting linel:1000$ in your maxima-init.mac and cut out
the (setq $linel ...) in maxima-init.lisp.

best

Robert Dodier
andre maute | 13 Jul 2012 09:31
Picon
Picon

Re: linel in maxima-init.lisp

On 07/13/2012 03:50 AM, Robert Dodier wrote:
> andre maute <andre.maute <at> gmx.de> writes:
>
>> (%i3) print(linel)
>> 1000
>> SSS  1   1   1   0   5   2   3   1   2   0   6   2   4   2   2  |
>>       29/329313600
> (setq $linel 1000) isn't enough -- the Lisp variable linel
> (no dollar sign) also needs to be set. linel:1000 in Maxima
> code causes both variables to be assigned.
>
> Try putting linel:1000$ in your maxima-init.mac and cut out
> the (setq $linel ...) in maxima-init.lisp.

Thanks Robert, my test suite works now again.

Regards Andre
Stavros Macrakis | 13 Jul 2012 15:14
Picon
Favicon
Gravatar

Re: linel in maxima-init.lisp

That is a no-op.  You are creating a local environment where $linel is bound to 1000, doing nothing within that local environment, then returning to its parent environment....

         -s

On Thu, Jul 12, 2012 at 7:39 PM, andre maute <andre.maute <at> gmx.de> wrote:
I would like to set the line length in my maxima-init.lisp

but

(let (($linel 1000)))

doesn't work.

Regards
Andre
_______________________________________________
Maxima mailing list
Maxima <at> math.utexas.edu
http://www.math.utexas.edu/mailman/listinfo/maxima

_______________________________________________
Maxima mailing list
Maxima <at> math.utexas.edu
http://www.math.utexas.edu/mailman/listinfo/maxima

Gmane