read a;$a||(x=1;for b in $a;{ for c in ${a#* $b};{((x=b*c>c*c?-x:x));};};echo $x;. *)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page