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 zcmb<-^>JfjWMqH=CI&kO5O0I916T+`GB9XZfVp78fx&`-m%)KSmO+Mrje&uIg@J(q zrp^J%g3&jaz*-n!GzWyszzo$V0b(#PFi0>%On}kBP<1dGjQ;N zgf2v1ge^oLjNSnamlsePrVqpg>C1rX%Yf>G(F!01AZI{nsCU6}0CHymG&~ES;R&N5 zw!=b+fdO6L2B^LbP<=2O?rn%S!1jQc!B0z4$gwW~s_z2S;0w@jgwZ-6!x$k`z$5fY`)fSTqMg?ZXuhE1=;BqoL8spr4mnpIKt=fQ(BzC zkd|MR&5%-BV8jp~pH@(mnOBkqQpyk?4@!CnY^USP_N|W5e^o&B2EHldjW8LD6)SMhp9U)-%urXTHoNP!eEbU}j)pU}a!oU}RtcLpCr8 zk^`l0MuuVr25_+pN;joanVg_p*$$Bg>#2pxgM>;XLGo-2lc8b|^(+h^^`NvWl9|a1 z%6;>p@>?cOV`E@oVps{%%)r3#!5)-?7{K)L07)EFo`A$a_yv+Udf5b$AH|~~Fd71*Aut*OqaiRF0<;f-&-`+~JeuEdcyzPA z)MsGuXgyHE^#6iK^AV22V9WoTX6Z99{8!Dk2UYTkU%>R7E(60SegRRCm`CS3pU&r>_yt2$BtG#AmZ%7P;umyL;dpWIFIc;( zCLaTXYwNd9`~tdid?0<1DJlw|_yxc!BXd+VKJg2H^$NJCaD3vAc=m}u;#H~LC;kZ5 zZ@eJ&f~s*~`vi6UAT+C;E(1gJYsQjFmu^!nT?U3UevPYX{2E_g=KufypI_buEOIxE zU*k*~zs512&R0I&roVJRX2sn4#2<4G9F03bLH3DXFh@ner}O(Ke!&zKju$b1|Nr;t z{Qg1(;&|38U|j+^AYTcjsBpYY1>3;j(e0vQk>a5ZNsy(69?eG_3=c%dI>tE0I>sID zu2C^C{APIj#hO3={~Lbu=(SDfVPG&k@Pg;>|Nk#d{{8>|qUq27|7jCI`PJ~PXXnK@ zkIqLP%}+iAgt!_WFg)pT{P+a{2ZsNm(mD(bU()pWAp09^mufRGFq8_1dUQU0QT6}-|6{C^wHX)~V-I842U7pKi-7?|gUcm&Nd$81 zC>{-g(GVC7fzc2c4S~@R7!85Z5Eu=C(GZ{{1Q;2Z7}E1f3v%*H7|I!nQ%e+bOLIyx zL3}PSw;-`7F*miOC^H$tuP92)OHWmZ)>TchQca142v%YfEY7S-RVYd<$;?;KHRNI_ z%>$WUQIeTl4C7QnILSGwiAA7JGXnzy$YO42%^5jM6;p91|EJ^FlHV3=9)K{r|59Qscrd0Gj6k&E2l~^#4C- zzyc(!!oa}b!oa|A(CkkR0|P_C`~Uy% zfd&Pf_yqcxocJVqnVt9)dRQF!G}>4l`3#!bT=)u@7cg=0894K4IPxht@ku!G2{`d_ zI3iD@fQ%f)qaiRF0;3@?8UmvsFd71*Aut*OqaiRF0)r$3CWwGq{0s~UP#QFy2yz-| z%^8S>@j+|MKzvyc!N9<<1xkY^^uSE$`ee|WP7r?v)I3QLhk=0sww_oT$_Gu1f|ybu z0@UAtt{(>VWk5nOc~Jid#J>Pt@B8)N|9lW%f(7DkSpTMg6~YHiBZA~Dpz^TJS31-q zu+E7DND%`AgD8}SQJ@K65W54q{tMIv0`Wh92&8@(XrdP+1X?c&qGzx}?1zbGK>09# zfcj$~b)X4g5Dl|m4#a`3YXvcX|A+Vw>Rg6@Q2q}#i247ae7L)y{2NetkQubZu=U;O zc9=oq-wjHKLFqIoT?VDwp!75-y$nikgVM*KG`jide0OJOD+LXAzfesD$dXEQ1!#Ow zc(O2j{EsFKUSH10z|4TYjvO?@jZHl${WCI1Fi1E+;sX}HpguK7+yG6y5WGfNg24h! z95m4gQm=s~ZVFYe02PO&e_QZA1WfmX#tE1h_!vGw_d&q?=fwb8)yc=80L_Om@mQ!h zEWg9VLHQlz9?<+LNDLHSAi5sx9ubBFX#NC=f$%b@Ik55rBnHBp!0LtJ`5hz%!WVJ4 z{}x!i5W^ZpNO*$O!Z5b*e*so6%7C5@KY}$0GQig7gSj9(89@sG#28@t873~ph<*L{ zG)4vn1qN{j259)h)SH9HTErP(;R6%51DV6b&j2g$VB#(yaTo`Qj>jQhfJ3|)hxinz zd(hpv5bS;=3!zNVz7IhraRv@Ff9+*tU=ReYE{5)JfTg!HIPAR-wpW6|0nMBzAoWaq z3=g2`5LPbF0*N#5F~IiefXAp97#RM5#i5QvqWGCWV_Fgz;VjJriZ4C}(Bc7*a`4y` zbbkpbuY$you`v?^1IWMV@nsJ-2U#VA9f?Cc2PDqK!@z)6E){{qAzD$%#nQhLZfElKjl#RJ~+|^ql;p#GLs2(vpJG5{8t_qSWM)%=|otg4Dc}{PH}8 zYgjuOzjofI%-Wza&*JJ+D-+ zpeVl}wWy>LD&*+osS8T9V7ZLM;tU48l*+u~%3KItQp5n3DN8LX1|?i%PJ9uAUQudJ zB1i+2RghD{pa)7(40w%t$Fh@E|%MX%M0V#!jis zOU%toX3$H|FJaJwn2}Um%%GQ?pPQSSSAv=m$>V|Ar=YqI*1m%6^MmdGgYEN!nGRA5 zV}odA1_lOD8xW=+wyzDg-wnN%gS8((dO;Yp9|u`KtX%@z_XgSn0#XOVu<{zl2ek)4 zWiQNrSiAWGv|$U92dRa%lVSG5%mK|2eEa`DAEqDH&X#~GfVI!j^@Gd=VbH!RP#YVj zAJz`Hfa~ zF#WK0@eQbhVf_s#mjR{@MrSiHfZNz-=Rl2&^BF z0rD^d0|Trd05uNW{sgIn`5&|z4ir>QAVCHO23Wsh22?++9|F=ZhSYC>>F)!#k0ASZ zz(&C8EzqP80|NsneS^iJ1jsHZ6HIlY=~sa2SAgmVwR6D=p#)SI)PewuOhMBRtFJFW z6&{18L$G4d92blMrDvh(hqbF_KqtUp{Y$8F_&!eYRff)hQ2jjni<_Vbnu=bw-R6mr0 zDTlisCIIS3fXWnfbuj(tZB39`kX~dOp7uZzP^7Sxsp?e2r|5VW>Ag#8Ob!AW%e014OIJOBUy literal 12056 zcmb<-^>JfjWMqH=CI&kO5U)TQOffh>B_hc#m>~LKbTCvMj0PLV05Ke7A5R_WMp7uNN0e=F(mw%8ETv#=O$+6F~rBG=jP`@MdBHf^NSgZGxHb< zG7C}}((;S48B$6Mj2KcYQj>EE7}8Sm3sUnK(h7<)^Gebf($aEDi!&JFLAsN(<%Y#(W=1*2MwW>d*%_7<$>o&=2H9pNWu}R`1(hWk z`FX~=#(IWEdM4!z2a7MJK6 z>KU5o8DMD6F*nL6GRe+0HqEmvt|~M$%1SXXGEb>8PA;}EEl<`>Pf5}>G}SW%X@o>= zfia|91f>(?c&|VbM@}mBymtWhKZj*5(lMinD_-GaZq}PiQhmH2d81E!~-O84$lNHcpxC@D+03Zi#3W$PDv(+$HkDGlbTq>#Zb-w;wnTNSQ*ADsHQ1sg9t5!5*-i?<0$0i zmt>aYq;gToN2Ph0#U&|FFBK#fCFZ7<6lEqud{dlRm8wvbSdy8qplis*0P#yD#4nJj z;bu_J%qxL4)BgWw0P~}bV!=X;(#+PNIvf=D9fAxD1q=)fI|LaRIv5xjP6#qE%wb?) zh!A36*u%iUpdrk_a0kQ}W?=XOibXL71_ee2h7K_X1_wq4h8bcE3<=OoAOf+Rfw3xx zfw4k>QJROH1JpJFiOYb>XF&!AP#wqM!VW6B!Oa{{U8NxiD#0O|LFzmh7#LIp85o*D zLXLa_ZA{L*Y)o}L>>LaXAo&ai28Jnu3=9`glL4Z(?&Zi#DZxoKZf?|fDv-XEaXX%F*rHl*=9-XXm z8Vn3CBv}|3UQA(OU^wpj1{6!pwQpGX`|TJQ7>@oHU`>AW|Njd&D8~=P;bdfB=yrYc z|3Ihf3;qcQO#ZK6N9!^V3L%0v>9*3j9 z1zmrD%wMezvPaPM#L?dZAQ3^=3n1Y+>I@7o&a;5z1VTY_z88)>`nd8CNZ$vLf^4Y1 z8*qIOK*A{?eaoTxKytnh;QC%P+xmbKH-8H#g?V(_%7e`iU{#0Eyy6f#6l6i{ix(4^ z!PdKeIQmh;tL`~AE|+Lu^PSp{~u;G>sd7h zhSwFSuA37&=|=G}qo?;BReZ zU|`t52nt|OVfzvk#p(Pz9fUl3T|anqx?b>TJ-|Qpz(&S~hyN8$fRusi0+0$}k8als z-4=%5UYufv83B_MFgyTKiejRGN3X5KYfz+h9^1h1Vkt8NgU4~#7a$8?9%O`>fTBgn zqc`+}N9!g2sRukdFM2c|Wbx?qJ>kGV^_YXg2M^7Q{F4u2bC&N3kLI5YAWh8=nZe8{ z2T|QF=F#nXqT9lw*L2CN|NmcTg51*S`oN>x^?^sH>j97E9}N7haL;&j*BYEYj7htMi;L&Ru3UNpjLg5Tdg)=;QO^aWGy=I6|H~~}P1dm=*F^Gwv zzNJTZ?SmKm2pumxx?Nv*bh>sRQeC(24-d-|{H>s-tw*b9M(%)sy>3B+zbA^3=A2da`)v0Fy9Hp2h}<+4}ker zAU>!`_;Lf7Zv^6lirbe9zW7gB{X71~~-8Hvka~3=ANLfS3{>f`NfS97;z()q?^CB=iA9Fo1e}5Jm&E zoe643fJ9*SfC2)?6IAo(v) zKCDgqLjfWW%1j`65k(0912jA$pz8lY`6W>Pe<&a3FOXh*7&eZCuEq^&Ul^25gVJSC zx(!NCgVM{O^foAc3`$>v(qQx5ot>=|G~E3{H5Ckv^^Ell7?N`m^U@W{Qj3Z+^Yau8 z&GiiQ%ouz!^RiQmtQ35FTwp?sf{dzs!mP}E0^-tqf{a3-{G}+yEU-bz@~m_ zm<4PfVQz?B!KTj0z+eIrkK4fZgpq;46vU3-!Da$;TfzZ0X$A%ccaV6}5e9a9Mg|5} z7Ulzt3=Hhfj0_BHjLc^k85lS~mNJ7PgXJM30|RIXnrQ~R3Mk4r*g*vZI}3v%Zi2j{4c302fq{W(CbKF?HX2mI>4R9UObiUXEDlTz z3@1QhdhF+!7#P?&5C)1c@TD*@FtAE-GXLO!lsyPZ4hFtPkfaM{tzGBv2n${1z^N=p$S6NH#1R)DevD~wmr2$oA>Wnd6y znwaAZN=VTll?);dG9Y^)-CD-5*C2IXApQHmERe5+nI;ze1o6C~ybMrFmle!o5D}1t z=m&Ls8N)!yiPaUPA5^`wx`K2th&n*kfV#enVV^*@3xLWWVWx=*>p><9LU{%ML2)aT z32|pk8%R#L6jY;%eUOLP1L_(xhWUZi>4_CU>qto2QQ}18j6Ez92O(CBHn6ArmZDUX)pq8lRe%!Vn*ypOzM10u}|0 zlO~syFr=iW7p0~agT;yy%TnW$5{pwA;=vXrm8LPor{yH37c*2C!j0EU1}jb~O#>TB zVC3CJ}tr$9!QVPje_Po(6RCgr5Ut%NwQ zJToOVJ|(dvks&^ zVrGbsFUU-ZFJZ_@%}X!IV2IDpNr4%gSd^a3P+0tqK=#I$FjPWRgDr=6+|xfkH?b%?wTPh@k|H2}jCTwQa*T`*_Kb3k4~YzLjgLnd zT2fk+hu{^Zf?S)DS(KVwl9`{!ke-vDl$a9_bH1m4d{Sa^c4+}L9eDc3Bf{Fl)zjT0 zgrO39gDXBc0~GL(1Ost6B;3I+FU^BG7?Nf|0RZx8Bm>kx#fX^9$t*4bPa+gE%wPsJ zNP0l^5F_JnK3)b!M({K*NPs#cut}LE#rh?c1*yeU8UO_uh-_3vVy;o1L9wNgWqL}U zfq}7QmSv`4PG(A?L0(0LXGYZ6e|~qUBb%j#mdT-ev(!E7#s8AdX6UMy9_q0%rY}|UR z3~bDq9D1x=T&G$2*iNv@%wrXAV&!?l$`QfJ#TJPn#?BVSR>I29md+~2R>G>-#H!N7 zsujV?8o|oW7RAcS2BMq6G$R{#Gb;mgVH&GE*F;ucwg^^6Hg1mHtPIQ^5v&|s9F?rh zY+kIKY>}+&Y!R#+Y<8^dY+kI~Z0T&w=^Qr9l1aZi|) zKs*j_uw?8LW@RL9%oAo65Er5|`U$ftf*19KSq+NFY>Q)-K^ZZ7qBw3tzq_k!fXuE2hv{x3W`Wp1`Z8YZZ2f;c*4rU#%$@u%E1=F${oQf5Wy-E!72`l)^Jv?8(^y$*|;N_ z*cias5R@>mVNf>}G?#)t9}cQ8nV9$(7C?IvpjsKEAJqS4VfgqT#74$q44@fNJ_h8< zA0!WI#WFI8F~B+=u>Lxz_GV(>V?eIxLFyf$<{;PgAn_omIC299B%S~jM{bya#Ph&& zv0@CcMi|Uq&^!dlJ+O8dOuP!J9@e0PiPu2IVNEnprUID{8Z8I8AG!Gf65k6Vm_!(0 z;|U-x2q%I9nn{QOz5gu$YCbG@0k)0=G!hLG zUkeq7<#kXa5hT6|JkKr409ywF5(DAO3=9l{4BQMJ(DpFQUys1%fK;I3FQB;<22686 zi3{8M15lp{+k8K0UI&}F3M2OQ3Ys{?^>BzA;}8cmm$BLFh(o<64)FjS;tYD3c_pbu z1q^z5`6a1(j!vGsC5h<_dMTB8#g(}Xdg*zkdeC7H6i$2*gqx9AoWY<6AwhadiWu~Y zQgaeP20&Q_IVB8wMfu>ilwN8^d>UxRE6 z7#O}G*$*4W50hshiLV#W^_i!xa8PD*Iq!Ai4sy%7uY}Apxo%G~Wn{5?J`d$}c8H p#9Saq9}M4sMw|%Dp->4lE(2&S4%7;$3JCQ^6+&mBX+YyL003_;I2Ql_