File:Togliatti surface.png

原始文件(800 × 800像素,文件大小:163 KB,MIME类型:image/png


摘要

描述
English: Togliatti Surface with w=1, bounded by a sphere with radius=6
来源 自己的作品
作者 Claudio Rocchini
授权
(二次使用本文件)
cc-by-3.0

Source Code

Many thanks to POV-Ray. This is the source code:

#include "colors.inc"
#include "stdinc.inc"

background { Blue }

camera {
   location <0,-12,6>
   up z 
   right x
   look_at <0,0,0>
}   
                      
light_source {<120,0,120> rgb <1.0, 1.0, 1.0>}
light_source {<-120,-120,0> rgb <0.8, 1.0, 1.0>*0.5}

#declare my_texture = texture {
   pigment { rgb <0.8,0.8,1> }
   finish {    
      phong 0.5
      phong_size 10
   }
}
      
#declare w = 1;      
#declare  T = function { 64*(x-w)*( pow(x,4) -4*pow(x,3)*w -10*x*x*y*y -4*x*x*w*w +16*x*pow(w,3)
   -20*x*y*y*w+ 5*pow(y,4) +16*pow(w,4) -20*y*y*w*w) -5*sqrt(5-sqrt(5))*(2*z-sqrt(5-sqrt(5))*w) *
    pow(4*(x*x+y*y-z*z)+(1+3*sqrt(5))*w*w,2) }

isosurface {
  function { T(x,y,z) }
  threshold 0
  accuracy 0.0001
  max_gradient 2000000
  open
  contained_by {sphere {<0,0,0>,6}}
  texture{ my_texture }
}

许可协议

我,本作品著作权人,特此采用以下许可协议发表本作品:
w:zh:知识共享
署名 相同方式共享
您可以自由地:
  • 共享 – 复制、发行并传播本作品
  • 修改 – 改编作品
惟须遵守下列条件:
  • 署名 – 您必须对作品进行署名,提供授权条款的链接,并说明是否对原始内容进行了更改。您可以用任何合理的方式来署名,但不得以任何方式表明许可人认可您或您的使用。
  • 相同方式共享 – 如果您再混合、转换或者基于本作品进行创作,您必须以与原先许可协议相同或相兼容的许可协议分发您贡献的作品。
GNU head 已授权您依据自由软件基金会发行的无固定段落及封面封底文字(Invariant Sections, Front-Cover Texts, and Back-Cover Texts)的GNU自由文件许可协议1.2版或任意后续版本的条款,复制、传播和/或修改本文件。该协议的副本请见“GNU Free Documentation License”。
您可以选择您需要的许可协议。

说明

添加一行文字以描述该文件所表现的内容
Togliatti Surface

此文件中描述的项目

描繪內容

文件历史

点击某个日期/时间查看对应时刻的文件。

日期/时间缩⁠略⁠图大小用户备注
当前2010年7月1日 (四) 09:152010年7月1日 (四) 09:15版本的缩略图800 × 800(163 KB)Rocchini{{Information |Description={{en|1=Togliatti Surface with w=1, bounded by a sphere with radius=6}} |Source={{own}} |Author=Claudio Rocchini |Date= |Permission=cc-by-3.0 |other_versions= }}

以下页面使用本文件:

全域文件用途