|
|
1.1 ! root 1: #include "pen.h" ! 2: vec(x, y) ! 3: double x, y; ! 4: { ! 5: if(noscale){ ! 6: x = SCX(x); ! 7: y = SCY(y); ! 8: } ! 9: penDown(); ! 10: fprintf(pltout,"PA %8.2f,%8.2f\n",x,y); ! 11: ckerr(0); ! 12: } ! 13: rvec(x, y) ! 14: double x, y; ! 15: { ! 16: x = SCX(x); ! 17: y = SCY(y); ! 18: penDown(); ! 19: fprintf(pltout,"PR %8.2f,%8.2f\n",x,y); ! 20: ckerr(0); ! 21: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.