1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
| Quintiq file version 2.0
| #parent: #root
| Method RelativelyPositionIncomingArcs
| {
| TextBody:
| [*
| sorted := selectsortedset( this, Incoming, arc, true, arc.Origin().Column() );
| x := -this.Width() / 2;
| traverse( sorted, Elements, arc )
| {
| x := x + this.Width() / ( this.Incoming( relsize ) + 1 );
| arc.Last().X( x );
| }
| *]
| InterfaceProperties { Accessibility: 'Module' }
| }
|
|
