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
>