David Maus dmj
dmj
/ make-number-set.el
Created
June 13, 2014 06:27
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (defun dmaus:make-number-set (list) | |
| (when list | |
| (let ((first (car list)) | |
| (index (car list))) | |
| (while (and (cadr list) (= (incf index) (cadr list))) | |
| (setq list (cdr list))) | |
| (cond | |
| ((= first (car list)) | |
| (cons (format "%d" first) (dmaus:make-number-set (cdr list)))) | |
| ((= (1+ first) (decf index)) |
dmj
/ dvlinks.rnc
Last active
August 29, 2015 14:02
Schema für DFG-Viewer Rechte- und Linkinformationen, METS-Anwendungsprofil Version 2.1
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| # Schema für DFG-Viewer Linkinformationen, METS-Anwendungsprofil Version 2.1 | |
| default namespace = "http://dfg-viewer.de/" | |
| start = links | |
| links = element links { | |
| reference+ & | |
| presentation? | |
| } |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| <?php | |
| /** | |
| * This file is part of HABfind. | |
| * | |
| * HABfind is free software: you can redistribute it and/or modify | |
| * it under the terms of the GNU General Public License as published by | |
| * the Free Software Foundation, either version 3 of the License, or | |
| * (at your option) any later version. | |
| * |
dmj
/ example.pp
Last active
December 26, 2015 07:39
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| 001A 02012:18-04-12 | |
| 001B 02012:04-05-12 t16:13:28.000 | |
| 001D 02012:31-08-98 | |
| 001U 0utf8 | |
| 001X 00 | |
| 002@ 0Tuv1 | |
| 003@ 0034034986 | |
| 003U ahttp://d-nb.info/gnd/4510065-2 | |
| 004B awit |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| /* ANTLR4 Grammar for PICA+ records */ | |
| grammar PicaRecord ; | |
| file : record ('\n' record)* ; | |
| record : field+ ; | |
| field : tag ' ' subfield+ '\u001e'; | |
| tag : FIELD_TAG ; | |
| subfield : SUBFIELD ; |
dmj
/ AbstractParameterProviderListener
Last active
December 21, 2015 08:58
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| <?php | |
| /** | |
| * This file is part of HABfind. | |
| * | |
| * HABfind is free software: you can redistribute it and/or modify | |
| * it under the terms of the GNU General Public License as published by | |
| * the Free Software Foundation, either version 3 of the License, or | |
| * (at your option) any later version. | |
| * |
dmj
/ gvk2local.xsl
Created
March 13, 2013 09:09
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| <?xml version="1.0" encoding="utf-8"?> | |
| <xsl:transform version="1.0" | |
| xmlns:xsl="http://www.w3.org/1999/XSL/Transform" | |
| xmlns:pica="info:srw/schema/5/picaXML-v1.0"> | |
| <xsl:output method="xml" indent="no"/> | |
| <xsl:strip-space elements="*"/> | |
| <xsl:template match="@*|node()"> | |
| <xsl:copy> | |
| <xsl:apply-templates select="@*|node()"/> | |
| </xsl:copy> |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ============================================================================ | |
| HORDE | |
| Array | |
| ( | |
| [AllFields] => Array | |
| ( | |
| [Variant_1] => Array | |
| ( | |
| [series] => Array |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ((return t) | |
| (body ((call (depth 1) | |
| (time "0.0008") | |
| (memory "772760") | |
| (function "main") | |
| (parameter-list "") | |
| (location "/var/www/workshop/wdb_copy/wdb.php:0") | |
| (return "1") | |
| (body ((call (depth 2) | |
| (time "0.0008") |
dmj
/ dnb-split.lisp
Created
November 2, 2012 09:01
Split the German National Library's authority file in single entities
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ;;; | |
| ;; Split the German National Library's authority file in single entities | |
| ;; | |
| ;; The German National Library (DNB) published their authority file | |
| ;; under a CC0 license as one huge Turtle file. In order to work with | |
| ;; the data e.g. as training material for a machine learning based NER | |
| ;; of person names we need to split the file in the separate entities | |
| ;; (subjects). | |
| ;; | |
| ;; Number of single records: 9,493,986 |