14 fprint(2, "usage: seq [-fformat] [-w] [first [incr]] last\n");
32 for(val = min; val <= max; val += incr){
33 sprint(buf, "%g", val);
34 if(strchr(buf, 'e')!=0)
37 w = dp==0? strlen(buf): dp-buf;
38 p = dp==0? 0: strlen(strchr(buf,'.')+1);
46 sprint(fmt,"%%%d.%df\n", maxw, maxp);
51 main(int argc, char *argv[]){
53 char buf[256], ffmt[4096];
61 format = EARGF(usage());
62 if(format[strlen(format)-1] != '\n'){
63 sprint(ffmt, "%s\n", format);
73 max = atof(argv[argc-1]);
79 fprint(2, "seq: zero increment\n");
80 exits("zero increment");
85 for(val = min; val <= max; val += incr){
86 n = sprint(buf, format, val);
88 for(j=0; buf[j]==' '; j++)
93 for(val = min; val >= max; val += incr){
94 n = sprint(buf, format, val);
96 for(j=0; buf[j]==' '; j++)