SetDirectory["/home/akb/Desktop/freefemsemicond"]
mesh=Import["mesh.dta","Table"];

raw=Import["p-out.dta", "Table"];
long=raw[[1,1]];
data=Table[{mesh[[i,1]],mesh[[i,2]],raw[[i,1]]},{i,2,long+1}];
ListContourPlot[data,InterpolationOrder->1,ColorFunction->"AvocadoColors",PlotRange->All,AspectRatio->ar]
raw=Import["n-out.dta", "Table"];
long=raw[[1,1]];
data=Table[{mesh[[i,1]],mesh[[i,2]],raw[[i,1]]},{i,2,long+1}];
ListContourPlot[data,InterpolationOrder->1,ColorFunction->"AvocadoColors",PlotRange->All,AspectRatio->ar]
raw=Import["N1-out.dta", "Table"];
long=raw[[1,1]];
data=Table[{mesh[[i,1]],mesh[[i,2]],raw[[i,1]]},{i,2,long+1}];
ListContourPlot[data,InterpolationOrder->1,ColorFunction->"AvocadoColors",PlotRange->All,AspectRatio->ar]
raw=Import["N2-out.dta", "Table"];
long=raw[[1,1]];
data=Table[{mesh[[i,1]],mesh[[i,2]],raw[[i,1]]},{i,2,long+1}];
ListContourPlot[data,InterpolationOrder->1,ColorFunction->"AvocadoColors",PlotRange->All,AspectRatio->ar]

DensityPlot[x,{x,0,1},{y,0,1},ColorFunction->"AvocadoColors"]
DensityPlot[x,{x,0,1},{y,0,1},ColorFunction->"DeepSeaColors"]

Options[ListContourPlot]

raw=Import["Ex.dta", "Table"];
long=raw[[1,1]];
data=Table[{mesh[[i,1]],mesh[[i,2]],raw[[i,1]]},{i,2,long+1}];
ListContourPlot[data,InterpolationOrder->1,ColorFunction->"BlueGreenYellow",PlotRange->All,Contours->20]

raw=Import["p-out.dta", "Table"];
long=raw[[1,1]];
data=Table[{mesh[[i,1]],mesh[[i,2]],raw[[i,1]]},{i,2,long+1}];
ListDensityPlot[data,InterpolationOrder->1,ColorFunction->"AvocadoColors",PlotRange->All,AspectRatio->ar]

raw=Import["G.dta", "Table"];
long=raw[[1,1]];
data=Table[{mesh[[i,1]],mesh[[i,2]],raw[[i,1]]},{i,2,long+1}];
ContourPlot[data,PlotRange->All,ColorFunction->"Rainbow"]

raw=Import["n.dta", "Table"];
long=raw[[1,1]];
data=Table[{mesh[[i,1]],mesh[[i,2]],raw[[i,1]]},{i,2,long+1}];
ListPlot3D[data,InterpolationOrder->1,PlotRange->All]