|
import com.maplesoft.openmaple.*;
|
|
import com.maplesoft.externalcall.MapleException;
|
|
class Example
|
|
{
|
|
public static void main( String notused[] ) throws MapleException
|
|
{
|
|
String mapleArgs[];
|
|
Engine engine;
|
|
Procedure p;
|
|
Algebraic args[];
|
|
Expseq e;
|
|
mapleArgs = new String[1];
|
|
mapleArgs[0] = "java";
|
|
engine = new Engine( mapleArgs, new EngineCallBacksDefault(),
|
|
null, null );
|
|
p = (Procedure)engine.evaluate( "proc( ) return Pi; end proc:" );
|
|
System.out.println( p.execute() );
|
|
System.out.println( p.executehf() );
|
|
p = (Procedure)engine.evaluate( "proc( x,y,z ) return (x+y)/z; end proc:" );
|
|
args = new Algebraic[3];
|
|
args[0] = engine.newNumeric( 100 );
|
|
args[1] = engine.newNumeric( 900 );
|
|
args[2] = engine.newNumeric( 15 );
|
|
System.out.println( p.execute( args ) );
|
|
p = (Procedure)engine.evaluate( "proc( x ) return sin(Pi*x); end proc:" );
|
|
e = engine.newExpseq( 1 );
|
|
e.assign( 1, engine.newNumeric( 1000 ) );
|
|
e = (Expseq)e.unique();
|
|
System.out.println( p.execute( args ) );
|
|
}
|
|
}
|
