গণিত, 237 বাইট
n={-1,1}#&;c_~g~s_:=Polygon[c+s#&/@{k={12,9},m=n@k,t={0,-12}}];p={#,#2~g~1,#3~g~-1}&;a=p[Cyan,#-k,#+m]&;b=p[Blue,#-t,#+k]&;c=p[Red,#-m,#+t]&;Graphics@{{a@#,b@#,c@#}&/@{j=4k,s=4{4,9},n@s,4m,r={-32,8},q=-4{4,5},4t,n@q,n@r},a@j,b@s,c@j,c@s}
সহজেই পঠনযোগ্য সংস্করণ:
1 n = {-1, 1} # &;
2 c_~g~s_ := Polygon[c + s # & /@ {k = {12, 9}, m = n@k, t = {0, -12}}];
3 p = {#, #2~g~1, #3~g~-1} &;
4 a = p[Cyan, # - k, # + m] &;
5 b = p[Blue, # - t, # + k] &;
6 c = p[Red, # - m, # + t] &;
7 Graphics@{
8 {a@#, b@#, c@#} & /@
9 {j = 4 k, s = 4{4, 9}, n@s, 4 m, r = {-32, 8},
10 q = -4{4, 5}, 4 t, n@q, n@r},
11 a@j, b@s, c@j, c@s}
লাইন 1 এমন একটি ফাংশন সংজ্ঞায়িত করে n
যা একটি অর্ডারযুক্ত জোড়ের প্রথম স্থানাঙ্ককে তুচ্ছ করে। লাইন 2 সংজ্ঞায়িত একটি ফাংশন g
যে একটি (প্রায়) সমবাহু ত্রিভুজ সময়ে কেন্দ্রিক উত্পাদন করে c
, এবং নিচে প্রতি নির্দেশ অথবা উপর নির্ভর করে আপ s
হয় 1
বা -1
। লাইন 3 সংজ্ঞায়িত p
একটি রঙ এবং দুই ত্রিভুজ, এবং লাইনের গঠিত সামন্তরিক টেমপ্লেট হতে 4-6 সংজ্ঞায়িত a
, b
এবং c
তিনটে ম্যাচ যা কিউব প্রদর্শিত parallelograms বিভিন্ন নির্দিষ্ট ধরনের হতে হবে।
লাইন 8 একটি ফাংশন সংজ্ঞায়িত {a@#, b@#, c@#}&
করে যা বিন্দুতে কেন্দ্র করে একটি সম্পূর্ণ ঘনক্ষেত্র আঁকবে #
; 9 এবং 10 লাইন বৃহত্তর ত্রিভুজটি তৈরি করার জন্য নয়টি পয়েন্টের ক্ষেত্রে এটি প্রয়োগ করে। এটি নয়টি ঘনক্ষেত্র উত্পাদন করে, উপরের ডান থেকে শুরু করে এবং ঘড়ির কাঁটার বিপরীতে চলছে, যেখানে পরবর্তীগুলি পূর্বের অংশগুলির আচ্ছাদন করে। অবশেষে, লাইন ১১ টি চারটি সমান্তরাল পুনরায় আঁকুন (চিত্রের উপরের ডানদিকে) যাতে তারা শেষের কিউবগুলি coveringেকে রাখার কথা বলে মনে হয়। আউটপুট নীচে: