File:AGK-pentacube.png

解説AGK-pentacube.png	A chiral pentacube
原典	Povray image made by Andrew Kepert for wikipedia.
作者	User AndrewKepert on en.wikipedia
許可 (ファイルの再利用)	この作品の著作権者であるAndrewKepert (英語版ウィキペディアの利用者)は、この作品を以下のライセンスで提供しています。 この文書は、フリーソフトウェア財団発行のGNUフリー文書利用許諾書 (GNU Free Documentation License) 1.2またはそれ以降のバージョンの規約に基づき、複製や再配布、改変が許可されます。不可変更部分、表紙、背表紙はありません。このライセンスの複製は、GNUフリー文書利用許諾書という章に含まれています。http://www.gnu.org/copyleft/fdl.htmlGFDLGNU Free Documentation Licensetruetrue このファイルはクリエイティブ・コモンズ 表示-継承 3.0 非移植ライセンスのもとに利用を許諾されています。 帰属: AndrewKepert あなたは以下の条件に従う場合に限り、自由に 共有 – 本作品を複製、頒布、展示、実演できます。 再構成 – 二次的著作物を作成できます。 あなたの従うべき条件は以下の通りです。 表示 – あなたは適切なクレジットを表示し、ライセンスへのリンクを提供し、変更があったらその旨を示さなければなりません。これらは合理的であればどのような方法で行っても構いませんが、許諾者があなたやあなたの利用行為を支持していると示唆するような方法は除きます。 継承 – もしあなたがこの作品をリミックスしたり、改変したり、加工した場合には、あなたはあなたの貢献部分を元の作品とこれと同一または互換性があるライセンスの下に頒布しなければなりません。 このライセンスのテンプレートは、GFDLのライセンス・アップデートによりこのファイルに追加されたものです。http://creativecommons.org/licenses/by-sa/3.0/CC BY-SA 3.0Creative Commons Attribution-Share Alike 3.0truetrue
その他のバージョン	Originally from en.wikipedia; description page is (was) here * 05:32, 24 October 2005 [[:en:User:AndrewKepert|AndrewKepert]] 200×200 (17,049 bytes) <span class="comment">(Povray image made by me (AndrewKepert) for wikipedia. Source under LGPL to follow)</span>

Source[編集]

Source under LGPL below

// Povray source for a wikipedia image of a polycube
// By Andrew Kepert, October 2005
// License : LGPL

#include "colors.inc"
#declare eps=0.001;


background{White}

#declare ringn=31;
#declare ang=0;
#while (ang < 359)
    light_source {<0,0,9000> rgb .7/ringn rotate 40*x rotate ang*z}
    #declare ang=ang+360/ringn;
#end
light_source { 
    <0,0,1000> .8*White 
    area_light <100, 0, 0>, <100, 0, 5>, 7,7    
    // adaptive 1
    rotate 55*x rotate 15*z
    }

#declare r=0.05;
#declare ptA=<r,r,r>;
#declare ptB=<1-r,r,r>;
#declare ptC=<1-r,r,1-r>;
#declare ptD=<r,r,1-r>;
#declare cubiecentre=<0.5,0.5,0.5>;

#declare cubiefrag=union{
    cylinder { ptA,ptB,r }
    sphere { ptB,r }
    cylinder  { ptB,ptC,r }
    sphere { ptC,r }
    cylinder { ptC,ptD,r }
    }
#declare cubie=union{
    box { <r,r,0>,<1-r,1-r,1> }
    box { <r,r,0>,<1-r,1-r,1> translate -cubiecentre rotate 90*x translate cubiecentre}
    box { <r,r,0>,<1-r,1-r,1> translate -cubiecentre rotate 90*y translate cubiecentre}
#if(1)
    object { cubiefrag }
    object { cubiefrag translate -cubiecentre rotate 90*z translate cubiecentre }
    object { cubiefrag translate -cubiecentre rotate 180*z translate cubiecentre }
    object { cubiefrag translate -cubiecentre rotate 270*z translate cubiecentre }
#end
    }



//=================== floor
#if (1)
plane {
    z, -0.1
    pigment {checker .95*White, 1*White scale 2.5}
    finish {
        ambient .2
        diffuse .8
        }
    }
#end

union {
    object { cubie translate <0,0,0> }
    object { cubie translate <1,0,0> }
    object { cubie translate <0,1,0> }
    object { cubie translate <0,0,1> }
    object { cubie translate <0,-1,1> }
    pigment { rgb <.5,.8,1> }
    finish { phong 0.8 diffuse 0.6 ambient 0.2 }
    }
    


#if (0) // axes for draft
#declare axislength=7;
cylinder { <0,0,0>,<axislength,0,0>,0.1 texture { pigment { colour rgb <1,0,0> } finish { ambient 1 } } }
cylinder { <0,0,0>,<0,axislength,0>,0.1 texture { pigment { colour rgb <0,1,0> } finish { ambient 1 } } }
cylinder { <0,0,0>,<0,0,axislength>,0.1 texture { pigment { colour rgb <0,0,1> } finish { ambient 1 } } }
#end

//======================== camera stuff
#declare camera_elevation=25;
#declare camera_bearing=-35;
#declare camera_dist=6;
#declare camera_ratio=1/2;
camera {
    perspective
    direction -x
    right y*camera_ratio
    up z*camera_ratio
    location camera_dist*x
    rotate -camera_elevation*y  
    rotate camera_bearing*z
    translate <1,0,1>
}