-function A_run(file,times,zeta,type,eta,eps,out)
-% A_AnIso(file,times,mu,type,eta,eps,out)
+function A_run(file,times,zeta,type,theta,nu,out)
+% A_AnIso(file,times,zeta,type,theta,nu,out)
% file - starting mesh
% times - how often
% zeta - Zulaessigkeitsbed
% type - art des Tests
-% eta - alle verfeinern oder nur wichtige?
-% eps - wie verfeinern iso or aniso
+% theta - alle verfeinern oder nur wichtige?
+% nu - wie verfeinern iso oder aniso
% out - Dateiname der Ausgabe
%
% P. Schaefer
%Parameter testen
-assert(length(zeta)==max(type)-1||length(zeta)==1,...
- 'Pleas set right type and mu parameters');
+% assert(length(zeta)==max(type)-1||length(zeta)==1,...
+% 'Pleas set right type and zeta parameters');
%Netz laden
A_loadMeshF(file)
end
% Ein kompletter Verfeinerungschritt
- A_step(zeta,type,eta,eps,out);
+ A_step(zeta,type,theta,nu,out);
%Zeit Speichern
usedTime = G_T(end,:);
-function [data time er] = A_step(zeta,type,eta,eps,varargin)
+function [data time er] = A_step(zeta,type,theta,nu,varargin)
% [data time er] = A_step(zeta,type,eta,eps [, out])
% Führt einen Verfeinerungsschritt aus
%
'Please use A_loadMesh first')
%Steuerungs Parameter prüfen
-assert(length(zeta)==max(type)-1||length(zeta)==1,...
- 'Pleas set right type and zeta parameters')
+% assert(length(zeta)==max(type)-1||length(zeta)==1,...
+% 'Pleas set right type and zeta parameters')
%Steuerungsparameter korrigieren
-if(length(zeta)==1)
- zeta = repmat(zeta,max(type)-1,1);
-end
+% if(length(zeta)==1)
+% zeta = repmat(zeta,max(type)-1,1);
+% end
%Vektor für Zeitmessung anlegen
time = zeros(1,3);
% marked(find(sum((G_N(:,1:4)==0),2))) = 2;
% Markieren mit gewählten Parametern
- marked = mark(x_fine(f2s)',tmu,eta,eps);
+ marked = mark(x_fine(f2s)',tmu,theta,nu);
% Bunt Plotten!
% figure(1)
}\r
\r
double calcParIntO0(double b, double d, double t, double v, double d1,\r
- double d2, double d3, double eta) {\r
+ double d2, double d3, double zeta) {\r
return calcParIntA(b, d, t, v, d1, d2, d3);\r
}\r
double calcOrtIntO0(double b, double d, double t, double v, double d1,\r
- double d2, double d3, double eta) {\r
+ double d2, double d3, double zeta) {\r
return calcOrtIntA(b, d, t, v, d1, d2, d3);\r
}\r
\r
double calcParIntO1(double b, double d, double t, double v, double d1,\r
- double d2, double d3, double eta) {\r
+ double d2, double d3, double zeta) {\r
\r
//Elmente anordnen\r
if (b * b + d * d > t * t + v * v) {\r
}\r
\r
double calcOrtIntO1(double b, double d, double t, double v, double d1,\r
- double d2, double d3, double eta) {\r
+ double d2, double d3, double zeta) {\r
\r
//Elmente anordnen\r
if (b * b + d * d > t * t + v * v) {\r
}\r
\r
double calcParIntO2(double b, double d, double t, double v, double d1,\r
- double d2, double d3, double eta) {\r
+ double d2, double d3, double zeta) {\r
\r
//Elmente anordnen\r
if (b * b + d * d > t * t + v * v) {\r
d3 = -d3;\r
}\r
\r
-// if ((b * b + d * d) * eta < d1 * d1 + d2 * d2 + d3 * d3) {\r
+// if ((b * b + d * d) * zeta < d1 * d1 + d2 * d2 + d3 * d3) {\r
return calcParIntQX1X2(b, d, t, v, d1, d2, d3);\r
// } else {\r
// cout << "2error";\r
}\r
\r
double calcOrtIntO2(double b, double d, double t, double v, double d1,\r
- double d2, double d3, double eta) {\r
+ double d2, double d3, double zeta) {\r
\r
//Elmente anordnen\r
if (d > t) {\r
d3 = -d3;\r
}\r
\r
- if ((b * b + d * d) * eta <= d1 * d1 + d2 * d2 + d3 * d3) {\r
+ if ((b * b + d * d) * zeta <= d1 * d1 + d2 * d2 + d3 * d3) {\r
return calcOrtIntQX1X2(b, d, t, v, d1, d2, d3);\r
} else {\r
// cout << "2error";\r
}\r
\r
double calcParIntO3(double b, double d, double t, double v, double d1,\r
- double d2, double d3, double eta) {\r
+ double d2, double d3, double zeta) {\r
\r
//Achsen vertauschen\r
if (b * b + t * t > d * d + v * v) {\r
d2 = tmp;\r
}\r
\r
-// if ((min(b, t) * eta <= d1) && (min(d, v) * eta <= d2) ) {\r
+// if ((min(b, t) * zeta <= d1) && (min(d, v) * zeta <= d2) ) {\r
return calcParIntQY1X1(b, d, t, v, d1, d2, d3);\r
// } else {\r
// cout << "3error";\r
}\r
\r
double calcOrtIntO3(double b, double d, double t, double v, double d1,\r
- double d2, double d3, double eta) {\r
+ double d2, double d3, double zeta) {\r
\r
- if (max(b, t) * eta > d1) {\r
+ if (max(b, t) * zeta > d1) {\r
return 0;\r
} else {\r
return calcOrtIntA(b, d, t, v, d1, d2, d3);\r
}\r
\r
double cParO0(double b, double d, double t, double v, double d1,\r
- double d2, double d3, double* eta) {\r
+ double d2, double d3, double* zeta) {\r
double tmp = 0;\r
\r
// kleine Seite nach vorn\r
d2 = -d2;\r
}\r
\r
- if ((t * t + v * v) * eta[0] < d1 * d1 + d2 * d2 + d3 * d3) {\r
-// cout << "E";\r
+ if ((t * t + v * v) * zeta[0] < d1 * d1 + d2 * d2 + d3 * d3) {\r
return calcParIntQ(b, d, t, v, d1, d2, d3);\r
} else {\r
return calcParIntA(b, d, t, v, d1, d2, d3);\r
}\r
\r
double cParO1(double b, double d, double t, double v, double d1,\r
- double d2, double d3, double* eta) {\r
+ double d2, double d3, double* zeta) {\r
return calcParIntA(b, d, t, v, d1, d2, d3);\r
}\r
\r
double cParO2(double b, double d, double t, double v, double d1,\r
- double d2, double d3, double* eta) {\r
+ double d2, double d3, double* zeta) {\r
\r
double tmp = 0;\r
\r
d2 = -d2;\r
}\r
\r
- if ((b * b + d * d) < eta[0]* (d1 * d1 + d2 * d2 + d3 * d3)) {\r
+ if ((b * b + d * d) < zeta[0]* (d1 * d1 + d2 * d2 + d3 * d3)) {\r
// cout << "E";\r
return calcParIntQX1X2(b, d, t, v, d1, d2, d3);\r
} else {\r
}\r
\r
double cParO3(double b, double d, double t, double v, double d1,\r
- double d2, double d3, double* eta) {\r
+ double d2, double d3, double* zeta) {\r
\r
double tmp = 0;\r
\r
d2 = -d2;\r
}\r
\r
- if ((b * b + d * d) < eta[0] * (d1 * d1 + d2 * d2 + d3 * d3)) {\r
+ if ((b * b + d * d) < zeta[0] * (d1 * d1 + d2 * d2 + d3 * d3)) {\r
\r
//kleinere Achse nach vorn\r
if (b * b + t * t > d * d + v * v) {\r
d2 = tmp;\r
}\r
\r
- if (min(b, t) <= eta[1] * d1) {\r
+ if (min(b, t) <= zeta[1] * d1) {\r
// cout << "A";\r
return calcParIntQY1X1(b, d, t, v, d1, d2, d3);\r
} else {\r