loadfile: failed to load /usr/share/maxima/5.44.0/share/draw/draw.lisp

[Adam]

I have ubuntu 21.04
after :

https://askubuntu.com/questions/1345669/how-to-install-maxima-cas-on-ubuntu-21-04

I have installed :

cd ~/Downloads
wget http://archive.ubuntu.com/ubuntu/pool/universe/m/maxima/maxima_5.44.0-3_amd64.deb
sudo apt-get install wxmaxima ./maxima_5.44.0-3_amd64.deb

 maxima

Maxima 5.44.0 http://maxima.sourceforge.net
using Lisp GNU Common Lisp (GCL) GCL 2.6.12
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.
(%i1) batch("a.mac");

read and interpret /home/a/Dokumenty/ijon/3006/a.mac
(%i2) kill(all)
(%o0) done
(%i1) remvalue(all)
(%o1) []
(%i2) display2d:false
(%o2) false
(%i3) a:0.37
(%o3) 0.37
(%i4) c:2.1
(%o4) 2.1
(%i5) define(f(z),1/(z^3+a*z+c))
(%o5) f(z):=1/(z^3+0.37*z+2.1)
(%i6) define(d(z),diff(f(z),z,1))
(%o6) d(z):=-(3*z^2+0.37)/(z^3+0.37*z+2.1)^2
(%i7) GiveOrbit(z0,iMax):=block([z,orbit,temp],z:z0,
                orbit:[[realpart(z),imagpart(z)]],
                for i thru iMax do
                    (z:f(z),z:float(z),z:rectform(z),z:float(z),
                     if cabs(z) > 3 then break,if cabs(z) < 1.0E-5 then break,
                     orbit:endcons([realpart(z),imagpart(z)],orbit)),
                return(orbit))
(%i8) s:solve(d(z) = 0)

rat: replaced 0.37 by 37/100 = 0.37

rat: replaced 2.1 by 21/10 = 2.1

rat: replaced 0.37 by 37/100 = 0.37
(%o8) [z = -(sqrt(37)*%i)/(10*sqrt(3)),z = (sqrt(37)*%i)/(10*sqrt(3))]
(%i9) s:map(rhs,s)
(%o9) [-(sqrt(37)*%i)/(10*sqrt(3)),(sqrt(37)*%i)/(10*sqrt(3))]
(%i10) s:map('float,s)
(%o10) [-0.3511884584284246*%i,0.3511884584284246*%i]
(%i11) orbits:[]
(%o11) []
incorrect syntax: Illegal use of delimiter )
)
^
(%o13) "/home/a/Dokumenty/ijon/3006/a.mac"
(%i14) batch("a.mac");

read and interpret /home/a/Dokumenty/ijon/3006/a.mac
(%i15) kill(all)
(%o0) done
(%i1) remvalue(all)
(%o1) []
(%i2) display2d:false
(%o2) false
(%i3) a:0.37
(%o3) 0.37
(%i4) c:2.1
(%o4) 2.1
(%i5) define(f(z),1/(z^3+a*z+c))
(%o5) f(z):=1/(z^3+0.37*z+2.1)
(%i6) define(d(z),diff(f(z),z,1))
(%o6) d(z):=-(3*z^2+0.37)/(z^3+0.37*z+2.1)^2
(%i7) GiveOrbit(z0,iMax):=block([z,orbit,temp],z:z0,
                orbit:[[realpart(z),imagpart(z)]],
                for i thru iMax do
                    (z:f(z),z:float(z),z:rectform(z),z:float(z),
                     if cabs(z) > 3 then break,if cabs(z) < 1.0E-5 then break,
                     orbit:endcons([realpart(z),imagpart(z)],orbit)),
                return(orbit))
(%i8) s:solve(d(z) = 0)

rat: replaced 0.37 by 37/100 = 0.37

rat: replaced 2.1 by 21/10 = 2.1

rat: replaced 0.37 by 37/100 = 0.37
(%o8) [z = -(sqrt(37)*%i)/(10*sqrt(3)),z = (sqrt(37)*%i)/(10*sqrt(3))]
(%i9) s:map(rhs,s)
(%o9) [-(sqrt(37)*%i)/(10*sqrt(3)),(sqrt(37)*%i)/(10*sqrt(3))]
(%i10) s:map('float,s)
(%o10) [-0.3511884584284246*%i,0.3511884584284246*%i]
(%i11) orbits:[]
(%o11) []
(%i12) for z in s do (print(i,z),orbit:GiveOrbit(z,20),
                      orbits:endcons(orbit,orbits))
i -0.3511884584284246*%i
i 0.3511884584284246*%i
(%i13) path:"~/Dokumenty/ijon/3006/"
(%o13) "~/Dokumenty/ijon/3006/"
(%i14) load(draw)
execvp failure when executing '/usr/bin/gcc -c -g -ffile-prefix-map=/build/gcl-UR70am/gcl-2.6.12=. -fstack-protector-strong -Wformat -Werror=format-security -fsigned-char -pipe -fcommon -fno-builtin-malloc -fno-builtin-free -fno-PIE -fno-pie -fno-PIC -fno-pic -Wall -Wno-empty-body -Wno-unused-but-set-variable -I/usr/include/tirpc -Wdate-time -D_FORTIFY_SOURCE=2 -I/usr/lib/gcl-2.6.12/unixport/../h -O2 -c /home/a/.maxima/binary/5_44_0/gcl/GCL_2_6_12/share/draw/grcommon.c -o /home/a/.maxima/binary/5_44_0/gcl/GCL_2_6_12/share/draw/grcommon.o ': No such file or directory
loadfile: failed to load /usr/share/maxima/5.44.0/share/draw/draw.lisp
 -- an error. To debug this try: debugmode(true);

I can plot with plot2d ( see a.mac) :