// usage : Training: C:\Users\rjs\Documents\dev\p4workspace\sandbox\geodyssey\proto\Athena\testdata\training.irap
// Expected: C:\Users\rjs\Documents\dev\p4workspace\sandbox\geodyssey\proto\Athena\testdata\expected.grd
// Grid for analysis: F:\sapere_aude\data\IrapClassic\grid_surface\ASCII\RMS\analysis.irap
static int Main(string[] args)
{
// Get a URI from the command line argument
Uri trainingInputUri = UriFromArg(args, 0);
Uri trainingExpectedUri = UriFromArg(args, 1);
Uri analysisUri = UriFromArg(args, 2);
GeodysseyModel model = new GeodysseyModel();
LoaderController.Instance.Open(trainingInputUri, model);
IRegularGrid2D trainingInputGrid = model[0]; // The first grid
LoaderController.Instance.Open(trainingExpectedUri, model);
IRegularGrid2D trainingExpectedGrid = model[1]; // The second grid
LoaderController.Instance.Open(analysisUri, model);
IRegularGrid2D analysisGrid = model[2]; // The third grid
// Replaces blanks with 0.0
for (int j = 0; j < trainingExpectedGrid.SizeJ; ++j)
{
for (int i = 0; i < trainingExpectedGrid.SizeI; ++i)
{
if (!trainingExpectedGrid[i, j].HasValue)
{
trainingExpectedGrid[i, j] = 0.0;
}
else
{
if (trainingExpectedGrid[i, j] < 0.0)
{
trainingExpectedGrid[i, j] = 0.0;
}
else if (trainingExpectedGrid[i, j] > 1.0)
{
trainingExpectedGrid[i, j] = 1.0;
}
}
}
}
int matrixWidth = 5;
FaultInHorizonClassifer classifier = new FaultInHorizonClassifer(matrixWidth);
classifier.Learn(trainingInputGrid, trainingExpectedGrid);
IRegularGrid2D predictedGrid = classifier.CreateFaultProbability(analysisGrid);
predictedGrid.WriteSurfer6BinaryFile("predicted.grd");
return(0);
}
static void Main(string[] args)
{
Uri faultProbabilityUri = UriFromArg(args, 0);
Uri horizonUri = UriFromArg(args, 1);
GeodysseyModel model = new GeodysseyModel();
LoaderController.Instance.Open(faultProbabilityUri, model);
IRegularGrid2D pFaultGrid = model[0]; // The first grid
LoaderController.Instance.Open(horizonUri, model);
IRegularGrid2D horizon = model[1]; // Horizon grid
GridImage pFaultImage = new GridImage(pFaultGrid);
GridImage pFaultImageX = (GridImage)pFaultImage.Clone();
pFaultImageX.Clear();
GridImage pFaultImageY = (GridImage)pFaultImage.Clone();
pFaultImageY.Clear();
Convolver.GaussianGradient(pFaultImage, pFaultImageX, pFaultImageY, 1.0);
GridImage pFaultImageXX = (GridImage)pFaultImage.Clone();
pFaultImageXX.Clear();
GridImage pFaultImageYY = (GridImage)pFaultImage.Clone();
pFaultImageYY.Clear();
GridImage pFaultImageXY = (GridImage)pFaultImage.Clone();
pFaultImageXY.Clear();
Convolver.HessianMatrixOfGaussian(pFaultImage, pFaultImageXX, pFaultImageYY, pFaultImageXY, 1.0);
//GridImage pFaultImageBeta = (GridImage) RidgeDetector.PrincipleCurvatureDirection(pFaultImageXX, pFaultImageYY, pFaultImageXY);
//GridImage pFaultImagePQ = (GridImage) RidgeDetector.LocalLpq(pFaultImageXX, pFaultImageYY, pFaultImageXY, pFaultImageBeta);
//GridImage pFaultImageP = (GridImage) RidgeDetector.LocalLp(pFaultImageX, pFaultImageY, pFaultImageBeta);
//GridImage pFaultImageQ = (GridImage) RidgeDetector.LocalLq(pFaultImageX, pFaultImageY, pFaultImageBeta);
//GridImage pFaultImagePP = (GridImage) RidgeDetector.LocalLpp(pFaultImageXX, pFaultImageYY, pFaultImageXY, pFaultImageBeta);
//GridImage pFaultImageQQ = (GridImage) RidgeDetector.LocalLqq(pFaultImageXX, pFaultImageYY, pFaultImageXY, pFaultImageBeta);
Trace.WriteLine("Ridge detector");
GridImage pFaultImageRidge = (GridImage)RidgeDetector.Detect(pFaultImageX, pFaultImageY, pFaultImageXX, pFaultImageYY, pFaultImageXY);
IImage <bool> ridge = pFaultImageRidge.CreateBinaryImage(0.0);
Trace.WriteLine("Pepper filter");
IImage <bool> filtered = Morphology.PepperFiltering(5, ridge);
Trace.WriteLine("Closing gaps");
IImage <bool> closed = Morphology.Closing(filtered);
Trace.WriteLine("Thinning until convergence");
IImage <bool> thinned = Morphology.ThinUntilConvergence(closed);
Trace.WriteLine("Thinning blocks until convergence");
IImage <bool> blockthinned = Morphology.ThinBlockUntilConvergence(thinned);
Trace.WriteLine("Filling");
IImage <bool> filled = Morphology.Fill(blockthinned);
Trace.WriteLine("Connectivity");
IImage <int> connectivity = BitImage.Analysis.Connectivity(filled);
Trace.WriteLine("Connected components");
IImage <int> components = BitImage.Analysis.ConnectedComponents(filled);
Trace.WriteLine("Mapping faults");
FaultNetwork network = FaultNetworkMapper.MapFaultNetwork(filled, horizon);
Trace.WriteLine("Mapping displacements");
FaultDisplacementMapper displacementMapper = new FaultDisplacementMapper(network);
var mesh = displacementMapper.GetResult();
// Output files of mesh
Trace.WriteLine("Writing faults");
string faultSegmentsPath = faultProbabilityUri.LocalPath.Replace(".grd", "_faults.poly");
string monoSegmentsPath = faultProbabilityUri.LocalPath.Replace(".grd", "_mono.poly");
using (StreamWriter faultFile = new StreamWriter(faultSegmentsPath))
using (StreamWriter monoFile = new StreamWriter(monoSegmentsPath))
{
foreach (EdgeBase edge in mesh.Edges)
{
StreamWriter file = edge is FaultEdge ? faultFile : monoFile;
Point2D source = ((PositionedVertexBase)edge.Source).Position;
Point2D target = ((PositionedVertexBase)edge.Target).Position;
file.WriteLine("{0}\t{1}", source.X, source.Y);
file.WriteLine("{0}\t{1}", target.X, target.Y);
file.WriteLine("%");
}
}
// Establish order in the mesh
Trace.WriteLine("Build planar subdivision - Ordering mesh and inserting faces");
var orderer = new Orderer2D <PositionedVertexBase, EdgeBase, FaceBase>(mesh);
var orderedMesh = orderer.GetResult();
Debug.Assert(orderedMesh.Euler == 2);
// Triangulate the mesh
// Copy the list of monotone faces, so we can iterate over it it
// whilst modifying the faces in the mesh during triangulation.
Trace.WriteLine("Triangulating");
List <FaceBase> faces = new List <FaceBase>(orderedMesh.Faces);
foreach (FaceBase face in faces)
{
var triangulator = new MonotonePolygonTriangulator <PositionedVertexBase, EdgeBase, FaceBase>(orderedMesh, face);
triangulator.GetResult();
}
// Improve triangulation quality
var improver = new TriangulationQualityImprover <PositionedVertexBase, EdgeBase, FaceBase>(mesh); // TODO: Add a flippable critera
improver.Improve();
Trace.WriteLine("Writing mesh");
// Output the mesh
Random rng = new Random();
string facesPath = faultProbabilityUri.LocalPath.Replace(".grd", "_faces.poly");
using (StreamWriter facesFile = new StreamWriter(facesPath))
{
// All faces except the last one...
foreach (FaceBase face in orderedMesh.Faces.Take(orderedMesh.FaceCount - 1))
{
foreach (VertexBase vertex in face.Vertices)
{
PositionedVertexBase pos = (PositionedVertexBase)vertex;
Point2D point = pos.Position;
facesFile.WriteLine("{0}\t{1}", point.X, point.Y);
}
int red = rng.Next(255);
int green = rng.Next(255);
int blue = rng.Next(255);
facesFile.WriteLine("% -W0/{0}/{1}/{2} -G{0}/{1}/{2}", red, green, blue);
}
}
// Convert images to grids for convenient output
//GridImage filteredGrid = (GridImage) pFaultImageRidge.Clone();
//for (int i = 0; i < filteredGrid.Width; ++i)
//{
// for (int j = 0; j < filteredGrid.Height; ++j)
// {
// filteredGrid[i, j] = filtered[i, j] ? 1.0 : 0.0;
// }
//}
//GridImage closedGrid = (GridImage) pFaultImageRidge.Clone();
//for (int i = 0; i < closedGrid.Width; ++i)
//{
// for (int j = 0; j < closedGrid.Height; ++j)
// {
// closedGrid[i, j] = closed[i, j] ? 1.0 : 0.0;
// }
//}
//GridImage thinnedGrid = (GridImage) pFaultImageRidge.Clone();
//for (int i = 0; i < thinnedGrid.Width; ++i)
//{
// for (int j = 0; j < thinnedGrid.Height; ++j)
// {
// thinnedGrid[i, j] = thinned[i, j] ? 1.0 : 0.0;
// }
//}
//GridImage blockThinnedGrid = (GridImage) pFaultImageRidge.Clone();
//for (int i = 0; i < blockThinnedGrid.Width; ++i)
//{
// for (int j = 0; j < blockThinnedGrid.Height; ++j)
// {
// blockThinnedGrid[i, j] = blockthinned[i, j] ? 1.0 : 0.0;
// }
//}
GridImage filledGrid = (GridImage)pFaultImageRidge.Clone();
for (int i = 0; i < filledGrid.Width; ++i)
{
for (int j = 0; j < filledGrid.Height; ++j)
{
filledGrid[i, j] = filled[i, j] ? 1.0 : 0.0;
}
}
//GridImage connectivityGrid = (GridImage) pFaultImageRidge.Clone();
//for (int i = 0; i < filledGrid.Width; ++i)
//{
// for (int j = 0; j < filledGrid.Height; ++j)
// {
// connectivityGrid[i, j] = connectivity[i, j];
// }
//}
//GridImage componentsGrid = (GridImage) pFaultImageRidge.Clone();
//for (int i = 0; i < componentsGrid.Width; ++i)
//{
// for (int j = 0; j < componentsGrid.Height; ++j)
// {
// componentsGrid[i, j] = components[i, j];
// }
//}
//string pathX = faultProbabilityUri.LocalPath.Replace(".", "_x.");
//string pathY = faultProbabilityUri.LocalPath.Replace(".", "_y.");
//string pathXX = faultProbabilityUri.LocalPath.Replace(".", "_xx.");
//string pathYX = faultProbabilityUri.LocalPath.Replace(".", "_yy.");
//string pathXY = faultProbabilityUri.LocalPath.Replace(".", "_xy.");
//string pathBeta = faultProbabilityUri.LocalPath.Replace(".", "_beta.");
//string pathPQ = faultProbabilityUri.LocalPath.Replace(".", "_pq.");
//string pathP = faultProbabilityUri.LocalPath.Replace(".", "_p.");
//string pathQ = faultProbabilityUri.LocalPath.Replace(".", "_q.");
//string pathPP = faultProbabilityUri.LocalPath.Replace(".", "_pp.");
//string pathQQ = faultProbabilityUri.LocalPath.Replace(".", "_qq.");
//string pathRidge = faultProbabilityUri.LocalPath.Replace(".", "_ridge.");
//string pathFiltered = faultProbabilityUri.LocalPath.Replace(".", "_filtered.");
//string pathClosed = faultProbabilityUri.LocalPath.Replace(".", "_closed.");
//string pathThinned = faultProbabilityUri.LocalPath.Replace(".", "_thinned.");
//string pathBlockThinned = faultProbabilityUri.LocalPath.Replace(".", "_blockthinned.");
string pathFilled = faultProbabilityUri.LocalPath.Replace(".", "_filled.");
//string pathConnectivity = faultProbabilityUri.LocalPath.Replace(".", "_connectivity.");
//string pathComponents = faultProbabilityUri.LocalPath.Replace(".", "_components.");
//string pathFaultLines = faultProbabilityUri.LocalPath.Replace(".grd", "_faults.poly");
string pathBisectors = faultProbabilityUri.LocalPath.Replace(".grd", "_bisectors.poly");
string pathLabels = faultProbabilityUri.LocalPath.Replace(".grd", "_labels.xy");
string pathStrands = faultProbabilityUri.LocalPath.Replace(".grd", "_strands.poly");
//pFaultImageX.Grid.WriteSurfer6BinaryFile(pathX);
//pFaultImageY.Grid.WriteSurfer6BinaryFile(pathY);
//pFaultImageXX.Grid.WriteSurfer6BinaryFile(pathXX);
//pFaultImageYY.Grid.WriteSurfer6BinaryFile(pathXY);
//pFaultImageXY.Grid.WriteSurfer6BinaryFile(pathXY);
//pFaultImageBeta.Grid.WriteSurfer6BinaryFile(pathBeta);
//pFaultImagePQ.Grid.WriteSurfer6BinaryFile(pathPQ);
//pFaultImageP.Grid.WriteSurfer6BinaryFile(pathP);
//pFaultImageQ.Grid.WriteSurfer6BinaryFile(pathQ);
//pFaultImagePP.Grid.WriteSurfer6BinaryFile(pathPP);
//pFaultImageQQ.Grid.WriteSurfer6BinaryFile(pathQQ);
//pFaultImageRidge.Grid.WriteSurfer6BinaryFile(pathRidge);
//filteredGrid.Grid.WriteSurfer6BinaryFile(pathFiltered);
//closedGrid.Grid.WriteSurfer6BinaryFile(pathClosed);
//thinnedGrid.Grid.WriteSurfer6BinaryFile(pathThinned);
//blockThinnedGrid.Grid.WriteSurfer6BinaryFile(pathBlockThinned);
filledGrid.Grid.WriteSurfer6BinaryFile(pathFilled);
//connectivityGrid.Grid.WriteSurfer6BinaryFile(pathConnectivity);
//componentsGrid.Grid.WriteSurfer6BinaryFile(pathComponents);
//mapper.OutputPolygons(pathFaultLines);
//displacementMapper.OutputBisectors(pathBisectors);
//displacementMapper.OutputLabels(pathLabels);
//displacementMapper.OutputStrands(pathStrands);
}
static void Main(string[] args)
{
Uri horizonUri = UriFromArg(args, 0);
GeodysseyModel model = new GeodysseyModel();
LoaderController.Instance.Open(horizonUri, model);
IRegularGrid2D horizon = model[0];
//string pathOriginal = horizonUri.LocalPath.Replace(".dat", ".grd");
//horizon.WriteSurfer6BinaryFile(pathOriginal);
// TODO: Make IRegularGrid IEnumerable
var extentMap = new FastImage <bool>(horizon.SizeI, horizon.SizeJ, horizon.Select(item => item.HasValue));
IImage <bool> faultMap = Morphology.Invert(extentMap);
IImage <double> distanceMap = DistanceMap.EuclideanTransform(extentMap);
// Remove anything above a threshold distance from data
const double threshold = 50;
var clippedFaultMap = extentMap.CloneTransform((i, j) => distanceMap[i, j] < threshold &&
faultMap[i, j]);
Trace.WriteLine("Pepper filter");
IImage <bool> filtered = Morphology.PepperFiltering(5, clippedFaultMap);
Trace.WriteLine("Closing gaps");
IImage <bool> closed = Morphology.Closing(filtered);
Trace.WriteLine("Thinning until convergence");
IImage <bool> thinned = Morphology.ThinUntilConvergence(closed);
Trace.WriteLine("Thinning blocks until convergence");
IImage <bool> blockthinned = Morphology.ThinBlockUntilConvergence(thinned);
Trace.WriteLine("Filling");
IImage <bool> filled = Morphology.Fill(blockthinned);
WriteBinaryImageSurfer6Grid(horizon, filled, horizonUri.LocalPath.Replace(".grd", "_filled.grd"));
//// Create a double valued 'binary' image showing the extent of the horizon data
//FastImage<double> extentMap = new FastImage<double>(horizon.SizeI, horizon.SizeJ);
//for (int i = 0; i < horizon.SizeI; ++i)
//{
// for (int j = 0; j < horizon.SizeJ; ++j)
// {
// bool hasValue = horizon[i, j].HasValue;
// extentMap[i, j] = hasValue ? 1.0 : 0.0;
// }
//}
//int extent = extentMap.Where(v => v == 1.0).Count();
//double extentProportion = (double) extent / (extentMap.Width * extentMap.Height);
//IImage<double> scaledExtentMap = Scaler.Downscale(extentMap, 5);
//IImage<double> smoothedExtentMap = scaledExtentMap.CloneSize();
//Convolver.GaussianSmooth(scaledExtentMap, smoothedExtentMap, 3.0);
//IRegularGrid2D smoothedGrid = horizon.CloneSize(smoothedExtentMap.Width, smoothedExtentMap.Height);
//for (int i = 0 ; i < smoothedGrid.SizeI; ++i)
//{
// for (int j = 0 ; j < smoothedGrid.SizeJ; ++j)
// {
// smoothedGrid[i, j] = smoothedExtentMap[i, j];
// }
//}
//PriorityQueue<double> orderedIntensities = PriorityQueue<double>.CreateHighFirstOut(smoothedExtentMap);
//int k = (int) (extentProportion * orderedIntensities.Count);
//Debug.Assert(k >= 0);
//for (int i = 0 ; i < k - 1; ++i)
//{
// orderedIntensities.Dequeue();
//}
//double threshold = orderedIntensities.Dequeue();
//string pathSmoothed = horizonUri.LocalPath.Replace(".grd", "_smoothed.grd");
//smoothedGrid.WriteSurfer6BinaryFile(pathSmoothed);
//IImage<bool> thresholdMap = BitImage.Analysis.Threshold(smoothedExtentMap, threshold * 2.0);
//int actual = thresholdMap.Where(v => v).Count();
//double actualProportion = (double) actual / (thresholdMap.Width * thresholdMap.Height);
//IRegularGrid2D thresholdGrid = horizon.CloneSize(thresholdMap.Width, thresholdMap.Height);
//for (int i = 0; i < smoothedGrid.SizeI; ++i)
//{
// for (int j = 0; j < smoothedGrid.SizeJ; ++j)
// {
// thresholdGrid[i, j] = thresholdMap[i, j] ? 1.0 : 0.0;
// }
//}
//string pathThresholded = horizonUri.LocalPath.Replace(".grd", "_thresholded.grd");
//thresholdGrid.WriteSurfer6BinaryFile(pathThresholded);
//IImage<double> distanceMap = DistanceMap.EuclideanTransform(scaledExtentMap);
// Convert the image back to a grid for convenient output
IRegularGrid2D distanceGrid = horizon.CloneSize(distanceMap.Width, distanceMap.Height);
for (int i = 0; i < distanceMap.Width; ++i)
{
for (int j = 0; j < distanceMap.Height; ++j)
{
distanceGrid[i, j] = distanceMap[i, j];
}
}
string pathDistance = horizonUri.LocalPath.Replace(".grd", "_distance.grd");
distanceGrid.WriteSurfer6BinaryFile(pathDistance);
}
