Ronan

1022 Reputation

14 Badges

13 years, 160 days
East Grinstead, United Kingdom

MaplePrimes Activity


These are replies submitted by Ronan

@Mac Dude 

I do have the programming manual. Finding it hard to follow. Getting too mixed up on things here. Thanks for clarifying " ... " for flile names. 

\ and / is right quagmire here. Maple gives folder names as follows in windows.

currentdir();
     "C:\Users\Ronan\Documents\MAPLE\Rational_Trinonometry"

libname;
         "C:\Program Files\Maple 2017\lib",
           "C:\Users\Ronan\maple\toolbox\personal\lib"
To enter a command such as read, have to use / else get an error.
 
read("C:/Users/Ronan/Documents/MAPLE/Rational_Trinonometry/Antisym.mpl");  works
read(cat(currentdir(),"/Antisym.mpl"));   works
read(cat("C:\Users\Ronan\Documents\MAPLE\Rational_Trinonometry","/Antisym.mpl"));      doesn't work
Error, unable to read `C:UsersRonanDocumentsMAPLERational_Trinonometry/Antisym.mpl`
 
read(cat("C:/Users/Ronan/Documents/MAPLE/Rational_Trinonometry","/Antisym.mpl"));  works.
 
I follow what you did in the example module "RatTrig". Now as you have saved "Antisym" as a file previously. Instead of copying the code into the module can you read that file into the module? The programming guide mentions "$include" to do this but I cant get it to work. Ch 11.4 pages 393-396. 
 
At present I don't see the use/advantage of a code editor. Downloaded Vim last year but just didn't know what to do with it.
 
 
 
 

 


This document shows the problem when I read a procedure into a package.

As na aside having a problem with the "." for the file extension. Maple keeps treating it as matrix multiplication.

 

restart

``

currentdir()

"C:\Users\Ronan\Documents\MAPLE\Rational_Trinonometry"

(1)

``

Antisym := proc (V::{Matrix(3, 3, shape = antisymmetric, algebraic), Vector(3)}) local M; description "converts vector to antisymmetric matrix and back"; if type(V, Vector) then M := Matrix(3, 3, shape = antisymmetric); M[1, 2] := -V[3]; M[1, 3] := V[2]; M[2, 3] := -V[1] else M := Vector(3, [-V[2, 3], V[1, 3], -V[1, 2]]) end if; M end proc

``

save Antisym, 'Antisym'

restart

NULL

read "/Users/Ronan/Documents/MAPLE/Rational_Trinonometry/Antisym"

proc (V::{Matrix(3, 3, shape = antisymmetric, algebraic), Vector(3)}) local M; description "converts vector to antisymmetric matrix and back"; if type(V, Vector) then M := Matrix(3, 3, shape = antisymmetric); M[1, 2] := -V[3]; M[1, 3] := V[2]; M[2, 3] := -V[1] else M := Vector(3, [-V[2, 3], V[1, 3], -V[1, 2]]) end if; M end proc

(2)

Antisym(Vector(3, [1, -6, 7]))

Matrix(%id = 18446746730912679686)

(3)

``

``

``

restart

mylibdir := cat(kernelopts(homedir), kernelopts(dirsep), "maple", kernelopts(dirsep), "toolbox", kernelopts(dirsep), "personal", kernelopts(dirsep), "lib")

"C:\Users\Ronan\maple\toolbox\personal\lib"

(4)

NULL

libname := mylibdir, libname

"C:\Users\Ronan\maple\toolbox\personal\lib", "C:\Program Files\Maple 2017\lib", "C:\Users\Ronan\maple\toolbox\personal\lib"

(5)

currentdir()

"C:\Users\Ronan\Documents\MAPLE\Rational_Trinonometry"

(6)

RTest := module () export Point2, LinePts, Antisym; option package;  Point2 := proc (x1, y1) options operator, arrow; [x1, y1] end proc; LinePts := proc (p1, p2) options operator, arrow; (p2[2]-p1[2])*x+(p1[1]-p2[1])*y-p2[2]*p1[1]+p1[2]*p2[1] end proc; read "/Users/Ronan/Documents/MAPLE/Rational_Trinonometry/Antisym" end module

_m2657233253376

(7)

savelib('RTest')

``

``

``

restart

``

with(RTest)

[Antisym, LinePts, Point2]

(8)

Point2(3, 7)

[3, 7]

(9)

LinePts([3, 7], [5, -2])

-9*x-2*y+41

(10)

Antisym(Vector(3, [1, -6, 7]))

RTest:-Antisym(Vector[column](%id = 18446746730912679806))

(11)

``


 

Download test_Package1.mw

@Mac Dude 

@nm  Ok what does the \\do? It works for reading in the .mpl.

I have now tried this with a couple of other procedures that worked but reading them in, then they don't work. Any ideas on that?

Will get back to it tomorrow night.

 

@Markiyan Hirnyk Hi. I predomately use a CAD system. Maple is my home hobby to learn more maths out of interest. It would take many months of wor for me to write such code. Here is a link to such an add on package for solidworks. http://www.robotworks-eu.com/apps/cutting.htm

 

I was following a blog earlier this year on the Dzhanibekov Effect where some of the paths traced out can be described by the intersection of a sphere with an ellipse apparently best parameterised by Eulers equation of motion. http://arkadiusz-jadczyk.eu/blog/2017/02/hardest-concept-grasp-physics/ 

 

 I have also seen an application of Stewart Gough platforms been used for 5 axes machining.

Here is a post a placed a couple of months ago here for the reverse kinematics of such a platform.  http://www.mapleprimes.com/posts/208301-Stewart-Gough-Reverse-Kinematics

 

@Markiyan Hirnyk  How about the orientation of the end effector of a robot welding or cutting something. And, art for art's sake.

Hello

Maple also do a home user licence. In the UK it is about £180.

@sarra  https://en.wikipedia.org/wiki/Euler_angles

Basicially you have an Euler rotation matrix. You decide the  the angles of rotation along with the x,y,z displacements. Then the equations calculate the positions of the platform corners in terms of the Global X,Y,Z.

Stewart_Gough_6-6_Leg_Equations.pdf

This paper will show you how to setup the equations.  Looks like you are calculating the leg length. I.e. the reverse kinematics. Describe you displacements in x,y,z and alpha,beta, gamma. Let me know how you get on with it.

 

Edit:- I had uploaded the incorrect pdf

 

@DSkoog  Oh Good. Where/How can i fnd out about all the little tweeks and fixes?

@DSkoog Hi, Any display improvements in the new release?

@erik10 I have been looking at getting a new Pc and High Res. monitor. I found this  http://www.danantonielli.com/adobe-app-scaling-on-high-dpi-displays-fix/   It is claimed it works for other apps too. I haven't tried it yet. Maybe some of you can see if it is useful for Maple and if so share how to impliment it.

@Kitonum, Carl.  I get when I use "ra"   "Warning, expecting only range variable x in expression 1/ra to be plotted but found name ra" and the graph is empty. Replace with x and it's fine. Why? I would have naturally used 1/ra,ra=0..1 or 1/x, x=0..1 or am I missing something here?


 

This page comes up ok for me. I did tyr thr demo version a few months age. Didn't link it into Maple though. It would be great if Maple built if its features.

http://geometryexpressions.com/gx/support/emailSupport.php

@tomleslie  I read that earlier about 7 hours ago. It appeared in the Recent Post section. Then vanished a few hours later. Some promlem with the rho graph I think.

Upload yout work sheet. Otherwise you are stuck with what is is in the help. If you look in the questions I posted this earlier this year there is a series of posts on "animate". I usually post a worksheet when I have technical questions.

Basically with a worksheet there are many experts here who can help you.

First 15 16 17 18 19 20 21 Page 17 of 24