1 #include <stdio.h> 2 #include "tpl.h" 3 main()4 int main() { 5 tpl_node *tn; 6 double x; 7 8 tn = tpl_map("A(f)",&x); 9 for(x=0.0;x<1.0;x+=0.2) tpl_pack(tn,1); 10 tpl_dump(tn,TPL_FILE,"/tmp/test46.tpl"); 11 tpl_free(tn); 12 13 return(0); 14 } 15