{VERSION 5 0 "IBM INTEL NT" "5.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 1 }{CSTYLE "2D Comment" 2 18 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 1 } {CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 1 } {CSTYLE "" -1 256 "Courier" 1 24 0 0 255 1 0 0 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 257 "Garamond" 1 18 0 128 0 1 0 0 0 0 0 0 0 0 0 0 } {CSTYLE "" -1 258 "" 0 1 0 128 0 1 0 0 0 0 0 0 0 0 0 0 }{CSTYLE "" 18 259 "" 0 1 0 128 0 1 0 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 260 "" 0 1 0 128 0 1 0 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 261 "Garamond" 1 18 0 128 0 1 0 0 0 0 0 0 0 0 0 0 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Tim es" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 } {PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Outpu t" -1 12 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 } 1 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Title" -1 18 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 1 2 2 2 1 1 1 1 }3 1 0 0 12 12 1 0 1 0 2 2 19 1 }{PSTYLE "Author" -1 19 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 1 0 0 8 8 1 0 1 0 2 2 0 1 }{PSTYLE "" 0 256 1 {CSTYLE "" -1 -1 "Garamond" 1 18 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 18 "" 0 "" {TEXT 256 34 "3n+1 Conjecture or Colla tz Problem" }}{PARA 19 "" 0 "" {TEXT -1 10 "Yonggu Kim" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart;" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 257 78 "The follwoing procedure T gives the definition of the 3n +1 conjecture funtion." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 100 " T:=proc(n::nonnegint)\n if type(n,odd) then\n (3*n+1)/2;\n \+ else n/2;\n end if\nend proc:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "T(6);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"$" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "T(5);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\")" }}}{EXCHG {PARA 256 "" 0 "" {TEXT 258 39 "The ne xt procedure TT(n,m) is equal to " }{XPPEDIT 259 0 "T^m;" "6#)%\"TG%\" mG" }{TEXT 260 31 "(n), that is, T(T(...T(n)...))." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 135 "TT:=proc(n::nonnegint,m::nonnegint)\n \+ local i, k;\n k:=n;\n for i from 1 to m do\n k:= T(k);\n \+ end do;\n k;\nend proc:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "TT(15,3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"#`" }}}{EXCHG } {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "seq(TT(15,k),k=1..20);" }} {PARA 11 "" 1 "" {XPPMATH 20 "66\"#B\"#N\"#`\"#!)\"#S\"#?\"#5\"\"&\"\" )\"\"%\"\"#\"\"\"F-F.F-F.F-F.F-F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "T(15);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"#B" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "T(23);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"#N" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "seq( TT(21,k),k=1..10);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6,\"#K\"#;\"\")\" \"%\"\"#\"\"\"F'F(F'F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "s eq(TT(23,k),k=1..20);" }}{PARA 11 "" 1 "" {XPPMATH 20 "66\"#N\"#`\"#!) \"#S\"#?\"#5\"\"&\"\")\"\"%\"\"#\"\"\"F,F-F,F-F,F-F,F-F," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "seq(TT(115,k),k=1..30);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6@\"$t\"\"$g#\"$I\"\"#l\"#)*\"#\\\"#u\"#P\"#c \"#G\"#9\"\"(\"#6\"#<\"#E\"#8\"#?\"#5\"\"&\"\")\"\"%\"\"#\"\"\"F8F9F8F 9F8F9F8" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "seq(TT(362,k),k= 1..20);" }}{PARA 11 "" 1 "" {XPPMATH 20 "66\"$\"=\"$s#\"$O\"\"#o\"#M\" #<\"#E\"#8\"#?\"#5\"\"&\"\")\"\"%\"\"#\"\"\"F0F1F0F1F0" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 261 82 "In the following procedure, TC counts th e smallest number m such that TT(n,m) = 1." }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 159 "TC:=proc(n::nonnegint)\n local k, m;\n k:= 1;\n m:=T(n);\n while not m = 1 do\n k:=k+1;\n \+ m:=T(m);\n end do;\n k; \nend proc:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "TC(21);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\" \"'" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "TT(21,6);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "TT(21,5);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"#" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "TC(362);" }}{PARA 11 "" 1 " " {XPPMATH 20 "6#\"#:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "se q(TT(362,k),k=1..TC(362));" }}{PARA 11 "" 1 "" {XPPMATH 20 "61\"$\"=\" $s#\"$O\"\"#o\"#M\"#<\"#E\"#8\"#?\"#5\"\"&\"\")\"\"%\"\"#\"\"\"" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "seq(TT(115,k),k=1..TC(115)); " }}{PARA 11 "" 1 "" {XPPMATH 20 "69\"$t\"\"$g#\"$I\"\"#l\"#)*\"#\\\"# u\"#P\"#c\"#G\"#9\"\"(\"#6\"#<\"#E\"#8\"#?\"#5\"\"&\"\")\"\"%\"\"#\"\" \"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "seq(TC(k),k=2..40);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6I\"\"\"\"\"&\"\"#\"\"%\"\"'\"#6\"\"$ \"#8F$\"#5\"\"(F,\"#7F-F&\"\"*\"#9F/F'F'F(F(\"\")\"#;F0\"#qF*F*F*\"#nF $\"#=F+F+\"#:F5F5\"#BF," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "T C(31);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"#n" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 26 "seq(TT(31,k),k=1..TC(31));" }}{PARA 12 "" 1 " " {XPPMATH 20 "6_o\"#Z\"#r\"$2\"\"$h\"\"$U#\"$@\"\"$#=\"#\"*\"$P\"\"$1 #\"$.\"\"$b\"\"$L#\"$]$\"$v\"\"$j#\"$&R\"$$f\"$!*)\"$X%\"$o'\"$M$\"$n \"\"$^#\"$x$\"$m&\"$$G\"$D%\"$Q'\"$>$\"$z%\"$>(\"%z5\"%>;\"%HC\"%WO\"% A=\"$6*\"%n8\"%^?\"%xI\"%;Y\"%3B\"%a6\"$x&\"$m)\"$L%\"$]'\"$D$\"$)[\"$ W#\"$A\"\"#h\"##*\"#Y\"#B\"#N\"#`\"#!)\"#S\"#?\"#5\"\"&\"\")\"\"%\"\"# \"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "0 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }