{"id":8117,"date":"2008-07-26T14:09:00","date_gmt":"2008-07-26T14:09:00","guid":{"rendered":"http:\/\/melotopia.net\/b\/?p=8117"},"modified":"2008-07-26T14:09:00","modified_gmt":"2008-07-26T14:09:00","slug":"sequences-in-geb","status":"publish","type":"post","link":"http:\/\/melotopia.net\/b\/?p=8117","title":{"rendered":"sequences in GEB"},"content":{"rendered":"
\n Goedel, Escher, Bach \uc5d0 \ub098\uc624\ub294 \ud568\uc218\ub4e4\uc744 \ub9cc\ub4e4\uc5b4 \ubcf4\uc558\ub2e4.<\/p>\n

G sequence
\n <\/p>\n

\n #include
\n
\n #include
\n
\n #include<\/p>\n

int gfunction(int);<\/p>\n

int main(int argc, char* argv[])
\n
\n {
\n
\n int i;
\n
\n if (argc==1){
\n
\n printf(“Error. There are no options.\\n”);
\n
\n exit(1);
\n
\n }
\n
\n i=atoi(argv[1]);
\n
\n printf(“%d”,gfunction(i));
\n
\n }<\/p>\n

int gfunction(int i)
\n
\n {
\n
\n if (i<0) {\n
\n printf(“Error. Parameter is negative.\\n”);
\n
\n }
\n
\n else if (i==0) {
\n
\n return 0;
\n
\n }
\n
\n else {
\n
\n return (i-gfunction(gfunction(i-1)));
\n
\n }
\n
\n }
\n \n<\/p><\/blockquote>\n

\n H sequence
\n <\/p>\n

\n #include
\n
\n #include
\n
\n #include<\/p>\n

int hfunction(int);<\/p>\n

int main(int argc, char* argv[])
\n
\n {
\n
\n int i;
\n
\n if (argc==1){
\n
\n printf(“Error. There are no options.\\n”);
\n
\n exit(1);
\n
\n }
\n
\n i=atoi(argv[1]);
\n
\n printf(“%d”,hfunction(i));
\n
\n }<\/p>\n

int hfunction(int i)
\n
\n {
\n
\n if (i<0) {\n
\n printf(“Error. Parameter is negative.\\n”);
\n
\n }
\n
\n else if (i==0) {
\n
\n return 0;
\n
\n }
\n
\n else {
\n
\n return (i-hfunction(hfunction(hfunction(i-1))));
\n
\n }
\n
\n }
\n \n<\/p><\/blockquote>\n

M and F sequence
\n <\/p>\n

\n #include
\n
\n #include
\n
\n #include<\/p>\n

int mfunction(int);
\n
\n int ffunction(int);<\/p>\n

\n int main(int argc, char* argv[])
\n
\n {
\n
\n int i;
\n
\n if (argc==1){
\n
\n printf(“Error. There are no options.\\n”);
\n
\n exit(1);
\n
\n }
\n
\n i=atoi(argv[1]);
\n
\n printf(“%d\\n”,mfunction(i));
\n
\n printf(“%d\\n”,ffunction(i));
\n
\n }<\/p>\n

int mfunction(int i)
\n
\n {
\n
\n if (i<0) {\n
\n printf(“Error. Parameter is negative.\\n”);
\n
\n }
\n
\n else if (i==0) {
\n
\n return 0;
\n
\n }
\n
\n else {
\n
\n return (i-ffunction(mfunction(i-1)));
\n
\n }
\n
\n }<\/p>\n

int ffunction(int i)
\n
\n {
\n
\n if (i<0) {\n
\n printf(“Error. Parameter is negative.\\n”);
\n
\n }
\n
\n else if (i==0) {
\n
\n return 1;
\n
\n }
\n
\n else {
\n
\n return (i-mfunction(ffunction(i-1)));
\n
\n }
\n
\n }
\n \n<\/p><\/blockquote>\n

\n Q sequence
\n <\/p>\n

\n #include
\n
\n #include
\n
\n #include<\/p>\n

int hfunction(int);<\/p>\n

int main(void)
\n
\n {
\n
\n int n;
\n
\n for(n=1;n<100;n++)\n
\n printf(“%d, “,qfunction(n));
\n
\n }<\/p>\n

int qfunction(int i)
\n
\n {
\n
\n if (i<0) {\n
\n printf(“Error. Parameter is negative.\\n”);
\n
\n }
\n
\n else if (i==2 || i==1) {
\n
\n return 1;
\n
\n }
\n
\n else {
\n
\n int q=qfunction(i-qfunction(i-1))+qfunction(i-qfunction(i-2));
\n
\n return q;
\n
\n }
\n
\n }
\n \n<\/p><\/blockquote>\n

\n \uadf8\ub0e5 \uc791\ub3d9\ud558\uae30\ub9cc \ud560 \ubfd0\uc778 \ud504\ub85c\uadf8\ub7a8\ub4e4\uc774\ub2e4.
\n
\n \ucef4\ud30c\uc77c\uc740 DevC++ 4.9.9.1 with MinGW \uc5d0\uc11c \ud574\uc11c \uc791\ub3d9\ud558\ub294 \uac83\uc744 \ud655\uc778\ud558\uc600\ub2e4.
\n <\/p>\n

\n
\n
\n\"\uc2e0\uace0\"
\n<\/a>\n<\/div>\n<\/div>\n<\/div>\n","protected":false},"excerpt":{"rendered":"

Goedel, Escher, Bach \uc5d0 \ub098\uc624\ub294 \ud568\uc218\ub4e4\uc744 \ub9cc\ub4e4\uc5b4 \ubcf4\uc558\ub2e4. G sequence #include #include #include int gfunction(int); int main(int argc, char* argv[]) { int i; if (argc==1){ printf(“Error. There are no options.\\n”); exit(1); } i=atoi(argv[1]); printf(“%d”,gfunction(i)); } int gfunction(int i) { if (i<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"_crdt_document":"","_jetpack_newsletter_access":"","_jetpack_dont_email_post_to_subs":false,"_jetpack_newsletter_tier_id":0,"_jetpack_memberships_contains_paywalled_content":false,"_jetpack_memberships_contains_paid_content":false,"footnotes":""},"categories":[12],"tags":[],"class_list":["post-8117","post","type-post","status-publish","format-standard","hentry","category-12"],"jetpack_featured_media_url":"","jetpack_sharing_enabled":true,"jetpack_shortlink":"https:\/\/wp.me\/p8o6gA-26V","jetpack-related-posts":[],"jetpack_likes_enabled":true,"_links":{"self":[{"href":"http:\/\/melotopia.net\/b\/index.php?rest_route=\/wp\/v2\/posts\/8117","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/melotopia.net\/b\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/melotopia.net\/b\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/melotopia.net\/b\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/melotopia.net\/b\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=8117"}],"version-history":[{"count":0,"href":"http:\/\/melotopia.net\/b\/index.php?rest_route=\/wp\/v2\/posts\/8117\/revisions"}],"wp:attachment":[{"href":"http:\/\/melotopia.net\/b\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=8117"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/melotopia.net\/b\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=8117"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/melotopia.net\/b\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=8117"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}