#include "mathlink.h"/* send a list of double-precision floating-point numbers to a link */void f(MLINK lp){ double list[20]; int i; for(i = 0; i < 20; i++) list[i] = i + .9; if(! MLPutReal64List(lp, (double *)list, 20)) { /* unable to put the list to lp */ }}