Select Git revision
BasisGenerator.h
Forked from
gmsh / gmsh
Source project has a limited visibility.
periodical.cpp 40.52 KiB
// Gmsh - Copyright (C) 1997-2014 C. Geuzaine, J.-F. Remacle
//
// See the LICENSE.txt file for license information. Please report all
// bugs and problems to the public mailing list <gmsh@geuz.org>.
//
// Contributor(s):
// Tristan Carrier Maxime Melchior
#include "periodical.h"
#include "GModel.h"
#include "meshGRegion.h"
#include <fstream>
#include <algorithm>
#include "MElement.h"
#if defined(HAVE_VORO3D)
#include "voro++.hh"
#endif
#if defined(HAVE_VORO3D)
using namespace voro;
#endif
/*********definitions*********/
class geo_cell{
public:
std::vector<std::pair<int,int> > lines;
std::vector<std::vector<int> > line_loops;
std::vector<std::vector<int> > orientations;
std::vector<int> points2;
std::vector<int> lines2;
std::vector<int> line_loops2;
std::vector<int> faces2;
int face_loops2;
geo_cell();
~geo_cell();
int search_line(std::pair<int,int>);
};
/*********class geo_cell*********/
geo_cell::geo_cell(){}
geo_cell::~geo_cell(){}
int geo_cell::search_line(std::pair<int,int> line){
unsigned int i;
for(i=0;i<lines.size();i++){
if(lines[i].first==line.first && lines[i].second==line.second) return i;
if(lines[i].first==line.second && lines[i].second==line.first) return i;
}
return -1;
}
/*********class voroMetal3D*********/
voroMetal3D::voroMetal3D(){}
voroMetal3D::~voroMetal3D(){}
void voroMetal3D::execute(double h){
GRegion* gr;
GModel* model = GModel::current();
GModel::riter it;
for(it=model->firstRegion();it!=model->lastRegion();it++)
{
gr = *it;
if(gr->getNumMeshElements()>0){
execute(gr,h);
}
}
}
void voroMetal3D::execute(GRegion* gr,double h){
unsigned int i;
int j;
MElement* element;
MVertex* vertex;
std::vector<SPoint3> vertices2;
std::vector<double> radii;
std::set<MVertex*> vertices;
std::set<MVertex*>::iterator it;
vertices2.clear();
radii.clear();
vertices.clear();
for(i=0;i<gr->getNumMeshElements();i++){
element = gr->getMeshElement(i);
for(j=0;j<element->getNumVertices();j++){
vertex = element->getVertex(j);
vertices.insert(vertex);
}
}
for(it=vertices.begin();it!=vertices.end();it++){
vertices2.push_back(SPoint3((*it)->x(),(*it)->y(),(*it)->z()));
radii.push_back(1.0);
}
double xMax = 1.0;
double yMax = 1.0;
double zMax = 1.0;
execute(vertices2,radii,0,h,xMax,yMax,zMax);
}
void voroMetal3D::execute(std::vector<double>& properties,int radical,double h, double xMax, double yMax, double zMax){
unsigned int i;
std::vector<SPoint3> vertices;
std::vector<double> radii;
vertices.clear();
radii.clear();
for(i=0;i<properties.size()/4;i++){
vertices.push_back(SPoint3(properties[4*i],properties[4*i+1],properties[4*i+2]));
radii.push_back(properties[4*i+3]);
}
execute(vertices,radii,radical,h,xMax,yMax,zMax);
}
void voroMetal3D::execute(std::vector<SPoint3>& vertices,std::vector<double>& radii,int radical,double h, double xMax, double yMax, double zMax){
#if defined(HAVE_VORO3D)
unsigned int i;
unsigned int j;
unsigned int k;
int start;
unsigned int end;
int index1;
int index2;
int val;
int face_number; int last;
int mem;
int number;
double x,y,z;
double x1,y1,z1;
double x2,y2,z2;
double delta;
double min_x,max_x;
double min_y,max_y;
double min_z,max_z;
double min_area;
voronoicell_neighbor* pointer;
voronoicell_neighbor cell;
std::vector<int> faces;
std::vector<double> voronoi_vertices;
std::vector<voronoicell_neighbor*> pointers;
std::vector<SPoint3> generators;
std::vector<int> temp;
std::vector<int> temp2;
std::vector<double> areas;
std::map<int,int> table;
geo_cell obj;
min_x = 1000000000.0;
max_x = -1000000000.0;
min_y = 1000000000.0;
max_y = -1000000000.0;
min_z = 1000000000.0;
max_z = -1000000000.0;
for(i=0;i<vertices.size();i++){
min_x = std::min(vertices[i].x(),min_x);
max_x = std::max(vertices[i].x(),max_x);
min_y = std::min(vertices[i].y(),min_y);
max_y = std::max(vertices[i].y(),max_y);
min_z = std::min(vertices[i].z(),min_z);
max_z = std::max(vertices[i].z(),max_z);
}
delta = 0.2*(max_x - min_x);
min_x=min_y=min_z = 0;
// max_x=max_y=max_z = 1;
max_x = xMax;
max_y = yMax;
max_z = zMax;
delta = 0;
container contA(min_x-delta,max_x+delta,min_y-delta,max_y+delta,min_z-delta,max_z+delta,6,6,6,true,true,true,vertices.size());
//container contA(min_x-delta,max_x+delta,min_y-delta,max_y+delta,min_z-delta,max_z+delta,6,6,6,false,false,false,vertices.size());
container_poly contB(min_x-delta,max_x+delta,min_y-delta,max_y+delta,min_z-delta,max_z+delta,6,6,6,true,true,true,vertices.size());
// wall_cylinder cyl(.5,.5,-3,0,0,6,.4);
// contA.add_wall(cyl);
for(i=0;i<vertices.size();i++){
if(radical==0){
contA.put(i,vertices[i].x(),vertices[i].y(),vertices[i].z());
}
else{
contB.put(i,vertices[i].x(),vertices[i].y(),vertices[i].z(),radii[i]);
}
}
number = 0;
c_loop_all loopA(contA);
c_loop_all loopB(contB);
if(radical==0){
loopA.start(); do{
contA.compute_cell(cell,loopA);
loopA.pos(x,y,z);
pointer = new voronoicell_neighbor();
*pointer = cell;
pointers.push_back(pointer);
generators.push_back(SPoint3(x,y,z));
printf("%d %d (%f,%f,%f)\n",loopA.pid()+1,number+1,x,y,z);
table.insert(std::pair<int,int>(loopA.pid(),number));
number++;
}while(loopA.inc());
}
else{
loopB.start();
do{
contB.compute_cell(cell,loopB);
loopB.pos(x,y,z);
pointer = new voronoicell_neighbor();
*pointer = cell;
pointers.push_back(pointer);
generators.push_back(SPoint3(x,y,z));
printf("%d %d (%f,%f,%f)\n",loopB.pid()+1,number+1,x,y,z);
table.insert(std::pair<int,int>(loopB.pid(),number));
number++;
}while(loopB.inc());
}
std::ofstream file6("table.txt");
for(i=0;i<vertices.size();i++){
file6 << i+1 << " " << table[i]+1 << "\n";
}
initialize_counter();
min_area = 1000000000.0;
for(i=0;i<pointers.size();i++){
areas.clear();
pointers[i]->face_areas(areas);
for(j=0;j<areas.size();j++){
if(areas[j]<min_area){
min_area = areas[j];
}
}
}
printf("\nSquared root of smallest face area : %.9f\n\n",sqrt(min_area));
std::ofstream file("MicrostructurePolycrystal3D.pos");
file << "View \"test\" {\n";
std::ofstream file2("MicrostructurePolycrystal3D.geo");
std::ofstream file5("SET.map");
file2 << "c=" << h << ";\n";
int countPeriodSurf=0;
int countVolume=0;
for(i=0;i<pointers.size();i++){
obj = geo_cell();
faces.clear();
voronoi_vertices.clear();
pointers[i]->face_vertices(faces);
pointers[i]->vertices(generators[i].x(),generators[i].y(),generators[i].z(),voronoi_vertices);
obj.line_loops.resize(pointers[i]->number_of_faces());
obj.orientations.resize(pointers[i]->number_of_faces());
face_number = 0;
end = 0;
while(end<faces.size()){
start = end + 1;
end = start + faces[end];
for(j=start;j<end;j++){
if(j<end-1){
index1 = faces[j];
index2 = faces[j+1];
}
else{
index1 = faces[end-1];
index2 = faces[start];
}
x1 = voronoi_vertices[3*index1];
y1 = voronoi_vertices[3*index1+1];
z1 = voronoi_vertices[3*index1+2];
x2 = voronoi_vertices[3*index2];
y2 = voronoi_vertices[3*index2+1];
z2 = voronoi_vertices[3*index2+2];
print_segment(SPoint3(x1,y1,z1),SPoint3(x2,y2,z2),file);
val = obj.search_line(std::pair<int,int>(index1,index2));
if(val==-1){
obj.lines.push_back(std::pair<int,int>(index1,index2));
obj.line_loops[face_number].push_back(obj.lines.size()-1);
val = obj.lines.size()-1;
}
else{
obj.line_loops[face_number].push_back(val);
}
last = obj.line_loops[face_number].size()-1;
if(last==0){
obj.orientations[face_number].push_back(0);
}
else if(obj.lines[obj.line_loops[face_number][last-1]].second==obj.lines[val].first){
obj.orientations[face_number][last-1] = 0;
obj.orientations[face_number].push_back(0);
}
else if(obj.lines[obj.line_loops[face_number][last-1]].first==obj.lines[val].first){
obj.orientations[face_number][last-1] = 1;
obj.orientations[face_number].push_back(0);
}
else if(obj.lines[obj.line_loops[face_number][last-1]].second==obj.lines[val].second){
obj.orientations[face_number][last-1] = 0;
obj.orientations[face_number].push_back(1);
}
else{
obj.orientations[face_number][last-1] = 1;
obj.orientations[face_number].push_back(1);
}
}
face_number++;
}
for(j=0;j<voronoi_vertices.size()/3;j++){
print_geo_point(get_counter(),voronoi_vertices[3*j],voronoi_vertices[3*j+1],voronoi_vertices[3*j+2],file2);
obj.points2.push_back(get_counter());
increase_counter();
}
for(j=0;j<obj.lines.size();j++){
print_geo_line(get_counter(),obj.points2[obj.lines[j].first],obj.points2[obj.lines[j].second],file2);
obj.lines2.push_back(get_counter());
increase_counter();
}
for(j=0;j<obj.line_loops.size();j++){ temp.clear();
temp2.clear();
for(k=0;k<obj.line_loops[j].size();k++){
temp.push_back(obj.lines2[obj.line_loops[j][k]]);
temp2.push_back(obj.orientations[j][k]);
}
print_geo_line_loop(get_counter(),temp,temp2,file2);
obj.line_loops2.push_back(get_counter());
increase_counter();
}
for(j=0;j<obj.line_loops2.size();j++){
print_geo_face(get_counter(),obj.line_loops2[j],file2);
countPeriodSurf++;
file5 <<get_counter()<< "\t" <<"SURFACE"<<get_counter()<<"\t"<<"NSET\n";
obj.faces2.push_back(get_counter());
increase_counter();
}
print_geo_face_loop(get_counter(),obj.faces2,file2);
obj.face_loops2 = get_counter();
increase_counter();
print_geo_volume(get_counter(),obj.face_loops2,file2);
mem = get_counter();
countVolume++;
file5 <<get_counter()<< "\t" <<"GRAIN"<<countVolume<<"\t"<<"ELSET\n";
increase_counter();
print_geo_physical_volume(get_counter(),mem,file2);
increase_counter();
}
file2 << "Coherence;\n";
file << "};\n";
for(i=0;i<pointers.size();i++) delete pointers[i];
#endif
}
void voroMetal3D::print_segment(SPoint3 p1,SPoint3 p2,std::ofstream& file){
file << "SL ("
<< p1.x() << ", " << p1.y() << ", " << p1.z() << ", "
<< p2.x() << ", " << p2.y() << ", " << p2.z()
<< "){10, 20};\n";
}
void voroMetal3D::initialize_counter(){
counter = 12;
}
void voroMetal3D::increase_counter(){
counter = counter+1;
}
int voroMetal3D::get_counter(){
return counter;
}
void voroMetal3D::print_geo_point(int index,double x,double y,double z,std::ofstream& file){
file << "Point(" << index << ")={"
<< x << "," << y << "," << z
<< ",c};\n";
}
void voroMetal3D::print_geo_line(int index1,int index2,int index3,std::ofstream& file){
file << "Line(" << index1 << ")={"
<< index2 << "," << index3
<< "};\n";
}
void voroMetal3D::print_geo_face(int index1,int index2,std::ofstream& file){
file << "Plane Surface(" << index1 << ")={"
<< index2
<< "};\n";
}
void voroMetal3D::print_geo_physical_face(int index1,int index2,std::ofstream& file){
file << "Physical Surface(" << index1 << ")={"
<< index2
<< "};\n";
}
void voroMetal3D::print_geo_volume(int index1,int index2,std::ofstream& file){
file << "Volume(" << index1 << ")={"
<< index2
<< "};\n";
}
void voroMetal3D::print_geo_physical_volume(int index1,int index2,std::ofstream& file){
file << "Physical Volume(" << index1 << ")={"
<< index2
<< "};\n";
}
void voroMetal3D::print_geo_line_loop(int index,std::vector<int>& indices,std::vector<int>& orientations,std::ofstream& file){
unsigned int i;
file << "Line Loop(" << index << ")={";
for(i=0;i<indices.size();i++){
if(orientations[i]==1) file << "-";
file << indices[i];
if(i<indices.size()-1) file << ",";
}
file << "};\n";
}
void voroMetal3D::print_geo_face_loop(int index,std::vector<int>& indices,std::ofstream& file){
unsigned int i;
file << "Surface Loop(" << index << ")={";
for(i=0;i<indices.size();i++){
file << indices[i];
if(i<indices.size()-1) file << ",";
}
file << "};\n";
}
void voroMetal3D::correspondance(double e, double xMax, double yMax, double zMax){
unsigned int i;
unsigned int j;
int count;
int val;
//int normal;
int phase;
bool flag;
bool flag1;
bool flag2;
bool flag3;
bool flag4;
double x,y,z;
double delta_x;
double delta_y;
double delta_z;
SPoint3 p1;
SPoint3 p2;
GFace* gf; GFace* gf1;
GFace* gf2;
GVertex* v1;
GVertex* v2;
GVertex* v3;
GVertex* v4;
GModel* model = GModel::current();
GModel::fiter it;
std::vector<GFace*> faces;
std::vector<std::pair<GFace*,GFace*> > pairs;
std::vector<int> categories;
std::vector<int> indices1;
std::vector<int> indices2;
std::vector<int> indices3;
std::list<GVertex*> vertices;
std::list<GEdge*> edges1;
std::list<GEdge*> edges2;
std::list<int> orientations1;
std::list<int> orientations2;
std::map<GFace*,SPoint3> centers;
std::map<GFace*,bool> markings;
std::list<GVertex*>::iterator it2;
std::map<GFace*,SPoint3>::iterator it3;
std::map<GFace*,SPoint3>::iterator it4;
std::map<GFace*,bool>::iterator it5;
std::map<GFace*,bool>::iterator it6;
std::list<GEdge*>::iterator it7;
std::list<GEdge*>::iterator it8;
std::list<int>::iterator it9;
std::list<int>::iterator it10;
std::list<GEdge*>::iterator mem;
faces.clear();
for(it=model->firstFace();it!=model->lastFace();it++)
{
gf = *it;
if(gf->numRegions()==1){
faces.push_back(gf);
}
}
centers.clear();
markings.clear();
pairs.clear();
categories.clear();
for(i=0;i<faces.size();i++){
x = 0.0;
y = 0.0;
z = 0.0;
vertices.clear();
vertices = faces[i]->vertices();
for(it2=vertices.begin();it2!=vertices.end();it2++){
x = x + (*it2)->x();
y = y + (*it2)->y();
z = z + (*it2)->z();
}
x = x/vertices.size();
y = y/vertices.size();
z = z/vertices.size();
centers.insert(std::pair<GFace*,SPoint3>(faces[i],SPoint3(x,y,z)));
}
for(i=0;i<faces.size();i++){ markings.insert(std::pair<GFace*,bool>(faces[i],false));
}
count = 0;
std::ofstream file("MicrostructurePolycrystal3D.pos");
file << "View \"test\" {\n";
std::ofstream file2("PERIODIC.map");
for(i=0;i<faces.size();i++){
for(j=0;j<faces.size();j++){
it3 = centers.find(faces[i]);
it4 = centers.find(faces[j]);
p1 = it3->second;
p2 = it4->second;
delta_x = fabs(p2.x()-p1.x());
delta_y = fabs(p2.y()-p1.y());
delta_z = fabs(p2.z()-p1.z());
flag = correspondance(delta_x,delta_y,delta_z,e,val,xMax,yMax,zMax);
if(flag){
it5 = markings.find(faces[i]);
it6 = markings.find(faces[j]);
if(it5->second==0 && it6->second==0){
it5->second = 1;
it6->second = 1;
pairs.push_back(std::pair<GFace*,GFace*>(faces[i],faces[j]));
categories.push_back(val);
print_segment(p1,p2,file);
//file2 << "PERIODIC\tSURFACE"<<faces[i]->tag() << "\tSURFACE" << faces[j]->tag() << "\t" << p2.x()-p1.x() << "\t" << p2.y()-p1.y() << "\t" << p2.z()-p1.z() << "\n";
if (abs((p2.x()-p1.x()-1.0))<0.0001){
if (abs((p2.y()-p1.y()))<0.0001){
if (abs((p2.z()-p1.z()))<0.0001){
file2 << "NSET\tFRONT = FRONT + SURFACE"<<faces[j]->tag()<<"\n";
file2 << "NSET\tBACK = BACK + SURFACE"<<faces[i]->tag()<<"\n";
}else if(abs((p2.z()-p1.z()-1.0))<0.0001){
file2 << "NSET\tFRONTTOP = FRONTTOP + SURFACE"<<faces[j]->tag()<<"\n";
file2 << "NSET\tBACKBOTTOM = BACKBOTTOM + SURFACE"<<faces[i]->tag()<<"\n";
}else if (abs((p1.z()-p2.z()-1.0))<0.0001){
file2 << "NSET\tFRONTBOTTOM = FRONTBOTTOM + SURFACE"<<faces[j]->tag()<<"\n";
file2 << "NSET\tBACKTOP = BACKTOP + SURFACE"<<faces[i]->tag()<<"\n";
}
}else if (abs((p2.y()-p1.y()-1.0))<0.0001){
if (abs((p2.z()-p1.z()))<0.0001){
file2 << "NSET\tFRONTRIGHT = FRONTRIGHT + SURFACE"<<faces[j]->tag()<<"\n";
file2 << "NSET\tBACKLEFT = BACKLEFT + SURFACE"<<faces[i]->tag()<<"\n";
}else if (abs((p2.z()-p1.z()-1.0))<0.0001){
file2 << "NSET\tFRONTRIGHTTOP = FRONTRIGHTTOP + SURFACE"<<faces[j]->tag()<<"\n";
file2 << "NSET\tBACKLEFTBOTTOM = BACKLEFTBOTTOM + SURFACE"<<faces[i]->tag()<<"\n";
}else if (abs((p1.z()-p2.z()-1.0))<0.0001){
file2 << "NSET\tFRONTRIGHTBOTTOM = FRONTRIGHTBOTTOM + SURFACE"<<faces[j]->tag()<<"\n";
file2 << "NSET\tBACKLEFTTOP = BACKLEFTTOP + SURFACE"<<faces[i]->tag()<<"\n";
}
}else if (abs((p1.y()-p2.y()-1.0))<0.0001){
if (abs((p2.z()-p1.z()))<0.0001){
file2 << "NSET\tFRONTLEFT = FRONTLEFT + SURFACE"<<faces[j]->tag()<<"\n";
file2 << "NSET\tBACKRIGHT = BACKRIGHT + SURFACE"<<faces[i]->tag()<<"\n";
}else if (abs((p2.z()-p1.z()-1.0))<0.0001){
file2 << "NSET\tFRONTLEFTTOP = FRONTLEFTTOP + SURFACE"<<faces[j]->tag()<<"\n";
file2 << "NSET\tBACKRIGHTBOTTOM = BACKRIGHTBOTTOM + SURFACE"<<faces[i]->tag()<<"\n";
}else if (abs((p1.z()-p2.z()-1.0))<0.0001){
file2 << "NSET\tFRONTLEFTBOTTOM = FRONTLEFTBOTTOM + SURFACE"<<faces[j]->tag()<<"\n"; file2 << "NSET\tBACKRIGHTTOP = BACKRIGHTTOP + SURFACE"<<faces[i]->tag()<<"\n";
}
}
}else if (abs((p1.x()-p2.x()-1.0))<0.0001){
if (abs((p2.y()-p1.y()))<0.0001){
if (abs((p2.z()-p1.z()))<0.0001){
file2 << "NSET\tFRONT = FRONT + SURFACE"<<faces[i]->tag()<<"\n";
file2 << "NSET\tBACK = BACK + SURFACE"<<faces[j]->tag()<<"\n";
}else if(abs((p2.z()-p1.z()-1.0))<0.0001){
file2 << "NSET\tFRONTBOTTOM = FRONTBOTTOM + SURFACE"<<faces[i]->tag()<<"\n";
file2 << "NSET\tBACKTOP = BACKTOP + SURFACE"<<faces[j]->tag()<<"\n";
}else if (abs((p1.z()-p2.z()-1.0))<0.0001){
file2 << "NSET\tFRONTTOP = FRONTTOP + SURFACE"<<faces[i]->tag()<<"\n";
file2 << "NSET\tBACKBOTTOM = BACKBOTTOM + SURFACE"<<faces[j]->tag()<<"\n";
}
}else if (abs((p2.y()-p1.y()-1.0))<0.0001){
if (abs((p2.z()-p1.z()))<0.0001){
file2 << "NSET\tFRONTLEFT = FRONTLEFT + SURFACE"<<faces[i]->tag()<<"\n";
file2 << "NSET\tBACKRIGHT = BACKRIGHT + SURFACE"<<faces[j]->tag()<<"\n";
}else if (abs((p2.z()-p1.z()-1.0))<0.0001){
file2 << "NSET\tFRONTLEFTBOTTOM = FRONTLEFTBOTTOM + SURFACE"<<faces[i]->tag()<<"\n";
file2 << "NSET\tBACKRIGHTTOP = BACKRIGHTTOP + SURFACE"<<faces[j]->tag()<<"\n";
}else if (abs((p1.z()-p2.z()-1.0))<0.0001){
file2 << "NSET\tFRONTLEFTTOP = FRONTLEFTTOP + SURFACE"<<faces[i]->tag()<<"\n";
file2 << "NSET\tBACKRIGHTBOTTOM = BACKRIGHTBOTTOM + SURFACE"<<faces[j]->tag()<<"\n";
}
}else if (abs((p1.y()-p2.y()-1.0))<0.0001){
if (abs((p2.z()-p1.z()))<0.0001){
file2 << "NSET\tFRONTRIGHT = FRONTRIGHT + SURFACE"<<faces[i]->tag()<<"\n";
file2 << "NSET\tBACKLEFT = BACKLEFT + SURFACE"<<faces[j]->tag()<<"\n";
}else if (abs((p2.z()-p1.z()-1.0))<0.0001){
file2 << "NSET\tFRONTRIGHTBOTTOM = FRONTRIGHTBOTTOM + SURFACE"<<faces[i]->tag()<<"\n";
file2 << "NSET\tBACKLEFTTOP = BACKLEFTTOP + SURFACE"<<faces[j]->tag()<<"\n";
}else if (abs((p1.z()-p2.z()-1.0))<0.0001){
file2 << "NSET\tFRONTRIGHTTOP = FRONTRIGHTTOP + SURFACE"<<faces[i]->tag()<<"\n";
file2 << "NSET\tBACKLEFTBOTTOM = BACKLEFTBOTTOM + SURFACE"<<faces[j]->tag()<<"\n";
}
}
}else if (abs((p1.x()-p2.x()))<0.0001){
if (abs((p2.y()-p1.y()-1.0))<0.0001){
if (abs((p2.z()-p1.z()))<0.0001){
file2 << "NSET\tRIGHT = RIGHT + SURFACE"<<faces[j]->tag()<<"\n";
file2 << "NSET\tLEFT = LEFT + SURFACE"<<faces[i]->tag()<<"\n";
}else if (abs((p2.z()-p1.z()-1.0))<0.0001){
file2 << "NSET\tRIGHTTOP = RIGHTTOP + SURFACE"<<faces[j]->tag()<<"\n";
file2 << "NSET\tLEFTBOTTOM = LEFTBOTTOM + SURFACE"<<faces[i]->tag()<<"\n";
}else if (abs((p1.z()-p2.z()-1.0))<0.0001){
file2 << "NSET\tRIGHTBOTTOM = RIGHTBOTTOM + SURFACE"<<faces[j]->tag()<<"\n";
file2 << "NSET\tLEFTTOP = LEFTTOP + SURFACE"<<faces[i]->tag()<<"\n";
}
}else if (abs((p1.y()-p2.y()-1.0))<0.0001){
if (abs((p2.z()-p1.z()))<0.0001){
file2 << "NSET\tRIGHT = RIGHT + SURFACE"<<faces[i]->tag()<<"\n";
file2 << "NSET\tLEFT = LEFT + SURFACE"<<faces[j]->tag()<<"\n";
}else if (abs((p2.z()-p1.z()-1.0))<0.0001){
file2 << "NSET\tRIGHTBOTTOM = RIGHTBOTTOM + SURFACE"<<faces[i]->tag()<<"\n";
file2 << "NSET\tLEFTTOP = LEFTTOP + SURFACE"<<faces[j]->tag()<<"\n";
}else if (abs((p1.z()-p2.z()-1.0))<0.0001){
file2 << "NSET\tRIGHTTOP = RIGHTTOP + SURFACE"<<faces[i]->tag()<<"\n";
file2 << "NSET\tLEFTBOTTOM = LEFTBOTTOM + SURFACE"<<faces[j]->tag()<<"\n";
}
}else if (abs((p1.y()-p2.y()))<0.0001){
if (abs((p2.z()-p1.z()-1.0))<0.0001){
file2 << "NSET\tTOP = TOP + SURFACE"<<faces[j]->tag()<<"\n";
file2 << "NSET\tBOTTOM = BOTTOM + SURFACE"<<faces[i]->tag()<<"\n";
}else if (abs((p1.z()-p2.z()-1.0))<0.0001){
file2 << "NSET\tTOP = TOP + SURFACE"<<faces[i]->tag()<<"\n";
file2 << "NSET\tBOTTOM = BOTTOM + SURFACE"<<faces[j]->tag()<<"\n";
}
} }
count++;
}
}
}
}
file << "};\n";
printf("\nNumber of exterior face periodicities : %d\n",2*count);
printf("Total number of exterior faces : %zu\n\n",faces.size());
std::ofstream file3;
file3.open("MicrostructurePolycrystal3D.geo",std::ios::out | std::ios::app);
std::ofstream file4("MicrostructurePolycrystal3D2.pos");
file4 << "View \"test\" {\n";
file3 << "Physical Surface(11)={";
count = 0;
for(it=model->firstFace();it!=model->lastFace();it++)
{
gf = *it;
if(count>0) file3 << ",";
file3 << gf->tag();
count++;
}
file3 << "};\n";
for(i=0;i<pairs.size();i++){
gf1 = pairs[i].first;
gf2 = pairs[i].second;
edges1 = gf1->edges();
edges2 = gf2->edges();
orientations1 = gf1->edgeOrientations();
orientations2 = gf2->edgeOrientations();
indices1.clear();
indices2.clear();
indices3.clear();
phase = 1;
//normal = 0;
it9 = orientations1.begin();
it10 = orientations2.begin();
for(it8=edges2.begin();it8!=edges2.end();it8++,it10++){
if (*it10==1)
indices3.push_back((*it8)->tag());
else
indices3.push_back(-(*it8)->tag());
}
int countReverseEdge=0;
for(it7=edges1.begin();it7!=edges1.end();it7++,it9++){
v1 = (*it7)->getBeginVertex();
v2 = (*it7)->getEndVertex();
if (*it9==1)
indices1.push_back((*it7)->tag());
else
indices1.push_back(-(*it7)->tag());
flag1 = 0;
flag2 = 0;
flag3 = 0;
flag4 = 0;
it10 = orientations2.begin();
for(it8=edges2.begin();it8!=edges2.end();it8++,it10++){
v3 = (*it8)->getBeginVertex();
v4 = (*it8)->getEndVertex();
correspondance(fabs(v3->x()-v1->x()),fabs(v3->y()-v1->y()),fabs(v3->z()-v1->z()),e,categories[i],flag1,xMax,yMax,zMax);
correspondance(fabs(v4->x()-v2->x()),fabs(v4->y()-v2->y()),fabs(v4->z()-v2->z()),e,categories[i],flag2,xMax,yMax,zMax);
correspondance(fabs(v4->x()-v1->x()),fabs(v4->y()-v1->y()),fabs(v4->z()-v1->z()),e,categories[i],flag3,xMax,yMax,zMax);
correspondance(fabs(v3->x()-v2->x()),fabs(v3->y()-v2->y()),fabs(v3->z()-v2->z()),e,categories[i],flag4,xMax,yMax,zMax);
if(flag1 && flag2){
if(phase==1){
mem = it8;
phase = 2;
}
else if(phase==2){
mem++;
/*if(it8==mem){
normal = 1;
}
else{
normal = -1;
}*/
phase = 3;
}
if (*it9==1)
indices2.push_back((*it8)->tag());
else
indices2.push_back(-(*it8)->tag());
if (*it9!=*it10)
countReverseEdge++;
print_segment(SPoint3(v3->x(),v3->y(),v3->z()),SPoint3(v1->x(),v1->y(),v1->z()),file4);
print_segment(SPoint3(v4->x(),v4->y(),v4->z()),SPoint3(v2->x(),v2->y(),v2->z()),file4);
}
else if(flag3 && flag4){
if(phase==1){
mem = it8;
phase = 2;
}
else if(phase==2){
mem++;
/*if(it8==mem){
normal = 1;
}
else{
normal = -1;
}*/
phase = 3;
}
if (*it9==1)
indices2.push_back(-(*it8)->tag());
else
indices2.push_back((*it8)->tag());
if (*it9!=*it10)
countReverseEdge++;
print_segment(SPoint3(v4->x(),v4->y(),v4->z()),SPoint3(v1->x(),v1->y(),v1->z()),file4);
print_segment(SPoint3(v3->x(),v3->y(),v3->z()),SPoint3(v2->x(),v2->y(),v2->z()),file4);
}
}
}
if(indices1.size()!=indices2.size()){
printf("Error\n\n");
}
file3 << "Periodic Surface " << gf1->tag() << " {";
for(j=0;j<indices1.size();j++){
if(j>0) file3 << ",";
file3 << indices1[j];
}
file3 << "} = " << gf2->tag() << " {";
for(j=0;j<indices2.size();j++){
if(j>0) file3 << ",";
file3 << indices2[j];
}
file3 << "};\n";
}
file4 << "};\n";
}
bool voroMetal3D::correspondance(double delta_x,double delta_y,double delta_z,double e,int& val,double xMax,double yMax,double zMax){
bool flag;
flag = 0;
val = 1000;
if(equal(delta_x,xMax,e) && equal(delta_y,0.0,e) && equal(delta_z,0.0,e)){
flag = 1;
val = 1;
}
if(equal(delta_x,0.0,e) && equal(delta_y,yMax,e) && equal(delta_z,0.0,e)){
flag = 1;
val = 2;
}
if(equal(delta_x,0.0,e) && equal(delta_y,0.0,e) && equal(delta_z,zMax,e)){
flag = 1;
val = 3;
}
if(equal(delta_x,xMax,e) && equal(delta_y,yMax,e) && equal(delta_z,0.0,e)){
flag = 1;
val = 4;
}
if(equal(delta_x,0.0,e) && equal(delta_y,yMax,e) && equal(delta_z,zMax,e)){
flag = 1;
val = 5;
}
if(equal(delta_x,xMax,e) && equal(delta_y,0.0,e) && equal(delta_z,zMax,e)){
flag = 1;
val = 6;
}
if(equal(delta_x,xMax,e) && equal(delta_y,yMax,e) && equal(delta_z,zMax,e)){
flag = 1;
val = 7;
}
return flag;
}
void voroMetal3D::correspondance(double delta_x,double delta_y,double delta_z,double e,int val,bool& flag,double xMax,double yMax,double zMax){
flag = 0;
if(val==1 && equal(delta_x,xMax,e) && equal(delta_y,0.0,e) && equal(delta_z,0.0,e)){
flag = 1;
}
if(val==2 && equal(delta_x,0.0,e) && equal(delta_y,yMax,e) && equal(delta_z,0.0,e)){
flag = 1;
}
if(val==3 && equal(delta_x,0.0,e) && equal(delta_y,0.0,e) && equal(delta_z,zMax,e)){
flag = 1; }
if(val==4 && equal(delta_x,xMax,e) && equal(delta_y,yMax,e) && equal(delta_z,0.0,e)){
flag = 1;
}
if(val==5 && equal(delta_x,0.0,e) && equal(delta_y,yMax,e) && equal(delta_z,zMax,e)){
flag = 1;
}
if(val==6 && equal(delta_x,xMax,e) && equal(delta_y,0.0,e) && equal(delta_z,zMax,e)){
flag = 1;
}
if(val==7 && equal(delta_x,xMax,e) && equal(delta_y,yMax,e) && equal(delta_z,zMax,e)){
flag = 1;
}
}
bool voroMetal3D::equal(double x,double y,double e){
bool flag;
if(x>y-e && x<y+e){
flag = 1;
}
else{
flag = 0;
}
return flag;
}
void microstructure(const char *filename)
{
int j;
int radical;
double max;
double xMax;
double yMax;
double zMax;
std::vector<double> properties;
if(filename){
std::ifstream file(filename);
file >> max;
file >> radical;
file >> xMax;
file >> yMax;
file >> zMax;
properties.clear();
properties.resize(4*max);
for(j=0;j<max;j++){
file >> properties[4*j];
file >> properties[4*j+1];
file >> properties[4*j+2];
file >> properties[4*j+3];
}
voroMetal3D vm1;
vm1.execute(properties,radical,0.1,xMax,yMax,zMax);
GModel::current()->load("MicrostructurePolycrystal3D.geo");
voroMetal3D vm2;
vm2.correspondance(0.00001,xMax,yMax,zMax);
}
}
void computeBestSeeds(const char *filename)
{
int j;
int radical;
double max;
double xMax;
double yMax; double zMax;
std::vector<double> properties;
std::cout<<"entree dans computeBestSeeds"<<std::endl;
if(filename){
std::ifstream file(filename);
file >> max;
file >> radical;
file >> xMax;
file >> yMax;
file >> zMax;
properties.clear();
properties.resize(4*max);
for(j=0;j<max;j++){
file >> properties[4*j];
file >> properties[4*j+1];
file >> properties[4*j+2];
file >> properties[4*j+3];
}
std::cout<<"Before count"<<std::endl;
std::vector<double> listDistances;
listDistances.clear();
int nbOfCount = 17;
listDistances.resize(nbOfCount);
for (int Count = 0; Count < nbOfCount; Count++){
std::cout<<"Count"<<Count<<std::endl;
double distMinGlobal = 0.0;
int jMinGlobal = 0;
int xORyORz = 0;
int posORneg = 0;
for(j=0;j<max;j++){
std::cout<<"j "<<j<<std::endl;
std::vector<double> propertiesModified;
propertiesModified.clear();
propertiesModified.resize(4*max);
std::cout<<"before assign propModif"<<std::endl;
for(unsigned int k=0;k < properties.size();k++){
propertiesModified[k] = properties[k];
}
std::cout<<"after assign propModif"<<std::endl;
propertiesModified[4*j] += 0.01;
voroMetal3D vm1;
std::cout<<"before execute"<<std::endl;
//std::remove("MicrostructurePolycrystal3D.geo");
vm1.execute(propertiesModified,radical,0.1,xMax,yMax,zMax);
//GModel::current()->destroy();
GModel *m = new GModel();
//GModel::current()->load("MicrostructurePolycrystal3D.geo");
m->load("MicrostructurePolycrystal3D.geo");
double distMinTmp = 1000.0;
//GModel *m = GModel::current();
for (GModel::eiter ite= m->firstEdge();ite != m->lastEdge();ite++){
GEdge* eTmp = (*ite);
GVertex* vTmp1 = eTmp->getBeginVertex();
GVertex* vTmp2 = eTmp->getEndVertex();
double distTmp = sqrt((vTmp1->x() - vTmp2->x()) * (vTmp1->x() - vTmp2->x()) + (vTmp1->y() - vTmp2->y()) * (vTmp1->y() - vTmp2->y()) + (vTmp1->z() - vTmp2->z()) * (vTmp1->z() - vTmp2->z()));
if (distTmp < distMinTmp){
distMinTmp = distTmp;
}
}
if (distMinTmp > distMinGlobal){
distMinGlobal = distMinTmp;
jMinGlobal = j;
xORyORz = 1;
posORneg = 1;
}
delete m;
}
for(j=0;j<max;j++){
std::cout<<"j "<<j<<std::endl;
std::vector<double> propertiesModified; propertiesModified.clear();
propertiesModified.resize(4*max);
std::cout<<"before assign propModif"<<std::endl;
for(unsigned int k=0;k < properties.size();k++){
propertiesModified[k] = properties[k];
}
std::cout<<"after assign propModif"<<std::endl;
propertiesModified[4*j + 1] += 0.01;
voroMetal3D vm1;
std::cout<<"before execute"<<std::endl;
//std::remove("MicrostructurePolycrystal3D.geo");
vm1.execute(propertiesModified,radical,0.1,xMax,yMax,zMax);
//GModel::current()->destroy();
GModel *m = new GModel();
//GModel::current()->load("MicrostructurePolycrystal3D.geo");
m->load("MicrostructurePolycrystal3D.geo");
double distMinTmp = 1000.0;
//GModel *m = GModel::current();
for (GModel::eiter ite= m->firstEdge();ite != m->lastEdge();ite++){
GEdge* eTmp = (*ite);
GVertex* vTmp1 = eTmp->getBeginVertex();
GVertex* vTmp2 = eTmp->getEndVertex();
double distTmp = sqrt((vTmp1->x() - vTmp2->x()) * (vTmp1->x() - vTmp2->x()) + (vTmp1->y() - vTmp2->y()) * (vTmp1->y() - vTmp2->y()) + (vTmp1->z() - vTmp2->z()) * (vTmp1->z() - vTmp2->z()));
if (distTmp < distMinTmp){
distMinTmp = distTmp;
}
}
if (distMinTmp > distMinGlobal){
distMinGlobal = distMinTmp;
jMinGlobal = j;
xORyORz = 2;
posORneg = 1;
}
delete m;
}
for(j=0;j<max;j++){
std::cout<<"j "<<j<<std::endl;
std::vector<double> propertiesModified;
propertiesModified.clear();
propertiesModified.resize(4*max);
std::cout<<"before assign propModif"<<std::endl;
for(unsigned int k=0;k < properties.size();k++){
propertiesModified[k] = properties[k];
}
std::cout<<"after assign propModif"<<std::endl;
propertiesModified[4*j + 2] += 0.01;
voroMetal3D vm1;
std::cout<<"before execute"<<std::endl;
//std::remove("MicrostructurePolycrystal3D.geo");
vm1.execute(propertiesModified,radical,0.1,xMax,yMax,zMax);
//GModel::current()->destroy();
GModel *m = new GModel();
//GModel::current()->load("MicrostructurePolycrystal3D.geo");
m->load("MicrostructurePolycrystal3D.geo");
double distMinTmp = 1000.0;
//GModel *m = GModel::current();
for (GModel::eiter ite= m->firstEdge();ite != m->lastEdge();ite++){
GEdge* eTmp = (*ite);
GVertex* vTmp1 = eTmp->getBeginVertex();
GVertex* vTmp2 = eTmp->getEndVertex();
double distTmp = sqrt((vTmp1->x() - vTmp2->x()) * (vTmp1->x() - vTmp2->x()) + (vTmp1->y() - vTmp2->y()) * (vTmp1->y() - vTmp2->y()) + (vTmp1->z() - vTmp2->z()) * (vTmp1->z() - vTmp2->z()));
if (distTmp < distMinTmp){
distMinTmp = distTmp;
}
}
if (distMinTmp > distMinGlobal){
distMinGlobal = distMinTmp;
jMinGlobal = j;
xORyORz = 3;
posORneg = 1; }
delete m;
}
for(j=0;j<max;j++){
std::cout<<"j "<<j<<std::endl;
std::vector<double> propertiesModified;
propertiesModified.clear();
propertiesModified.resize(4*max);
std::cout<<"before assign propModif"<<std::endl;
for(unsigned int k=0;k < properties.size();k++){
propertiesModified[k] = properties[k];
}
std::cout<<"after assign propModif"<<std::endl;
propertiesModified[4*j] -= 0.01;
voroMetal3D vm1;
std::cout<<"before execute"<<std::endl;
//std::remove("MicrostructurePolycrystal3D.geo");
vm1.execute(propertiesModified,radical,0.1,xMax,yMax,zMax);
//GModel::current()->destroy();
GModel *m = new GModel();
//GModel::current()->load("MicrostructurePolycrystal3D.geo");
m->load("MicrostructurePolycrystal3D.geo");
double distMinTmp = 1000.0;
//GModel *m = GModel::current();
for (GModel::eiter ite= m->firstEdge();ite != m->lastEdge();ite++){
GEdge* eTmp = (*ite);
GVertex* vTmp1 = eTmp->getBeginVertex();
GVertex* vTmp2 = eTmp->getEndVertex();
double distTmp = sqrt((vTmp1->x() - vTmp2->x()) * (vTmp1->x() - vTmp2->x()) + (vTmp1->y() - vTmp2->y()) * (vTmp1->y() - vTmp2->y()) + (vTmp1->z() - vTmp2->z()) * (vTmp1->z() - vTmp2->z()));
if (distTmp < distMinTmp){
distMinTmp = distTmp;
}
}
if (distMinTmp > distMinGlobal){
distMinGlobal = distMinTmp;
jMinGlobal = j;
xORyORz = 1;
posORneg = 2;
}
delete m;
}
for(j=0;j<max;j++){
std::cout<<"j "<<j<<std::endl;
std::vector<double> propertiesModified;
propertiesModified.clear();
propertiesModified.resize(4*max);
std::cout<<"before assign propModif"<<std::endl;
for(unsigned int k=0;k < properties.size();k++){
propertiesModified[k] = properties[k];
}
std::cout<<"after assign propModif"<<std::endl;
propertiesModified[4*j + 1] -= 0.01;
voroMetal3D vm1;
std::cout<<"before execute"<<std::endl;
//std::remove("MicrostructurePolycrystal3D.geo");
vm1.execute(propertiesModified,radical,0.1,xMax,yMax,zMax);
//GModel::current()->destroy();
GModel *m = new GModel();
//GModel::current()->load("MicrostructurePolycrystal3D.geo");
m->load("MicrostructurePolycrystal3D.geo");
double distMinTmp = 1000.0;
//GModel *m = GModel::current();
for (GModel::eiter ite= m->firstEdge();ite != m->lastEdge();ite++){
GEdge* eTmp = (*ite);
GVertex* vTmp1 = eTmp->getBeginVertex();
GVertex* vTmp2 = eTmp->getEndVertex();
double distTmp = sqrt((vTmp1->x() - vTmp2->x()) * (vTmp1->x() - vTmp2->x()) + (vTmp1->y() - vTmp2->y()) * (vTmp1->y() - vTmp2->y()) + (vTmp1->z() - vTmp2->z()) * (vTmp1->z() - vTmp2->z()));
if (distTmp < distMinTmp){
distMinTmp = distTmp;
} }
if (distMinTmp > distMinGlobal){
distMinGlobal = distMinTmp;
jMinGlobal = j;
xORyORz = 2;
posORneg = 2;
}
delete m;
}
for(j=0;j<max;j++){
std::cout<<"j "<<j<<std::endl;
std::vector<double> propertiesModified;
propertiesModified.clear();
propertiesModified.resize(4*max);
std::cout<<"before assign propModif"<<std::endl;
for(unsigned int k=0;k < properties.size();k++){
propertiesModified[k] = properties[k];
}
std::cout<<"after assign propModif"<<std::endl;
propertiesModified[4*j + 2] -= 0.01;
voroMetal3D vm1;
std::cout<<"before execute"<<std::endl;
//std::remove("MicrostructurePolycrystal3D.geo");
vm1.execute(propertiesModified,radical,0.1,xMax,yMax,zMax);
//GModel::current()->destroy();
GModel *m = new GModel();
//GModel::current()->load("MicrostructurePolycrystal3D.geo");
m->load("MicrostructurePolycrystal3D.geo");
double distMinTmp = 1000.0;
//GModel *m = GModel::current();
for (GModel::eiter ite= m->firstEdge();ite != m->lastEdge();ite++){
GEdge* eTmp = (*ite);
GVertex* vTmp1 = eTmp->getBeginVertex();
GVertex* vTmp2 = eTmp->getEndVertex();
double distTmp = sqrt((vTmp1->x() - vTmp2->x()) * (vTmp1->x() - vTmp2->x()) + (vTmp1->y() - vTmp2->y()) * (vTmp1->y() - vTmp2->y()) + (vTmp1->z() - vTmp2->z()) * (vTmp1->z() - vTmp2->z()));
if (distTmp < distMinTmp){
distMinTmp = distTmp;
}
}
if (distMinTmp > distMinGlobal){
distMinGlobal = distMinTmp;
jMinGlobal = j;
xORyORz = 3;
posORneg = 2;
}
delete m;
}
std::cout<<"distance minimale de "<<distMinGlobal<<std::endl;
listDistances[Count] = distMinGlobal;
if (xORyORz == 1){
if (posORneg == 1){
properties[4*jMinGlobal] += 0.01;
} else if (posORneg == 2){
properties[4*jMinGlobal] -= 0.01;
}
} else if (xORyORz == 2){
if (posORneg == 1){
properties[4*jMinGlobal + 1] += 0.01;
} else if (posORneg == 2){
properties[4*jMinGlobal + 1] -= 0.01;
}
} else if (xORyORz == 3){
if (posORneg == 1){
properties[4*jMinGlobal + 2] += 0.01;
} else if (posORneg == 2){
properties[4*jMinGlobal + 2] -= 0.01;
}
}
}
voroMetal3D vm1; vm1.execute(properties,radical,0.1,xMax,yMax,zMax);
GModel::current()->load("MicrostructurePolycrystal3D.geo");
voroMetal3D vm2;
vm2.correspondance(0.00001,xMax,yMax,zMax);
for (unsigned int iTmp = 0; iTmp < listDistances.size();iTmp++){
std::cout<<"distMinGlobal "<<iTmp<<" egale a "<<listDistances[iTmp]<<std::endl;
}
std::cout<<"liste des nouveaux seeds :"<<std::endl;
for(unsigned int iTmp = 0; iTmp < max;iTmp++){
std::cout<<properties[4*iTmp]<<" "<<properties[4*iTmp + 1]<<" "<<properties[4*iTmp + 2]<<" "<<properties[4*iTmp + 3]<<std::endl;
}
}
}