onelab interface for conical incidence

DiffractionGratings/grating2D_data_AnisotropicGrating.geo

@@ -30,9 +30,9 @@ lambda_max = 633;
 nb_lambdas = 1;
 
 DefineConstant[
-  flag_Hparallel = {  1 , Name StrCat[pp2, "2polarization case"], Choices {0="E //",1="H //"} },
-	theta_deg      = { -0 , Name StrCat[pp2, "1incident plane wave angle [deg]"] , Highlight Str[colorpp2], Closed close_menu},
-  nb_orders      = {  2 , Name StrCat[pp2, "3number of post-processed diffraction orders"] , Highlight Str[colorpp2], Closed close_menu}
+  flag_polar     = {1   , Name StrCat[pp2, "0polarization case"], Choices {0="E //",1="H //",2="conical"} },
+	theta_deg      = { -0 , Name StrCat[pp2, "2incident plane wave angle (theta) [deg]"] , Highlight Str[colorpp2], Closed close_menu},
+  nb_orders      = {  2 , Name StrCat[pp2, "5number of post-processed diffraction orders"] , Highlight Str[colorpp2], Closed close_menu}
 ];
 
 DefineConstant[

DiffractionGratings/grating2D_data_LamellarGrating.geo

@@ -30,9 +30,9 @@ lambda_max = 1200;
 nb_lambdas = 1;
 
 DefineConstant[
-  flag_Hparallel = {1   , Name StrCat[pp2, "2polarization case"], Choices {0="E //",1="H //"} },
-	theta_deg      = {30  , Name StrCat[pp2, "1incident plane wave angle [deg]"] , Highlight Str[colorpp2], Closed close_menu},
-  nb_orders      = {2   , Name StrCat[pp2, "3number of post-processed diffraction orders"] , Highlight Str[colorpp2], Closed close_menu}
+  flag_polar     = {1   , Name StrCat[pp2, "0polarization case"], Choices {0="E //",1="H //",2="conical"} },
+	theta_deg      = {30  , Name StrCat[pp2, "2incident plane wave angle (theta) [deg]"] , Highlight Str[colorpp2], Closed close_menu},
+  nb_orders      = {2   , Name StrCat[pp2, "5number of post-processed diffraction orders"] , Highlight Str[colorpp2], Closed close_menu}
 ];
 
 DefineConstant[

DiffractionGratings/grating2D_data_PhotonicCrystalSlab.geo

@@ -29,9 +29,9 @@ lambda_max = 800;
 nb_lambdas = 50;
 
 DefineConstant[
-  flag_Hparallel = {0   , Name StrCat[pp2, "2polarization case"], Choices {0="E //",1="H //"} },
-	theta_deg      = {30  , Name StrCat[pp2, "1incident plane wave angle [deg]"] , Highlight Str[colorpp2], Closed close_menu},
-  nb_orders      = {2   , Name StrCat[pp2, "3number of post-processed diffraction orders"] , Highlight Str[colorpp2], Closed close_menu}
+  flag_polar     = {0   , Name StrCat[pp2, "0polarization case"], Choices {0="E //",1="H //",2="conical"} },
+	theta_deg      = {30  , Name StrCat[pp2, "2incident plane wave angle (theta) [deg]"] , Highlight Str[colorpp2], Closed close_menu},
+  nb_orders      = {2   , Name StrCat[pp2, "5number of post-processed diffraction orders"] , Highlight Str[colorpp2], Closed close_menu}
 ];
 
 DefineConstant[

DiffractionGratings/grating2D_data_ResonantGrating.geo

@@ -31,9 +31,9 @@ nb_lambdas =   56  ;
 // 5.85 : 6.0 : 0.0025
 
 DefineConstant[
-  flag_Hparallel = {0   , Name StrCat[pp2, "2polarization case"], Choices {0="E //",1="H //"} },
-	theta_deg      = {5.93, Name StrCat[pp2, "1incident plane wave angle [deg]"] , Highlight Str[colorpp2], Closed close_menu},
-  nb_orders      = {2   , Name StrCat[pp2, "3number of post-processed diffraction orders"] , Highlight Str[colorpp2], Closed close_menu}
+  flag_polar     = {0   , Name StrCat[pp2, "0polarization case"], Choices {0="E //",1="H //",2="conical"} },
+	theta_deg      = {5.93, Name StrCat[pp2, "2incident plane wave angle (theta) [deg]"] , Highlight Str[colorpp2], Closed close_menu},
+  nb_orders      = {2   , Name StrCat[pp2, "5number of post-processed diffraction orders"] , Highlight Str[colorpp2], Closed close_menu}
 ];
 
 DefineConstant[

DiffractionGratings/grating2D_data_plasmonics.geo

@@ -29,9 +29,9 @@ lambda_max = 800;
 nb_lambdas = 15;
 
 DefineConstant[
-  flag_Hparallel = {1   , Name StrCat[pp2, "2polarization case"], Choices {0="E //",1="H //"}, ServerAction "Reset GetDP/T0, GetDP/R0, GetDP/Lambda_step, GetDP/total absorption"},
-	theta_deg      = {30  , Name StrCat[pp2, "1incident plane wave angle [deg]"] , Highlight Str[colorpp2], Closed close_menu , ServerAction "Reset GetDP/T0, GetDP/R0, GetDP/Lambda_step, GetDP/total absorption"},
-  nb_orders      = {2   , Name StrCat[pp2, "3number of post-processed diffraction orders"] , Highlight Str[colorpp2], Closed close_menu , ServerAction "Reset GetDP/T0, GetDP/R0, GetDP/Lambda_step, GetDP/total absorption"}
+  flag_polar     = {1   , Name StrCat[pp2, "0polarization case"], Choices {0="E //",1="H //",2="conical"} },
+	theta_deg      = {30  , Name StrCat[pp2, "2incident plane wave angle (theta) [deg]"] , Highlight Str[colorpp2], Closed close_menu , ServerAction "Reset GetDP/T0, GetDP/R0, GetDP/Lambda_step, GetDP/total absorption"},
+  nb_orders      = {2   , Name StrCat[pp2, "5number of post-processed diffraction orders"] , Highlight Str[colorpp2], Closed close_menu , ServerAction "Reset GetDP/T0, GetDP/R0, GetDP/Lambda_step, GetDP/total absorption"}
 ];
 
 DefineConstant[

DiffractionGratings/grating2D_scalar.pro

@@ -27,7 +27,7 @@
 
 myDir = "res2D/";
 DefineConstant[
-  lambda0 = {lambda_min , Min lambda_min, Max lambda_max, Step (lambda_max-lambda_min)/(nb_lambdas-1), Name StrCat[pp2, "0wavelength [nm]"] , Loop 1, Highlight Str[colorpp2],Graph "200000200020", ServerAction "Reset GetDP/T0, GetDP/R0, GetDP/Lambda_step, GetDP/total absorption"}
+  lambda0 = {lambda_min , Min lambda_min, Max lambda_max, Step (lambda_max-lambda_min)/(nb_lambdas-1), Name StrCat[pp2, "1wavelength [nm]"] , Loop 1, Highlight Str[colorpp2],Graph "200000200020", ServerAction "Reset GetDP/T0, GetDP/R0, GetDP/Lambda_step, GetDP/total absorption"}
 ];
 lambda0    = lambda0    * nm;
 lambda_min = lambda_min * nm;