| 1 | ;;+----------------------------------------------------------------------------- |
|---|
| 2 | ;;+ Isidorus |
|---|
| 3 | ;;+ (c) 2008-2010 Marc Kuester, Christoph Ludwig, Lukas Georgieff |
|---|
| 4 | ;;+ |
|---|
| 5 | ;;+ Isidorus is freely distributable under the LLGPL license. |
|---|
| 6 | ;;+ You can find a detailed description in trunk/docs/LLGPL-LICENSE.txt and |
|---|
| 7 | ;;+ trunk/docs/LGPL-LICENSE.txt. |
|---|
| 8 | ;;+----------------------------------------------------------------------------- |
|---|
| 9 | |
|---|
| 10 | (defpackage :json-tmcl-constants |
|---|
| 11 | (:use :cl) |
|---|
| 12 | (:export :*schema-psi* |
|---|
| 13 | :*constraint-psi* |
|---|
| 14 | :*topictype-psi* |
|---|
| 15 | :*topictype-constraint-psi* |
|---|
| 16 | :*associationtype-psi* |
|---|
| 17 | :*associationtype-constraint-psi* |
|---|
| 18 | :*roletype-psi* |
|---|
| 19 | :*roletype-constraint-psi* |
|---|
| 20 | :*occurrencetype-psi* |
|---|
| 21 | :*occurrencetype-constraint-psi* |
|---|
| 22 | :*nametype-psi* |
|---|
| 23 | :*nametype-constraint-psi* |
|---|
| 24 | :*scopetype-psi* |
|---|
| 25 | :*topictype-role-psi* |
|---|
| 26 | :*applies-to-psi* |
|---|
| 27 | :*constraint-role-psi* |
|---|
| 28 | :*regexp-psi* |
|---|
| 29 | :*card-min-psi* |
|---|
| 30 | :*card-max-psi* |
|---|
| 31 | :*datatype-psi* |
|---|
| 32 | :*subjectidentifier-constraint-psi* |
|---|
| 33 | :*subjectlocator-constraint-psi* |
|---|
| 34 | :*abstract-topictype-constraint-psi* |
|---|
| 35 | :*exclusive-instance-psi* |
|---|
| 36 | :*topicname-constraint-psi* |
|---|
| 37 | :*topicoccurrence-constraint-psi* |
|---|
| 38 | :*occurrencedatatype-constraint-psi* |
|---|
| 39 | :*uniqueoccurrence-constraint-psi* |
|---|
| 40 | :*roleplayer-constraint-psi* |
|---|
| 41 | :*otherrole-constraint-psi* |
|---|
| 42 | :*nametype-role-psi* |
|---|
| 43 | :*scopetype-role-psi* |
|---|
| 44 | :*occurrencetype-role-psi* |
|---|
| 45 | :*othertopictype-role-psi* |
|---|
| 46 | :*otherroletype-role-psi* |
|---|
| 47 | :*associationtype-role-psi* |
|---|
| 48 | :*nametypescope-constraint-psi* |
|---|
| 49 | :*occurrencetypescope-constraint-psi* |
|---|
| 50 | :*associationtypescope-constraint-psi* |
|---|
| 51 | :*associationrole-constraint-psi* |
|---|
| 52 | :*roletype-role-psi*)) |
|---|
| 53 | |
|---|
| 54 | (in-package :json-tmcl-constants) |
|---|
| 55 | |
|---|
| 56 | (defparameter *topictype-psi* "http://psi.topicmaps.org/tmcl/topic-type") |
|---|
| 57 | (defparameter *topictype-constraint-psi* "http://psi.topicmaps.org/tmcl/topic-type-constraint") |
|---|
| 58 | (defparameter *associationtype-psi* "http://psi.topicmaps.org/tmcl/association-type") |
|---|
| 59 | (defparameter *associationtype-constraint-psi* "http://psi.topicmaps.org/tmcl/association-type-constraint") |
|---|
| 60 | (defparameter *roletype-psi* "http://psi.topicmaps.org/tmcl/role-type") |
|---|
| 61 | (defparameter *roletype-constraint-psi* "http://psi.topicmaps.org/tmcl/role-type-constraint") |
|---|
| 62 | (defparameter *occurrencetype-psi* "http://psi.topicmaps.org/tmcl/occurrence-type") |
|---|
| 63 | (defparameter *occurrencetype-constraint-psi* "http://psi.topicmaps.org/tmcl/occurrence-type-constraint") |
|---|
| 64 | (defparameter *nametype-psi* "http://psi.topicmaps.org/tmcl/name-type") |
|---|
| 65 | (defparameter *nametype-constraint-psi* "http://psi.topicmaps.org/tmcl/name-type-constraint") |
|---|
| 66 | (defparameter *scopetype-psi* "http://psi.topicmaps.org/tmcl/scope-type") |
|---|
| 67 | (defparameter *topictype-role-psi* "http://psi.topicmaps.org/tmcl/topic-type-role") |
|---|
| 68 | (defparameter *applies-to-psi* "http://psi.topicmaps.org/tmcl/applies-to") |
|---|
| 69 | (defparameter *constraint-role-psi* "http://psi.topicmaps.org/tmcl/constraint-role") |
|---|
| 70 | (defparameter *regexp-psi* "http://psi.topicmaps.org/tmcl/reg-exp") |
|---|
| 71 | (defparameter *card-min-psi* "http://psi.topicmaps.org/tmcl/card-min") |
|---|
| 72 | (defparameter *card-max-psi* "http://psi.topicmaps.org/tmcl/card-max") |
|---|
| 73 | (defparameter *datatype-psi* "http://psi.topicmaps.org/tmcl/datatype") |
|---|
| 74 | (defparameter *subjectidentifier-constraint-psi* "http://psi.topicmaps.org/tmcl/subject-identifier-constraint") |
|---|
| 75 | (defparameter *subjectlocator-constraint-psi* "http://psi.topicmaps.org/tmcl/subject-locator-constraint") |
|---|
| 76 | (defparameter *abstract-topictype-constraint-psi* "http://psi.topicmaps.org/tmcl/abstract-topic-type-constraint") |
|---|
| 77 | (defparameter *exclusive-instance-psi* "http://psi.topicmaps.org/tmcl/exclusive-instance") |
|---|
| 78 | (defparameter *topicname-constraint-psi* "http://psi.topicmaps.org/tmcl/topic-name-constraint") |
|---|
| 79 | (defparameter *topicoccurrence-constraint-psi* "http://psi.topicmaps.org/tmcl/topic-occurrence-constraint") |
|---|
| 80 | (defparameter *occurrencedatatype-constraint-psi* "http://psi.topicmaps.org/tmcl/occurrence-datatype-constraint") |
|---|
| 81 | (defparameter *uniqueoccurrence-constraint-psi* "http://psi.topicmaps.org/tmcl/unique-occurrence-constraint") |
|---|
| 82 | (defparameter *roleplayer-constraint-psi* "http://psi.topicmaps.org/tmcl/role-player-constraint") |
|---|
| 83 | (defparameter *otherrole-constraint-psi* "http://psi.topicmaps.org/tmcl/other-role-constraint") |
|---|
| 84 | (defparameter *nametypescope-constraint-psi* "http://psi.topicmaps.org/tmcl/name-type-scope-constraint") |
|---|
| 85 | (defparameter *occurrencetypescope-constraint-psi* "http://psi.topicmaps.org/tmcl/occurrence-type-scope-constraint") |
|---|
| 86 | (defparameter *associationtypescope-constraint-psi* "http://psi.topicmaps.org/tmcl/association-type-scope-constraint") |
|---|
| 87 | (defparameter *nametype-role-psi* "http://psi.topicmaps.org/tmcl/name-type-role") |
|---|
| 88 | (defparameter *scopetype-role-psi* "http://psi.topicmaps.org/tmcl/scope-type-role") |
|---|
| 89 | (defparameter *occurrencetype-role-psi* "http://psi.topicmaps.org/tmcl/occurrence-type-role") |
|---|
| 90 | (defparameter *othertopictype-role-psi* "http://psi.topicmaps.org/tmcl/other-topic-type-role") |
|---|
| 91 | (defparameter *otherroletype-role-psi* "http://psi.topicmaps.org/tmcl/other-role-type-role") |
|---|
| 92 | (defparameter *associationtype-role-psi* "http://psi.topicmaps.org/tmcl/association-type-role") |
|---|
| 93 | (defparameter *associationrole-constraint-psi* "http://psi.topicmaps.org/tmcl/association-role-constraint") |
|---|
| 94 | (defparameter *roletype-role-psi* "http://psi.topicmaps.org/tmcl/role-type-role") |
|---|
| 95 | (defparameter *schema-psi* "http://psi.topicmaps.org/tmcl/schema") |
|---|
| 96 | (defparameter *constraint-psi* "http://psi.topicmaps.org/tmcl/constraint") |
|---|