ryloric

(import srfi-18)
(import (chicken format))
(import (chicken random))

;; Compute fib(n)
(define (fib n)
  (if (< n 2) n (+ (fib (- n 1)) (fib (- n 2)))))

;; Compute and print all fib until n, yield after each fib computation
(define (fib-seq n)

ryloric

(global N 12)

(fn place-ok? [a n c]
  (var ok? true)
  (var i 1)
  (while (and ok? (< i n))
    (set ok? (not (or (= (. a i) c)
                      (= (- (. a i) i) (- c n))
                      (= (+ (. a i) i) (+ c n)))))
    (set i (+ 1 i)))

ryloric

;; Spoj code : COINS

(defun memoize (fn)
  (let ((cache (make-hash-table :test #'equal)))
    #'(lambda (&rest args)
        (multiple-value-bind
              (result exists)
            (gethash args cache)
          (if exists
              result

ryloric

import 'package:flutter/material.dart';

void main() {
  print("Hello World!");
  var notifier = TestNotifier();
  
  var listener1 = () {
    print("Inside listener 1");
  };
  

ryloric

export type Person = {
  firstName: string,
  lastName: string,
  age: number
}