Viewing file:  CompactedTuple.php (2.87 KB) -rw-r--r--
Select action/file-type:
 (+) |  (+) |  (+) | Code (+) | Session (+) |  (+) | SDB (+) |  (+) |  (+) |  (+) |  (+) |  (+) |
<?php
//
// +----------------------------------------------------------------------+
// | PHP Version 4 |
// +----------------------------------------------------------------------+
// | Copyright (c) 1997-2003 The PHP Group |
// +----------------------------------------------------------------------+
// | This source file is subject to version 2.0 of the PHP license, |
// | that is bundled with this package in the file LICENSE, and is |
// | available at through the world-wide-web at |
// | http://www.php.net/license/2_02.txt. |
// | If you did not receive a copy of the PHP license and are unable to |
// | obtain it through the world-wide-web, please send a note to |
// | license@php.net so we can mail you a copy immediately. |
// +----------------------------------------------------------------------+
// | Authors: Jesus M. Castagnetto <jmcastagnetto@php.net> |
// +----------------------------------------------------------------------+
//
// $Id: CompactedTuple.php 304045 2010-10-05 00:16:53Z clockwerx $
//
require_once "PEAR.php";
class Math_CompactedTuple {
var $data;
function Math_CompactedTuple ($arg)
{
if (is_array($arg)) {
$this->data = $this->_genCompactedArray($arg);
} elseif (is_object($arg) && get_class($arg) == "math_tuple") {
$this->data = $this->_genCompacterArray($arg->getData());
} else {
$msg = "Incorrect parameter for Math_CompactedTuple constructor. ".
"Expecting an unidimensional array or a Math_Tuple object,".
" got '$arg'\n";
PEAR::raiseError($msg);
}
return true;
}
function getSize() {
return count($this->_genUnCompactedArray($this->data));
}
function getCompactedSize() {
return count($this->data);
}
function getCompactedData() {
return $this->data;
}
function getData() {
return $this->_genUnCompactedArray($this->data);
}
function addElement($value) {
$this->data[$value]++;
}
function delElement($value) {
if (in_array($value, array_keys($this->data))) {
$this->data[$value]--;
if ($this->data[$value] == 0)
unset ($this->data[$value]);
return true;
}
return PEAR::raiseError("value does not exist in compacted tuple");
}
function hasElement($value) {
return in_array($value, array_keys($this->data));
}
function _genCompactedArray($arr) {
if (function_exists("array_count_values")) {
return array_count_values($arr);
} else {
$out = array();
foreach ($arr as $val)
$out[$val]++;
return $out;
}
}
function _genUnCompactedArray($arr) {
$out = array();
foreach ($arr as $val=>$count)
for($i=0; $i < $count; $i++)
$out[] = $val;
return $out;
}
}
?>
|