[Distr-commits] r757 - in branches/distr-2.4/pkg/distrEx: . src

[noreply at r-forge.r-project.org]

Author: ruckdeschel
Date: 2011-11-18 13:13:23 +0100 (Fri, 18 Nov 2011)
New Revision: 757

Modified:
   branches/distr-2.4/pkg/distrEx/DESCRIPTION
   branches/distr-2.4/pkg/distrEx/src/kMad.c
Log:
[distrEx] (branches)
reaction to http://developer.r-project.org/214update.txt
+ removed lazyload tag in DESCRIPTION
+ deleted occurrences of ll and lr in kMad.c (as proposed by Matthias)

Modified: branches/distr-2.4/pkg/distrEx/DESCRIPTION
===================================================================
--- branches/distr-2.4/pkg/distrEx/DESCRIPTION	2011-11-18 12:12:47 UTC (rev 756)
+++ branches/distr-2.4/pkg/distrEx/DESCRIPTION	2011-11-18 12:13:23 UTC (rev 757)
@@ -1,6 +1,6 @@
 Package: distrEx
 Version: 2.4
-Date: 2010-12-03
+Date: 2011-11-18
 Title: Extensions of package distr
 Description: Extensions of package distr and some additional functionality
 Depends: R(>= 2.6.0), methods, distr(>= 2.2), evd, actuar, startupmsg
@@ -8,10 +8,9 @@
 Author: Matthias Kohl, Peter Ruckdeschel
 Maintainer: Matthias Kohl <Matthias.Kohl at stamats.de>
 ByteCompile: yes
-LazyLoad: yes
 License: LGPL-3
 Encoding: latin1
 URL: http://distr.r-forge.r-project.org/
 LastChangedDate: {$LastChangedDate$}
 LastChangedRevision: {$LastChangedRevision$}
-SVNRevision: 699
+SVNRevision: 756

Modified: branches/distr-2.4/pkg/distrEx/src/kMad.c
===================================================================
--- branches/distr-2.4/pkg/distrEx/src/kMad.c	2011-11-18 12:12:47 UTC (rev 756)
+++ branches/distr-2.4/pkg/distrEx/src/kMad.c	2011-11-18 12:13:23 UTC (rev 757)
@@ -54,7 +54,6 @@
 	        i1l = i1 - 1;
 	        xll = x[i1l];
 	        xrl = m + k * (m-xll);
-	        ll = xrl - xll;
 	        i2l = i2;
 	        while((x[i2l] <= xrl +eps[0]) &&(i2l < lx[0]-2)) i2l ++;
 	        jl = i2l - i1l + 1;
@@ -70,7 +69,6 @@
 	           i2r = i2 + 1;
 	           xrr = x[i2r];
 	           xlr = m - (xrr-m) / k;
-	           lr = xrr - xlr;
 	           i1r = i1;
 	           while((x[i1r] >= xlr -eps[0]) &&(i1r > 0)) i1r --;
 	           jr = i2r - i1r + 1;