DAML-S

We introduce DAML-S. This talk is based on:

1 Introduction

2 Upper Ontology for Services

Upper Ontology for Services

3 Service Profiles

3.1 ServiceProfile Ontology

Service Profile Ontology

3.2 Profile Description Attributes

3.3 Functional Description Attributes

3.4 Functional Attributes

4 Service Model

4.1 Process Ontology

Process Ontology

4.2 Process.daml

<?xml version='1.0' encoding='ISO-8859-1'?>
<rdf:RDF
  xmlns:rdf ="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
  xmlns:rdfs="http://www.w3.org/2000/01/rdf-schema#"
  xmlns:xsd ="http://www.w3.org/2000/10/XMLSchema#"
  xmlns:daml="http://www.daml.org/2001/03/daml+oil#"
  xmlns:service = "http://www.daml.org/services/daml-s/2001/10/Service#"
  xmlns      = "http://www.daml.org/services/daml-s/2001/10/Process#"
>

<daml:Ontology rdf:about="">
  <daml:versionInfo>
    $Id: Process.daml,v 1.17 2002/03/15 05:18:48 martin Exp $
  </daml:versionInfo>
  <rdfs:comment>
    Upper-level DAML ontology for Processes.
    Part of the DAML-S effort; see http://www.daml.org/services/.
  </rdfs:comment>
  <daml:imports rdf:resource="http://www.daml.org/2001/03/daml+oil"/>
  <daml:imports rdf:resource="http://www.ai.sri.com/daml/ontologies/sri-basic/1-0/Time.daml"/>
  <daml:imports rdf:resource="http://www.daml.org/services/daml-s/2001/10/Service.daml"/>
</daml:Ontology>

<!--######################################################
    Preliminaries
    ######################################################-->

<daml:Class rdf:ID="Condition">
  <rdfs:comment>
    This is a "place-holder" for now, which awaits further work from
    the DAML/OIL community.  An instance of Condition is a logical
    formula that evaluates to true or false.  Eventually we expect
    this to be defined elsewhere, as part of a DAML+OIL extension allowing
    for logical expressions.
  </rdfs:comment>
</daml:Class>

<daml:Class rdf:ID="ProcessClass">
  <rdfs:comment>
    This is the power set of Process (defined below); that is, the set
    of all subsets of Process.  This class is needed as the range
    of certain properties.  It's placed in "preliminaries" because of
    the expectation that a better way of declaring these ranges may be
    developed.
  </rdfs:comment>
  <rdfs:subClassOf rdf:resource="http://www.daml.org/2001/03/daml+oil#Class"/> 
</daml:Class>

<!--######################################################
    Connections to upper level Service ontology 
    ######################################################-->

<daml:Class rdf:ID="ProcessModel">
  <rdfs:comment>
    A ServiceModel describes how a Service works, and
    a ProcessModel is a type of ServiceModel (the only
    type being defined for DAML-S).
    See also the introductory comments to Service.daml.  
  </rdfs:comment>
  <rdfs:subClassOf rdf:resource="http://www.daml.org/services/daml-s/2001/10/Service#ServiceModel"/> 
</daml:Class>

<daml:ObjectProperty rdf:ID="hasProcess">
  <rdfs:comment>
    It is important to understand that DAML-S conceptualizes a specific process
    as a *class*, each of whose instances is a particular use/invocation of the
    process.  Thus, each specific process (such as BuyBook in Congo.daml) is
    a *subclass*, rather than an instance, of Process.  This is why the range
    of hasProcess is specified as ProcessClass (which is the class of
    all subclasses of Process).
    In the case of a composite process, indicates the top-level process class.
  </rdfs:comment>
  <rdfs:domain rdf:resource="#ProcessModel"/>
  <rdfs:range rdf:resource="#ProcessClass"/>
</daml:ObjectProperty>

<daml:Class rdf:ID="ProcessControlModel">
  <rdfs:comment>
    A ProcessControlModel is used to monitor and control execution of 
    a Process. This is just a "stub" for now; will be developed further
    in future releases of DAML-S.
  </rdfs:comment>
</daml:Class>

<daml:ObjectProperty rdf:ID="hasControlModel">
  <rdfs:domain rdf:resource="#ProcessModel"/>
  <rdfs:range rdf:resource="#ProcessControlModel"/>
</daml:ObjectProperty>

<daml:Class rdf:about="#ProcessModel">
  <rdfs:comment>
    A ProcessModel can have at most one Process and one ProcessControlModel.
  </rdfs:comment>
  <rdfs:subClassOf>
    <daml:Restriction daml:maxCardinality="1">
      <daml:onProperty rdf:resource="#hasProcess"/>
    </daml:Restriction>
  </rdfs:subClassOf>
  <rdfs:subClassOf>
    <daml:Restriction daml:maxCardinality="1">
      <daml:onProperty rdf:resource="#hasControlModel"/>
    </daml:Restriction>
  </rdfs:subClassOf>
</daml:Class>

<!--######################################################
    Processes
    ######################################################-->

<daml:Class rdf:ID="Process">
  <rdfs:comment> The most general class of processes </rdfs:comment>
  <daml:unionOf rdf:parseType="daml:collection">
    <daml:Class rdf:about="#AtomicProcess"/>
    <daml:Class rdf:about="#SimpleProcess"/>
    <daml:Class rdf:about="#CompositeProcess"/>
  </daml:unionOf>
</daml:Class>

<!--

Processes can have a name, parameters, preconditions, and
(conditional) effects.  Input, (conditional) output, and participant
are subproperties of parameter. Each input, output, parameter,
precondition or effect is a property of process, left unrestricted at
this level (it ranges over "Thing"). The basic attributes are similar
to the PDDL definition of events with the addition of input, output
and participant attributes.  

Processes can also be at an instant (atTime) or during an interval
(during).

-->

<daml:Property rdf:ID="name">
  <rdfs:domain rdf:resource="#Process"/>
  <rdfs:range rdf:resource="http://www.w3.org/2000/01/rdf-schema#Literal"/>
</daml:Property>

<daml:Class rdf:about="#Process">
  <rdfs:comment>
    A Process can have at most one name, but names need not be unique.
  </rdfs:comment>
  <rdfs:subClassOf>
    <daml:Restriction daml:maxCardinality="1">
      <daml:onProperty rdf:resource="#name"/>
    </daml:Restriction>
  </rdfs:subClassOf>
</daml:Class>

<!--
Precondition is a property of Process. The top level ontology
doesn't restrict them at all. A precondition can be any kind of daml
object (Thing).  Specific processes will specialize this property by
restricting the range appropriately using subPropertyOf; such as knowledge
Preconditions (agent knows credit card number) or world Precondition
(baud rate > 56Kb) 
-->

<daml:Property rdf:ID="precondition">  
  <rdfs:domain rdf:resource="#Process"/>
  <rdfs:range  rdf:resource="http://www.daml.org/2001/03/daml+oil#Thing"/>
</daml:Property>

<!--
Parameters are properties of processes. The top level ontology
doesn't restrict them at all. A parameter can be any kind of daml
object (Thing).  Specific processes will specialize this property by
restricting the range appropriately using subPropertyOf; such as the
credit card number sub-property of a buying event would be restricted
to have a range of type integer.  
-->

<daml:Property rdf:ID="parameter">
  <rdfs:domain rdf:resource="#Process"/>
  <rdfs:range  rdf:resource="http://www.daml.org/2001/03/daml+oil#Thing"/>
</daml:Property>

<!-- Effect is a property of process. The top level ontology doesn't
restrict them at all. An effect has the range ConditionalEffect.
Processes will have conditional effects.  For example, if the book is
in stock, it will be purchased after executing the buy-book process.
In the trivial case, the condition is "true" and the effect
unconditionally holds.
 -->

<daml:ObjectProperty rdf:ID="effect">
<rdfs:domain rdf:resource="#Process"/>
<rdfs:range  rdf:resource="#ConditionalEffect"/>
</daml:ObjectProperty>

<daml:Class rdf:ID="ConditionalEffect">
  <daml:subClassOf rdf:resource="http://www.daml.org/2001/03/daml+oil#Thing"/>
</daml:Class>

<!-- ConditionalEffect is a thing that consists of a condition, and an
effect thing.  It has two properties, the condtion (ceCondition) of
the conditional effect, and the effect (ceEffect) of the conditional
effect.  In the buy-book example ceCondition would be "inStock(book)"
and the ceEffect would be "purchased(book)".
 -->

<daml:Property rdf:ID="ceCondition">
 <rdfs:comment> The condition of a conditional effect. </rdfs:comment>
  <rdfs:domain rdf:resource="#ConditionalEffect"/>
  <rdfs:range rdf:resource="#Condition"/>
</daml:Property>

<daml:Property rdf:ID="ceEffect">
  <rdfs:domain rdf:resource="#ConditionalEffect"/>
  <rdfs:range rdf:resource="http://www.daml.org/2001/03/daml+oil#Thing"/>
</daml:Property>

<!-- We provide three common subtypes of parameters in the top level
ontology.  The types are input, conditionalOutput, and participant.  -->

<!-- An input is a type of parameter and is a property of
a process. The top level ontology doesn't restrict them at all. An input
can be any kind of daml object (Thing).  Specific processes will
specialize this property by restricting the range appropriately; such
as required inputs, derivable inputs, etc.
 -->

<daml:Property rdf:ID="input"> 
  <rdfs:subPropertyOf rdf:resource="#parameter"/> 
  <daml:range rdf:resource="http://www.daml.org/2001/03/daml+oil#Thing"/>
</daml:Property>

<!-- An output is a type of parameter and is a property of a
process. The top level ontology doesn't restrict them at all.  An
output can be any kind of daml object (Thing).  Each output may
(optionally) be associated with a Condition.

-->

<daml:Property rdf:ID="output">
  <rdfs:subPropertyOf rdf:resource="#parameter"/> 
  <rdfs:range rdf:resource="#ConditionalOutput"/>
</daml:Property>

<!-- ConditionalOutput is a thing that consists of a condition, and an
ouput thing. -->

<daml:Class rdf:ID="ConditionalOutput">
  <daml:subClassOf rdf:resource="http://www.daml.org/2001/03/daml+oil#Thing"/>
</daml:Class>

<daml:Property rdf:ID="coCondition">
 <rdfs:comment> The condition of a conditional output </rdfs:comment>
  <rdfs:domain rdf:resource="#ConditionalOutput"/>
  <rdfs:range rdf:resource="#Condition"/>
</daml:Property>

<daml:Property rdf:ID="coOutput">
  <rdfs:domain rdf:resource="#ConditionalOutput"/>
  <rdfs:range rdf:resource="http://www.daml.org/2001/03/daml+oil#Thing"/>
</daml:Property>


<!-- A participant is a type of parameter and is a property
of a process. The top level ontology doesn't restrict them at all. A
participant can be any kind of daml object (Thing).  Specific processes
will specialize this property by restricting the range to types of
agents, objects, entities, etc.  -->

<daml:Property rdf:ID="participant">  
  <rdfs:subPropertyOf rdf:resource="#parameter"/>
</daml:Property>

<!--- and other stuff....->

</rdf:RDF>






4.3 Control Constructs

4.4 Process Control Ontology

4.5 Time Ontology

5 Resources

6 Congo Example

6.1 Describe the Program

6.2 Process Input and Output

6.3 Process Preconditions and Effects

6.4 Composite Processes

6.5 Creating a Simplified View

6.6 Congo.daml

<?xml version='1.0' encoding='ISO-8859-1'?> 
<!DOCTYPE uridef[
  <!ENTITY rdf     "http://www.w3.org/1999/02/22-rdf-syntax-ns">
  <!ENTITY rdfs    "http://www.w3.org/2000/01/rdf-schema">
  <!ENTITY xsd     "http://www.w3.org/2000/10/XMLSchema">
  <!ENTITY daml    "http://www.daml.org/2001/03/daml+oil">
  <!ENTITY dex     "http://www.daml.org/2001/03/daml+oil-ex">
  <!ENTITY exd     "http://www.daml.org/2001/03/daml+oil-ex-dt">
  <!ENTITY service "http://www.daml.org/services/daml-s/2001/10/Service.daml">
  <!ENTITY process "http://www.daml.org/services/daml-s/2001/10/Process.daml">
  <!ENTITY time    "http://www.ai.sri.com/~daml/ontologies/sri-basic/1-0/Time.daml">
  <!ENTITY congo   "http://www.daml.org/services/daml-s/2001/10/Congo.daml"> 
  <!ENTITY DEFAULT "http://www.daml.org/services/daml-s/2001/10/Congo.daml"> 
  <!ENTITY THIS    "http://www.daml.org/services/daml-s/2001/10/Congo.daml"> 
]>

<rdf:RDF
  xmlns:rdf =     "&rdf;#"
  xmlns:rdfs =    "&rdfs;#"
  xmlns:xsd =     "&xsd;#"
  xmlns:daml =    "&daml;#"
  xmlns:dex =     "&dex;#"
  xmlns:exd =     "&exd;#"
  xmlns:service = "&service;#"
  xmlns:process = "&process;#"
  xmlns:time =    "&time;#"
  xmlns =         "&congo;#"
>

<daml:Ontology rdf:about="">
  <daml:versionInfo>
    $Id: Congo.daml,v 1.7 2002/01/15 08:05:06 martin Exp $
  </daml:versionInfo>
  <rdfs:comment>

      A B2C bookbuying example of DAML-S (DARPA Agent Markup Language
      for Services; see http://www.daml.org/services/) usage, illustrating a
      simple use of the process model.  This is a sketch; not a complete example.

      The service described here is a book buying (or selling, depending
      on your perspective) service from www.congo.com.  We
      present two forms of the service.  First, there's a one-step form, 
      with the service treated as ATOMIC; i.e., no interactions between
      buying and selling agents are required, apart from invocation of the
      service and receipt of its outputs by the buyer.  Given certain inputs
      and parameters, the service provides certain outputs and has specific
      effects.  Second, a full-fledged version of the service is specified,
      showing its composition from its component services. The atomic service
      is CongoBuy, which has specified inputs, outputs, preconditions and
      effects (IOPEs). The full-fledged version of the service, ExpandedCongoBuy,
      includes an arrangement of subprocesses LocateBook, PutInCart, SignIn, 
      CreateAcct, CreateProfile, LoadProfile, SpecifyDeliveryDetails, 
      FinalizeBuy each with its own IOPE spec. 

        Created by Srini Narayanan (srini@ai.sri.com).
        Modifications by  Mark Burstein, David Martin, Sheila McIlraith,
        Srini Narayanan, Terri Payne.
  </rdfs:comment>
  <daml:imports rdf:resource="&daml;"/>
  <daml:imports rdf:resource="&time;"/>
  <daml:imports rdf:resource="&service;"/>
  <daml:imports rdf:resource="&process;"/>
</daml:Ontology>

<!--

NOTES ON LANGUAGE USE:
NOTE: This DAML code employs 2 proposed properties: 
    daml:sameValuesAs
    daml:listOfInstancesOf
which are not currently part of DAML+OIL.

The daml:sameValuesAs property is used here only in the definitions
of (IOPE) properties of composite processes (but there is nothing about
daml:sameValuesAs that limits its use in this way).

Input, output, precondition, and effect properties of composite
processes can, in principle, be automatically generated by tools.
Since such tools don't yet exist, they have been manually generated
for this example.

-->

<!--###################################################
    DATA TYPES
    ###################################################-->

<daml:Class rdf:ID="CreditCardType">
  <daml:oneOf rdf:parseType="daml:collection">
    <CreditCardType rdf:ID="MasterCard"/>
    <CreditCardType rdf:ID="VISA"/>
    <CreditCardType rdf:ID="AmericanExpress"/>
    <CreditCardType rdf:ID="DiscoverCard"/>
   </daml:oneOf>
</daml:Class>

<daml:Class rdf:ID="PackagingType">
  <daml:oneOf rdf:parseType="daml:collection">
    <PackagingType rdf:ID="Giftwrap"/>
    <PackagingType rdf:ID="Ordinary"/>
  </daml:oneOf>
</daml:Class>

<daml:Class rdf:ID="DeliveryType">
  <daml:oneOf rdf:parseType="daml:collection">
    <DeliveryType rdf:ID="FedExOneDay"/>
    <DeliveryType rdf:ID="FedEx2-3day"/>
    <DeliveryType rdf:ID="UPS"/>
    <DeliveryType rdf:ID="OrdinaryMail"/>
  </daml:oneOf>
</daml:Class>

<daml:Class rdf:ID="ValidityType">
  <daml:oneOf rdf:parseType="daml:collection">
    <ValidityType rdf:ID="Valid"/>
    <ValidityType rdf:ID="Expired"/>
    <ValidityType rdf:ID="InvalidCCNumber"/>
    <ValidityType rdf:ID="InvalidCCType"/>
    <ValidityType rdf:ID="AuthorizationRefused"/>
  </daml:oneOf>
</daml:Class>

<daml:Class rdf:ID="BuyEffectType">
  <daml:oneOf rdf:parseType="daml:collection">
    <BuyEffectType rdf:ID ="OrderShipped"/>
    <BuyEffectType rdf:ID ="Failure"/>
  </daml:oneOf>
</daml:Class>

<!-- stub most of these for now -->

<daml:Class rdf:ID="Book">
  <rdfs:subClassOf rdf:resource="&daml;#Thing"/>
</daml:Class>

<daml:Class rdf:ID="EReceipt">
  <rdfs:subClassOf rdf:resource="&daml;#Thing"/>
</daml:Class>

<daml:Class rdf:ID="ShippingOrder">
  <rdfs:subClassOf rdf:resource="&daml;#Thing"/>
</daml:Class>

<daml:Class rdf:ID="SignInData">
  <rdfs:subClassOf rdf:resource="&daml;#Thing"/>
</daml:Class>

<rdf:Property rdf:ID="acctName">
  <rdfs:domain rdf:resource="#SignInData"/>
  <rdfs:range rdf:resource="&xsd;#string"/>
</rdf:Property>

<rdf:Property rdf:ID="password">
  <rdfs:domain rdf:resource="#SignInData"/>
  <rdfs:range rdf:resource="&xsd;#string"/>
</rdf:Property>

<daml:Class rdf:ID="ProfileInfo">
  <rdfs:subClassOf rdf:resource="&daml;#Thing"/>
</daml:Class>

<daml:Class rdf:ID="AcctInfo">
 <daml:unionOf rdf:parseType="daml:collection">
    <daml:Class rdf:about="#SignInData"/>
    <daml:Class rdf:about="#ProfileInfo"/>
 </daml:unionOf>
</daml:Class>

<daml:Class rdf:ID="ENotify">
  <rdfs:subClassOf rdf:resource="&daml;#Thing"/>
</daml:Class>

<daml:Class rdf:ID="CreateAcctOutputType">
 <daml:unionOf rdf:parseType="daml:collection">
    <daml:Class rdf:about="#AcctInfo"/>
    <daml:Class rdf:about="#ENotify"/>
 </daml:unionOf>
</daml:Class>

<!-- Shopping cart
Holding the books is the Cart Class defined below 
various processes like AddToCart, RemoveFromCart, itemInCart?, 
etc can be defined using the Cart Class as the structure manipulated.
So the ouput/effect of these processes would manipulate the cart to
add, delete items.  (These manipulations are not yet specified here.)
-->

<daml:Class rdf:ID="Cart">
  <daml:intersectionOf rdf:parseType="daml:collection">
    <daml:Class rdf:about="daml:List"/>
    <daml:Restriction>
      <daml:onProperty rdf:resource="&daml;#item"/>
      <daml:toClass rdf:resource="#Book"/>
    </daml:Restriction>
  </daml:intersectionOf>
</daml:Class>

<!--###################################################
    THE BLACKBOX PROCESS CongoBuy
    ###################################################-->

<daml:Class rdf:ID="CongoBuy">

  <rdfs:subClassOf rdf:resource="&process;#SimpleProcess"/>
</daml:Class>

<!-- Inputs -->

<rdf:Property rdf:ID="congoBuyBookName">
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#CongoBuy"/>
  <rdfs:range rdf:resource="&xsd;#string"/>
</rdf:Property>

<rdf:Property rdf:ID="congoBuySignInInfo">
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#CongoBuy"/>
  <rdfs:range rdf:resource="#SignInData"/>
</rdf:Property>

<!-- 
2 Preconditions: AccountExists and CreditExists.  The
range of the preconditions is a condition object with a
conditionValue property.  TBD: How to indicate that the conditionValue
(output) property of CreditExists holds the operative value.
-->

<daml:Class rdf:ID="CreditExists">
  <rdfs:subClassOf rdf:resource="&process;#Condition"/>
</daml:Class>

<daml:Class rdf:ID="AcctExists">
  <rdfs:subClassOf rdf:resource="&process;#Condition"/>
</daml:Class>

<rdf:Property rdf:ID="congoBuyAcctExistsPrecondition">
  <rdfs:subPropertyOf rdf:resource="&process;#precondition"/>
  <rdfs:domain rdf:resource="#CongoBuy"/>
  <rdfs:range rdf:resource="#AcctExists"/>
</rdf:Property>

<rdf:Property rdf:ID="congoBuyCreditExistsPrecondition">
  <rdfs:subPropertyOf rdf:resource="&process;#precondition"/>
  <rdfs:domain rdf:resource="#CongoBuy"/>
  <rdfs:range rdf:resource="#CreditExists"/>
</rdf:Property>

<!-- TWO OUTPUTS, E-RECEIPT AND SHIPPING-ORDER -->

<rdf:Property rdf:ID="congoBuyReceipt">
  <rdfs:subPropertyOf rdf:resource="&process;#output"/>
  <rdfs:domain rdf:resource="#CongoBuy"/>
  <rdfs:range rdf:resource="#EReceipt"/>
</rdf:Property>

<rdf:Property rdf:ID="congoBuyShippingOrder">
  <rdfs:subPropertyOf rdf:resource="&process;#output"/>
  <rdfs:domain rdf:resource="#CongoBuy"/>
  <rdfs:range rdf:resource="#ShippingOrder"/>
</rdf:Property>

<!-- Other parameters -->

<rdf:Property rdf:ID="congoBuyCreditCardValidity">
  <rdfs:subPropertyOf rdf:resource="&process;#parameter"/>
  <rdfs:domain rdf:resource="#CongoBuy"/>
  <rdfs:range rdf:resource="#ValidityType"/>
</rdf:Property>

<!-- 
THE EFFECT IS EITHER ORDERSHIPPED OR FAILURE. Conditional
Effects would require an If-Then-Else range. TBD... 
-->

<rdf:Property rdf:ID="congoBuyEffect">
  <rdfs:subPropertyOf rdf:resource="&process;#effect"/>
  <rdfs:domain rdf:resource="#CongoBuy"/>
  <rdfs:range rdf:resource="#BuyEffectType"/>
</rdf:Property>

<!--###################################################
    THE COMPOSITE PROCESS: ExpandedCongoBuy
        (given in top-down order)
    ###################################################-->

<!-- 

Now for the full-fledged book-buying process, ExpandedCongoBuy. This
is more complicated since it has to specify the process schema
including alternatives, conditional executions, etc. 

We build the class recursively in a top-down manner. The basic idea is
that each CompositeProcess is composedOf a ControlConstruct, which may
be a Sequence, Alternative, If-then-else, etc.  Each such
ConstrolConstruct, in turn, has a "components" property (a list or
bag), which specifies the classes of the subcomponents of the
ControlConstruct. These classes may themselves be processes or control
constructs.  Finally we bottom out when the components of a composite
process are atomic processes.

In the Congo example we assume the following basic structure for the
composition. The main steps are to locate a book and to then buy
it. While (for exposition) we assume that the locate book is an atomic
process (without components), the buying of a book involves a sequence
of subprocesses that correspond to specifying a payment method,
specifying the details of delivery (address, wrapping type, etc.) and
finalizing the buy process. These are the component subprocesses of
the sequence corresponding to the expanded buying process. The
detailed buying sequence involves a sequence of component
sub-processes corresponding to putting the book into a cart, followed
by a signing-in choice, followed by a method of payment selection. The
signing-in choice process is itself a composite process which offers
the alternatives of signing in as a new user (creating an account) or
using a stored profile instead. Each of these processes is itself
composite, bottoming out in a sequence of atomic processes
corresponding to signing in or creating a new account/profile.  -->

<!-- Expand and Collapse relations for the CongoBuy Process -->

<daml:Class rdf:about="#CongoBuy">
  <rdfs:subClassOf>
    <daml:Restriction> 
      <daml:onProperty rdf:resource="&process;#expand"/>
      <daml:toClass rdf:resource="#ExpandedCongoBuy"/>
    </daml:Restriction> 
  </rdfs:subClassOf>
</daml:Class>

<daml:Class rdf:about="#ExpandedCongoBuy">
  <rdfs:subClassOf>
    <daml:Restriction> 
      <daml:onProperty rdf:resource="&process;#collapse"/>
      <daml:toClass rdf:resource="#CongoBuy"/>
    </daml:Restriction> 
  </rdfs:subClassOf>
</daml:Class>

<!-- 
The top level process is a sequence whose components are an atomic
process, LocateBook and a composite process CongoBuyBook
-->

<daml:Class rdf:ID="ExpandedCongoBuy">   
  <rdfs:subClassOf rdf:resource="&process;#CompositeProcess"/>
  <rdfs:subClassOf>
    <daml:Restriction> 
      <daml:onProperty rdf:resource="&process;#composedOf"/>
      <daml:toClass>
       <daml:Class>
        <daml:intersectionOf rdf:parseType="daml:collection">
          <daml:Class rdf:about="process:Sequence"/>
          <daml:Restriction> 
            <daml:onProperty rdf:resource="&process;#components"/>
            <daml:toClass>
             <daml:Class>
              <daml:listOfInstancesOf rdf:parseType="daml:collection">
                <daml:Class rdf:about="#LocateBook"/>
                <daml:Class rdf:about="#CongoBuyBook"/>
              </daml:listOfInstancesOf>
             </daml:Class>
            </daml:toClass>
          </daml:Restriction>
        </daml:intersectionOf>
       </daml:Class>
      </daml:toClass>
    </daml:Restriction>
  </rdfs:subClassOf>
  <rdfs:subClassOf>
    <daml:Restriction daml:cardinality="1">
      <daml:onProperty rdf:resource="#expCongoBuyBookName"/>
    </daml:Restriction>
  </rdfs:subClassOf>
  <rdfs:subClassOf>
    <daml:Restriction daml:cardinality="1">
      <daml:onProperty rdf:resource="#expCongoBuyCreditCardNumber"/>
    </daml:Restriction>
  </rdfs:subClassOf>
  <rdfs:subClassOf>
    <daml:Restriction daml:cardinality="1">
      <daml:onProperty rdf:resource="#expCongoBuyCreditCardType"/>
    </daml:Restriction>
  </rdfs:subClassOf>
  <rdfs:subClassOf>
    <daml:Restriction daml:cardinality="1">
      <daml:onProperty rdf:resource="#expCongoBuyCreditCardExpirationDate"/>
    </daml:Restriction>
  </rdfs:subClassOf>
  <rdfs:subClassOf>
    <daml:Restriction daml:cardinality="1">
      <daml:onProperty rdf:resource="#expCongoBuyDeliveryAddress"/>
    </daml:Restriction>
  </rdfs:subClassOf>
  <rdfs:subClassOf>
    <daml:Restriction daml:cardinality="1">
      <daml:onProperty rdf:resource="#expCongoBuyPackagingSelection"/>
    </daml:Restriction>
  </rdfs:subClassOf>
  <rdfs:subClassOf>
    <daml:Restriction daml:cardinality="1">
      <daml:onProperty rdf:resource="#expCongoBuyDeliveryTypeSelection"/>
    </daml:Restriction>
  </rdfs:subClassOf>
</daml:Class>


<!-- The following inputs and outputs of ExpandedCongoBuy are derived
from the corresponding inputs and outputs of its atomic subprocesses
(as indicated by their sameValuesAs properties), and will normally
be computed automatically by DAML-S tools.  For example,
ExpandedCongoBuy uses an input, congoBuyBookName, that's the same as
the bookName input to atomic process LocateBook.  -->

<rdf:Property rdf:ID="expCongoBuyBookName">
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#ExpandedCongoBuy"/>
  <rdfs:range rdf:resource="&xsd;#string"/>
  <daml:sameValuesAs rdf:resource="#bookName"/>
</rdf:Property>

<rdf:Property rdf:ID="expCongoBuySignInInfo">
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#ExpandedCongoBuy"/>
  <rdfs:range rdf:resource="#SignInData"/>
  <daml:sameValuesAs rdf:resource="#signInInfo"/>
</rdf:Property>

<rdf:Property rdf:ID="expCongoBuyCreateAcctInfo">
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#ExpandedCongoBuy"/>
  <rdfs:range rdf:resource="#AcctInfo"/>
  <daml:sameValuesAs rdf:resource="#createAcctInfo"/>
</rdf:Property>

<rdf:Property rdf:ID="expCongoBuyCreditCardNumber">
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#ExpandedCongoBuy"/>
  <rdfs:range rdf:resource="&xsd;#decimal"/>
  <daml:sameValuesAs rdf:resource="#creditCardNumber"/>
</rdf:Property>

<rdf:Property rdf:ID="expCongoBuyCreditCardType">
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#ExpandedCongoBuy"/>
  <rdfs:range rdf:resource="#CreditCardType"/>   
  <daml:sameValuesAs rdf:resource="#creditCardType"/>
</rdf:Property>

<rdf:Property rdf:ID="expCongoBuyCreditCardExpirationDate">
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#ExpandedCongoBuy"/>
  <rdfs:range rdf:resource="&time;#Instant"/>
  <daml:sameValuesAs rdf:resource="#creditCardExpirationDate"/>
</rdf:Property>

<rdf:Property rdf:ID="expCongoBuyDeliveryAddress">
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#ExpandedCongoBuy"/>
  <rdfs:range rdf:resource="&xsd;#string"/>
  <daml:sameValuesAs rdf:resource="#deliveryAddress"/>
</rdf:Property>

<rdf:Property rdf:ID="expCongoBuyPackagingSelection">
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#ExpandedCongoBuy"/>
  <rdfs:range rdf:resource="#PackagingType"/>
  <daml:sameValuesAs rdf:resource="#packagingSelection"/>
</rdf:Property>

<rdf:Property rdf:ID="expCongoBuyDeliveryTypeSelection">
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#ExpandedCongoBuy"/>
  <rdfs:range rdf:resource="#DeliveryType"/>
  <daml:sameValuesAs rdf:resource="#deliveryTypeSelection"/>
</rdf:Property>

<rdf:Property rdf:ID="expCongoBuyCreateAcctOutput">
  <rdfs:subPropertyOf rdf:resource="&process;#output"/>
  <rdfs:domain rdf:resource="#ExpandedCongoBuy"/>
  <rdfs:range rdf:resource="#CreateAcctOutputType"/>
  <daml:sameValuesAs rdf:resource="#createAcctOutput"/>
</rdf:Property>

<!-- CongoBuyBook is a sequence whose components are a composite
process, BuySequence, followed by two atomic processes
SpecifyDeliveryDetails, and then FinalizeBuy -->


<daml:Class rdf:ID="CongoBuyBook">           
  <rdfs:subClassOf rdf:resource="&process;#CompositeProcess"/>
  <rdfs:subClassOf>
    <daml:Restriction> 
      <daml:onProperty rdf:resource="&process;#composedOf"/>
      <daml:toClass>
       <daml:Class>
        <daml:intersectionOf rdf:parseType="daml:collection">
          <daml:Class rdf:about="process:Sequence"/>
          <daml:Restriction> 
            <daml:onProperty rdf:resource="&process;#components"/>
            <daml:toClass>
             <daml:Class>
              <daml:listOfInstancesOf rdf:parseType="daml:collection">
                <daml:Class rdf:about="#BuySequence"/>
                <daml:Class rdf:about="#SpecifyDeliveryDetails"/>
                <daml:Class rdf:about="#FinalizeBuy"/>
              </daml:listOfInstancesOf>
             </daml:Class>
            </daml:toClass>
          </daml:Restriction>
        </daml:intersectionOf>
       </daml:Class>
      </daml:toClass>
    </daml:Restriction>
  </rdfs:subClassOf>
  <rdfs:subClassOf>
    <daml:Restriction daml:cardinality="1">
      <daml:onProperty rdf:resource="#congoBuyBookBookName"/>
    </daml:Restriction>
  </rdfs:subClassOf>
  <rdfs:subClassOf>
    <daml:Restriction daml:cardinality="1">
      <daml:onProperty rdf:resource="#congoBuyBookCreditCardNumber"/>
    </daml:Restriction>
  </rdfs:subClassOf>
  <rdfs:subClassOf>
    <daml:Restriction daml:cardinality="1">
      <daml:onProperty rdf:resource="#congoBuyBookCreditCardType"/>
    </daml:Restriction>
  </rdfs:subClassOf>
  <rdfs:subClassOf>
    <daml:Restriction daml:cardinality="1">
      <daml:onProperty rdf:resource="#congoBuyBookCreditCardExpirationDate"/>
    </daml:Restriction>
  </rdfs:subClassOf>
  <rdfs:subClassOf>
    <daml:Restriction daml:cardinality="1">
      <daml:onProperty rdf:resource="#congoBuyBookDeliveryAddress"/>
    </daml:Restriction>
  </rdfs:subClassOf>
  <rdfs:subClassOf>
    <daml:Restriction daml:cardinality="1">
      <daml:onProperty rdf:resource="#congoBuyBookPackagingSelection"/>
    </daml:Restriction>
  </rdfs:subClassOf>
  <rdfs:subClassOf>
    <daml:Restriction daml:cardinality="1">
      <daml:onProperty rdf:resource="#congoBuyBookDeliveryTypeSelection"/>
    </daml:Restriction>
  </rdfs:subClassOf>
</daml:Class>

<!-- The following inputs and outputs of CongoBuyBook are derived
from the corresponding inputs and outputs of its atomic subprocesses
(as indicated by their sameValuesAs properties), and will normally
be computed automatically by DAML-S tools. -->

<rdf:Property rdf:ID="congoBuyBookBookName">
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#CongoBuyBook"/>
  <rdfs:range rdf:resource="&xsd;#string"/>
  <daml:sameValuesAs rdf:resource="#bookName"/>
</rdf:Property>

<rdf:Property rdf:ID="congoBuyBookCreateAcctInfo">
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#CongoBuyBook"/>
  <rdfs:range rdf:resource="#AcctInfo"/>
  <daml:sameValuesAs rdf:resource="#createAcctInfo"/>
</rdf:Property>

<rdf:Property rdf:ID="congoBuyBookCreateAcctOutput">
  <rdfs:subPropertyOf rdf:resource="&process;#output"/>
  <rdfs:domain rdf:resource="#CongoBuyBook"/>
  <rdfs:range rdf:resource="#CreateAcctOutputType"/>
  <daml:sameValuesAs rdf:resource="#createAcctOutput"/>
</rdf:Property>

<rdf:Property rdf:ID="congoBuyBookSignInInfo">
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#CongoBuyBook"/>
  <rdfs:range rdf:resource="#SignInData"/>
  <daml:sameValuesAs rdf:resource="#signInInfo"/>
</rdf:Property>

<rdf:Property rdf:ID="congoBuyBookCreditCardNumber">
  <rdfs:comment>NOTE: INTEGER IS NOT SUPPORTED YET IN DAML-L </rdfs:comment>
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#CongoBuyBook"/>
  <rdfs:range rdf:resource="&xsd;#decimal"/>
  <daml:sameValuesAs rdf:resource="#creditCardNumber"/>
</rdf:Property>

<rdf:Property rdf:ID="congoBuyBookCreditCardType">
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#CongoBuyBook"/>
  <rdfs:range rdf:resource="#CreditCardType"/>   
  <daml:sameValuesAs rdf:resource="#creditCardType"/>
</rdf:Property>

<rdf:Property rdf:ID="congoBuyBookCreditCardExpirationDate">
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#CongoBuyBook"/>
  <rdfs:range rdf:resource="&time;#Instant"/>
  <daml:sameValuesAs rdf:resource="#creditCardExpirationDate"/>
</rdf:Property>

<rdf:Property rdf:ID="congoBuyBookDeliveryAddress">
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#CongoBuyBook"/>
  <rdfs:range rdf:resource="&xsd;#string"/>
  <daml:sameValuesAs rdf:resource="#deliveryAddress"/>
</rdf:Property>

<rdf:Property rdf:ID="congoBuyBookPackagingSelection">
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#CongoBuyBook"/>
  <rdfs:range rdf:resource="#PackagingType"/>
  <daml:sameValuesAs rdf:resource="#packagingSelection"/>
</rdf:Property>

<rdf:Property rdf:ID="congoBuyBookDeliveryTypeSelection">
  <rdfs:subPropertyOf rdf:resource="&process;#input"/>
  <rdfs:domain rdf:resource="#CongoBuyBook"/>
  <rdfs:range rdf:resource="#DeliveryType"/>
  <daml:sameValuesAs rdf:resource="#deliveryTypeSelection"/>
</rdf:Property>

<!-- 
BuySequence is a sequence whose components are an atomic
process PutInCart, followed by a composite process SignInAlternatives, followed
by an atomic process SpecifyPaymentMethod 
-->

<daml:Class rdf:ID="BuySequence">           
  <rdfs:subClassOf rdf:resource="&process;#CompositeProcess"/>
  <rdfs:subClassOf>
    <daml:Restriction> 
      <daml:onProperty rdf:resource="&process;#composedOf"/>
      <daml:toClass>
        <daml:Class>
          <daml:intersectionOf rdf:parseType="daml:collection">
            <daml:Class rdf:about="process:Sequence"/>
            <daml:Restriction> 
              <daml:onProperty rdf:resource="&process;#components"/>
              <daml:toClass>
                <daml:Class>
                  <daml:listOfInstancesOf rdf:parseType="daml:collection">
                    <daml:Class rdf:about="#PutInCart"/>
                    <daml:Class rdf:about="#SignInAlternatives"/>
                    <daml:Class rdf:about="#SpecifyPaymentMethod"/>
                  </daml:listOfInstancesOf>
                </daml:Class>
              </daml:toClass>
            </daml:Restriction>
          </daml:intersectionOf>
        </daml:Class>
      </daml:toClass>
    </daml:Restriction> 
  </rdfs:subClassOf>
  <rdfs:subClassOf>
    <daml:Restriction daml:cardinality="1">
      <daml:onProperty rdf:resource="#buySequenceBookName"/>
    </daml:Restriction>
  </rdfs:subClassOf>
  <rdfs:subClassOf>
    <daml:Restriction daml:cardinality="1">
      <daml:onProperty rdf:resource="#buySequenceCreditCardNumber"/>
    </daml:Restriction>
  </rdfs:subClassOf>
  <rdfs:subClassOf>
    <daml:Restriction daml:cardinality="1">
      <daml:onProperty rdf:resource="#buySequenceCreditCardType"/>
    </daml:Restriction>
  </rdfs:subClassOf>
  <rdfs:subClassOf>
    <daml:Restriction daml:cardinality="1">
      <daml:onProperty rdf:resource="#buySequenceCreditCardExpirationDate"/>
    </daml:Restriction>
  </rdfs:subClassOf>
</daml:Class>

<!-- and some other stuff....-->

</rdf:RDF>

6.7 Advertising the Services

<?xml version='1.0' encoding='ISO-8859-1'?>
<!DOCTYPE uridef[
  <!ENTITY rdf "http://www.w3.org/1999/02/22-rdf-syntax-ns">
  <!ENTITY rdfs "http://www.w3.org/2000/01/rdf-schema">
  <!ENTITY daml "http://www.daml.org/2001/03/daml+oil">
  <!ENTITY process "http://www.daml.org/services/daml-s/2001/10/Process">
  <!ENTITY service "http://www.daml.org/services/daml-s/2001/10/Service">
  <!ENTITY profile "http://www.daml.org/services/daml-s/2001/10/Profile"> 
  <!ENTITY country "http://www.daml.ri.cmu.edu/ont/Country.daml">
  <!ENTITY concepts "http://www.daml.ri.cmu.edu/ont/DAML-S/concepts.daml">
  <!ENTITY congo "http://www.daml.org/services/daml-s/2001/10/Congo.daml">
  <!ENTITY time "http://www.ai.sri.com/daml/ontologies/sri-basic/1-0/Time.daml">
  <!ENTITY xsd "http://www.w3.org/2000/10/XMLSchema.xsd">
  <!ENTITY DEFAULT "http://www.daml.org/services/daml-s/2001/10/CongoProfile.daml">
]>
 
<!--
This document uses entity types as a shorthand for URIs.
Download the source for a version with unexpanded entities.
  -->
 
<rdf:RDF
  xmlns:rdf=     "&rdf;#"
  xmlns:rdfs=    "&rdfs;#"
  xmlns:daml=    "&daml;#"
  xmlns:service= "&service;#"
  xmlns:process= "&process;#"
  xmlns:profile= "&profile;#"
  xmlns:congo=   "&congo;#"
  xmlns:xsd=     "&xsd;#"
  xmlns=         "&DEFAULT;#">
 
  <daml:Ontology about="">
    <daml:versionInfo>
      $Id: CongoProfile.daml,v 1.5 2002/03/20 01:45:09 martin Exp $
    </daml:versionInfo>
    <rdfs:comment>
      DAML-S Coalition: CongoBuy Example for DAML-S release 0.6, 15th Sept 2001
      Profile description
 
    </rdfs:comment>
    <daml:imports rdf:resource="&rdf;" />
    <daml:imports rdf:resource="&rdfs;" />
    <daml:imports rdf:resource="&daml;" />
    <daml:imports rdf:resource="&service;" />
    <daml:imports rdf:resource="&process;" />
    <daml:imports rdf:resource="&profile;" />
    <daml:imports rdf:resource="&congo;" />
    <daml:imports rdf:resource="&concepts;" />
    <daml:imports rdf:resource="&time;" />
  </daml:Ontology>

  <!-- ################################################################### -->
  <!-- # Instance Definition of BravoAir Reservation Agent Advertisement # -->
  <!-- ################################################################### -->

  <service:ServiceProfile rdf:ID="Profile_Congo_BookBuying_Service">
    <service:isPresentedBy rdf:resource="congo;#Congo_BookBuying_Agent"/>

    <profile:serviceName>Congo_BookBuying_Agent</profile:serviceName>
    <profile:textDescription>
        This agentified service provides the opportunity to browse a
        book selling site and buy books there
    </profile:textDescription>

    <profile:providedBy>
      <profile:ServiceProvider rdf:ID="CongoBuy">
        <profile:name>CongoBuy</profile:name>
        <profile:phone>412 268 8780 </profile:phone>
        <profile:fax>412 268 5569 </profile:fax>
        <profile:email>Bravo@Bravoair.com</profile:email>
        <profile:physicalAddress>
            somewhere 2,
            OnWeb,
            Montana 52321,
            USA
        </profile:physicalAddress>
        <profile:webURL>
            http://www.daml.org/services/daml-s/2001/05/CongoBuy.html
        </profile:webURL>
      </profile:ServiceProvider>
    </profile:providedBy>

    <profile:geographicRadius rdf:resource="&country;#UnitedStates"/>
    <profile:qualityRating rdf:resource="&concepts;#qualityRatingGood"/>
    <profile:has_process rdf:resource="&congo;#CongoBuy"/>

    <input> 
      <profile:ParameterDescription rdf:ID="BookTitle"> 
        <profile:parameterName> bookTitle </profile:parameterName>
        <profile:restrictedTo rdf:resource="&xsd;#string"/>
        <profile:refersTo rdf:resource="&congo;#bookName"/>
      </profile:ParameterDescription>
    </input>

    <input> 
      <profile:ParameterDescription rdf:ID="SignInInfo"> 
        <profile:parameterName> signInInfo </profile:parameterName>
        <profile:restrictedTo rdf:resource="&congo;#SignInData"/>
        <profile:refersTo rdf:resource="&congo;#signInInfo"/>
      </profile:ParameterDescription>
    </input>

    <input> 
      <profile:ParameterDescription rdf:ID="CreateAcctInfo"> 
        <profile:parameterName> createAcctInfo </profile:parameterName>
        <profile:restrictedTo rdf:resource="&congo;#CreateAcct"/>
        <profile:refersTo rdf:resource="&congo;#createAcctInfo"/>
      </profile:ParameterDescription>
    </input>

    <input> 
      <profile:ParameterDescription rdf:ID="CreditCardNumber"> 
        <profile:parameterName> creditCardNumber </profile:parameterName>
        <profile:restrictedTo rdf:resource="&xsd;#decimal"/>
        <profile:refersTo rdf:resource="&congo;#creditCardNumber"/>
      </profile:ParameterDescription>
    </input>

    <input> 
      <profile:ParameterDescription rdf:ID="CreditCardType"> 
        <profile:parameterName> creditCardType </profile:parameterName>
        <profile:restrictedTo rdf:resource="&congo;#CreditCardType"/>
        <profile:refersTo rdf:resource="&congo;#creditCardType"/>
      </profile:ParameterDescription>
    </input>

    <input> 
      <profile:ParameterDescription rdf:ID="CreditCardExpirationDate"> 
        <profile:parameterName> creditCardExpirationDate </profile:parameterName>
        <profile:restrictedTo rdf:resource="&time;#Time"/>
        <profile:refersTo rdf:resource="&congo;#creditCardExpirationDate"/>
      </profile:ParameterDescription>
    </input>

    <input> 
      <profile:ParameterDescription rdf:ID="DeliveryAddress"> 
        <profile:parameterName> deliveryAddress </profile:parameterName>
        <profile:restrictedTo rdf:resource="&xsd;#string"/>
        <profile:refersTo rdf:resource="&congo;#deliveryAddress"/>
      </profile:ParameterDescription>
    </input>

    <input> 
      <profile:ParameterDescription rdf:ID="PackagingSelection"> 
        <profile:parameterName> packagingSelection </profile:parameterName>
        <profile:restrictedTo rdf:resource="&congo;#PackagingType"/>
        <profile:refersTo rdf:resource="&congo;#packagingSelection"/>
      </profile:ParameterDescription>
    </input>

    <input> 
      <profile:ParameterDescription rdf:ID="DeliveryType"> 
        <profile:parameterName> DeliveryType </profile:parameterName>
        <profile:restrictedTo rdf:resource="&congo;#DeliveryType"/>
        <profile:refersTo rdf:resource="&congo;#DeliveryType"/>
      </profile:ParameterDescription>
    </input>

    
    <output> 
      <profile:ParameterDescription rdf:ID="EReceipt"> 
        <profile:parameterName> EReceipt </profile:parameterName>
        <profile:restrictedTo rdf:resource="&congo;#EReceipt"/>
        <profile:refersTo rdf:resource="&congo;#congoBuyReceipt"/>
      </profile:ParameterDescription>
    </output>

    <output> 
      <profile:ParameterDescription rdf:ID="ShippingOrder"> 
        <profile:parameterName> ShippingOrder </profile:parameterName>
        <profile:restrictedTo rdf:resource="&congo;#ShippingOrder"/>
        <profile:refersTo rdf:resource="&congo;#congoBuyShippingOrder"/>
      </profile:ParameterDescription>
    </output>
    
    <output> 
      <profile:ParameterDescription rdf:ID="AccountType"> 
        <profile:parameterName> AccountType </profile:parameterName>
        <profile:restrictedTo rdf:resource="&congo;#CreateAcctOutputType"/>
        <profile:refersTo rdf:resource="&congo;#createAcctOutput"/>
      </profile:ParameterDescription>
    </output>

    <!-- Preconditions -->

    <precondition> 
      <profile:ConditionDescription rdf:ID="AcctExists"> 
        <profile:conditionName> AcctExists </profile:conditionName>
        <profile:statement rdf:resource="&congo;#AcctExists"/>
        <profile:refersTo rdf:resource="&congo;#congoBuyAcctExistsPrecondition"/>
      </profile:ConditionDescription>
    </precondition>

    <precondition> 
      <profile:ConditionDescription rdf:ID="CreditExists"> 
        <profile:conditionName> CreditExists </profile:conditionName>
        <profile:statement rdf:resource="&congo;#CreditExists"/>
        <profile:refersTo rdf:resource="&congo;#congoBuyCreditExistsPrecondition"/>
      </profile:ConditionDescription>
    </precondition>

    <effect> 
      <profile:ConditionDescription rdf:ID="BuyEffectType"> 
        <profile:conditionName> BuyEffectType </profile:conditionName>
        <profile:statement rdf:resource="&congo;#BuyEffectType"/>
        <profile:refersTo rdf:resource="&congo;#congoBuyEffect"/>
      </profile:ConditionDescription>
    </effect>
   
  </service:ServiceProfile>
</rdf:RDF>

7 BravoAir-Service.daml

<?xml version='1.0' encoding='ISO-8859-1'?>
<!DOCTYPE uridef[
  <!ENTITY rdf "http://www.w3.org/1999/02/22-rdf-syntax-ns">
<!ENTITY rdfs "http://www.w3.org/2000/01/rdf-schema">
<!ENTITY daml "http://www.daml.org/2001/03/daml+oil.daml">
<!ENTITY xsd "http://www.w3.org/2000/10/XMLSchema">
<!ENTITY service "http://www.daml.org/services/daml-s/2001/10/Service">
<!ENTITY ba_profile "http://www.daml.org/services/daml-s/2001/10/BravoAir-Profile.daml">
<!ENTITY ba_process "http://www.daml.org/services/daml-s/2001/10/BravoAir-Process.daml">
<!ENTITY DEFAULT "http://www.daml.org/services/daml-s/2001/10/BravoAir-Service.daml">
]>

<rdf:RDF
  xmlns:rdf     = "&rdf;#"
  xmlns:rdfs    ="&rdfs;#"
  xmlns:daml    ="&daml;#"
  xmlns:xsd     ="&xsd;#"
  xmlns:service=        "&service;#"
  xmlns         ="&DEFAULT;#"
 >

<daml:Ontology>
  <daml:versionInfo>
  $Id: BravoAir-Service.daml,v 1.1 2002/03/20 01:44:52 martin Exp $
  </daml:versionInfo>
  <rdfs:comment> This ontology represents the DAML-S service description for the
      BravoAir web service example.
  </rdfs:comment>
  <daml:imports rdf:resource="&daml;"/>
  <daml:imports rdf:resource="&service;" />
  <daml:imports rdf:resource="&ba_profile;" />
  <daml:imports rdf:resource="&ba_process;" />
</daml:Ontology>

<service:Service rdf:ID="BravoAir_ReservationAgent">
  <!-- Reference to the BravoAir Profile -->
  <service:presents rdf:resource="&ba_profile;#Profile_BravoAir_ReservationAgent"/>
  <!-- Reference to the BravoAir Process Model -->
  <service:describedBy rdf:resource="&ba_process;#BravoAir_Process"/>
</service:Service>

</rdf:RDF>

7.1 BravoAir-Profile.daml

<?xml version='1.0' encoding='ISO-8859-1'?>
<!DOCTYPE uridef[
  <!ENTITY rdf "http://www.w3.org/1999/02/22-rdf-syntax-ns">
  <!ENTITY rdfs "http://www.w3.org/2000/01/rdf-schema">
  <!ENTITY daml "http://www.daml.org/2001/03/daml+oil">
  <!ENTITY service "http://www.daml.org/services/daml-s/2001/10/Service">
  <!ENTITY profile "http://www.daml.ri.cmu.edu/ont/DAML-S/Profile">
  <!ENTITY process "http://www.daml.org/services/daml-s/2001/10/Process">
  <!ENTITY ba_service "http://www.daml.org/services/daml-s/2001/10/BravoAir-Service.daml">
  <!ENTITY ba_process "http://www.daml.org/services/daml-s/2001/10/BravoAir-Process.daml">
  <!ENTITY country "http://www.daml.ri.cmu.edu/ont/Country.daml">
  <!ENTITY concepts "http://www.daml.ri.cmu.edu/ont/DAML-S/concepts.daml">
  <!ENTITY DEFAULT "http://www.daml.org/services/daml-s/2001/10/BravoAir-Profile.daml">
]>
 
<!--
This document uses entity types as a shorthand for URIs.
Download the source for a version with unexpanded entities.
  -->
 
<rdf:RDF
  xmlns:rdf=     "&rdf;#"
  xmlns:rdfs=    "&rdfs;#"
  xmlns:daml=    "&daml;#"
  xmlns:service= "&service;#"
  xmlns:process= "&process;#"
  xmlns:profile= "&profile;#"
  xmlns=         "&DEFAULT;#">
 
  <daml:Ontology about="">
    <daml:versionInfo>
      $Id: BravoAir-Profile.daml,v 1.3 2002/03/20 01:45:09 martin Exp $
    </daml:versionInfo>
    <rdfs:comment>
      DAML-S Coalition: BravoAir Example for DAML-S release 0.6, 15th Sept 2001
      Profile description
 
    </rdfs:comment>
    <daml:imports rdf:resource="&rdf;" />
    <daml:imports rdf:resource="&rdfs;" />
    <daml:imports rdf:resource="&daml;" />
    <daml:imports rdf:resource="&service;" />
    <daml:imports rdf:resource="&profile;" />
    <daml:imports rdf:resource="&process;" />
    <daml:imports rdf:resource="&ba_service;" />
    <daml:imports rdf:resource="&ba_process;" />
    <daml:imports rdf:resource="&country;" />
    <daml:imports rdf:resource="&concepts;" />
  </daml:Ontology>

  <!-- ################################################################### -->
  <!-- # Instance Definition of BravoAir Reservation Agent Advertisement # -->
  <!-- ################################################################### -->

  <service:ServiceProfile rdf:ID="Profile_BravoAir_ReservationAgent">
    <!-- reference to the service specification -->  
    <service:isPresentedBy rdf:resource="&ba_service;#BravoAir_ReservationAgent"/>
    <!-- reference to the process model specification -->  
    <profile:has_process rdf:resource="&ba_process;#BravoAir_Process"/>


    <profile:serviceName>BravoAir_ReservationAgent</profile:serviceName>
    <profile:textDescription>
        This agentified service provides flight reservations based on the
        specification of a flight request.  This typically involves a departure
        airport, an arrival airport, a departure date, and if a return trip is
        required, a return date.
        If the desired flight is available, an itinerary and reservation number
        will be returned.
    </profile:textDescription>

    <profile:providedBy>
      <profile:ServiceProvider rdf:ID="BravoAir">
        <profile:name>BravoAir</profile:name>
        <profile:phone>412 268 8780 </profile:phone>
        <profile:fax>412 268 5569 </profile:fax>
        <profile:email>Bravo@Bravoair.com</profile:email>
        <profile:physicalAddress>
              Airstrip 2,
              Teetering Cliff Hights,
              Florida 12321,
              USA
        </profile:physicalAddress>
        <profile:webURL> 
            http://www.daml.org/services/daml-s/2001/05/BravoAir.html 
        </profile:webURL>
      </profile:ServiceProvider>
    </profile:providedBy>

    <profile:geographicRadius rdf:resource="&country;#UnitedStates"/>
    <profile:qualityRating rdf:resource="&concepts;#qualityRatingGood"/>
    <!-- Descriptions of the parameters that will be used by IOPEs -->
         
      <profile:input>
        <profile:ParameterDescription  rdf:ID="DepartureAirport"> 
          <profile:parameterName> DepartureAirport </profile:parameterName>
          <profile:restrictedTo rdf:resource="&concepts;#Airport"/>
          <profile:refersTo rdf:resource="&ba_process;#departureAirport_In"/>
        </profile:ParameterDescription>
      </profile:input> 
         
      <profile:input>
        <profile:ParameterDescription  rdf:ID="ArrivalAirport"> 
          <profile:parameterName> ArrivalAirport </profile:parameterName>
          <profile:restrictedTo rdf:resource="&concepts;#Airport"/>
          <profile:refersTo rdf:resource="&ba_process;#arrivalAirport_In"/>
        </profile:ParameterDescription>
      </profile:input> 
         
      <profile:input>
        <profile:ParameterDescription  rdf:ID="DepartureDate"> 
          <profile:parameterName> DepartureDate </profile:parameterName>
          <profile:restrictedTo rdf:resource="&concepts;#FlightDate"/>
          <profile:refersTo rdf:resource="&ba_process;#outboudDate_In"/>
        </profile:ParameterDescription>
      </profile:input>  
         
      <profile:input>
        <profile:ParameterDescription  rdf:ID="ArrivalDate"> 
          <profile:parameterName> ArrivalDate </profile:parameterName>
          <profile:restrictedTo rdf:resource="&concepts;#FlightDate"/>
          <profile:refersTo rdf:resource="&ba_process;#inboundDate_In"/>
        </profile:ParameterDescription>
      </profile:input> 
         
      <profile:input>
        <profile:ParameterDescription  rdf:ID="RoundTrip"> 
          <profile:parameterName> RoundTrip </profile:parameterName>
          <profile:restrictedTo rdf:resource="&concepts;#RoundTrip"/>
          <profile:refersTo rdf:resource="&ba_process;#RoundTrip"/>
        </profile:ParameterDescription>
      </profile:input> 
         
      <profile:input>
        <profile:ParameterDescription  rdf:ID="FlightItinerary">  
           <profile:parameterName> FlightItinerary </profile:parameterName>
           <profile:restrictedTo rdf:resource="&concepts;#FlightItinerary"/>
           <profile:refersTo rdf:resource="&ba_process;#roundTrip_In"/>
        </profile:ParameterDescription>
      </profile:input> 
         
      <profile:input>
        <profile:ParameterDescription  rdf:ID="AvailableFlights">  
          <profile:parameterName> AvailableFlights </profile:parameterName>
          <profile:restrictedTo rdf:resource="&concepts;#FlihtItineraryList"/>
          <profile:refersTo rdf:resource="&ba_process;#FlightItinerary"/>
        </profile:ParameterDescription>
      </profile:input> 
         
      <profile:input>
        <profile:ParameterDescription  rdf:ID="LoginName">  
           <profile:parameterName> LoginName </profile:parameterName>
           <profile:restrictedTo rdf:resource="&concepts;#AcctName"/>
           <profile:refersTo rdf:resource="&ba_process;#acctName_Out"/>
        </profile:ParameterDescription>
      </profile:input> 
         
      <profile:input>
        <profile:ParameterDescription  rdf:ID="Password">  
          <profile:parameterName> Password </profile:parameterName>
          <profile:restrictedTo rdf:resource="&concepts;#Password"/>
          <profile:refersTo rdf:resource="&ba_process;#password_In"/>
        </profile:ParameterDescription>
      </profile:input> 

      <profile:input>
        <profile:ParameterDescription  rdf:ID="confirmation">  
          <profile:parameterName> confirmation </profile:parameterName>
          <profile:restrictedTo rdf:resource="&concepts;#Confirmation"/>
          <profile:refersTo rdf:resource="&ba_process;#Confirmation"/>
        </profile:ParameterDescription>
      </profile:input>

      <profile:input>
        <profile:ParameterDescription  rdf:ID="ReservationNumber">  
          <profile:parameterName> ReservationNumber </profile:parameterName>
          <profile:restrictedTo rdf:resource="&concepts;#ReservationNumber"/>
          <profile:refersTo rdf:resource="&ba_process;#ReservationNumber"/>
        </profile:ParameterDescription>
      </profile:input>

      <profile:output>
        <profile:ParameterDescription  rdf:ID="ReservationNumber">  
          <profile:parameterName> FlightItinerary </profile:parameterName>
          <profile:restrictedTo rdf:resource="&concepts;#FlightItineraryList"/> 
          <profile:refersTo rdf:resource="&ba_process;#FlightItineraryList"/>
        </profile:ParameterDescription>
      </profile:output> 

      <!-- The consequence of the reservation is that the traveler has
           a seat on the flight -->
      <profile:effect>
        <profile:ParameterDescription rdf:ID="HaveFlight">
          <profile:parameterName> HaveFlight </profile:parameterName>
          <profile:restrictedTo rdf:resource="&concepts;#HaveFlightSeat"/>
          <profile:refersTo rdf:resource="&ba_process;#HaveFlightSeat"/>
        </profile:ParameterDescription>
      </profile:effect> 

  </service:ServiceProfile>
</rdf:RDF>

7.2 BravoAir-Process.daml

<?xml version='1.0' encoding='ISO-8859-1'?>
<!DOCTYPE uridef[
  <!ENTITY rdf "http://www.w3.org/1999/02/22-rdf-syntax-ns">
  <!ENTITY rdfs "http://www.w3.org/2000/01/rdf-schema">
  <!ENTITY daml "http://www.daml.org/2001/03/daml+oil">
  <!ENTITY xsd "http://www.w3.org/2000/10/XMLschema">
  <!ENTITY service "http://www.daml.org/services/daml-s/2001/10/Service">
  <!ENTITY process "http://www.daml.org/services/daml-s/2001/10/Process">
  <!ENTITY profile "http://www.daml.org/services/daml-s/2001/10/Profile">
  <!ENTITY ba_service "http://www.daml.org/services/daml-s/2001/10/BravoAir-Service.daml">
  <!ENTITY concepts "http://www.daml.ri.cmu.edu/ont/DAML-S/concepts.daml">
  <!ENTITY DEFAULT "http://www.daml.org/services/daml-s/2001/10/BravoAir-Process.daml">
]>

<!--
This document uses entity types as a shorthand for URIs.
Download the source for a version with unexpanded entities.
  -->
 
<rdf:RDF
  xmlns:rdf=     "&rdf;#"
  xmlns:rdfs=    "&rdfs;#"
  xmlns:daml=    "&daml;#"
  xmlns:xsd=     "&xsd;#"
  xmlns:service= "&service;#"
  xmlns:process= "&process;#"
  xmlns:profile= "&profile;#"
  xmlns=         "&DEFAULT;#">
 
  <daml:Ontology about="">
    <daml:versionInfo>
      $Id: BravoAir-Process.daml,v 1.3 2002/03/20 01:45:09 martin Exp $
    </daml:versionInfo>
    <rdfs:comment>
      DAML-S Coalition: BravoAir Example for DAML-S release 0.6, 15th Sept 2001
      Process Model
 
    </rdfs:comment>
    <daml:imports rdf:resource="&rdf;" />
    <daml:imports rdf:resource="&rdfs;" />
    <daml:imports rdf:resource="&daml;" />
    <daml:imports rdf:resource="&service;" />
    <daml:imports rdf:resource="&process;" />
    <daml:imports rdf:resource="&profile;" />
    <daml:imports rdf:resource="&concepts;" />
  </daml:Ontology>

<!-- ################################################################### -->
<!-- Instance Definition of AlphaAir Reservation Agent Process Model
  -->

  <process:ProcessModel rdf:ID="BravoAir_ReservationAgent_ProcessModel">
    <service:topLevelProcess rdf:resource="#BravoAir_Process" />
    <service:isImplementedBy>
      <service:Service rdf:resource="&ba_service;#BravoAir_ReservationAgent"/>
    </service:isImplementedBy>
  </process:ProcessModel>


<!-- ########################################################################## -->
<!-- Instance Definition of the top level process -->

  <rdfs:Class rdf:ID="BravoAir_Process">
    <rdfs:subClassOf rdf:resource="&process;#Process" />
    <label> This is the top level process for BravoAir </label>
  </rdfs:Class>

<!-- ########################################################################## -->
<!-- Expand and Collapse relations for BravoAir_Process
     Based on the Congo.daml model
  -->

  <process:expand> 
    <rdfs:Class> rdfs:about ="#BravoAir_Process"</rdfs:Class> 
    <rdfs:Class> rdfs:about ="#ExpandedBravoAir_Process"</rdfs:Class>
  </process:expand>

<!-- ########################################################################## -->
<!-- ExpandBravoAir_Process (Composite)
     Top Level Description of the Process
  -->

  <rdfs:Class rdf:ID="ExpandBravoAir_Process">
    <rdfs:subClassOf rdf:resource="&process;#CompositeProcess" />
    <rdfs:subClassOf rdf:resource="&process;#Sequence" />
    <daml:subClassOf>
      <daml:Restriction> 
        <daml:onProperty rdf:resource="&process;#components" />
        <daml:toClass>
          <daml:subClassOf>
            <daml:unionOf rdf:parseType="daml:collection">
              <rdfs:Class rdfs:about="#GetDesiredFlightDetails"/>
              <rdfs:Class rdfs:about="#SelectAvailableFlight"/>
              <rdfs:Class rdfs:about="#BookFlight"/>
            </daml:unionOf>
          </daml:subClassOf>
        </daml:toClass>
      </daml:Restriction>
    </daml:subClassOf>
  </rdfs:Class>


<!-- ########################################################################## -->
<!-- BookFlight (Composite)
     Log into account and confirm reservation
  -->

  <rdfs:Class rdf:ID="BookFlight">
    <rdfs:subClassOf rdf:resource="#CompositeProcess" />
    <rdfs:subClassOf rdf:resource="&process;#Sequence" />
    <daml:subClassOf>
      <daml:Restriction> 
        <daml:onProperty rdf:resource="&process;#components" />
        <daml:toClass>
          <daml:subClassOf>
            <daml:unionOf rdf:parseType="daml:collection">
              <rdfs:Class rdfs:about="#LogIn"/>
              <rdfs:Class rdfs:about="#ConfirmReservation"/>
            </daml:unionOf>
          </daml:subClassOf>
        </daml:toClass>
      </daml:Restriction>
    </daml:subClassOf>
  </rdfs:Class>

  <!-- No specification of inputs or outputs are generated here -->


<!-- ########################################################################## -->
<!-- GetDesiredFlightDetails (ATOMIC)
     Get details such as airports, prefered time, roundtrip etc
  -->

  <rdfs:Class rdf:ID="GetDesiredFlightDetails">
    <rdfs:subClassOf rdf:resource="&process;#AtomicProcess" />
  </rdfs:Class>

    <!-- GetDesiredFlightDetails IOPEs -->

  <rdf:Property rdf:ID="departureAirport_In">
    <rdfs:subPropertyOf rdf:resource="&process;#input"/>
    <rdfs:domain rdf:resource="#GetDesiredFlightDetails"/>
    <rdfs:range rdf:resource="&concepts;#Airport"/>
  </rdf:Property>

  <rdf:Property rdf:ID="arrivalAirport_In">
    <rdfs:subPropertyOf rdf:resource="&process;#input"/>
    <rdfs:domain rdf:resource="#GetDesiredFlightDetails"/>
    <rdfs:range rdf:resource="&concepts;#Airport"/>
  </rdf:Property>

  <rdf:Property rdf:ID="outboudDate_In">
    <rdfs:subPropertyOf rdf:resource="&process;#input"/>
    <rdfs:domain rdf:resource="#GetDesiredFlightDetails"/>
    <rdfs:range rdf:resource="&concepts;#FlightDate"/>
  </rdf:Property>

  <rdf:Property rdf:ID="inboundDate_In">
    <rdfs:subPropertyOf rdf:resource="&process;#input"/>
    <rdfs:domain rdf:resource="#GetDesiredFlightDetails"/>
    <rdfs:range rdf:resource="&concepts;#FlightDate"/>
  </rdf:Property>

  <rdf:Property rdf:ID="roundTrip_In">
    <rdfs:subPropertyOf rdf:resource="&process;#input"/>
    <rdfs:domain rdf:resource="#GetDesiredFlightDetails"/>
    <rdfs:range rdf:resource="&concepts;#RoundTrip"/>
  </rdf:Property>

  <!-- ########################################################################## -->
  <!-- SelectAvailableFlight (ATOMIC)
       Get users prefered flight choice from available itineraries
    -->

  <rdfs:Class rdf:ID="SelectAvailableFlight">
    <rdfs:subClassOf rdf:resource="&process;#AtomicProcess" />
  </rdfs:Class>

    <!-- SelectAvailableFlight IOPEs -->

  <rdf:Property rdf:ID="preferredFlightItinerary_In">
    <rdfs:subPropertyOf rdf:resource="&process;#input"/>
    <rdfs:domain rdf:resource="#SelectAvailableFlight"/>
    <rdfs:range rdf:resource="&concepts;#FlightItinerary"/>
  </rdf:Property>

  <rdf:Property rdf:ID="availableFilghtItineraryList_Out">
    <rdfs:subPropertyOf rdf:resource="&process;#output"/>
    <rdfs:domain rdf:resource="#SelectAvailableFlight"/>
    <rdfs:range rdf:resource="&concepts;#FilghtItineraryList"/>
  </rdf:Property>


<!-- ########################################################################## -->
<!-- LogIn (ATOMIC)
     Get user details
  -->

  <rdfs:Class rdf:ID="LogIn">
    <rdfs:subClassOf rdf:resource="&process;#AtomicProcess" />
  </rdfs:Class>


    <!-- LogIn IOPE -->

  <rdf:Property rdf:ID="acctName_In">
    <rdfs:subPropertyOf rdf:resource="&process;#input"/>
    <rdfs:domain rdf:resource="#LogIn"/>
    <rdfs:range rdf:resource="&concepts;#AcctName"/>
  </rdf:Property>

  <rdf:Property rdf:ID="password_In">
    <rdfs:subPropertyOf rdf:resource="&process;#input"/>
    <rdfs:domain rdf:resource="#LogIn"/>
    <rdfs:range rdf:resource="&concepts;#Password"/>
  </rdf:Property>

<!-- ########################################################################## -->
<!-- ConfirmReservation (ATOMIC)
     Confirm selected reservation
  -->

  <rdfs:Class rdf:ID="ConfirmReservation">
    <rdfs:subClassOf rdf:resource="&process;#AtomicProcess" />
  </rdfs:Class>

    <!-- ConfirmReservation IOPE -->

  <rdf:Property rdf:ID="reservationID_In">
    <rdfs:subPropertyOf rdf:resource="&process;#input"/>
    <rdfs:domain rdf:resource="#ConfirmReservation"/>
    <rdfs:range rdf:resource="&concepts;#ReservationID"/>
  </rdf:Property>

  <rdf:Property rdf:ID="confirm_In">
    <rdfs:subPropertyOf rdf:resource="&process;#input"/>
    <rdfs:domain rdf:resource="#ConfirmReservation"/>
    <rdfs:range rdf:resource="&concepts;#Confirmation"/>
  </rdf:Property>

  <rdf:Property rdf:ID="preferredFlightItinerary_Out">
    <rdfs:subPropertyOf rdf:resource="&process;#output"/>
    <rdfs:domain rdf:resource="#ConfirmReservation"/>
    <rdfs:range rdf:resource="&concepts;#FlightItinerary"/>
  </rdf:Property>

  <rdf:Property rdf:ID="acctName_Out">
    <rdfs:subPropertyOf rdf:resource="&process;#input"/>
    <rdfs:domain rdf:resource="#ConfirmReservation"/>
    <rdfs:range rdf:resource="&concepts;#AcctName"/>
  </rdf:Property>

  <rdf:Property rdf:ID="reservationID_Out">
    <rdfs:subPropertyOf rdf:resource="&process;#output"/>
    <rdfs:domain rdf:resource="#ConfirmReservation"/>
    <rdfs:range rdf:resource="&concepts;#ReservationNumber"/>
  </rdf:Property>

  <rdf:Property rdf:ID="haveSeat">
    <rdfs:subPropertyOf rdf:resource="&process;#effect"/>
    <rdfs:domain rdf:resource="#ConfirmReservation"/>
    <rdfs:range rdf:resource="&concepts;#HaveFlightSeat"/>
  </rdf:Property>

</rdf:RDF>

8 Conclusion

URLs

  1. DAML-S 0.6: Technical Overview and WalkThrough, http://www.daml.org/services/daml-s/2001/10/
  2. Autonomous Semantic Web Services., http://jmvidal.cse.sc.edu/library/paolucci03a.pdf
  3. Service Ontology, http://www.daml.org/services/daml-s/2001/10/Service.daml
  4. ServiceProfile ontology, http://www.daml.org/services/daml-s/2001/10/Profile.daml
  5. Process Ontology, http://www.daml.org/services/daml-s/2001/10/Process.daml
  6. Time Ontology, http://www.daml.org/services/daml-s/2001/10/Time.daml
  7. Resource Ontology, http://www.daml.org/services/daml-s/2001/10/Resource.daml

This talk available at http://jmvidal.cse.sc.edu/talks/damls/
Copyright © 2009 José M. Vidal . All rights reserved.

20 September 2003, 12:06AM