Commit 831e47bd authored by Christophe Geuzaine's avatar Christophe Geuzaine

-v 10 verbosity will print all elementary matrices - that's a bit much :-)

parent 14f0dff0
......@@ -90,7 +90,7 @@ Constraint {
{ Region Surfpml ; Value 0.; }
}
}
// div condition
{ Name Constraint_cInt; Type Assign;
Case {
......@@ -181,11 +181,11 @@ FunctionSpace {
{ NameOfCoef un5; EntityType EdgesOf ; NameOfConstraint BlochX; }
{ NameOfCoef un3; EntityType FacetsOf ; NameOfConstraint Dirichlet; }
{ NameOfCoef un4; EntityType FacetsOf ; NameOfConstraint Dirichlet; }
{ NameOfCoef un5; EntityType EdgesOf ; NameOfConstraint Dirichlet; }
{ NameOfCoef un5; EntityType EdgesOf ; NameOfConstraint Dirichlet; }
EndIf
}
}
{ Name Hcurl_aD; Type Form1;
BasisFunction {
{ Name sn; NameOfCoef un; Function BF_Edge ; Support Region[Om_1]; Entity EdgesOf[All]; }
......@@ -233,7 +233,7 @@ FunctionSpace {
{ NameOfCoef un5; EntityType EdgesOf ; NameOfConstraint BlochX; }
{ NameOfCoef un3; EntityType FacetsOf ; NameOfConstraint Dirichlet; }
{ NameOfCoef un4; EntityType FacetsOf ; NameOfConstraint Dirichlet; }
{ NameOfCoef un5; EntityType EdgesOf ; NameOfConstraint Dirichlet; }
{ NameOfCoef un5; EntityType EdgesOf ; NameOfConstraint Dirichlet; }
EndIf
}
}
......@@ -249,11 +249,11 @@ FunctionSpace {
}
Constraint {
If(flag_o2==1)
EndIf
}
}
}
......@@ -507,18 +507,18 @@ slepc_options_st = " -solve -st_type sinvert -st_ksp_type preonly -st_pc_type
slepc_options_pep = Sprintf(" -pep_max_it 400 -pep_target_magnitude -pep_tol %.10f ",eig_tol);
If (flag_res==0)
which_res="Aux_E";
If (flag_res==0)
which_res="Aux_E";
str_slepc_options=StrCat(slepc_options_st,slepc_options_pep);
EndIf
If (flag_res==1)
which_res="PEP_E";
If (flag_res==1)
which_res="PEP_E";
str_slepc_options=StrCat(slepc_options_st,slepc_options_pep);
EndIf
If (flag_res==2)
which_res="NEP_E";
which_res="NEP_E";
str_slepc_options=StrCat(slepc_options_nep_rat);
EndIf
......@@ -527,7 +527,7 @@ If (flag_res==3)
str_slepc_options=StrCat(slepc_options_st,slepc_options_pep);
EndIf
If (flag_res==4)
If (flag_res==4)
which_res="PEP_h";
str_slepc_options=StrCat(slepc_options_st,slepc_options_pep);
EndIf
......@@ -542,5 +542,5 @@ str_slepc_options = StrCat(str_slepc_options," -nep_monitor_all :temp_eigenvalue
DefineConstant[
R_ = {StrCat("res_",which_res), Name "GetDP/1ResolutionChoices", Visible 1},
C_ = {Sprintf(StrCat("-solve -pos -v 10 -slepc ",str_slepc_options,slepc_options_rg)), Name "GetDP/9ComputeCommand", Visible 1},
C_ = {Sprintf(StrCat("-solve -pos -slepc ",str_slepc_options,slepc_options_rg)), Name "GetDP/9ComputeCommand", Visible 1},
P_ = {StrCat("postop_",which_res), Name "GetDP/2PostOperationChoices", Visible 1}];
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment