The builtin packages are readonly.  You can change that by using LibraryTools[WriteMode] to modify the library package to writeable.  Then can change back to readonly later after modification. 

Although I would suggest not modifying the built-in libraries just in case it becomes broken and instead do as you have done already, by creating a new package MyFinance.  I meant to suggest Finance2 as a supplement name but that's easy enough to change. 

Maple12 has a meager 12 commands under the finance package.  In Maple15 it exploded to almost 12x's that number to 140! (! not to be confused with factorial) simply awesome!  It could be pointed out to Maple to add some more commands if there are some that are believed to be missing. 

I don't think Mathematica has it in their package either.  Even when the statistics package for Maple came out Karian and Tanis had written a maple statistics supplement since there were many missing functions that they believed should have been included.  Although today Maple is a much stronger platform than it was.

However, Maple is versatile and we could create those procedures you mention.  Maybe a collaboration on a finance supplement is in order? 

Yes okay, I see that now.  I was unawares of the bug.  It should be okay now.

I cleaned up the post (you had double posted the worksheet). 

It is missing some dialogue to show the reader what you are doing but it does look like a predator-prey type model, and in the beginning vector A somehow got created from A:=<,>  

A couple of thoughts came up while producing the tree.  We can turn all of the vertices labels off with labels=false but we can't turn some of them off.  It would be a nice display to blank out all of the parent node labels.  I thought about trying to blank out only numeric characters in the graph but couldn't think of a way.  Perhaps other options exist. 

For interest, visually the huffman tree from Huffman coding looks like this

with(GraphTheory):
t1 := Graph(undirected, {{1, 2}, {1, 3}, {2, 4}, {2, 5}, {3, 6}, {3, 7}, {4, a}, {4, e}, {5, 8}, {5, 9}, {6, 10}, {6, 11}, {7, 12}, {7, _}, {8, h}, {8, i}, {9, m}, {9, n}, {10, s}, {10, t}, {11, 13}, {11, 14}, {12, 15}, {12, f}, {13, l}, {13, o}, {14, p}, {14, r}, {15, u}, {15, x}}):
DrawGraph(t1,style=tree,root=1);  #I used numbers as just placeholders to build the tree

Windows has a built in magnifier under AllPrograms->Accesories->Accessibility

Windows has a built in magnifier under AllPrograms->Accesories->Accessibility

You want to mathematically recreate it?  or embed it as an image in another plot?

Please present your drawing.

@erik10  Are you exporting the graph animation in GIF format? I get a 210 kB file with M12.  You could try just animate command using plot and you'll get a nice graph without having to specify numpoints. 

with(plots):
x:=t->t*cos(t):
y:=t->t*sin(t):
animate(plot,[[x(t),y(t),t=0..A]],A=0..30)

Due to the nature of higher level mathematical software, it isn't always straight forward.

Good point/post.  I had asked about doing on the fly animations here http://www.mapleprimes.com/questions/98771-How-To-Simulate-Or-Animate-On-The-Fly  It is possible in maplets.  I wonder if it is possible otherwise?

MPE is very interesting, you cannot edit your post because you do not have enough points to do so, I think you need to have 500 points in order to edit. 

I think the community enjoys to read what you have to offer but posting another post on the same topic I think put it over the edge for some.  You should have in fact just added on to your original post and everything related to your MPE would be grouped into one post - that would have probably been more favorable and acceptable.

Never-the-less nice work on a 3rd party add-on to maple. 

You ask what are the other entries in 'a' and 'b' ?   Probably just file information used by winzip.

@pagan What I mean is, because the compression algorithm in zlib (which Maple uses) is the same as gzip and zip then uncompress, if I was using it properly, should uncompress the file.  However I don't see why Maple returns corrupt input data.  Did I have the data in the wrong format? 

ConvertByteArray?  Can't seem to get that working either.  Did you succeed?

I don't have access to Maple16 now and Maple 12 doesn't have the Compress and Uncompress commands so I can't experiment with that part right now.