flags order 2

DiffractionGratings/grating2D_data_ResonantGrating.geo

@@ -81,13 +81,15 @@ DefineConstant[
 
   h_pmltop                    = {0.8*1500, Name StrCat[pp3, "0top PML size [nm]"] ,  ReadOnly 1, Highlight Str[colorro]},
   h_pmlbot                    = {0.8*1500, Name StrCat[pp3, "1bottom PML size [nm]"] ,  ReadOnly 1, Highlight Str[colorro]}  
-  paramaille                  = {25, Name StrCat[pp3, "2nb of mesh elements per wavelength [-]"   ] , ReadOnly 0, Highlight Str[colorpp]},
-  paramaille_scale_sub        = {1 , Name StrCat[pp3, "3Custom mesh parameters/refine substrate [-]"    ] , ReadOnly 0, Highlight Str[colorpp], Closed 1},
-  paramaille_scale_layer_dep  = {1 , Name StrCat[pp3, "3Custom mesh parameters/refine deposit layer [-]"] , ReadOnly 0, Highlight Str[colorpp], Closed 1},
-  paramaille_scale_rod_out    = {1 , Name StrCat[pp3, "3Custom mesh parameters/refine embedding [-]"    ] , ReadOnly 0, Highlight Str[colorpp], Closed 1},
-  paramaille_scale_rods       = {9 , Name StrCat[pp3, "3Custom mesh parameters/refine rods [-]"       ] , ReadOnly 0, Highlight Str[colorpp], Closed 1},
-  paramaille_scale_layer_cov  = {1 , Name StrCat[pp3, "3Custom mesh parameters/refine cover layer [-]"  ] , ReadOnly 0, Highlight Str[colorpp], Closed 1},
-  paramaille_scale_sup        = {1 , Name StrCat[pp3, "3Custom mesh parameters/refine superstrate [-]"  ] , ReadOnly 0, Highlight Str[colorpp], Closed 1},
+  Flag_o2_interp              = {0         , Name StrCat[pp3, "2Second order interpolation?"] , Choices {0,1}},
+  Flag_o2_geom                = {0         , Name StrCat[pp3, "3Second order mesh?"] , Choices {0,1}, Visible 0},
+  paramaille                  = {25 , Name StrCat[pp3, "4nb of mesh elements per wavelength [-]"   ] , ReadOnly 0, Highlight Str[colorpp]},
+  paramaille_scale_sub        = {1  , Name StrCat[pp3, "6Custom mesh parameters/refine substrate [-]"    ] , ReadOnly 0, Highlight Str[colorpp], Closed 1},
+  paramaille_scale_layer_dep  = {1  , Name StrCat[pp3, "6Custom mesh parameters/refine deposit layer [-]"] , ReadOnly 0, Highlight Str[colorpp], Closed 1},
+  paramaille_scale_rod_out    = {1  , Name StrCat[pp3, "6Custom mesh parameters/refine embedding [-]"    ] , ReadOnly 0, Highlight Str[colorpp], Closed 1},
+  paramaille_scale_rods       = {9  , Name StrCat[pp3, "6Custom mesh parameters/refine rods [-]"       ] , ReadOnly 0, Highlight Str[colorpp], Closed 1},
+  paramaille_scale_layer_cov  = {1  , Name StrCat[pp3, "6Custom mesh parameters/refine cover layer [-]"  ] , ReadOnly 0, Highlight Str[colorpp], Closed 1},
+  paramaille_scale_sup        = {1  , Name StrCat[pp3, "6Custom mesh parameters/refine superstrate [-]"  ] , ReadOnly 0, Highlight Str[colorpp], Closed 1},
 
   multiplot    = {0, Choices{0,1}, Name StrCat[pp4, "Plot solution on multiple periods"]},
   plotRTgraphs = {1, Choices{0,1}, Name StrCat[pp4, "Plot R and T"]}