Ideone.com | Online Clips Interpreter & Debugging Tool

Computer geeks!

Recent public codes are listed below. You can filter them by the following programming languages:

codes: 4088 page: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40

47 days 19 hours ago view (lines: 458, size: 12305, inputs: 1) CLIPS Runtime error

1
2
3
4
5
6
7
8
9
#!/bin/sh
 
################################################################################
################################################################################
# START OF LOGGING FUNCTIONS
################################################################################
################################################################################
if [ `date '+%N'` = "%N" ]
then
 ...

47 days 19 hours ago view (lines: 495, size: 13374, inputs: 1) CLIPS Runtime error

1
2
3
4
5
6
7
8
9
#!/bin/sh
 
################################################################################
################################################################################
# START OF LOGGING FUNCTIONS
################################################################################
################################################################################
if [ `date '+%N'` = "%N" ]
then
 ...

47 days 19 hours ago view (lines: 495, size: 13344, inputs: 1) CLIPS Runtime error

1
2
3
4
5
6
7
8
9
#!/bin/sh
 
################################################################################
################################################################################
# START OF LOGGING FUNCTIONS
################################################################################
################################################################################
if [ `date '+%N'` = "%N" ]
then
 ...

47 days 19 hours ago view (lines: 495, size: 13344, inputs: 1) CLIPS Runtime error

1
2
3
4
5
6
7
8
9
#!/bin/sh
 
################################################################################
################################################################################
# START OF LOGGING FUNCTIONS
################################################################################
################################################################################
if [ `date '+%N'` = "%N" ]
then
 ...

47 days 19 hours ago view (lines: 495, size: 13350, inputs: 1) CLIPS Runtime error

1
2
3
4
5
6
7
8
9
#!/bin/sh
 
################################################################################
################################################################################
# START OF LOGGING FUNCTIONS
################################################################################
################################################################################
if [ `date '+%N'` = "%N" ]
then
 ...

47 days 19 hours ago view (lines: 495, size: 13348, inputs: 1) CLIPS Runtime error

1
2
3
4
5
6
7
8
9
#!/bin/sh
 
################################################################################
################################################################################
# START OF LOGGING FUNCTIONS
################################################################################
################################################################################
if [ `date '+%N'` = "%N" ]
then
 ...

47 days 19 hours ago view (lines: 495, size: 13348, inputs: 1) CLIPS Runtime error

1
2
3
4
5
6
7
8
9
#!/bin/sh
 
################################################################################
################################################################################
# START OF LOGGING FUNCTIONS
################################################################################
################################################################################
if [ `date '+%N'` = "%N" ]
then
 ...

48 days 6 hours ago view (lines: 5, size: 96, inputs: 1) CLIPS Runtime error

1
2
3
4
IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO-WORLD.
PROCEDURE DIVISION.
  DISPLAY 'Hello, world'.

48 days 6 hours ago view (lines: 1, size: 907, inputs: 1) CLIPS Runtime error

1
0><|=02|), )-(4|_||°7574|)7 |)32 3|\|61!5()-(3|\| 624|=5()-(4|=7 0><|=02|)5)-(!23 I33)-(32I33267 3!|\|!63 31!73|_||\|!\/325!7°A°73|\|. |_||\||) |)|_| 63)-(°O°257 4|_|()-( z|_| 3!|\|32 31!73 - |)3|\||\| |)|_| |<4|\||\|57 |)!353|\| 73><7 1353|\| |)32 !|\| 13375|°34|< 635()-(2!3I33|\| !57. \/\/45 ? |)|_| )-(457 \/02)-(32 |\|0()-( |\|!3 \/\/45 |)4\/0|\| 63)-(°O°27 ? 72°O°573 |)!()-( 35 63)-(7 \/!313|\| 50. 3|\|7\/\/3|)32 I3!57 |)|_| °U°I332 |)3|\| )-(!|\|7 )-(!32 )-(32 63|<0/\/\/\/\3|\| 0|)32 |)|_| \/\/4257 5()-(0|\| !/\/\/\/\32 3!|\| \/\/!553|\||)32. 3!|\|3213!, _|37z7 63)-(7 35 4I3 !|\| |)!3 |\|47|_|2. |)3|\| (4()-(3 5|_|()-(3|\|. |_||\||) |)3|\| |=!|\||)357 |)|_| )-(!32: |\|02|) \/!32 4()-(7 624|) |\||_|11 4()-(7 |°|_||\||<7 \/!32 5!3I33|\| |=°U°|\||= 057 |\||_|11 3!|\|5 53()-(5 624|) 3!|\|5 |=°U°|\||= |°|_||\||<7 |\||_|11 |\|3|_||\| |=°U°|\||= \/!31 5|°4ß |_||\||) 32|=016.

48 days 7 hours ago view (lines: 1, size: 9, inputs: 1) CLIPS Runtime error

1
(print 1)

49 days 17 hours ago view (lines: 1, size: 0, inputs: 1) CLIPS Runtime error

50 days 6 hours ago view (lines: 17, size: 372, inputs: 1) CLIPS Runtime error

1
2
3
4
5
6
7
8
9
( defun a1()
        print (((sqrt (/(* 1.7 (- 3.5 2.9)) (sin 0.3)))))
)
( defun a2()
        print ((+ 5.67 (* 3.25 (+ 4.56 (/ 2 0.3)))))
)
( defun a3()
        print ((exp (* (/ 1 3) (log (/ (+ 0.5 (- 2350.2 (sin 0.3))) (cos 5.5))))))
)
 ...

50 days 10 hours ago view (lines: 21, size: 224, inputs: 1) CLIPS Success

1
2
3
4
5
6
7
8
9
(defrule readin
        ?f<-(initial-fact)
=>
        (retract ?f)
        (assert (number (read)))
)
 
(defrule writeout
        ?f<-(number ?n)(test (<> ?n 42))
 ...

50 days 19 hours ago view (lines: 47, size: 5046, inputs: 11) CLIPS Runtime error

1
2
3
4
5
6
7
8
9
 (funcall (lambda (toi three xexp xx pred)
           (funcall (lambda (x)
                      (map (quote (vector character)) (lambda (i) (funcall (lambda (x) (code-char (+ 48 x))) (ldb (byte (funcall toi (lambda (f) (lambda (x) (funcall f (funcall f (funcall f x)))))) i) x)))
                           (funcall (lambda (x)
                                      (declare (special x))
                                      (funcall (lambda (tf) (funcall (lambda (f) (funcall tf f)) (lambda (f) (funcall tf f))))
                                               (lambda (f)
                                                 (cons (funcall toi x)
                                                       (unless (funcall (funcall x (lambda (x) nil)) t)
 ...

51 days 3 hours ago view (lines: 2, size: 39, inputs: 1) CLIPS Runtime error

1
2
;;(print (* 31415926 53589793))
(* 1 2)

51 days 3 hours ago view (lines: 2, size: 47, inputs: 1) CLIPS Runtime error

1
2
;;(print (* 31415926 53589793))
(print (* 1 2))

51 days 3 hours ago view (lines: 1, size: 29, inputs: 1) CLIPS Runtime error

1
(print (* 31415926 53589793))

51 days 23 hours ago view (lines: 1, size: 7, inputs: 1) CLIPS Runtime error

1
(+ 1 2)

52 days 9 hours ago view (lines: 1, size: 9, inputs: 1) CLIPS Runtime error

1
(+ 1 2 3)

52 days 10 hours ago view (lines: 21, size: 224, inputs: 1) CLIPS Success

1
2
3
4
5
6
7
8
9
(defrule readin
        ?f<-(initial-fact)
=>
        (retract ?f)
        (assert (number (read)))
)
 
(defrule writeout
        ?f<-(number ?n)(test (<> ?n 42))
 ...

52 days 16 hours ago view (lines: 47, size: 5046, inputs: 11) CLIPS Runtime error

1
2
3
4
5
6
7
8
9
 (funcall (lambda (toi three xexp xx pred)
           (funcall (lambda (x)
                      (map (quote (vector character)) (lambda (i) (funcall (lambda (x) (code-char (+ 48 x))) (ldb (byte (funcall toi (lambda (f) (lambda (x) (funcall f (funcall f (funcall f x)))))) i) x)))
                           (funcall (lambda (x)
                                      (declare (special x))
                                      (funcall (lambda (tf) (funcall (lambda (f) (funcall tf f)) (lambda (f) (funcall tf f))))
                                               (lambda (f)
                                                 (cons (funcall toi x)
                                                       (unless (funcall (funcall x (lambda (x) nil)) t)
 ...

52 days 23 hours ago view (lines: 47, size: 5046, inputs: 1) CLIPS Runtime error

1
2
3
4
5
6
7
8
9
 (funcall (lambda (toi three xexp xx pred)
           (funcall (lambda (x)
                      (map (quote (vector character)) (lambda (i) (funcall (lambda (x) (code-char (+ 48 x))) (ldb (byte (funcall toi (lambda (f) (lambda (x) (funcall f (funcall f (funcall f x)))))) i) x)))
                           (funcall (lambda (x)
                                      (declare (special x))
                                      (funcall (lambda (tf) (funcall (lambda (f) (funcall tf f)) (lambda (f) (funcall tf f))))
                                               (lambda (f)
                                                 (cons (funcall toi x)
                                                       (unless (funcall (funcall x (lambda (x) nil)) t)
 ...

52 days 23 hours ago view (lines: 47, size: 5046, inputs: 11) CLIPS Runtime error

1
2
3
4
5
6
7
8
9
 (funcall (lambda (toi three xexp xx pred)
           (funcall (lambda (x)
                      (map (quote (vector character)) (lambda (i) (funcall (lambda (x) (code-char (+ 48 x))) (ldb (byte (funcall toi (lambda (f) (lambda (x) (funcall f (funcall f (funcall f x)))))) i) x)))
                           (funcall (lambda (x)
                                      (declare (special x))
                                      (funcall (lambda (tf) (funcall (lambda (f) (funcall tf f)) (lambda (f) (funcall tf f))))
                                               (lambda (f)
                                                 (cons (funcall toi x)
                                                       (unless (funcall (funcall x (lambda (x) nil)) t)
 ...

53 days 17 hours ago view (lines: 7, size: 200, inputs: 1) CLIPS Runtime error

1
2
3
4
5
6
7
(define (f n)
 (do ((d (do ((i (- n 1) (- i 1))
              (d '() (cons i d)))
             ((< i 0) d))
         (append (cddr d) (list (car d)))))
     ((null? (cdr d)) (car d))))
(display (f 5))

53 days 20 hours ago view (lines: 1, size: 2, inputs: 1) CLIPS Runtime error

53 days 21 hours ago view (lines: 47, size: 5046, inputs: 11) CLIPS Runtime error

1
2
3
4
5
6
7
8
9
 (funcall (lambda (toi three xexp xx pred)
           (funcall (lambda (x)
                      (map (quote (vector character)) (lambda (i) (funcall (lambda (x) (code-char (+ 48 x))) (ldb (byte (funcall toi (lambda (f) (lambda (x) (funcall f (funcall f (funcall f x)))))) i) x)))
                           (funcall (lambda (x)
                                      (declare (special x))
                                      (funcall (lambda (tf) (funcall (lambda (f) (funcall tf f)) (lambda (f) (funcall tf f))))
                                               (lambda (f)
                                                 (cons (funcall toi x)
                                                       (unless (funcall (funcall x (lambda (x) nil)) t)
 ...

54 days 11 hours ago view (lines: 47, size: 5046, inputs: 1) CLIPS Runtime error

1
2
3
4
5
6
7
8
9
 (funcall (lambda (toi three xexp xx pred)
           (funcall (lambda (x)
                      (map (quote (vector character)) (lambda (i) (funcall (lambda (x) (code-char (+ 48 x))) (ldb (byte (funcall toi (lambda (f) (lambda (x) (funcall f (funcall f (funcall f x)))))) i) x)))
                           (funcall (lambda (x)
                                      (declare (special x))
                                      (funcall (lambda (tf) (funcall (lambda (f) (funcall tf f)) (lambda (f) (funcall tf f))))
                                               (lambda (f)
                                                 (cons (funcall toi x)
                                                       (unless (funcall (funcall x (lambda (x) nil)) t)
 ...

54 days 11 hours ago view (lines: 47, size: 5046, inputs: 1) CLIPS Runtime error

1
2
3
4
5
6
7
8
9
 (funcall (lambda (toi three xexp xx pred)
           (funcall (lambda (x)
                      (map (quote (vector character)) (lambda (i) (funcall (lambda (x) (code-char (+ 48 x))) (ldb (byte (funcall toi (lambda (f) (lambda (x) (funcall f (funcall f (funcall f x)))))) i) x)))
                           (funcall (lambda (x)
                                      (declare (special x))
                                      (funcall (lambda (tf) (funcall (lambda (f) (funcall tf f)) (lambda (f) (funcall tf f))))
                                               (lambda (f)
                                                 (cons (funcall toi x)
                                                       (unless (funcall (funcall x (lambda (x) nil)) t)
 ...

54 days 11 hours ago view (lines: 47, size: 5046, inputs: 11) CLIPS Runtime error

1
2
3
4
5
6
7
8
9
 (funcall (lambda (toi three xexp xx pred)
           (funcall (lambda (x)
                      (map (quote (vector character)) (lambda (i) (funcall (lambda (x) (code-char (+ 48 x))) (ldb (byte (funcall toi (lambda (f) (lambda (x) (funcall f (funcall f (funcall f x)))))) i) x)))
                           (funcall (lambda (x)
                                      (declare (special x))
                                      (funcall (lambda (tf) (funcall (lambda (f) (funcall tf f)) (lambda (f) (funcall tf f))))
                                               (lambda (f)
                                                 (cons (funcall toi x)
                                                       (unless (funcall (funcall x (lambda (x) nil)) t)
 ...

54 days 11 hours ago view (lines: 47, size: 5046, inputs: 11) CLIPS Runtime error

1
2
3
4
5
6
7
8
9
 (funcall (lambda (toi three xexp xx pred)
           (funcall (lambda (x)
                      (map (quote (vector character)) (lambda (i) (funcall (lambda (x) (code-char (+ 48 x))) (ldb (byte (funcall toi (lambda (f) (lambda (x) (funcall f (funcall f (funcall f x)))))) i) x)))
                           (funcall (lambda (x)
                                      (declare (special x))
                                      (funcall (lambda (tf) (funcall (lambda (f) (funcall tf f)) (lambda (f) (funcall tf f))))
                                               (lambda (f)
                                                 (cons (funcall toi x)
                                                       (unless (funcall (funcall x (lambda (x) nil)) t)
 ...

page: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40

1 2 3 4 5 6 7 8 9	(defrule readin ?f<-(initial-fact) => (retract ?f) (assert (number (read))) ) (defrule writeout ?f<-(number ?n)(test (<> ?n 42))
...

UsernamePassword

Username
Password