up

BlochPeriodicWaveguides/rhombus.pro

@@ -23,7 +23,7 @@ Function {
   EZ[] = Vector[0,0,1] ;
 
   DefineConstant[
-    nn = {40, Min 1, Max 100, Step 1, Name "Parameters/1Number of points (N)"},
+    nn = {20, Min 1, Max 100, Step 1, Name "Parameters/1Number of points (N)"},
     ic = {0, Min 0, Max 3*nn-1, Step 1, Loop 1, ReadOnlyRange 1,
       Name "Parameters/1Sol. step (in [0,3N-1])"},
     gam = {2., Choices{0, 1, 2, 4, 2*Pi}, Name "Parameters/1Beta"},