janhardo

997 Reputation

13 Badges

12 years, 87 days
B. Ed math

MaplePrimes Activity


These are replies submitted by janhardo

@sand15 
The question is whether Maple users will all start using AI as well?
That’s what I mean when I say you can’t stop AI anymore, and development in this area will continue.
Maplesoft itself is also embracing AI, so yes, there’s a risk that users won’t develop a truly solid foundation in Maple.
Using AI makes it easy to gain a deeper understanding of a topic.
You’d have to ban the use of AI on the forum and expect all code to be written manually.

Hi, its ai what is be used more and it cannot be stopped.
The human contributions made here on the forum to learn Maple probably won't be recognized by the AI as knowledge.

animation twincircles

@Ronan 
Look again to my example ..

@Ronan 
Do you understand this ? : savelibname := "C:/Users/jando/Maple/toolbox/Cliffordlib":
 .ini file is located in Maple folder  in this path ( sorry.  i was not clear enough) 

The nest step is the package "mapel.ini" file needs to be placed in "C:\Program Files\Maple 2026\Users". : 
It seems that the ini file is outside Maple program itself. 

I am on Windows 11 pro and use now Maple 2026.1, this seems to work for me 

Users this map 

@Ronan 
Yoy can do it with this ?

savelibname := "C:/Users/jando/Maple/toolbox/Cliffordlib":
libname := savelibname, libname:

read cat(savelibname, "/define.m"):
read cat(savelibname, "/definemore.m"):
read cat(savelibname, "/Walshpackage.m"):

 .ini file is located in Maple folder
Cliffordlib is name of package 

Maple 2026.1

@Ronan 
Its working on Windows 11 pro 

Pattern  from triangle (not a euclidian)  and twincircles?

a non-periodic function

@Kitonum 
Note that the planes are positioned perpendicular to each other, so this requires additional code.and other  things in a earlier example, so  i don't see your point  ? 
No textplots are possible with draw and display.commands.
 

restart:
with(geom3d):
plane(P1,x+y=1,[x,y,z]):
plane(P2,x-y=2,[x,y,z]):
point(A,1,0,0):
point(B,2,0,0):
intersection(L,P1,P2):
draw([P1(color=blue,transparency=0.55,style=surface),P2(color=yellow,transparency=0.55,style=surface),L(color=black,thickness=4),A(color=red,symbol=solidsphere,symbolsize=16),B(color=red,symbol=solidsphere,symbolsize=16)],axes=boxed,labels=[x,y,z],scaling=constrained,view=[-3..5,-4..4,-3..4],orientation=[55,65],title="Two Planes using geom3d");

Its a lot of work to do this with geom3d 

@erik10 
I looked into what you asked in even more detail and am using only the geom3d package here, but a different approach using a linear algebra package is also possible
My investigation..
twee_vlakken_volledig_via_geom3d_pakket_30-8-2026.mw

restart:
with(geom3d):
plane(P1,x+y=1,[x,y,z]):
plane(P2,x-y=2,[x,y,z]):
Equation(P1);
Equation(P2);
n1:=NormalVector(P1);
n2:=NormalVector(P2);
n1;
n2;
ArePerpendicular(P1,P2);
alpha_oriented:=FindAngle(P1,P2);
alpha:=abs(alpha_oriented);
alpha_deg:=simplify(alpha*180/Pi);
alpha_oriented;
alpha;
alpha_deg;
point(A,1,0,0):
point(B,2,0,0):
coordinates(A);
coordinates(B);
IsOnObject(A,P1);
IsOnObject(B,P2);
intersection(L,P1,P2):
detail(L);
point(Au,2,-1,0):
point(Av,1,0,1):
dsegment(U1,[A,Au]):
dsegment(V1,[A,Av]):
point(An,2,1,0):
dsegment(N1,[A,An]):
point(Bu,3,1,0):
point(Bv,2,0,1):
dsegment(U2,[B,Bu]):
dsegment(V2,[B,Bv]):
point(Bn,3,-1,0):
dsegment(N2,[B,Bn]):
point(Q,3/2,-1/2,3/2):
h:=1/3:
point(Q1,3/2+h,-1/2-h,3/2):
point(Q2,3/2+h,-1/2+h,3/2):
point(Q3,3/2+2*h,-1/2,3/2):
segment(RA1,[Q1,Q3]):
segment(RA2,[Q2,Q3]):
draw([P1(color=blue,transparency=0.55,style=surface),P2(color=yellow,transparency=0.55,style=surface),L(color=black,thickness=4),A(color=red,symbol=solidsphere,symbolsize=16),B(color=red,symbol=solidsphere,symbolsize=16),U1(color=red,thickness=4),V1(color=green,thickness=4),N1(color=black,thickness=4),U2(color=red,thickness=4),V2(color=green,thickness=4),N2(color=black,thickness=4),RA1(color=red,thickness=6),RA2(color=red,thickness=6)],axes=boxed,labels=[x,y,z],scaling=constrained,view=[-3..5,-4..4,-3..4],orientation=[55,65],title="Perpendicular Planes using geom3d");



For n = 1, the formula has been numerically verified 
Now by complete induction ....

1 2 3 4 5 6 7 Last Page 1 of 91