INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES

indexing

title: "Simple Duration"
project: "The Universal Time & Date UTDC"
revision: "$Revision: 1.1 $"
copyright: "Copyright (C) 1996-2005 Object Tools Group"
license: "http://visual-eiffel.com/license"
cluster: timedate
deferred class SIMPLE_DURATION
inherit

COMPARABLE
redefine
infix "<"
end

TIME_SERVER
undefine
is_equal
end
feature

clear

infix "<" (ts: like Current): BOOLEAN

infix "+", plus (d: like Current): like Current

infix "-", minus (d: like Current): like Current

ratio, divide_by_duration (d: like Current): DOUBLE

multiply_by (n: INTEGER): like Current

divide_by (n: INTEGER): like Current
end -- class SIMPLE_DURATION

INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES