1

<?xml version="1.0"?>

     2

<xsl:stylesheet xmlns:func="http://exslt.org/functions" xmlns:inkscape="http://www.inkscape.org/namespaces/inkscape" xmlns:sodipodi="http://sodipodi.sourceforge.net/DTD/sodipodi-0.dtd" xmlns:svg="http://www.w3.org/2000/svg" xmlns:str="http://exslt.org/strings" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:exsl="http://exslt.org/common" xmlns:xhtml="http://www.w3.org/1999/xhtml" xmlns:xlink="http://www.w3.org/1999/xlink" xmlns:ns="beremiz" xmlns:cc="http://creativecommons.org/ns#" xmlns:regexp="http://exslt.org/regular-expressions" xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:dc="http://purl.org/dc/elements/1.1/" extension-element-prefixes="ns func exsl regexp str dyn" version="1.0" exclude-result-prefixes="ns str regexp exsl func dyn">

     3

  <xsl:output method="xml" cdata-section-elements="xhtml:script"/>

     4

  <xsl:variable name="geometry" select="ns:GetSVGGeometry()"/>

     5

  <xsl:variable name="hmitree" select="ns:GetHMITree()"/>

     6

  <xsl:variable name="svg_root_id" select="/svg:svg/@id"/>

     7

  <xsl:variable name="hmi_elements" select="//svg:*[starts-with(@inkscape:label, 'HMI:')]"/>

     8

  <xsl:variable name="hmi_geometry" select="$geometry[@Id = $hmi_elements/@id]"/>

     9

  <xsl:variable name="hmi_pages" select="$hmi_elements[func:parselabel(@inkscape:label)/widget/@type = 'Page']"/>

    10

  <xsl:variable name="default_page">

    11

    <xsl:choose>

    12

      <xsl:when test="count($hmi_pages) &gt; 1">

    13

        <xsl:variable name="Home_page" select="$hmi_pages[func:parselabel(@inkscape:label)/widget/arg[1]/@value = 'Home']"/>

    14

        <xsl:choose>

    15

          <xsl:when test="$Home_page">

    16

            <xsl:text>Home</xsl:text>

    17

          </xsl:when>

    18

          <xsl:otherwise>

    19

            <xsl:message terminate="yes">No Home page defined!</xsl:message>

    20

          </xsl:otherwise>

    21

        </xsl:choose>

    22

      </xsl:when>

    23

      <xsl:when test="count($hmi_pages) = 0">

    24

        <xsl:message terminate="yes">No page defined!</xsl:message>

    25

      </xsl:when>

    26

      <xsl:otherwise>

    27

        <xsl:value-of select="func:parselabel($hmi_pages/@inkscape:label)/widget/arg[1]/@value"/>

    28

      </xsl:otherwise>

    29

    </xsl:choose>

    30

  </xsl:variable>

    31

  <xsl:variable name="_categories">

    32

    <noindex>

    33

      <xsl:text>HMI_ROOT</xsl:text>

    34

    </noindex>

    35

    <noindex>

    36

      <xsl:text>HMI_PLC_STATUS</xsl:text>

    37

    </noindex>

    38

    <noindex>

    39

      <xsl:text>HMI_CURRENT_PAGE</xsl:text>

    40

    </noindex>

    41

  </xsl:variable>

    42

  <xsl:variable name="categories" select="exsl:node-set($_categories)"/>

    43

  <func:function name="func:refered_elements">

    44

    <xsl:param name="elems"/>

    45

    <xsl:variable name="descend" select="$elems/descendant-or-self::svg:*"/>

    46

    <xsl:variable name="clones" select="$descend[self::svg:use]"/>

    47

    <xsl:variable name="originals" select="//svg:*[concat('#',@id) = $clones/@xlink:href]"/>

    48

    <xsl:choose>

    49

      <xsl:when test="$originals">

    50

        <func:result select="$descend | func:refered_elements($originals)"/>

    51

      </xsl:when>

    52

      <xsl:otherwise>

    53

        <func:result select="$descend"/>

    54

      </xsl:otherwise>

    55

    </xsl:choose>

    56

  </func:function>

    57

  <func:function name="func:intersect_1d">

    58

    <xsl:param name="a0"/>

    59

    <xsl:param name="a1"/>

    60

    <xsl:param name="b0"/>

    61

    <xsl:param name="b1"/>

    62

    <xsl:variable name="d0" select="$a0 &gt;= $b0"/>

    63

    <xsl:variable name="d1" select="$a1 &gt;= $b1"/>

    64

    <xsl:choose>

    65

      <xsl:when test="not($d0) and $d1">

    66

        <func:result select="3"/>

    67

      </xsl:when>

    68

      <xsl:when test="$d0 and not($d1)">

    69

        <func:result select="2"/>

    70

      </xsl:when>

    71

      <xsl:when test="$d0 and $d1 and $a0 &lt; $b1">

    72

        <func:result select="1"/>

    73

      </xsl:when>

    74

      <xsl:when test="not($d0) and not($d1) and $b0 &lt; $a1">

    75

        <func:result select="1"/>

    76

      </xsl:when>

    77

      <xsl:otherwise>

    78

        <func:result select="0"/>

    79

      </xsl:otherwise>

    80

    </xsl:choose>

    81

  </func:function>

    82

  <func:function name="func:intersect">

    83

    <xsl:param name="a"/>

    84

    <xsl:param name="b"/>

    85

    <xsl:variable name="x_intersect" select="func:intersect_1d($a/@x, $a/@x+$a/@w, $b/@x, $b/@x+$b/@w)"/>

    86

    <xsl:choose>

    87

      <xsl:when test="$x_intersect != 0">

    88

        <xsl:variable name="y_intersect" select="func:intersect_1d($a/@y, $a/@y+$a/@h, $b/@y, $b/@y+$b/@h)"/>

    89

        <func:result select="$x_intersect * $y_intersect"/>

    90

      </xsl:when>

    91

      <xsl:otherwise>

    92

        <func:result select="0"/>

    93

      </xsl:otherwise>

    94

    </xsl:choose>

    95

  </func:function>

    96

  <func:function name="func:overlapping_geometry">

    97

    <xsl:param name="elt"/>

    98

    <xsl:variable name="groups" select="/svg:svg | //svg:g"/>

    99

    <xsl:variable name="g" select="$geometry[@Id = $elt/@id]"/>

   100

    <xsl:variable name="candidates" select="$geometry[@Id != $elt/@id]"/>

   101

    <func:result select="$candidates[(@Id = $groups/@id and (func:intersect($g, .) = 9)) or &#10;                              (not(@Id = $groups/@id) and (func:intersect($g, .) &gt; 0 ))]"/>

   102

  </func:function>

   103

  <func:function name="func:all_related_elements">

   104

    <xsl:param name="page"/>

   105

    <xsl:variable name="page_overlapping_geometry" select="func:overlapping_geometry($page)"/>

   106

    <xsl:variable name="page_overlapping_elements" select="//svg:*[@id = $page_overlapping_geometry/@Id]"/>

   107

    <xsl:variable name="page_sub_elements" select="func:refered_elements($page | $page_overlapping_elements)"/>

   108

    <func:result select="$page_sub_elements"/>

   109

  </func:function>

   110

  <func:function name="func:required_elements">

   111

    <xsl:param name="pages"/>

   112

    <xsl:choose>

   113

      <xsl:when test="$pages">

   114

        <func:result select="func:all_related_elements($pages[1])&#10;                          | func:required_elements($pages[position()!=1])"/>

   115

      </xsl:when>

   116

      <xsl:otherwise>

   117

        <func:result select="/.."/>

   118

      </xsl:otherwise>

   119

    </xsl:choose>

   120

  </func:function>

   121

  <xsl:variable name="required_elements" select="//svg:defs/descendant-or-self::svg:*&#10;           | func:required_elements($hmi_pages)/ancestor-or-self::svg:*"/>

   122

  <xsl:variable name="discardable_elements" select="//svg:*[not(@id = $required_elements/@id)]"/>

   123

  <func:function name="func:sumarized_elements">

   124

    <xsl:param name="elements"/>

   125

    <xsl:variable name="short_list" select="$elements[not(ancestor::*/@id = $elements/@id)]"/>

   126

    <xsl:variable name="filled_groups" select="$short_list/parent::svg:*[&#10;            not(descendant::*[&#10;                not(self::svg:g) and&#10;                not(@id = $discardable_elements/@id) and&#10;                not(@id = $short_list/descendant-or-self::*[not(self::svg:g)]/@id)&#10;            ])]"/>

   127

    <xsl:variable name="groups_to_add" select="$filled_groups[not(ancestor::*/@id = $filled_groups/@id)]"/>

   128

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

   129

  </func:function>

   130

  <func:function name="func:detachable_elements">

   131

    <xsl:param name="pages"/>

   132

    <xsl:choose>

   133

      <xsl:when test="$pages">

   134

        <func:result select="func:sumarized_elements(func:all_related_elements($pages[1]))&#10;                          | func:detachable_elements($pages[position()!=1])"/>

   135

      </xsl:when>

   136

      <xsl:otherwise>

   137

        <func:result select="/.."/>

   138

      </xsl:otherwise>

   139

    </xsl:choose>

   140

  </func:function>

   141

  <xsl:variable name="_detachable_elements" select="func:detachable_elements($hmi_pages)"/>

   142

  <xsl:variable name="detachable_elements" select="$_detachable_elements[not(ancestor::*/@id = $_detachable_elements/@id)]"/>

   147

  <xsl:template mode="index" match="*">

   148

    <xsl:param name="index" select="0"/>

   149

    <xsl:param name="parentpath" select="''"/>

   150

    <xsl:variable name="content">

   151

      <xsl:variable name="path">

   152

        <xsl:choose>

   153

          <xsl:when test="local-name() = 'HMI_ROOT'">

   154

            <xsl:value-of select="$parentpath"/>

   155

          </xsl:when>

   156

          <xsl:otherwise>

   157

            <xsl:value-of select="$parentpath"/>

   158

            <xsl:text>/</xsl:text>

   159

            <xsl:value-of select="@name"/>

   160

          </xsl:otherwise>

   161

        </xsl:choose>

   162

      </xsl:variable>

   163

      <xsl:choose>

   164

        <xsl:when test="not(local-name() = $categories/noindex)">

   165

          <xsl:copy>

   166

            <xsl:attribute name="index">

   167

              <xsl:value-of select="$index"/>

   168

            </xsl:attribute>

   169

            <xsl:attribute name="hmipath">

   170

              <xsl:value-of select="$path"/>

   171

            </xsl:attribute>

   172

            <xsl:for-each select="@*">

   173

              <xsl:copy/>

   174

            </xsl:for-each>

   175

          </xsl:copy>

   182

        </xsl:when>

   183

        <xsl:otherwise>

   184

          <xsl:apply-templates mode="index" select="*[1]">

   185

            <xsl:with-param name="index" select="$index"/>

   186

            <xsl:with-param name="parentpath">

   187

              <xsl:value-of select="$path"/>

   188

            </xsl:with-param>

   189

          </xsl:apply-templates>

   190

        </xsl:otherwise>

   191

      </xsl:choose>

   192

    </xsl:variable>

   193

    <xsl:copy-of select="$content"/>

   194

    <xsl:apply-templates mode="index" select="following-sibling::*[1]">

   195

      <xsl:with-param name="index" select="$index + count(exsl:node-set($content)/*)"/>

   196

      <xsl:with-param name="parentpath">

   197

        <xsl:value-of select="$parentpath"/>

   198

      </xsl:with-param>

   199

    </xsl:apply-templates>

   200

  </xsl:template>

   201

  <xsl:template mode="inline_svg" match="@* | node()">

   202

    <xsl:if test="not(@id = $discardable_elements/@id)">

   203

      <xsl:copy>

   204

        <xsl:apply-templates mode="inline_svg" select="@* | node()"/>

   205

      </xsl:copy>

   206

    </xsl:if>

   207

  </xsl:template>

   208

  <xsl:template mode="inline_svg" match="svg:svg/@width"/>

   209

  <xsl:template mode="inline_svg" match="svg:svg/@height"/>

   210

  <xsl:template xmlns="http://www.w3.org/2000/svg" mode="inline_svg" match="svg:svg">

   211

    <svg>

   212

      <xsl:attribute name="preserveAspectRatio">

   213

        <xsl:text>none</xsl:text>

   214

      </xsl:attribute>

   215

      <xsl:attribute name="height">

   216

        <xsl:text>100vh</xsl:text>

   217

      </xsl:attribute>

   218

      <xsl:attribute name="width">

   219

        <xsl:text>100vw</xsl:text>

   220

      </xsl:attribute>

   221

      <xsl:apply-templates mode="inline_svg" select="@* | node()"/>

   222

    </svg>

   223

  </xsl:template>

   224

  <xsl:template mode="inline_svg" match="svg:svg[@viewBox!=concat('0 0 ', @width, ' ', @height)]">

   225

    <xsl:message terminate="yes">

   226

      <xsl:text>ViewBox settings other than X=0, Y=0 and Scale=1 are not supported</xsl:text>

   227

    </xsl:message>

   228

  </xsl:template>

   229

  <xsl:template mode="inline_svg" match="sodipodi:namedview[@units!='px' or @inkscape:document-units!='px']">

   230

    <xsl:message terminate="yes">

   231

      <xsl:text>All units must be set to "px" in Inkscape's document properties</xsl:text>

   232

    </xsl:message>

   233

  </xsl:template>

   234

  <xsl:variable name="to_unlink" select="$hmi_elements[not(@id = $hmi_pages)]//svg:use"/>

   235

  <xsl:template xmlns="http://www.w3.org/2000/svg" mode="inline_svg" match="svg:use">

   236

    <xsl:choose>

   237

      <xsl:when test="@id = $to_unlink/@id">

   238

        <xsl:call-template name="unlink_clone"/>

   239

      </xsl:when>

   240

      <xsl:otherwise>

   241

        <xsl:copy>

   242

          <xsl:apply-templates mode="inline_svg" select="@* | node()"/>

   243

        </xsl:copy>

   244

      </xsl:otherwise>

   245

    </xsl:choose>

   246

  </xsl:template>

   247

  <xsl:variable name="_excluded_use_attrs">

   248

    <name>

   249

      <xsl:text>href</xsl:text>

   250

    </name>

   251

    <name>

   252

      <xsl:text>width</xsl:text>

   253

    </name>

   254

    <name>

   255

      <xsl:text>height</xsl:text>

   256

    </name>

   257

    <name>

   258

      <xsl:text>x</xsl:text>

   259

    </name>

   260

    <name>

   261

      <xsl:text>y</xsl:text>

   262

    </name>

   263

  </xsl:variable>

   264

  <xsl:variable name="excluded_use_attrs" select="exsl:node-set($_excluded_use_attrs)"/>

   265

  <xsl:template xmlns="http://www.w3.org/2000/svg" name="unlink_clone">

   266

    <g>

   267

      <xsl:for-each select="@*[not(local-name() = $excluded_use_attrs/name)]">

   268

        <xsl:attribute name="{name()}">

   269

          <xsl:value-of select="."/>

   270

        </xsl:attribute>

   271

      </xsl:for-each>

   272

      <xsl:variable name="targetid" select="substring-after(@xlink:href,'#')"/>

   273

      <xsl:apply-templates mode="unlink_clone" select="//svg:*[@id = $targetid]">

   274

        <xsl:with-param name="seed" select="@id"/>

   275

      </xsl:apply-templates>

   276

    </g>

   277

  </xsl:template>

   278

  <xsl:template xmlns="http://www.w3.org/2000/svg" mode="unlink_clone" match="@id">

   279

    <xsl:param name="seed"/>

   280

    <xsl:attribute name="id">

   281

      <xsl:value-of select="$seed"/>

   282

      <xsl:text>_</xsl:text>

   283

      <xsl:value-of select="."/>

   284

    </xsl:attribute>

   285

  </xsl:template>

   286

  <xsl:template xmlns="http://www.w3.org/2000/svg" mode="unlink_clone" match="@*">

   287

    <xsl:copy/>

   288

  </xsl:template>

   289

  <xsl:template xmlns="http://www.w3.org/2000/svg" mode="unlink_clone" match="svg:*">

   290

    <xsl:param name="seed"/>

   291

    <xsl:choose>

   292

      <xsl:when test="@id = $hmi_elements/@id">

   293

        <use>

   294

          <xsl:attribute name="xlink:href">

   295

            <xsl:value-of select="concat('#',@id)"/>

   296

          </xsl:attribute>

   297

        </use>

   298

      </xsl:when>

   299

      <xsl:otherwise>

   300

        <xsl:copy>

   301

          <xsl:apply-templates mode="unlink_clone" select="@* | node()">

   302

            <xsl:with-param name="seed" select="$seed"/>

   303

          </xsl:apply-templates>

   304

        </xsl:copy>

   305

      </xsl:otherwise>

   306

    </xsl:choose>

   307

  </xsl:template>

   308

  <xsl:variable name="result_svg">

   309

    <xsl:apply-templates mode="inline_svg" select="/"/>

   310

  </xsl:variable>

   311

  <xsl:variable name="result_svg_ns" select="exsl:node-set($result_svg)"/>

   312

  <xsl:template match="/">

   313

    <xsl:comment>

   314

      <xsl:text>Made with SVGHMI. https://beremiz.org</xsl:text>

   315

    </xsl:comment>

   316

    <xsl:comment>

   317

      <xsl:apply-templates mode="testgeo" select="$hmi_geometry"/>

   318

    </xsl:comment>

   319

    <xsl:comment>

   320

      <xsl:apply-templates mode="testtree" select="$hmitree"/>

   321

    </xsl:comment>

   322

    <xsl:comment>

   323

      <xsl:apply-templates mode="testtree" select="$indexed_hmitree"/>

   324

    </xsl:comment>

   325

    <xsl:comment>

   326

      <xsl:text>Detachable :

   327

</xsl:text>

   328

      <xsl:for-each select="$detachable_elements">

   329

        <xsl:value-of select="@id"/>

   330

        <xsl:text>

   331

</xsl:text>

   332

      </xsl:for-each>

   333

    </xsl:comment>

   334

    <xsl:comment>

   335

      <xsl:text>Discardable :

   336

</xsl:text>

   337

      <xsl:for-each select="$discardable_elements">

   338

        <xsl:value-of select="@id"/>

   339

        <xsl:text>

   340

</xsl:text>

   341

      </xsl:for-each>

   342

    </xsl:comment>

   343

    <xsl:comment>

   344

      <xsl:text>Unlinked :

   345

</xsl:text>

   346

      <xsl:for-each select="$to_unlink">

   347

        <xsl:value-of select="@id"/>

   348

        <xsl:text>

   349

</xsl:text>

   350

      </xsl:for-each>

   351

    </xsl:comment>

   352

    <html xmlns:svg="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink" xmlns="http://www.w3.org/1999/xhtml">

   353

      <head/>

   354

      <body style="margin:0;overflow:hidden;">

   355

        <xsl:copy-of select="$result_svg"/>

   356

        <script>

   357

          <xsl:call-template name="scripts"/>

   358

        </script>

   359

      </body>

   360

    </html>

   361

  </xsl:template>

   362

  <func:function name="func:parselabel">

   363

    <xsl:param name="label"/>

   364

    <xsl:variable name="description" select="substring-after($label,'HMI:')"/>

   365

    <xsl:variable name="_args" select="substring-before($description,'@')"/>

   366

    <xsl:variable name="args">

   367

      <xsl:choose>

   368

        <xsl:when test="$_args">

   369

          <xsl:value-of select="$_args"/>

   370

        </xsl:when>

   371

        <xsl:otherwise>

   372

          <xsl:value-of select="$description"/>

   373

        </xsl:otherwise>

   374

      </xsl:choose>

   375

    </xsl:variable>

   376

    <xsl:variable name="_type" select="substring-before($args,':')"/>

   377

    <xsl:variable name="type">

   378

      <xsl:choose>

   379

        <xsl:when test="$_type">

   380

          <xsl:value-of select="$_type"/>

   381

        </xsl:when>

   382

        <xsl:otherwise>

   383

          <xsl:value-of select="$args"/>

   384

        </xsl:otherwise>

   385

      </xsl:choose>

   386

    </xsl:variable>

   387

    <xsl:variable name="ast">

   388

      <xsl:if test="$type">

   389

        <widget>

   390

          <xsl:attribute name="type">

   391

            <xsl:value-of select="$type"/>

   392

          </xsl:attribute>

   393

          <xsl:for-each select="str:split(substring-after($args, ':'), ':')">

   394

            <arg>

   395

              <xsl:attribute name="value">

   396

                <xsl:value-of select="."/>

   397

              </xsl:attribute>

   398

            </arg>

   399

          </xsl:for-each>

   400

          <xsl:variable name="paths" select="substring-after($description,'@')"/>

   401

          <xsl:for-each select="str:split($paths, '@')">

   402

            <path>

   403

              <xsl:attribute name="value">

   404

                <xsl:value-of select="."/>

   405

              </xsl:attribute>

   406

            </path>

   407

          </xsl:for-each>

   408

        </widget>

   409

      </xsl:if>

   410

    </xsl:variable>

   411

    <func:result select="exsl:node-set($ast)"/>

   412

  </func:function>

   413

  <xsl:template name="scripts">

   414

    <xsl:text>//(function(){

   415

</xsl:text>

   416

    <xsl:text>

   417

</xsl:text>

   418

    <xsl:text>id = idstr =&gt; document.getElementById(idstr);

   419

</xsl:text>

   420

    <xsl:text>

   421

</xsl:text>

   422

    <xsl:text>var hmi_hash = [</xsl:text>

   423

    <xsl:value-of select="$hmitree/@hash"/>

   424

    <xsl:text>]; 

   425

</xsl:text>

   426

    <xsl:text>var hmi_widgets = {

   427

</xsl:text>

   428

    <xsl:for-each select="$hmi_elements">

   429

      <xsl:variable name="widget" select="func:parselabel(@inkscape:label)/widget"/>

   430

      <xsl:variable name="eltid" select="@id"/>

   431

      <xsl:text>  "</xsl:text>

   432

      <xsl:value-of select="@id"/>

   433

      <xsl:text>": {

   434

</xsl:text>

   435

      <xsl:text>    type: "</xsl:text>

   436

      <xsl:value-of select="$widget/@type"/>

   437

      <xsl:text>",

   438

</xsl:text>

   439

      <xsl:text>    args: [

   440

</xsl:text>

   441

      <xsl:for-each select="$widget/arg">

   442

        <xsl:text>        "</xsl:text>

   443

        <xsl:value-of select="@value"/>

   444

        <xsl:text>"</xsl:text>

   445

        <xsl:if test="position()!=last()">

   446

          <xsl:text>,</xsl:text>

   447

        </xsl:if>

   448

        <xsl:text>

   449

</xsl:text>

   450

      </xsl:for-each>

   451

      <xsl:text>    ],

   452

</xsl:text>

   453

      <xsl:text>    indexes: [

   454

</xsl:text>

   455

      <xsl:for-each select="$widget/path">

   456

        <xsl:variable name="hmipath" select="@value"/>

   457

        <xsl:variable name="hmitree_match" select="$indexed_hmitree/*[@hmipath = $hmipath]"/>

   458

        <xsl:choose>

   459

          <xsl:when test="count($hmitree_match) = 0">

   460

            <xsl:message terminate="no">

   461

              <xsl:text>Widget </xsl:text>

   462

              <xsl:value-of select="$widget/@type"/>

   463

              <xsl:text> id="</xsl:text>

   464

              <xsl:value-of select="$eltid"/>

   465

              <xsl:text>" : No match for path "</xsl:text>

   466

              <xsl:value-of select="$hmipath"/>

   467

              <xsl:text>" in HMI tree</xsl:text>

   468

            </xsl:message>

   469

          </xsl:when>

   470

          <xsl:otherwise>

   471

            <xsl:text>            </xsl:text>

   472

            <xsl:value-of select="$hmitree_match/@index"/>

   473

            <xsl:if test="position()!=last()">

   474

              <xsl:text>,</xsl:text>

   475

            </xsl:if>

   476

            <xsl:text>

   477

</xsl:text>

   478

          </xsl:otherwise>

   479

        </xsl:choose>

   480

      </xsl:for-each>

   481

      <xsl:text>    ],

   482

</xsl:text>

   483

      <xsl:text>    element: id("</xsl:text>

   484

      <xsl:value-of select="@id"/>

   485

      <xsl:text>"),

   486

</xsl:text>

   487

      <xsl:apply-templates mode="widget_defs" select="$widget">

   488

        <xsl:with-param name="hmi_element" select="."/>

   489

      </xsl:apply-templates>

   490

      <xsl:text>  }</xsl:text>