Anonymous user
Greatest common divisor: Difference between revisions
→{{header|UNIX Shell}}: C Shell: Set a result variable.
No edit summary |
(→{{header|UNIX Shell}}: C Shell: Set a result variable.) |
||
Line 2,213:
==={{header|C Shell}}===
<lang csh>alias gcd eval \''set gcd_args=( \!*:q ) \\
@ gcd_u=$gcd_args[
@ gcd_v=$gcd_args[
while ( $gcd_v != 0 ) \\
@ gcd_t = $gcd_u % $gcd_v \\
Line 2,221:
end \\
if ( $gcd_u < 0 ) @ gcd_u = - $gcd_u \\
'\'
gcd result -47376 87843
echo $result
# => 987</lang>
| |||