#include "mathlink.h"
/* send the expression Times[10,30] to a link */
void f(MLINK lp)
{
if(! MLPutFunction(lp, "Times", 2))
{ /* unable to send the function to lp */ }
if(! MLPutInteger32(lp, 10))
{ /* unable to send the integer to lp */ }
if(! MLPutInteger32(lp, 30))
{ /* unable to send the integer to lp */ }
if(! MLEndPacket(lp))
{ /* unable to send the end-of-packet sequence to lp */ }
if(! MLFlush(lp))
{ /* unable flush any buffered outgoing data in lp */ }
}