+/* sort fibers so they get drawn back-to-front, one bubble pass is
+ enough as the order only changes slowly */
+static void
+sort_fibers(fiberlampstruct *fl)
+{
+ int i;
+
+ for(i = 1; i < fl->nfibers; i++) {
+ if (fl->fiber[i - 1].node[NODES - 1].z > fl->fiber[i].node[NODES - 1].z) {
+ fiberstruct tmp = fl->fiber[i - 1];
+ fl->fiber[i - 1] = fl->fiber[i];
+ fl->fiber[i] = tmp;
+ }
+ }
+}
+