Jak wyeliminowac "inwersje" w kodzie (petli)? Opcje

[AndyPSV]

Jak wyleminowac w najskuteczniejszy sposob powtorzenia w parach walut, czyli: 1 -> PLN / EUR, 2 -> EUR / PLN (to wyelimowac zeby tylko PLN / EUR zostalo)

KOD.

[PHP] pobierz, plaintext 
$q_curr = q('SELECT * FROM `'.PRFX.'curr'.LG.'`'); if(n_r($q_curr) == 0) die(H.'no currencies'); while($_curr = f($q_curr)) $curr[] = $_curr;
 
			# 2. CREATE ALL CURRENCY PAIR COMBINATIONS, BY DOING 2x FOREACH at the same VALUE; ELIMINATING INVERSIONS eg. PLN / EUR, EUR / PLN
			foreach($curr as $k => $val) {
				foreach($curr as $v) {
					if($curr[$k]['t'] <> $v['t']) {
						echo $curr[$k]['t'].' / '.$v['t'].'<br/>';						
					}
				}
			}
[PHP] pobierz, plaintext 

[SQL] pobierz, plaintext 
CREATE TABLE `x_curr_pl` (
  `id` int(11) NOT NULL AUTO_INCREMENT,
  `t` char(3) NOT NULL,
  PRIMARY KEY  (`id`)
) ENGINE=MyISAM  DEFAULT CHARSET=latin2 AUTO_INCREMENT=6 ;
 
--
-- Dumping data for table `x_curr_pl`
--
 
INSERT INTO `x_curr_pl` (`id`, `t`) VALUES
(1, 'PLN'),
(2, 'EUR'),
(3, 'USD'),
(4, 'GBP'),
(5, 'CHF');
[SQL] pobierz, plaintext 

[HTML] pobierz, plaintext 
PLN / EUR
PLN / USD
PLN / GBP
PLN / CHF
EUR / PLN
EUR / USD
EUR / GBP
EUR / CHF
USD / PLN
USD / EUR
USD / GBP
USD / CHF
GBP / PLN
GBP / EUR
GBP / USD
GBP / CHF
CHF / PLN
CHF / EUR
CHF / USD
CHF / GBP
[HTML] pobierz, plaintext 

Ten post edytował AndyPSV 5.11.2010, 10:09:09

[AndyPSV]

Szukalem ale rozwiazania w postaci kodu php nie znalazlem.

Ja mam pare rozwiazan ale przy 100 * k permutacji skrypt bedzie sie zbyt dlugo wykonywal, a zalezy mi na tym aby to byl czas najkrotszy.
Moglbys podac rozwiazanie?