Changeset a9c6a36 in tol

Timestamp:

Mar 15, 2012, 9:39:25 AM (15 years ago)

Author:

Víctor de Buen <vdebuen@…>

Branches:

1941-docker-image-to-test, devel, master

Children:

cb991cf

Parents:

3623dec

Message:

Refs #1470 (trunk)
New built-in function AreCompatibleTimeSet returns true if two TimeSet are compatible in a time window

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@4387 be4846ae-f051-483a-831f-b64e7d08527f

File:

• tol/btol/real_type/datgrav.cpp (modified) (2 diffs)

tol/btol/real_type/datgrav.cpp

@@ -522 +522 @@
   contens_ = d->Difference(f,l);
 }
-
 
 //--------------------------------------------------------------------
@@ -2838 +2837 @@
 }
 
+//--------------------------------------------------------------------
+  DeclareContensClass(BDat, BDatTemporary, BDatAreCompatibleTimeSet);
+  DefExtOpr(1, BDatAreCompatibleTimeSet, "AreCompatibleTimeSet", 4, 4, 
+  "TimeSet TimeSet Date Date",
+  "(TimeSet tms1, TimeSet tms2, Date from, Date until)",
+  I2("Returns true if two TimeSet are compatible in a time window.",
+     "Devuelve cierto si dos TimeSet son compatibles entre dos fechas."),
+     BOperClassify::TimeAlgebra_);
+  void BDatAreCompatibleTimeSet::CalcContens()
+//--------------------------------------------------------------------
+{
+  BUserTimeSet* a = Tms (Arg(1));
+  BUserTimeSet* b = Tms (Arg(2));
+  BDate&        f = Date(Arg(3));
+  BDate&        l = Date(Arg(4));
+  contens_ = a->IsCompatibleWith(*b,f,l);
+}
+