Advanced Search

Question: Creating a package from a DLL

Question:Creating a package from a DLL

MisterEd 25 Maple
package module
January 21 2011
2

I have a DLL which contains many function for the 1997 IASM steam tables.

As an example (in SI units)

> dllloc := "c:/Windows/system/astemdll.dll";
                      "c:/Windows/system/astemdll.dll"
> psat := define_external(psat97mc, FORTRAN, arg1::(float[8]), RETURN::(float[8]), LIB = dllloc);
> b := psat(647.096);
                                                    7
                                2.2064000 10

 

I'd like to create a package for these functions, instead of having to manual enter them each time I need them, like

> with(ASTEM97);

 

Can someone provide a sample with the above?

Thank you

Ed Throm
Please Wait...