Added calendar example.

README.md

@@ -5,6 +5,7 @@ models were developed in the context of the HOL-OCL and SecureUML
 projects.
 
 ## Models
+* **[Calendar:](./calendar)** A simple calendar/meeting model.
 * **[Company:](./company)** A simple company model, inspired by the OCL standard.
 * **[ISP:](./isp)** A simple example of an ISP.
 * **[Royals and Loyals:](./royals_and_loyals)** The famous royals-and-loyals example.

calendar/README.md

@@ -0,0 +1,9 @@
+# Calendar
+A simple calendar/meeting model.
+
+## Data Sheet
+* Format:               ArgoUML 0.26
+* Language:             SecureUML, ComponentUML
+
+For further information (license, citation, etc.), please look at the [README.md](../)
+of the main directory. 

calendar/calendar.ocl

@@ -0,0 +1,41 @@
+-- Copyright (c) 2003-2007 ETH Zurich, Switzerland
+--                    2016 The University of Sheffield, UK
+-- 
+-- All rights reserved.
+-- 
+-- Redistribution and use in source and binary forms, with or without
+-- modification, are permitted provided that the following conditions are met:
+-- 
+-- * Redistributions of source code must retain the above copyright notice, this
+--   list of conditions and the following disclaimer.
+-- 
+-- * Redistributions in binary form must reproduce the above copyright notice,
+--   this list of conditions and the following disclaimer in the documentation
+--   and/or other materials provided with the distribution.
+-- 
+-- THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+-- AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+-- IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+-- DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
+-- FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+-- DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
+-- SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
+-- CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+-- OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+-- OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+-- source: calendar with secureUML
+
+package calendar
+
+-- class Entry (entity constraint)
+-- --------------------------------------------------------------------
+context Entry
+inv: (time.getCurrentHour() > 8) and (time.getCurrentHour() < 17)
+
+-- class EntryOwnerPerm (permission constraint)
+-- ---------------------------------------------------------------------
+context EntryOwnerPerm
+inv: self.ctxt.principal.identity.name = self.owner
+
+endpackage