mirror of
https://github.com/lcn2/calc.git
synced 2025-08-19 01:13:27 +03:00
Remove user_debug references in palindrome.cal
This commit is contained in:
@@ -231,9 +231,6 @@ define nextpal(val)
|
|||||||
*/
|
*/
|
||||||
newval = val+1;
|
newval = val+1;
|
||||||
newvaldigits = digits(newval);
|
newvaldigits = digits(newval);
|
||||||
if (config("user_debug")) { print "DEBUG: val:", val; }
|
|
||||||
if (config("user_debug")) { print "DEBUG: newval:", newval; }
|
|
||||||
if (config("user_debug")) { print "DEBUG: newvaldigits:", newvaldigits; }
|
|
||||||
|
|
||||||
/* case: single digit palindrome */
|
/* case: single digit palindrome */
|
||||||
if (newvaldigits < 2) {
|
if (newvaldigits < 2) {
|
||||||
@@ -244,7 +241,6 @@ define nextpal(val)
|
|||||||
* start with next upper half
|
* start with next upper half
|
||||||
*/
|
*/
|
||||||
half = upperhalf(newval);
|
half = upperhalf(newval);
|
||||||
if (config("user_debug")) { print "DEBUG: half:", half; }
|
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* form palindrome from upper half
|
* form palindrome from upper half
|
||||||
@@ -271,7 +267,6 @@ define nextpal(val)
|
|||||||
* so we need to find an even larger palindrome
|
* so we need to find an even larger palindrome
|
||||||
*/
|
*/
|
||||||
newhalf = half+1;
|
newhalf = half+1;
|
||||||
if (config("user_debug")) { print "DEBUG: newhalf:", newhalf; }
|
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* form palindrome from new upper half
|
* form palindrome from new upper half
|
||||||
|
Reference in New Issue
Block a user