From 89c1d3be541f7f0f847a60614a61e875c050fccf Mon Sep 17 00:00:00 2001 From: Geir Okkenhaug Jerstad Date: Mon, 2 Sep 2024 08:58:30 +0200 Subject: [PATCH] small sync --- MIT/sqrt.scm | 14 ++++++++++++++ Structure/test.scm | 1 + fixum/hello.scm | 5 +++++ tortoise/tortoise | Bin 12056 -> 16232 bytes 4 files changed, 20 insertions(+) create mode 100644 MIT/sqrt.scm create mode 100644 Structure/test.scm create mode 100644 fixum/hello.scm diff --git a/MIT/sqrt.scm b/MIT/sqrt.scm new file mode 100644 index 0000000..1bccffa --- /dev/null +++ b/MIT/sqrt.scm @@ -0,0 +1,14 @@ +(define (sqrt x) + (define tolerance 0.00001) + (define (good-enough? y) + (< (abs (- (* y y) x)) tolerance)) + (define (improve y) + (average (/ x y) y)) + (define (try y) + (if (good-enough? y) + y + (try (improve y)))) + (try 1)) +(sqrt 13) + + diff --git a/Structure/test.scm b/Structure/test.scm new file mode 100644 index 0000000..2869d81 --- /dev/null +++ b/Structure/test.scm @@ -0,0 +1 @@ +(define add2(+ 2)) diff --git a/fixum/hello.scm b/fixum/hello.scm new file mode 100644 index 0000000..18623f6 --- /dev/null +++ b/fixum/hello.scm @@ -0,0 +1,5 @@ +; The first program + +(begin + (display "Hello, World!") + (newline)) diff --git a/tortoise/tortoise b/tortoise/tortoise index 9e9a0884607d700f5ac434c5cb8f1528c5630cbc..69320348896c6310a351ab402a468d70a2e43121 100755 GIT binary patch literal 16232 zcmeHOeQXrR6`woX;1D<;Ux@=rSW-K6fIEEth6va*HY|}tC?8QMAItf6&$qDm!QCF% zC{bt)X;Pw5|tsFXjfHi}51Qd3%Jr8IJ+RHCWckSa;f`JjZPl#-O|do%Nn z^VJtcjUx4rd)DrI?>FzgnSDF6p1qxUw7X}G+vQ?JZnl!4HZoh~kT^5e(7{!Sb+8#s zWp}XK*%Ux3;ZS)Aav>2v?-m8btEF89aP+H1fpc{N-^4Y>h*JxZqu&iur6~C0vI64F zD~i#t3Pq_iuZkMzDre8hpv1{8U!TIw7*m8j@e$cD;)Q;gn}>YD@1YgKkN8QMm#pOE zhbsC-rC(I~5m%%=ampt)ACIKWXR<;C4RyiAnK9zUek0OvMA{Qqm>}Ym`%UjT#{W{^ z2I)5@1CA*wuYmXxt}#ZO>iZ7(VP3u}(QV!+>nn91PRM)`m$#EGja&Uo(@r8~E^Q4N z`whE!Szq&>Wud0sjeA4JJ}VWst$i)2_T+xU*JoS3VPBKKd6}=ZX(=d6ZNq0<@l3z3 zzoX69*5Xem{7s_ecs-49U|(FjehYISWTS{ty)NeB`b~f#xus6!Xp7f|I{G8wt((Rr zA2!E)9l*0+|x?=6AjHBJ^M zUINFqDsU9jQUE54v#SK&R{~c{;0-14wh}ng^}bjluBV+)%F%U}w&LML8c+bjd-QO0 zj~)qGHZ%Lpu$^R)h@DACStOC#!;DO_2@E62lofX(XbKv3JsB((vf?aaB$6hu{VB^a zS<*_H3`}C!1KUsv3u$f7y3W;llfTK|%1CbZx8&s;Qgch;SP0wc=sT7Y92(Q%36*p!bbUUZ@Wmyc|Yj}+iIwuw#_;55FmY_tH!I*5K-fYbj7 zEE_Ap@!3Ljz5u6Z5SCpi!0~xPlr6xEpG{;_=H(2OGf>VzIRoVklr!+nX5iDBJFjVj zA608ds>WfitQ{V8+_^Dr@YmI6c*VKa-2mt6Z8+B~P(eaHie=*$azORHsNPh&oPH#z(k*AL=+o89&bTPSkN~GJcfn%TdRv(D*^FH=&MGl<_3j7om<* zlkr_#zYBGol8kQvJ@{a7OK|g+O>j-Bp&hBL#|gSN)K%9J7}bU!u4~Nh2CM9E;BmJ6kF~DB|ft|uD(uP-j0E#wrMjJYv4MCYU^v73f3X0!CCk+aM zCvob0Kg1od$5`#D}E1pRss2PjkjtHlyg<5qzNFcuY(MHE@Ily z#h#(RU9OqAxvmz@PMsIdU3Jyj)Bon~_4hyx-G{G$z3)yCFV}1}>J-qpa4sfy8FN4<(VKI9>xEuN!(}r#AFgZSdVo8#Z?bMgzao&Yc_c!tk6s z9~$sk#9y=E5Z+dX_GfOWM^AcHm1!&R?94ui7C7W@`XvIn3z4H|A~%e2yr1Is-@C}! z&?W8k#Z}trs}-8-toFurXJ$UaR2iYzAL~E3;VzIRoVklrvDyKsf_nCj&0{y3iNTB<+O5 z_OrCB&r6)W2smj`wz^$}$;o)#(2l0rp^CmhSMP3eJGU#-^q zx;B5l@L#K3^DFL!Hz4?W!`Ozu=WVzIRoVklrvDyKsf{D43snQ|B`{Db5!1x zU6SL+G9+AchD7=!LWQ-|f?kw-y5zJzd4|-F$#}O(oz@f2mpXnJMVcoV+a=czl2t;-&xlAJvYcMN`s9Vs%So*;V{;`ZMr+j`U!`&g zUxAP=36_5kqqS(bUKHurRF!kWqf)2q!1pmET9Zcg-znhy^?sfc*GGAWFKYaHuTD|9 zC47|PdcIv!KQGH=xNnTn`tITi+Tf!e(i+JhlsqE&KFJ@G{29rgm;5Ek&q~gNeaUI< z>eb7Y23T2qk0O>-eu*s>VLmI_C%IxXygx2j4_Um9d{zm2?EfxS%W72>q#OMd->DIA zEW-CnyrT%m4~=NwP=vQiT#-2S{}q5w)_x6eH}kMdavub!obH1&;))!H5@tIjPUD?$ z9Pij3{C;lTLx{2=^iAh_6UM&q6EH$a%I{cmymS?q;{Dw*c_ zWcFEZKbIBv!%w)^Oh)VTDM%$;h>P9AXgm`>4{*H4#q%`bZoBe5U(W_ytNOi1S|{j=v%) z0;m4=8sL+)|82m%&`;E&IPapp+ruu%en`*dXL%e?exJ_Wvi2`Z#IJFS_{Dji5BMzT zZ@72>iT^eQT;Vu}CY+i9$LlSQv#Nys))KglxEub<$$F`hR0(?)PB{U80#>|-dM(`v z^)c9+;UuiI=?}9$JJB1m^+d)=W*lZ%DKiYeI>s5Sgf|lVRLJri)UoYa`Rw z_B_xT?9m@svu0EGW_@$8v!@$8iuVAh`33zgOgD{?6JorjU^#JGz22Kn%bLZ$2fpE<$Y%5Xt0}F8+a~f>xZ^==w8%qv?fho( zJr@&T=1&jAoKP=tCnb24B-oK*rjpDLKTVr{_&wd9Ou;^klrtcqVCOm?c3NH*4Z)TU zzcCPpc!E1AQL@iWrLp63GpXoM23ZNAgOrlC!~EEznBOt`;fx&-$`br$`^~8AdQk&> zNfRET4+;;GA#f;Wg`rmX2;dhnAic~FBOnGHo5tqX;W$5qM-%*S6I5HFa)I{$ZIU=K zv@N7>fr4{D@=r>C+V7?o8iP#pLxS5tDD>X`fhM(>woFS`|~?6~x&{L{RKDZ*q-u>6_wN5BaX@cPN0=96QJuvj8k{#;!D zOHfki&lak}cA;P+g5}S}^^ZacEGFe+0F7uKP5VNN?MWy88u;MCUrIB*SMP$=q)22Z zv>Q6%=b-@m4*AnOoA&uCGBL6{=Ht-H$H?5U5|U{F&+{{yvlx`se4j zjlzZMp#bDZ`bQujM)lMD&nx{UBlCRw3BdOVtiRZf{EO$rXp2PqYX=SQMP3-OT!+{fIymTA>EeHv-FfCWD^bRoHom$O;5bf_devG zZJhkkTpj(s-|y%9xZit!_uk*t{pm~Ib*rov3sc3)?q?*WZsmlvN=3&aWx;?ovoc)g zvD=sdxCq}?sRrf26pdPiLQ$Kv(?H4Zgw%s_KSdvsc8aPDiIShGm{lxQCNzpNhmgrg z$5-L1eFaJlA-$w#KY}h-a5cMJEAmv-Ci7QxqF=sJ_~lm!KSfm=?iOmM{3zU~)pta; zR#DZTo8HTYDCTG7=`0r&s!rP|{qiLO2jwb7Hw&04s`CCK{8U#-lc|WRitEXrzQ2?G z2Fmq{I=K~NimLi*60!c8Og5Pg*EBaZ*Egqo(~*W?)2^OWJQZ`t0;%4v{()UBySrnd z>PS4+6|DBS>RPHBJT(w%;-TtzERpN4?r(0aZmf4@k}i+PgN6qsu=>F*yk;7grJVcp z3;E2rfeGDi=MC`Nf!)ad&MELEQ{XjI;Pq4BEmPpFQ{bzoz&A{Rw@-mHMmJW&r)b=V z=AZ?i2&fZZ(f=CTCuI=7>ZVQ6uc^Q ze_(`~7`sJ*k`hkeX(pV;GL5xjd}&V6bf9q{hbcI*esD%!DE6ln8cTdR^80B-`ZL); zI_vKV#1hQ!kMtxH67jQOGQ%=}Q?XQ-btluiStytCuyB7k7*Db8P%;%xujcoP0w&g4Q9+$_}KxlA0T3^uD)w7ytvL{>< z3CGek!DJ|0lL_lgwpPxon0g&7`HKdDsvL^@ZYfEs?t2EdkFi_nttg zH8$IzlPfMVAceJHH*f)@J?{2K`Z3tAS2C~s) zqOQ8mRqJupPpo`zushQn>KWM6+|U)+<&H!Hbv;c34Gn>&=I;8YXrwxl4QH~|wXWKF zmwS?PyvY+y*YEDBYe=+Y_U>u)>Z-17aMhBdxWlPBK9u;{ zY`*XPCfqz$j!B%x6O98^j+=0`wvq0H38y)t%1IM$UT;sCaH>O-_0p$uZ(-2DZHrIQa zJl&~GQ*W@*(^u~aHZ(;08iNA^EqkJM(eX=pbtv3h6H5f+IU1`w<0 zk+5@n^}^87g`v(;4h~ENa|v#njRiBMERx8j;>j$x?8(KmF_KDIFdh!1OIaTy(Yf8d zw6@c^u-o|sx-4;K?=}n0L^2!8#>1tbQ;Twm7#by;lnSH+J>hIR78I??#P)`r=|DD? zbXM1vGSQX+(H7CyWo!|ahebkQqoa(=+dZ8evfQfOL(g!!_lK~TNr9dMJp_6I^jXjj zJfQv_bTJ-cZ;=f8J5bv!tkoFwhd^6FkAd!#lb{NEDwe&Qn5Exgxpi8xjrJyl&%xJ$ z*z}BJD~oBV=IeDm=wje%oRggo-vz)1LD{l$$K%!&(+%q%BASR31^hJh7su&eDd?#k zE0KS-Ss&$U<^*;E-_6i}hbF0tuYJ=Bi)GUc2ha6Ys4gS%ENH>Tnk>|D4RGsB(T0M4 z?N}Yt&~7*Mz2p4%2m``Uer=!o+uHwW8+!c_-_Se0!7C#hH+yS`YhU&~dEb1fM`!-$ zY{ow9cG>4WRR8$08+y+-c+GjjC*bma$6tVvZ ziu{oG+SOB|qocLMzQME3&NJO8h5Tebt>-?j@Ls3*e~IBn!UYI~RCq5E{4C)7YlsSA z3+dKhJp0ZE-}z@U7$Jk*((e)k;dhzf5cxeX{Yba|a=|Y@c;7mxnf);uVZOun&Eqi~ z`XWK6&lYqGRnVEwAHhOQ(IHmon$UUkB>WNq(74vlGt?f+iQ2NBE;HYO4pjHNKRT+a z*8c@y=NbDv#@qkswf#sSbyW^G)Ksy(s$T<@o;nPNBJKks0g8S zj@sc#5giy%HzDKN;h~pKvix7b$#>qHrwXsWh#P+6B({wB4*moQ_=aBh4Zc|98(M#% z)&A9&TAd@lyI!|H_2P}vT7SVe_!~w}gKuk`efq`mxz9rG7Y;Z3o^1HmFEHNjqFjc& zmw{deh2M4bOrbHp!~2F|8iXklpGL;Q@YH0(Q!xBjVfZd4wlq9B+3+L`e{ywn^hea~ zLqA5~za6tbG1>kE?0-1UesIkG_+81=$wfJpu_B!N z^^Wy4$G5=I(Ru0IyE{7bNUE8VD$2ji8?f(so}L}Z$lZBHti!0+hL-KYV*&FnYaK-` zXKiQr8qIZFf|IF?Hf)0V=t6py*ypu^BRNVIS1)6c99_7EWa_l57rDHgWZXD*b(qUb zN!Ca{$z>18wA@}j&gCT}(`>kUgv+;+Y>>R4%eRnROmd3LGf1|PypzkNB-3O5>PE=7 zfuZuOApC9;8<`-}?=LEI1>wJei2ZnUG)a^iL^g7EzYu{TK> zPd8pVq&;;El@UP-d*%IdpGo@&Dykmp2r5oZ)Tj2QDn4}_m5?sgcQ|M_jQK_0QdmcFxY;a5@u9CY-fR zE;oKYu8Sphhto@)>(;GQkfp-1u)I>&${n+BEw8Z5z-_SBGp)R>a%tH;WmfdQW@l~K zFBZ)L(aH(M2Cvehm6w$X!I)mKZ-%aT0mS>u%D~zx!QOi_Hm4Q~#VDPR7)?-=kxg0I z{a~lf0xJSdx1%xT^{`QO+s9Iw1Eu3mo=SxaSi50F}(pnN>nmS!Mk= zv1+0dhWvPloMyS0IW+P)gn=iYwf{q7QNL>>!j zD*+U3z-2E6YEiL%7uZXdTH^`O?*p>bG2HP`-~ofyo{xy%FlhV?z9slt zzIe!Z9@tFcw;nNQtK=kp`!Qn<@Fm3WIBt9Z%5&&EVJre(PxvDzjVs_Ai1(i|>cR7T zb`Bf2BF<{UyUw!W2cXc4v|*6q6}T7{?NtyPRjSd=D0&;>Ltw1OFkWG7E2aga*jh}v z7?u)pEwxfSR(3attyn7unf6oQmM?JkpOgDHw1uSI4qmGv?jSDHi&}BLK$xreHL%6D zv4B;qJOoI;r9``KLwJ-irHz$8O3Jw<+AMisJEpX<^5;nDEYYz1PVls|^3$Z8U!pxd zN$Ftamq>YgiT2{8I%hKbYe-^*3~Z$i>QG^QM~U`^w6;G5Ew?BsEx!W~IekHi_N__v zRI>6`QZ6jf-k(&@bg8_vMEjxiEKiViU5RF&6snk6pFy2pA%jwMm7Gt-Hl$Z%vwjIg z>DWrq8P-naP*$SZ6i7O1lRm9Pb4alKzbI^TiFVVZdaGH5n$&~n6-)b4^6j7qGptAZ zX-F2N)T3O&BZ*a7kH%NPUf)iZtg3a6$ceTlmiG6_ZVmbWBj+e{c%*(q(po7+X{ReB zR^_-&_|wl`OFIoG-An%Tc-Ot;!DhBf8~W*MY5x^z9JKx*^3K1e$Q4pbjgtS2n8eXg`ws1hNq*BKQaRTAyM5U@q+s zCgZuD1Ra#bB8hOwnTg^^llgOrTqYdyuy`^NVg9xa{#9-3yiA==`Ekw~O7d8WBq7y5g{x zRf_cbVxh1<6vzgUAJR{UGn5bW_n=jbpH1Twi3Ov9GZA z8$cbD5f0ZF@63J{NJn~cmW^&h)#-2`#G5-%J0|mh(n%aKqgn7kqYyWe#qoAB9#UZu zFUa~m+&!MenKzp5PX$5^g`P$FyrFap(`jN=56zeLEe zW0+e-?8}%D7K`QM^65k%(2TWwJ}0nUF}xSZ4x}&zKEHtGQ2l`(Pr{vP@w7xj3Aekh zWmikAHXaKF+=>4FhD5r0Z!A*nrq=`fgue!&IvzHM`F#$V2QrLhvguqf%NGh9&Z7T# zo55mb!hvll+zlSRO@m(=$hRk$?GJ!U(pthN!zYycT##3bq%^^8>d!dt)aEsE|h6Y)}UqWM-0vNf?iTeUGM@LeOfO& zeH@nG)z)9p>d24$v(yz^b!Jx^v{3St8Wh(e-glYc4 zC>Kl@9MNNZmNWCipVYLAwXj)C{qRt~*Xij^_T~pY*)Nm0`B_i+CW)IjFof@vxOrnj zcmiLlS8c*ny(x*SeVD@cN?dK|6#fSiS6eiiR8$_rm-6556#d4};DP-EDXmpZohOh; zB|yDvol*Ed2M2L+0JmE0O#S{>_$-b)3g-X{|2CKzs8{`umA@Tl#z*k2;OmnI5fDNCOgH_Z>Af?aZZ6Rm;%3R3fwgX zUN;3!+vOYOvup~yZ3=wj6gYEX8xu~am=E7ddC67JE z3I4PYqXE2PcZnKE0bZaV6vwtjGdS(6zl1*puEfxg!XN`sQjhKykO`VtLpzyp6`P4LeDKK%3sy5=vt{${`m3FdyEbN zsHpR3A&EXzJW;y86ifN5^L0>O+=3M9SNW^{?}VQGmrFZ!-VVykh{P#>I%A*cPX`E; zum@i%>bV5U%X9Mn3u(+>$#j-TCMtjRe?m}RHVaa?s(w=doe7%#TT4a%f%4-1jQXFD z{`}Apym~&X|9?KNHc%oQ|6hV+Ie8LSszUjz{lImHu%dHBbD5a`Q&5`y)%$}g{D*;x zdaod)$>aAMP?-JQ@*LkS{ZA@KNo86E^f_>pyBeSBJ%jpx=n>g}>b@(g;ye#uGEx5O z|4*q(fGEmNNR#jXccC!*tNqu0=^s^&lB)U@{C5-l)qY9+pLSw@%jPI|b{ZVTRQap@ z?loEef`X-BCe}X;m}0txx^Pwgw7!^&s$bEUp;WxtZV^p3l=%~s6GZkVY$jsl=aVns zzC2<4PPBbj`cKUN-{r!qtB#?dD9T^aUz#v(ATK|?O)$?+;je6e3r5X-g%RzaFQlE) upWZjpEm8fi)-Nj(nNS6Hyd-a2l}c2EE95UlM*qdRk^i-Y!eZBF`2Rm|E;tte