Сурат:Hepteract ortho petrie.svg

Содержимое страницы недоступно на других языках.
Хаварду Википедия

Дайдихьулийсса сурат ‎(SVG-файл, ялтура 800 × 800 пиксельду, дуцаву файлдул: 29 Кб)

Ва сурат на Викискладе бучӀиссар зузи дан цамур ишрай. Мунияту чӀапӀи шикку буккин бучӀиссар.

КутӀасса бусала

Сурат даву
English: Orthographic projection of hepteract making the petrie polygon
Кьини
Ляхъаву Цала даву
Дурма Claudio Rocchini

Source code

void main()
{
     const int ND = 7; const int NV = (1<<ND); const int NE = 448;
     double v[NV][ND]; int e[NE][2];
	double PX[ND] = {
	 0.09903113209758096500,
     0.27747906604368522000,
     0.40096886790241926000,
     0.44504186791262867000,
     0.40096886790241915000,
     0.27747906604368555000,
     0.09903113209758096500};
	double PY[ND] = {
    
    -0.43388373911755806000,
    -0.34794774335047168000,
    -0.19309642971379370000,
    -0.00000000000000011102,
     0.19309642971379370000,
     0.34794774335047168000,
     0.43388373911755823000};
	double px[NV]; double py[NV];

	int i,j,k,l;

	for(i=0;i<NV;++i) for(j=0;j<ND;++j) v[i][j] = (i>>j)&1 ? -0.5 : 0.5;

	l = 0;
	for(i=0;i<NV-1;++i) for(j=i+1;j<NV;++j) {
		double d = 0;
		for(k=0;k<ND;++k) d += (v[i][k]-v[j][k])*(v[i][k]-v[j][k]);
		d = sqrt(d);
		if(d==1) { e[l][0]=i; e[l][1]=j; ++l;}
	}
	assert(l==NE);
	for(i=0;i<NV;++i){
		px[i] = 0; for(l=0;l<ND;++l) px[i] += v[i][l]*PX[l];
		py[i] = 0; for(l=0;l<ND;++l) py[i] += v[i][l]*PY[l];
	}
	
	const double SX = 800; const double SY = 800;
	const double B  = 32;  const double R  = 5;
	
	const double sca  = std::min((SX-2*B)/2,(SY-2*B)/2);
	for(i=0;i<NV;++i) { px[i] = B+(px[i]+1)*sca; py[i] = B+(py[i]+1)*sca; }

	FILE * fp = fopen("c:\\temp\\HepteractPetrie.svg","w");
	fprintf(fp,
		"<?xml version=\"1.0\" encoding=\"UTF-8\" standalone=\"no\"?>\n"
		"<svg\n"
		"xmlns:svg=\"http://www.w3.org/2000/svg\"\n"
		"xmlns=\"http://www.w3.org/2000/svg\"\n"
		"version=\"1.0\"\n"
		"width=\"%g\"\n" "height=\"%g\"\n"
		"id=\"HepteractPetrie\">\n"
		,SX,SY
	);
	fprintf(fp,"<g style=\"stroke:#000000;stroke-width:2;stroke-opacity:0.75;\">\n");
	for(i=0;i<NE;++i)
		fprintf(fp,
			"<line x1=\"%5.1lf\" y1=\"%5.1lf\" x2=\"%5.1lf\" y2=\"%5.1lf\"/>\n"
			,px[e[i][0]],py[e[i][0]], px[e[i][1]],py[e[i][1]]
		);
	fprintf(fp,"</g>\n");
	fprintf(fp,"<g style=\"stroke:#000000;stroke-width:2;stroke-opacity:0.75;fill:#0080FF\">\n");
	for(i=0;i<NV;++i)
		fprintf(fp,"<circle cx=\"%5.1lf\" cy=\"%5.1lf\" r=\"%5.1lf\"/>\n",px[i],py[i],R);
	fprintf(fp,"</g>\n");
	fprintf(fp,"</svg>\n");
	fclose(fp);

Лицензия бушиву

Я, владелец авторских прав на это произведение, добровольно публикую его на условиях следующих лицензий:
GNU head БучӀиссар дан, бачӀин ягу даххана дан ва документ ве шартӀе GNU Free Documentation License версиярду 1.2 ягу хъиннура чӀалну, чирчусса Фонд аьзадса программмныйрул аьркимшаврил, кьа даххана хьусса разделдашал, махъру бакасса бивхьусса цалчинмунийба махъмуний мужаллалий. Лицензиялул копия хӀала бунну бувсар разделлубун, цӀа дирхьусса GNU Free Documentation License.
w:ru:Creative Commons
атрибуция
Этот файл доступен по лицензии Creative Commons Attribution 3.0 Unported
БучӀиссар тархъанну:
  • дачӀин дан ва даву – тикрал, гьарта ягу тапшур дан ва даву
  • хӀала дан – ххишалану дан ва даву
Чара бакъа вай низамрув дуруччин аьркинни:
  • атрибуция – Дурминнул амру дан аьркинни, лицензия амру дан аьркинни барангу дуллуну, агар дурма ци дунугу даххана дуну уххурча амру дан аьркинни. Му дан бучӀиссар дан ччимур куццай, амма цайми инстантал аьйкьин къауллай лицензиат вищал чӀарав авцӀун кунма.
БучӀиссар вин бувчӀин ччимур лицензия.

Краткие подписи

Добавьте однострочное описание того, что собой представляет этот файл

Элементы, изображённые на этом файле

изображённый объект русский

создатель русский

У этого свойства есть некоторое значение без элемента в

URL русский: https://commons.wikimedia.org/wiki/user:Rocchini
логин в проектах Викимедиа русский: Rocchini
имя автора (строка) русский: Claudio Rocchini

лицензия русский

CC BY 3.0 русский

GNU Free Documentation License, version 1.2 or later английский

Суратданул тарих

Бас ба кьини/чӀун хьхьичӀсса сурат ккаккан.

Кьини/чӀунЧӀивисса эбратКуцруГьуртту хьумаХӀучча
хӀакьинусса13:13, 1 августрай 2008ЧӀивисса эбрат 13:13, 1 августрай 2008800 × 800 (29 Кб)Rocchini{{Information |Description={{en|1=Orthographic projection of hepteract making the petrie polygon}} |Source=Opera creata dall'uploader (own work by uploader) |Author=Claudio Rocchini |Date=2008-08-01 |Permission= |other_versions= }} {{Im

Хъирив нанисса 1 чӀапӀи ишла дай ва сурат:

Щаллагу дунияллул суратрая мюнпат ласаву

Ва файл ишла дайсар вай викирдал:

Байбихьу — https://lbe.wikipedia.org/wiki/Сурат:Hepteract_ortho_petrie.svg