Revision as of 18:01, 9 April 2012 (view source) rosettacode>Mischi (→‎{{header\|Pascal}}: add example) ← Older edit		Revision as of 04:15, 21 July 2012 (view source) rosettacode>Abu m (→‎{{header\|PicoLisp}}: Small optimization) Newer edit →
Line 1,364: (cond ((>= "9" C "0") (* W (~~- (char~~format C~~) `(char "0")~~)) ) ((>= "Z" (setq C (uppc C)) "A") (* W (+ 10 (- (char C) `(char "A")))) ) ) )

SEDOLs: Difference between revisions

SEDOLs (view source)