Index: tol/btol/real_type/datgrapr.cpp
===================================================================
--- tol/btol/real_type/datgrapr.cpp	(revision e9e48548ec0f36140fa33aa81df275a6c02bdec1)
+++ tol/btol/real_type/datgrapr.cpp	(revision fcb7cd14fa4c7262df5250f8e9a5b985e0623a32)
@@ -268,4 +268,23 @@
 }
 
+
+//--------------------------------------------------------------------
+  DeclareContensClass(BDat, BDatTemporary, BDatNormalLogDens);
+  DefIntOpr(1, BDatNormalLogDens, "LogDensNormal", 1, 3,
+  "(Real x [, Real nu=0, Real sigma=1])",
+  I2("Logarithm of density of probability distribution Normal(nu,sigma)",
+     "Logaritmo de la densidad de probabilidad normal N(nu,sigma) donde "
+     "nu es la media de la distribución y sigma su desviación.\n"
+     "Los parámetros entre corchetes pueden omitirse, en cuyo caso se toman "
+     "los valores por defecto."),
+  BOperClassify::Probability_);
+  void BDatNormalLogDens::CalcContens()
+//--------------------------------------------------------------------
+{
+  BDat x     = Dat(Arg(1));
+  BDat nu    = 0; if(Arg(2)) { nu    = Dat(Arg(2)); }
+  BDat sigma = 1; if(Arg(3)) { sigma = Dat(Arg(3)); }
+  contens_ = -0.5*Log(2*BDat::Pi())-Log(sigma)-0.5*(((x-nu)/sigma)^2);
+}
 
 //--------------------------------------------------------------------