0 9 lY>*C]i@\Tţ _kam_J*j"T 9qţ /* Given node name and angle, rotate a layout using the given * node as origin. */ BEGIN { double x,y; double x0,y0; double x1,y1; double angle, cosa, sina; int cnt, sz; void rotate (double a, double b) { a -= x0; b -= y0; x1 = a*cosa - b*sina; y1 = a*sina + b*cosa; } char* rotateE (char* p) { char* newpos = ""; cnt = sscanf (p, "e,%lf,%lf%n", &x, &y, &sz); if (cnt == 2) { rotate (x,y); newpos = newpos + sprintf ("e%lf,%lf ", x1, y1); p = substr(p, sz); } cnt = sscanf (p, "s,%lf,%lf%n", &x, &y, &sz); if (cnt == 2) { rotate (x,y); newpos = newpos + sprintf ("s%lf,%lf ", x1, y1); p = substr(p, sz); } while (sscanf (p, "%lf,%lf%n", &x, &y, &sz) == 2) { rotate (x,y); newpos = newpos + sprintf ("%lf,%lf ", x1, y1); p = substr(p, sz); } return newpos; } } BEG_G { node_t ctr = node ($, ARGV[0]); sscanf (ARGV[1], "%f", &angle); cosa = cos(angle); sina = sin(angle); sscanf (ctr.pos, "%f,%f", &x0, &y0); $.bb =""; } N { sscanf ($.pos, "%f,%f", &x, &y); rotate (x,y); $.pos = sprintf ("%f,%f", x1, y1); } E { $.pos = rotateE($.pos); }  ƾ File not found. " lm_J*j"T 9qţ h 0 0 6l4(;qţ \h_ub &=L*VBl(?ELF>P6@@8 @**00033pppd0d0 $$Std PtdHzHzHzQtdRtdGNUGNUk3Hx1g&umf $T@D t(H (5`l!p`@Ҁ`@$I$ ( C H D O a !"$')*,-02569:;?@BCDEFHIJKLNOPRTUWXZ[\^_`bcefghjkmprsty|}~W2@zQv2gyaUspyaya[!1eҟ![k'zaOpPIk9C¿¿¿Dٙymk?ZđNđNđ+ӧ;ӧk6HIPI䟅 #';Y8Ou7=YabqbcQ,pp𩃡ݹx|[¿ kARđPI+_;PI4PIny;!Ii lYZ(ݻnYb=9ť#bz¿[t %f_اvCB!6zB!6z (22l_P)ҧ2䑛!jykyM{E3Cdp𩺃¿Cd%4 đ9,IpٻuyǮYȶ߅_¿wҒkڨ*ְY#=ڗeg=0=j5v³a 2)z'bߦE?uY)z/&wY=Y!k2ˁ]Vp x"$"f":"8" Z"aVh, M"F"""K