00001 #include "egsl.h" 00002 #include "egsl_macros.h" 00003 00004 int main() { 00005 egsl_push(); 00006 00007 val v1 = zeros(10,10); 00008 00009 int i; 00010 for(i=0;i<1000000;i++) { 00011 egsl_push(); 00012 val v2 = zeros(10,10); 00013 00014 add_to(v1, v2); 00015 00016 egsl_pop(); 00017 } 00018 00019 egsl_pop(); 00020 egsl_print_stats(); 00021 00022 return 0; 00023 }