# ベースイメージとしてUbuntuを使用
FROM ubuntu:20.04

# 必要なパッケージのインストール
RUN apt-get update && \
    apt-get install -y build-essential autoconf automake libtool bison flex git wget sbcl && \
    apt-get clean

# CafeObjのソースコードを取得
RUN git clone https://github.com/CafeOBJ/cafeobj.git /opt/cafeobj

# 作業ディレクトリの設定
WORKDIR /opt/cafeobj

# CafeObjのビルドとインストール
RUN cd /opt/cafeobj && \
    ./configure && \
    make && \
    make install

# CafeObjを実行できるようにするため、デフォルトのコマンドを設定
CMD ["cafeobj"]

$ docker build -t cafeobj-image .

$ docker run -it --rm cafeobj-image

open NAT .
    op fact : Nat -> Nat .
    var NzX : NzNat .
    eq fact(0) = 1 .
    eq fact(NzX) = NzX * fact(p NzX) .
    red fact(0) .
    red fact(1) .
    red fact(10) .
    red fact(100) .
    red fact(1000) .
close

$ docker run -it -w /work -v $(pwd):/work cafeobj-image bash

$ cafeobj fact.cafe 

╰─○ docker run -it -w /work -v $(pwd):/work cafeobj-image bash
root@9ff9e71826ff:/work# ls
Dockerfile  fact.cafe  fact.easy.cafe
root@9ff9e71826ff:/work# cafeobj fact.cafe 

-- loading standard prelude

            -- CafeOBJ system Version 1.6.1(PigNose0.99) --
                  built: 2024 Oct 27 Sun 20:27:27 GMT
                         prelude file: std.bin
                                  ***
                     2024 Oct 27 Sun 20:54:52 GMT
                            Type ? for help
                                  ***
                  -- Containing PigNose Extensions --
                                  ---
                             built on SBCL
                             2.0.1.debian
processing input : /work/fact.cafe
-- reading in file  : nat

processing input : /usr/local/share/cafeobj-1.6/lib/nat.cafe

-- defining module! NAT
-- reading in file  : nznat

processing input : /usr/local/share/cafeobj-1.6/lib/nznat.cafe

-- defining module! NZNAT
-- reading in file  : bool

processing input : /usr/local/share/cafeobj-1.6/lib/bool.cafe

processing input : /usr/local/share/cafeobj-1.6/lib/base_bool.cafe

processing input : /usr/local/share/cafeobj-1.6/lib/truth.cafe

-- defining module! TRUTH
-- reading in file  : truth

-- done reading in file: truth

-- defining module* BASE-BOOL
-- reading in file  : eql

processing input : /usr/local/share/cafeobj-1.6/lib/eql.cafe

-- defining module! EQL
-- done reading in file: eql

processing input : /usr/local/share/cafeobj-1.6/lib/sys_bool.cafe

-- defining module! BOOL
-- done reading in file: bool

-- done reading in file: nznat

-- done reading in file: nat

-- opening module NAT
-- reduce in %NAT : (fact(0)):Nat
(1):NzNat
(0.0000 sec for parse, 0.0000 sec for 1 rewrites + 1 matches)
-- reduce in %NAT : (fact(1)):Nat
(1):NzNat
(0.0000 sec for parse, 0.0000 sec for 3 rewrites + 4 matches)
-- reduce in %NAT : (fact(10)):Nat
(3628800):NzNat
(0.0000 sec for parse, 0.0000 sec for 30 rewrites + 49 matches)
-- reduce in %NAT : (fact(100)):Nat
(93326215443944152681699238856266700490715968264381621468592963895217599993229915608941463976156518286253697920827223758251185210916864000000000000000000000000):NzNat
(0.0000 sec for parse, 0.0010 sec for 300 rewrites + 499 matches)
-- reduce in %NAT : (fact(1000)):Nat
(402387260077093773543702433923003985719374864210714632543799910429938512398629020592044208486969404800479988610197196058631666872994808558901323829669944590997424504087073759918823627727188732519779505950995276120874975462497043601418278094646496291056393887437886487337119181045825783647849977012476632889835955735432513185323958463075557409114262417474349347553428646576611667797396668820291207379143853719588249808126867838374559731746136085379534524221586593201928090878297308431392844403281231558611036976801357304216168747609675871348312025478589320767169132448426236131412508780208000261683151027341827977704784635868170164365024153691398281264810213092761244896359928705114964975419909342221566832572080821333186116811553615836546984046708975602900950537616475847728421889679646244945160765353408198901385442487984959953319101723355556602139450399736280750137837615307127761926849034352625200015888535147331611702103968175921510907788019393178114194545257223865541461062892187960223838971476088506276862967146674697562911234082439208160153780889893964518263243671616762179168909779911903754031274622289988005195444414282012187361745992642956581746628302955570299024324153181617210465832036786906117260158783520751516284225540265170483304226143974286933061690897968482590125458327168226458066526769958652682272807075781391858178889652208164348344825993266043367660176999612831860788386150279465955131156552036093988180612138558600301435694527224206344631797460594682573103790084024432438465657245014402821885252470935190620929023136493273497565513958720559654228749774011413346962715422845862377387538230483865688976461927383814900140767310446640259899490222221765904339901886018566526485061799702356193897017860040811889729918311021171229845901641921068884387121855646124960798722908519296819372388642614839657382291123125024186649353143970137428531926649875337218940694281434118520158014123344828015051399694290153483077644569099073152433278288269864602789864321139083506217095002597389863554277196742822248757586765752344220207573630569498825087968928162753848863396909959826280956121450994871701244516461260379029309120889086942028510640182154399457156805941872748998094254742173582401063677404595741785160829230135358081840096996372524230560855903700624271243416909004153690105933983835777939410970027753472000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000):NzNat
(0.0010 sec for parse, 0.0050 sec for 3000 rewrites + 4999 matches)