Comments

Advent Calendar - December 11, 2025.

Prolog. Developed and tested with GNU Prolog 1.5.0. :- dynamic ( shape / 2 ). read_line_codes ( Stream , Codes ):- get_code ( Stream , C ), ( C == - 1 - Codes = end_of_file ; C == 10 - Codes = [] ; read_line_codes ( Stream , Cs ), Codes = [ C | Cs ] ). read_all_lines ( Stream , Lines ):-…

Prolog. Developed and tested with GNU Prolog 1.5.0. :- dynamic ([ connected / 2 , memoized_paths / 2 ]). check_and_read ( 10 , [] , _ ):- !. check_and_read ( Char , [ Char | Chars ], Stream ):- get_code ( Stream , NextChar ), check_and_read ( NextChar , Chars , Stream ). read_data ( Stream , []):-…

Prolog. Developed and tested with GNU Prolog 1.5.0. check_and_read ( 10 , [] , _ ):- !. check_and_read ( end_of_file , [], _ ):- !. check_and_read ( Char , [ Char | Chars ], Stream ):- get_code ( Stream , NextChar ), check_and_read ( NextChar , Chars , Stream ). read_data ( Stream , []):-…