1

// detachable_elements.ysl2

     2

//

     3

// compute what elements are required by pages

     4

// and decide where to cut when removing/attaching 

     5

// pages elements on page switch

     7

// returns all directly or indirectly refered elements

     8

def "func:refered_elements" {

     9

    param "elems";

    10

    const "descend", "$elems/descendant-or-self::svg:*";

    11

    const "clones", "$descend[self::svg:use]";

    12

    const "originals", "//svg:*[concat('#',@id) = $clones/@xlink:href]";

    13

    choose {

    14

        when "$originals"

    15

            result "$descend | func:refered_elements($originals)";

    16

        otherwise

    17

            result "$descend";

    18

    }

    19

}

    21

def "func:all_related_elements" {

    22

    param "page";

    23

    const "page_overlapping_geometry", "func:overlapping_geometry($page)";

    24

    const "page_overlapping_elements", "//svg:*[@id = $page_overlapping_geometry/@Id]";

    25

    const "page_sub_elements", "func:refered_elements($page | $page_overlapping_elements)";

    26

    result "$page_sub_elements";

    27

}

    29

def "func:required_elements" {

    30

    param "pages"; 

    31

    choose{

    32

        when "$pages"{

    33

            result """func:all_related_elements($pages[1])

    34

                      | func:required_elements($pages[position()!=1])""";

    35

        }otherwise{

    36

            result "/..";

    39

}

    41

const "required_elements",

    42

    """//svg:defs/descendant-or-self::svg:*

    43

       | func:required_elements($hmi_pages)/ancestor-or-self::svg:*""";

    45

const "discardable_elements", "//svg:*[not(@id = $required_elements/@id)]";

    47

def "func:sumarized_elements" {

    48

    param "elements";

    49

    const "short_list", "$elements[not(ancestor::*/@id = $elements/@id)]";

    50

    const "filled_groups", """$short_list/parent::svg:*[

    51

        not(descendant::*[

    52

            not(self::svg:g) and

    53

            not(@id = $discardable_elements/@id) and

    54

            not(@id = $short_list/descendant-or-self::*[not(self::svg:g)]/@id)

    55

        ])]""";

    56

    const "groups_to_add", "$filled_groups[not(ancestor::*/@id = $filled_groups/@id)]";

    57

    result "$groups_to_add | $short_list[not(ancestor::svg:g/@id = $filled_groups/@id)]";

    58

}

    60

def "func:detachable_elements" {

    61

    param "pages";

    62

    choose{

    63

        when "$pages"{

    64

            result """func:sumarized_elements(func:all_related_elements($pages[1]))

    65

                      | func:detachable_elements($pages[position()!=1])""";

    66

        }otherwise{

    67

            result "/..";

    70

}

    72

// Avoid nested detachables

    73

const "_detachable_elements", "func:detachable_elements($hmi_pages)";

    74

const "detachable_elements", "$_detachable_elements[not(ancestor::*/@id = $_detachable_elements/@id)]";