diff --git a/doc/html/_page_projections.html b/doc/html/_page_projections.html
index b2a23c5..a61ea07 100644
--- a/doc/html/_page_projections.html
+++ b/doc/html/_page_projections.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -107,7 +107,7 @@ $(document).ready(function(){initNavTree('_page_projections.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/anglescan-processing_8dox.html b/doc/html/anglescan-processing_8dox.html
index f341751..65e6759 100644
--- a/doc/html/anglescan-processing_8dox.html
+++ b/doc/html/anglescan-processing_8dox.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -91,7 +91,7 @@ $(document).ready(function(){initNavTree('anglescan-processing_8dox.html','');})
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="anglescan-processing_8dox.html">anglescan-processing.dox</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/annotated.html b/doc/html/annotated.html
index 895d637..baf2e44 100644
--- a/doc/html/annotated.html
+++ b/doc/html/annotated.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -96,7 +96,7 @@ $(document).ready(function(){initNavTree('annotated.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/classes.html b/doc/html/classes.html
index 2780859..c6bc203 100644
--- a/doc/html/classes.html
+++ b/doc/html/classes.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -100,7 +100,7 @@ $(document).ready(function(){initNavTree('classes.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/dir_fe5dc42579d4b99403482a3a637d9f7d.html b/doc/html/dir_fe5dc42579d4b99403482a3a637d9f7d.html
index 2990d42..97cdf41 100644
--- a/doc/html/dir_fe5dc42579d4b99403482a3a637d9f7d.html
+++ b/doc/html/dir_fe5dc42579d4b99403482a3a637d9f7d.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -158,7 +158,7 @@ Files</h2></td></tr>
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/fermi-edge-analysis_8ipf.html b/doc/html/fermi-edge-analysis_8ipf.html
index e075a04..61f8cc0 100644
--- a/doc/html/fermi-edge-analysis_8ipf.html
+++ b/doc/html/fermi-edge-analysis_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -492,7 +492,7 @@ Licensed under the Apache License, Version 2.0 (the "License"); <br />
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="fermi-edge-analysis_8ipf.html">fermi-edge-analysis.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/fermi-edge-analysis_8ipf_source.html b/doc/html/fermi-edge-analysis_8ipf_source.html
index 3516c30..2e68d7d 100644
--- a/doc/html/fermi-edge-analysis_8ipf_source.html
+++ b/doc/html/fermi-edge-analysis_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -105,7 +105,7 @@ $(document).ready(function(){initNavTree('fermi-edge-analysis_8ipf_source.html',
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="fermi-edge-analysis_8ipf.html">fermi-edge-analysis.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/files.html b/doc/html/files.html
index dd66432..237447c 100644
--- a/doc/html/files.html
+++ b/doc/html/files.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -117,7 +117,7 @@ $(document).ready(function(){initNavTree('files.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/functions.html b/doc/html/functions.html
index 478e4d9..4fdf653 100644
--- a/doc/html/functions.html
+++ b/doc/html/functions.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -148,7 +148,7 @@ $(document).ready(function(){initNavTree('functions.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/functions_vars.html b/doc/html/functions_vars.html
index f548914..11eda08 100644
--- a/doc/html/functions_vars.html
+++ b/doc/html/functions_vars.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -148,7 +148,7 @@ $(document).ready(function(){initNavTree('functions_vars.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals.html b/doc/html/globals.html
index ccbd193..1d709a8 100644
--- a/doc/html/globals.html
+++ b/doc/html/globals.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -375,7 +375,7 @@ $(document).ready(function(){initNavTree('globals.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_b.html b/doc/html/globals_b.html
index 6bda66a..b466b85 100644
--- a/doc/html/globals_b.html
+++ b/doc/html/globals_b.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -231,7 +231,7 @@ $(document).ready(function(){initNavTree('globals_b.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_c.html b/doc/html/globals_c.html
index c3f19f0..efa6318 100644
--- a/doc/html/globals_c.html
+++ b/doc/html/globals_c.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -180,7 +180,7 @@ $(document).ready(function(){initNavTree('globals_c.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_d.html b/doc/html/globals_d.html
index 7a2ab98..30bf151 100644
--- a/doc/html/globals_d.html
+++ b/doc/html/globals_d.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -177,7 +177,7 @@ $(document).ready(function(){initNavTree('globals_d.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_e.html b/doc/html/globals_e.html
index 49faca6..de67fee 100644
--- a/doc/html/globals_e.html
+++ b/doc/html/globals_e.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -153,7 +153,7 @@ $(document).ready(function(){initNavTree('globals_e.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_f.html b/doc/html/globals_f.html
index cbd3d81..69a1736 100644
--- a/doc/html/globals_f.html
+++ b/doc/html/globals_f.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -114,7 +114,7 @@ $(document).ready(function(){initNavTree('globals_f.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func.html b/doc/html/globals_func.html
index cecaac3..3720e2a 100644
--- a/doc/html/globals_func.html
+++ b/doc/html/globals_func.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -375,7 +375,7 @@ $(document).ready(function(){initNavTree('globals_func.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_b.html b/doc/html/globals_func_b.html
index 3dbedcf..e9c2e4b 100644
--- a/doc/html/globals_func_b.html
+++ b/doc/html/globals_func_b.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -231,7 +231,7 @@ $(document).ready(function(){initNavTree('globals_func_b.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_c.html b/doc/html/globals_func_c.html
index cea55f2..afc5251 100644
--- a/doc/html/globals_func_c.html
+++ b/doc/html/globals_func_c.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -180,7 +180,7 @@ $(document).ready(function(){initNavTree('globals_func_c.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_d.html b/doc/html/globals_func_d.html
index 2854ab2..d98a3b5 100644
--- a/doc/html/globals_func_d.html
+++ b/doc/html/globals_func_d.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -177,7 +177,7 @@ $(document).ready(function(){initNavTree('globals_func_d.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_e.html b/doc/html/globals_func_e.html
index fb638be..29e9776 100644
--- a/doc/html/globals_func_e.html
+++ b/doc/html/globals_func_e.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -147,7 +147,7 @@ $(document).ready(function(){initNavTree('globals_func_e.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_f.html b/doc/html/globals_func_f.html
index ccf6bfd..eb2a066 100644
--- a/doc/html/globals_func_f.html
+++ b/doc/html/globals_func_f.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -114,7 +114,7 @@ $(document).ready(function(){initNavTree('globals_func_f.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_g.html b/doc/html/globals_func_g.html
index 1c32f4e..02b5547 100644
--- a/doc/html/globals_func_g.html
+++ b/doc/html/globals_func_g.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -138,7 +138,7 @@ $(document).ready(function(){initNavTree('globals_func_g.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_h.html b/doc/html/globals_func_h.html
index fc586ae..c263e0c 100644
--- a/doc/html/globals_func_h.html
+++ b/doc/html/globals_func_h.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -102,7 +102,7 @@ $(document).ready(function(){initNavTree('globals_func_h.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_i.html b/doc/html/globals_func_i.html
index e330e0f..ef53849 100644
--- a/doc/html/globals_func_i.html
+++ b/doc/html/globals_func_i.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -137,7 +137,7 @@ $(document).ready(function(){initNavTree('globals_func_i.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_k.html b/doc/html/globals_func_k.html
index 87d3442..904cba7 100644
--- a/doc/html/globals_func_k.html
+++ b/doc/html/globals_func_k.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -93,7 +93,7 @@ $(document).ready(function(){initNavTree('globals_func_k.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_l.html b/doc/html/globals_func_l.html
index 31f46be..300994f 100644
--- a/doc/html/globals_func_l.html
+++ b/doc/html/globals_func_l.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -141,7 +141,7 @@ $(document).ready(function(){initNavTree('globals_func_l.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_m.html b/doc/html/globals_func_m.html
index cb79d2f..d6232d4 100644
--- a/doc/html/globals_func_m.html
+++ b/doc/html/globals_func_m.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -150,7 +150,7 @@ $(document).ready(function(){initNavTree('globals_func_m.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_n.html b/doc/html/globals_func_n.html
index e2a9f59..05293f3 100644
--- a/doc/html/globals_func_n.html
+++ b/doc/html/globals_func_n.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -111,7 +111,7 @@ $(document).ready(function(){initNavTree('globals_func_n.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_o.html b/doc/html/globals_func_o.html
index 6a904a6..a607eef 100644
--- a/doc/html/globals_func_o.html
+++ b/doc/html/globals_func_o.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -117,7 +117,7 @@ $(document).ready(function(){initNavTree('globals_func_o.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_p.html b/doc/html/globals_func_p.html
index 34fae4f..8b24454 100644
--- a/doc/html/globals_func_p.html
+++ b/doc/html/globals_func_p.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -345,7 +345,7 @@ $(document).ready(function(){initNavTree('globals_func_p.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_q.html b/doc/html/globals_func_q.html
index 5f5daca..e0f0876 100644
--- a/doc/html/globals_func_q.html
+++ b/doc/html/globals_func_q.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -93,7 +93,7 @@ $(document).ready(function(){initNavTree('globals_func_q.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_r.html b/doc/html/globals_func_r.html
index de0c6a2..76943f1 100644
--- a/doc/html/globals_func_r.html
+++ b/doc/html/globals_func_r.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -128,7 +128,7 @@ $(document).ready(function(){initNavTree('globals_func_r.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_s.html b/doc/html/globals_func_s.html
index acb5613..3f7497b 100644
--- a/doc/html/globals_func_s.html
+++ b/doc/html/globals_func_s.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -189,7 +189,7 @@ $(document).ready(function(){initNavTree('globals_func_s.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_t.html b/doc/html/globals_func_t.html
index ad5c10b..2549aba 100644
--- a/doc/html/globals_func_t.html
+++ b/doc/html/globals_func_t.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -105,7 +105,7 @@ $(document).ready(function(){initNavTree('globals_func_t.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_u.html b/doc/html/globals_func_u.html
index a6e32a9..e7e6c2b 100644
--- a/doc/html/globals_func_u.html
+++ b/doc/html/globals_func_u.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -126,7 +126,7 @@ $(document).ready(function(){initNavTree('globals_func_u.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_func_w.html b/doc/html/globals_func_w.html
index e188901..dd1a36b 100644
--- a/doc/html/globals_func_w.html
+++ b/doc/html/globals_func_w.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -93,7 +93,7 @@ $(document).ready(function(){initNavTree('globals_func_w.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_g.html b/doc/html/globals_g.html
index bc7803a..3e51dc1 100644
--- a/doc/html/globals_g.html
+++ b/doc/html/globals_g.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -138,7 +138,7 @@ $(document).ready(function(){initNavTree('globals_g.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_h.html b/doc/html/globals_h.html
index 552fd3a..62a531a 100644
--- a/doc/html/globals_h.html
+++ b/doc/html/globals_h.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -105,7 +105,7 @@ $(document).ready(function(){initNavTree('globals_h.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_i.html b/doc/html/globals_i.html
index 4c1eace..cc2dfc8 100644
--- a/doc/html/globals_i.html
+++ b/doc/html/globals_i.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -137,7 +137,7 @@ $(document).ready(function(){initNavTree('globals_i.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_k.html b/doc/html/globals_k.html
index 6409b63..e61c603 100644
--- a/doc/html/globals_k.html
+++ b/doc/html/globals_k.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -181,7 +181,7 @@ $(document).ready(function(){initNavTree('globals_k.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_l.html b/doc/html/globals_l.html
index a547933..4870d5e 100644
--- a/doc/html/globals_l.html
+++ b/doc/html/globals_l.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -141,7 +141,7 @@ $(document).ready(function(){initNavTree('globals_l.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_m.html b/doc/html/globals_m.html
index ed57d96..a9d6b33 100644
--- a/doc/html/globals_m.html
+++ b/doc/html/globals_m.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -159,7 +159,7 @@ $(document).ready(function(){initNavTree('globals_m.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_n.html b/doc/html/globals_n.html
index f6d3f1e..10277b0 100644
--- a/doc/html/globals_n.html
+++ b/doc/html/globals_n.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -111,7 +111,7 @@ $(document).ready(function(){initNavTree('globals_n.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_o.html b/doc/html/globals_o.html
index 7d1c212..c1aa57d 100644
--- a/doc/html/globals_o.html
+++ b/doc/html/globals_o.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -117,7 +117,7 @@ $(document).ready(function(){initNavTree('globals_o.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_p.html b/doc/html/globals_p.html
index 351c15d..742585c 100644
--- a/doc/html/globals_p.html
+++ b/doc/html/globals_p.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -361,7 +361,7 @@ $(document).ready(function(){initNavTree('globals_p.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_q.html b/doc/html/globals_q.html
index 42bed6e..2bc509d 100644
--- a/doc/html/globals_q.html
+++ b/doc/html/globals_q.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -93,7 +93,7 @@ $(document).ready(function(){initNavTree('globals_q.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_r.html b/doc/html/globals_r.html
index 59e2dc9..74fe313 100644
--- a/doc/html/globals_r.html
+++ b/doc/html/globals_r.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -128,7 +128,7 @@ $(document).ready(function(){initNavTree('globals_r.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_s.html b/doc/html/globals_s.html
index aa34d61..635ef12 100644
--- a/doc/html/globals_s.html
+++ b/doc/html/globals_s.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -189,7 +189,7 @@ $(document).ready(function(){initNavTree('globals_s.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_t.html b/doc/html/globals_t.html
index f8b9453..699431f 100644
--- a/doc/html/globals_t.html
+++ b/doc/html/globals_t.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -105,7 +105,7 @@ $(document).ready(function(){initNavTree('globals_t.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_u.html b/doc/html/globals_u.html
index 91d98e9..dfeddb6 100644
--- a/doc/html/globals_u.html
+++ b/doc/html/globals_u.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -126,7 +126,7 @@ $(document).ready(function(){initNavTree('globals_u.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_v.html b/doc/html/globals_v.html
index 8821ffa..15684af 100644
--- a/doc/html/globals_v.html
+++ b/doc/html/globals_v.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -93,7 +93,7 @@ $(document).ready(function(){initNavTree('globals_v.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_vars.html b/doc/html/globals_vars.html
index 48f1c96..364f33d 100644
--- a/doc/html/globals_vars.html
+++ b/doc/html/globals_vars.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -235,7 +235,7 @@ $(document).ready(function(){initNavTree('globals_vars.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/globals_w.html b/doc/html/globals_w.html
index a9ab919..9c80c0e 100644
--- a/doc/html/globals_w.html
+++ b/doc/html/globals_w.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -93,7 +93,7 @@ $(document).ready(function(){initNavTree('globals_w.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/group___arpes_package.html b/doc/html/group___arpes_package.html
index 24b25de..9693791 100644
--- a/doc/html/group___arpes_package.html
+++ b/doc/html/group___arpes_package.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -165,7 +165,7 @@ Files</h2></td></tr>
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/index.html b/doc/html/index.html
index 190d35e..58f25e7 100644
--- a/doc/html/index.html
+++ b/doc/html/index.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -107,7 +107,7 @@ Installation</h1>
 License Information</h1>
 <p>An open distribution of PEARL Procedures is available under the <a href="http://www.apache.org/licenses/LICENSE-2.0">Apache License, Version 2.0</a> at <a href="https://git.psi.ch/pearl-public/igor-procs">https://git.psi.ch/pearl-public/igor-procs</a>. Users of PEARL Procedures are requested to coordinate and share the development of the code with the original author. Please read and respect the respective license agreements.</p>
 <dl class="section author"><dt>Author</dt><dd>Matthias Muntwiler, <a href="#" onclick="location.href='mai'+'lto:'+'mat'+'th'+'ias'+'.m'+'unt'+'wi'+'ler'+'@p'+'si.'+'ch'; return false;">matth<span style="display: none;">.nosp@m.</span>ias.<span style="display: none;">.nosp@m.</span>muntw<span style="display: none;">.nosp@m.</span>iler<span style="display: none;">.nosp@m.</span>@psi.<span style="display: none;">.nosp@m.</span>ch</a> </dd></dl>
-<dl class="section version"><dt>Version</dt><dd>This documentation is compiled from version rev-distro-2.1.0-1-gb7390cb-dirty. </dd></dl>
+<dl class="section version"><dt>Version</dt><dd>This documentation is compiled from version rev-distro-2.1.1-1-gf419e92-dirty. </dd></dl>
 <dl class="section copyright"><dt>Copyright</dt><dd>2009-2016 by <a href="http://www.psi.ch">Paul Scherrer Institut</a> </dd>
 <dd>
 Licensed under the <a href="http://www.apache.org/licenses/LICENSE-2.0">Apache License, Version 2.0</a> </dd></dl>
@@ -116,7 +116,7 @@ Licensed under the <a href="http://www.apache.org/licenses/LICENSE-2.0">Apache L
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/mainpage_8dox.html b/doc/html/mainpage_8dox.html
index a83dbda..a05c3e8 100644
--- a/doc/html/mainpage_8dox.html
+++ b/doc/html/mainpage_8dox.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -91,7 +91,7 @@ $(document).ready(function(){initNavTree('mainpage_8dox.html','');});
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="mainpage_8dox.html">mainpage.dox</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/modules.html b/doc/html/modules.html
index a1f225e..fb95aa8 100644
--- a/doc/html/modules.html
+++ b/doc/html/modules.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -95,7 +95,7 @@ $(document).ready(function(){initNavTree('modules.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/namespace_pearl_anglescan_panel.html b/doc/html/namespace_pearl_anglescan_panel.html
index d9fcd23..f001132 100644
--- a/doc/html/namespace_pearl_anglescan_panel.html
+++ b/doc/html/namespace_pearl_anglescan_panel.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -97,7 +97,7 @@ $(document).ready(function(){initNavTree('namespace_pearl_anglescan_panel.html',
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/namespace_pearl_anglescan_process.html b/doc/html/namespace_pearl_anglescan_process.html
index 98a5671..06e6abf 100644
--- a/doc/html/namespace_pearl_anglescan_process.html
+++ b/doc/html/namespace_pearl_anglescan_process.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -97,7 +97,7 @@ $(document).ready(function(){initNavTree('namespace_pearl_anglescan_process.html
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="namespace_pearl_anglescan_process.html">PearlAnglescanProcess</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/namespace_pearl_area_display.html b/doc/html/namespace_pearl_area_display.html
index 4099a33..3162216 100644
--- a/doc/html/namespace_pearl_area_display.html
+++ b/doc/html/namespace_pearl_area_display.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -121,7 +121,7 @@ Licensed under the Apache License, Version 2.0 (the "License"); @n
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="namespace_pearl_area_display.html">PearlAreaDisplay</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/namespace_pearl_area_import.html b/doc/html/namespace_pearl_area_import.html
index 8d4f01a..852150a 100644
--- a/doc/html/namespace_pearl_area_import.html
+++ b/doc/html/namespace_pearl_area_import.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -97,7 +97,7 @@ $(document).ready(function(){initNavTree('namespace_pearl_area_import.html','');
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="namespace_pearl_area_import.html">PearlAreaImport</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/namespace_pearl_area_profiles.html b/doc/html/namespace_pearl_area_profiles.html
index b6939bc..2c46aa5 100644
--- a/doc/html/namespace_pearl_area_profiles.html
+++ b/doc/html/namespace_pearl_area_profiles.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -97,7 +97,7 @@ $(document).ready(function(){initNavTree('namespace_pearl_area_profiles.html',''
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="namespace_pearl_area_profiles.html">PearlAreaProfiles</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/namespace_pearl_arpes.html b/doc/html/namespace_pearl_arpes.html
index 86ed59a..85553b6 100644
--- a/doc/html/namespace_pearl_arpes.html
+++ b/doc/html/namespace_pearl_arpes.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -97,7 +97,7 @@ $(document).ready(function(){initNavTree('namespace_pearl_arpes.html','');});
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="namespace_pearl_arpes.html">PearlArpes</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/namespace_pearl_compat.html b/doc/html/namespace_pearl_compat.html
index 7578851..a8823e9 100644
--- a/doc/html/namespace_pearl_compat.html
+++ b/doc/html/namespace_pearl_compat.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -97,7 +97,7 @@ $(document).ready(function(){initNavTree('namespace_pearl_compat.html','');});
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="namespace_pearl_compat.html">PearlCompat</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/namespace_pearl_data_explorer.html b/doc/html/namespace_pearl_data_explorer.html
index 4c3eb36..a2a68f9 100644
--- a/doc/html/namespace_pearl_data_explorer.html
+++ b/doc/html/namespace_pearl_data_explorer.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -97,7 +97,7 @@ $(document).ready(function(){initNavTree('namespace_pearl_data_explorer.html',''
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="namespace_pearl_data_explorer.html">PearlDataExplorer</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/namespace_pearl_elog.html b/doc/html/namespace_pearl_elog.html
index 9335c66..6e5edce 100644
--- a/doc/html/namespace_pearl_elog.html
+++ b/doc/html/namespace_pearl_elog.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -97,7 +97,7 @@ $(document).ready(function(){initNavTree('namespace_pearl_elog.html','');});
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="namespace_pearl_elog.html">PearlElog</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/namespace_pearl_fit_funcs.html b/doc/html/namespace_pearl_fit_funcs.html
index a179fad..8cfcb96 100644
--- a/doc/html/namespace_pearl_fit_funcs.html
+++ b/doc/html/namespace_pearl_fit_funcs.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -97,7 +97,7 @@ $(document).ready(function(){initNavTree('namespace_pearl_fit_funcs.html','');})
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="namespace_pearl_fit_funcs.html">PearlFitFuncs</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/namespace_pearl_matrix_import.html b/doc/html/namespace_pearl_matrix_import.html
index 10aad27..28db93d 100644
--- a/doc/html/namespace_pearl_matrix_import.html
+++ b/doc/html/namespace_pearl_matrix_import.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -97,7 +97,7 @@ $(document).ready(function(){initNavTree('namespace_pearl_matrix_import.html',''
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="namespace_pearl_matrix_import.html">PearlMatrixImport</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/namespace_pearl_p_shell_import.html b/doc/html/namespace_pearl_p_shell_import.html
index c86e943..486b589 100644
--- a/doc/html/namespace_pearl_p_shell_import.html
+++ b/doc/html/namespace_pearl_p_shell_import.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -97,7 +97,7 @@ $(document).ready(function(){initNavTree('namespace_pearl_p_shell_import.html','
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="namespace_pearl_p_shell_import.html">PearlPShellImport</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/namespace_pearl_pmsco_import.html b/doc/html/namespace_pearl_pmsco_import.html
index eb87104..929a71d 100644
--- a/doc/html/namespace_pearl_pmsco_import.html
+++ b/doc/html/namespace_pearl_pmsco_import.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -97,7 +97,7 @@ $(document).ready(function(){initNavTree('namespace_pearl_pmsco_import.html','')
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="namespace_pearl_pmsco_import.html">PearlPmscoImport</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/namespace_pearl_scienta_countrate.html b/doc/html/namespace_pearl_scienta_countrate.html
index b101a44..79a88bb 100644
--- a/doc/html/namespace_pearl_scienta_countrate.html
+++ b/doc/html/namespace_pearl_scienta_countrate.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -97,7 +97,7 @@ $(document).ready(function(){initNavTree('namespace_pearl_scienta_countrate.html
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="namespace_pearl_scienta_countrate.html">PearlScientaCountrate</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/namespace_pearl_scienta_preprocess.html b/doc/html/namespace_pearl_scienta_preprocess.html
index f03edd7..c4cddfc 100644
--- a/doc/html/namespace_pearl_scienta_preprocess.html
+++ b/doc/html/namespace_pearl_scienta_preprocess.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -97,7 +97,7 @@ $(document).ready(function(){initNavTree('namespace_pearl_scienta_preprocess.htm
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="namespace_pearl_scienta_preprocess.html">PearlScientaPreprocess</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/namespace_pearl_vector_operations.html b/doc/html/namespace_pearl_vector_operations.html
index 74e458d..175f3ac 100644
--- a/doc/html/namespace_pearl_vector_operations.html
+++ b/doc/html/namespace_pearl_vector_operations.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -97,7 +97,7 @@ $(document).ready(function(){initNavTree('namespace_pearl_vector_operations.html
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="namespace_pearl_vector_operations.html">PearlVectorOperations</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/namespaces.html b/doc/html/namespaces.html
index 9496f4e..c36d291 100644
--- a/doc/html/namespaces.html
+++ b/doc/html/namespaces.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -110,7 +110,7 @@ $(document).ready(function(){initNavTree('namespaces.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pag_anglescan_processing.html b/doc/html/pag_anglescan_processing.html
index 301a9b7..83a8a56 100644
--- a/doc/html/pag_anglescan_processing.html
+++ b/doc/html/pag_anglescan_processing.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -268,7 +268,7 @@ Export processed data</h2>
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pages.html b/doc/html/pages.html
index a82a5b8..9fd9f62 100644
--- a/doc/html/pages.html
+++ b/doc/html/pages.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -97,7 +97,7 @@ $(document).ready(function(){initNavTree('pages.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-anglescan-panel_8ipf.html b/doc/html/pearl-anglescan-panel_8ipf.html
index 7307da4..b912769 100644
--- a/doc/html/pearl-anglescan-panel_8ipf.html
+++ b/doc/html/pearl-anglescan-panel_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -2173,7 +2173,7 @@ Licensed under the Apache License, Version 2.0 (the "License"); <br />
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-anglescan-panel_8ipf.html">pearl-anglescan-panel.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-anglescan-panel_8ipf_source.html b/doc/html/pearl-anglescan-panel_8ipf_source.html
index 9ebc483..dff4330 100644
--- a/doc/html/pearl-anglescan-panel_8ipf_source.html
+++ b/doc/html/pearl-anglescan-panel_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -85,7 +85,7 @@ $(document).ready(function(){initNavTree('pearl-anglescan-panel_8ipf_source.html
 <div class="title">pearl-anglescan-panel.ipf</div>  </div>
 </div><!--header-->
 <div class="contents">
-<a href="pearl-anglescan-panel_8ipf.html">Go to the documentation of this file.</a><div class="fragment"><div class="line"><a name="l00001"></a><span class="lineno">    1</span>&#160;<span class="preprocessor">#pragma rtGlobals=3     // Use modern global access method and strict wave access.</span></div><div class="line"><a name="l00002"></a><span class="lineno">    2</span>&#160;<span class="preprocessor">#pragma version = 1.8</span></div><div class="line"><a name="l00003"></a><span class="lineno">    3</span>&#160;<span class="preprocessor">#pragma IgorVersion = 6.2</span></div><div class="line"><a name="l00004"></a><span class="lineno">    4</span>&#160;<span class="preprocessor">#pragma ModuleName = PearlAnglescanPanel</span></div><div class="line"><a name="l00005"></a><span class="lineno">    5</span>&#160;<span class="preprocessor">#include &quot;pearl-anglescan-process&quot;</span></div><div class="line"><a name="l00006"></a><span class="lineno">    6</span>&#160;<span class="preprocessor">#include &quot;pearl-pmsco-import&quot;</span></div><div class="line"><a name="l00007"></a><span class="lineno">    7</span>&#160;</div><div class="line"><a name="l00008"></a><span class="lineno">    8</span>&#160;<span class="comment">// copyright (c) 2018-20 Paul Scherrer Institut</span></div><div class="line"><a name="l00009"></a><span class="lineno">    9</span>&#160;<span class="comment">//</span></div><div class="line"><a name="l00010"></a><span class="lineno">   10</span>&#160;<span class="comment">// Licensed under the Apache License, Version 2.0 (the &quot;License&quot;);</span></div><div class="line"><a name="l00011"></a><span class="lineno">   11</span>&#160;<span class="comment">//   you may not use this file except in compliance with the License.</span></div><div class="line"><a name="l00012"></a><span class="lineno">   12</span>&#160;<span class="comment">//   You may obtain a copy of the License at</span></div><div class="line"><a name="l00013"></a><span class="lineno">   13</span>&#160;<span class="comment">//   http:///www.apache.org/licenses/LICENSE-2.0</span></div><div class="line"><a name="l00014"></a><span class="lineno">   14</span>&#160;<span class="comment">//</span></div><div class="line"><a name="l00015"></a><span class="lineno">   15</span>&#160;<span class="comment">// Please acknowledge the use of this code.</span></div><div class="line"><a name="l00016"></a><span class="lineno">   16</span>&#160;</div><div class="line"><a name="l00038"></a><span class="lineno">   38</span>&#160;</div><div class="line"><a name="l00043"></a><span class="lineno">   43</span>&#160;</div><div class="line"><a name="l00045"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#aca457d1f4414d20a911254b1de13ebbb">   45</a></span>&#160;<span class="keyword">static</span> strconstant <a class="code" href="pearl-anglescan-panel_8ipf.html#aca457d1f4414d20a911254b1de13ebbb">package_name</a> = <span class="stringliteral">&quot;pearl_anglescan_panel&quot;</span></div><div class="line"><a name="l00047"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">   47</a></span>&#160;<span class="keyword">static</span> strconstant <a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a> = <span class="stringliteral">&quot;root:packages:pearl_anglescan_panel:&quot;</span></div><div class="line"><a name="l00048"></a><span class="lineno">   48</span>&#160;</div><div class="line"><a name="l00050"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a8e4eacc6efacf2c65615c1ea72d722ed">   50</a></span>&#160;<span class="keyword">static</span> <span class="keyword">function</span> <a class="code" href="pearl-anglescan-panel_8ipf.html#a8e4eacc6efacf2c65615c1ea72d722ed">AfterCompiledHook</a>()</div><div class="line"><a name="l00051"></a><span class="lineno">   51</span>&#160;</div><div class="line"><a name="l00052"></a><span class="lineno">   52</span>&#160;    dfref savedf = GetDataFolderDFR()</div><div class="line"><a name="l00053"></a><span class="lineno">   53</span>&#160;    variable do_init = 1</div><div class="line"><a name="l00054"></a><span class="lineno">   54</span>&#160;    if (DataFolderExists(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>))</div><div class="line"><a name="l00055"></a><span class="lineno">   55</span>&#160;        setdatafolder $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00056"></a><span class="lineno">   56</span>&#160;        nvar /z init_done</div><div class="line"><a name="l00057"></a><span class="lineno">   57</span>&#160;        if (nvar_exists(init_done))</div><div class="line"><a name="l00058"></a><span class="lineno">   58</span>&#160;            if (init_done)</div><div class="line"><a name="l00059"></a><span class="lineno">   59</span>&#160;                do_init = 0</div><div class="line"><a name="l00060"></a><span class="lineno">   60</span>&#160;            endif</div><div class="line"><a name="l00061"></a><span class="lineno">   61</span>&#160;        endif</div><div class="line"><a name="l00062"></a><span class="lineno">   62</span>&#160;    endif</div><div class="line"><a name="l00063"></a><span class="lineno">   63</span>&#160;</div><div class="line"><a name="l00064"></a><span class="lineno">   64</span>&#160;    if (do_init)</div><div class="line"><a name="l00065"></a><span class="lineno">   65</span>&#160;        <a class="code" href="pearl-anglescan-panel_8ipf.html#a45e930b8eadd7cf6a5f664befd87d725">init_package</a>()</div><div class="line"><a name="l00066"></a><span class="lineno">   66</span>&#160;        <a class="code" href="pearl-anglescan-panel_8ipf.html#a92c27964d49ab8bcd7afc858ebe214a3">load_prefs</a>()</div><div class="line"><a name="l00067"></a><span class="lineno">   67</span>&#160;        setdatafolder $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00068"></a><span class="lineno">   68</span>&#160;        variable /g init_done = 1</div><div class="line"><a name="l00069"></a><span class="lineno">   69</span>&#160;    endif</div><div class="line"><a name="l00070"></a><span class="lineno">   70</span>&#160;</div><div class="line"><a name="l00071"></a><span class="lineno">   71</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l00072"></a><span class="lineno">   72</span>&#160;    return 0</div><div class="line"><a name="l00073"></a><span class="lineno">   73</span>&#160;end</div><div class="line"><a name="l00074"></a><span class="lineno">   74</span>&#160;</div><div class="line"><a name="l00075"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a45e930b8eadd7cf6a5f664befd87d725">   75</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a45e930b8eadd7cf6a5f664befd87d725">init_package</a>()</div><div class="line"><a name="l00076"></a><span class="lineno">   76</span>&#160;    dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l00077"></a><span class="lineno">   77</span>&#160;    setdatafolder root:</div><div class="line"><a name="l00078"></a><span class="lineno">   78</span>&#160;    newdatafolder /o/s packages</div><div class="line"><a name="l00079"></a><span class="lineno">   79</span>&#160;    newdatafolder /o/s $package_name</div><div class="line"><a name="l00080"></a><span class="lineno">   80</span>&#160;</div><div class="line"><a name="l00081"></a><span class="lineno">   81</span>&#160;    <span class="comment">// configuration (persistent)</span></div><div class="line"><a name="l00082"></a><span class="lineno">   82</span>&#160;    <span class="keywordtype">string</span> /g graphname = &quot;graph_anglescan_panel&quot;</div><div class="line"><a name="l00083"></a><span class="lineno">   83</span>&#160;    <span class="keywordtype">string</span> /g <a class="code" href="pearl-anglescan-tracker_8ipf.html#a20720748c82a7eaa4b02d4084a4219b2">prefs_objects</a> = &quot;<a class="code" href="pearl-anglescan-tracker_8ipf.html#a20720748c82a7eaa4b02d4084a4219b2">prefs_objects</a>;theta_offset;tilt_offset;phi_offset;alpha_offset;crop_enable;crop_alpha;crop_theta;&quot;</div><div class="line"><a name="l00084"></a><span class="lineno">   84</span>&#160;    prefs_objects += &quot;norm_alpha_enable;norm_alpha_mode;norm_alpha_smoothing;norm_phi_enable;norm_phi_mode;norm_phi_thetarange;&quot;</div><div class="line"><a name="l00085"></a><span class="lineno">   85</span>&#160;    prefs_objects += &quot;norm_theta_enable;norm_theta_mode;norm_theta_domain;norm_theta_smoothing;norm_thetaphi_enable;norm_thetaphi_mode;norm_thetaphi_smoothing;&quot;</div><div class="line"><a name="l00086"></a><span class="lineno">   86</span>&#160;    prefs_objects += &quot;output_folding;output_horizon;graph_mode;graph_projection;graph_colortable;graph_contrast;&quot;</div><div class="line"><a name="l00087"></a><span class="lineno">   87</span>&#160;    </div><div class="line"><a name="l00088"></a><span class="lineno">   88</span>&#160;    <span class="comment">// recently used (persistent)</span></div><div class="line"><a name="l00089"></a><span class="lineno">   89</span>&#160;    variable /g theta_offset = 0</div><div class="line"><a name="l00090"></a><span class="lineno">   90</span>&#160;    variable /g tilt_offset = 0</div><div class="line"><a name="l00091"></a><span class="lineno">   91</span>&#160;    variable /g phi_offset = 0</div><div class="line"><a name="l00092"></a><span class="lineno">   92</span>&#160;    variable /g alpha_offset = 0</div><div class="line"><a name="l00093"></a><span class="lineno">   93</span>&#160;    variable /g crop_enable = 0</div><div class="line"><a name="l00094"></a><span class="lineno">   94</span>&#160;    variable /g crop_alpha = 25</div><div class="line"><a name="l00095"></a><span class="lineno">   95</span>&#160;    variable /g crop_theta = 88</div><div class="line"><a name="l00096"></a><span class="lineno">   96</span>&#160;    <span class="keywordtype">string</span> /g crop_rows = &quot;&quot;</div><div class="line"><a name="l00097"></a><span class="lineno">   97</span>&#160;    variable /g norm_alpha_enable = 0</div><div class="line"><a name="l00098"></a><span class="lineno">   98</span>&#160;    variable /g norm_alpha_mode = 4</div><div class="line"><a name="l00099"></a><span class="lineno">   99</span>&#160;    variable /g norm_alpha_smoothing = 0.25</div><div class="line"><a name="l00100"></a><span class="lineno">  100</span>&#160;    variable /g norm_theta_enable = 0</div><div class="line"><a name="l00101"></a><span class="lineno">  101</span>&#160;    variable /g norm_theta_mode = 4</div><div class="line"><a name="l00102"></a><span class="lineno">  102</span>&#160;    variable /g norm_theta_domain = 0</div><div class="line"><a name="l00103"></a><span class="lineno">  103</span>&#160;    variable /g norm_theta_smoothing = 0.25</div><div class="line"><a name="l00104"></a><span class="lineno">  104</span>&#160;    variable /g norm_thetaphi_enable = 0</div><div class="line"><a name="l00105"></a><span class="lineno">  105</span>&#160;    variable /g norm_thetaphi_mode = 4</div><div class="line"><a name="l00106"></a><span class="lineno">  106</span>&#160;    variable /g norm_thetaphi_smoothing = 0.25</div><div class="line"><a name="l00107"></a><span class="lineno">  107</span>&#160;    variable /g norm_phi_enable = 0</div><div class="line"><a name="l00108"></a><span class="lineno">  108</span>&#160;    variable /g norm_phi_mode = 4</div><div class="line"><a name="l00109"></a><span class="lineno">  109</span>&#160;    variable /g norm_phi_thetarange = 20</div><div class="line"><a name="l00110"></a><span class="lineno">  110</span>&#160;    <span class="keywordtype">string</span> /g output_name = &quot;holo1&quot;</div><div class="line"><a name="l00111"></a><span class="lineno">  111</span>&#160;    variable /g output_folding = 1</div><div class="line"><a name="l00112"></a><span class="lineno">  112</span>&#160;    variable /g output_horizon = 88</div><div class="line"><a name="l00113"></a><span class="lineno">  113</span>&#160;    variable /g graph_mode = 1</div><div class="line"><a name="l00114"></a><span class="lineno">  114</span>&#160;    variable /g graph_projection = <a class="code" href="pearl-anglescan-process_8ipf.html#ac151c6f989d6a568fdef0acb791f84db">kProjStereo</a></div><div class="line"><a name="l00115"></a><span class="lineno">  115</span>&#160;    <span class="keywordtype">string</span> /g graph_colortable = &quot;grays&quot;</div><div class="line"><a name="l00116"></a><span class="lineno">  116</span>&#160;    variable /g graph_contrast = 2</div><div class="line"><a name="l00117"></a><span class="lineno">  117</span>&#160;    </div><div class="line"><a name="l00118"></a><span class="lineno">  118</span>&#160;    <span class="comment">// recently used (volatile)</span></div><div class="line"><a name="l00119"></a><span class="lineno">  119</span>&#160;    <span class="keywordtype">string</span> /g source_path = &quot;&quot;</div><div class="line"><a name="l00120"></a><span class="lineno">  120</span>&#160;    <span class="keywordtype">string</span> /g export_folderpath = &quot;root:&quot;</div><div class="line"><a name="l00121"></a><span class="lineno">  121</span>&#160;    variable /g export_format = 1</div><div class="line"><a name="l00122"></a><span class="lineno">  122</span>&#160;</div><div class="line"><a name="l00123"></a><span class="lineno">  123</span>&#160;    <span class="comment">// administrative data (volatile)</span></div><div class="line"><a name="l00124"></a><span class="lineno">  124</span>&#160;    <span class="keywordtype">string</span> /g panel_name = &quot;&quot;</div><div class="line"><a name="l00125"></a><span class="lineno">  125</span>&#160;    <span class="keywordtype">string</span> /g preview_graphname = &quot;&quot;</div><div class="line"><a name="l00126"></a><span class="lineno">  126</span>&#160;    <span class="keywordtype">string</span> /g dist_x_graphname = &quot;&quot;</div><div class="line"><a name="l00127"></a><span class="lineno">  127</span>&#160;    <span class="keywordtype">string</span> /g dist_y_graphname = &quot;&quot;</div><div class="line"><a name="l00128"></a><span class="lineno">  128</span>&#160;    <span class="keywordtype">string</span> /g output_graphname = &quot;&quot;</div><div class="line"><a name="l00129"></a><span class="lineno">  129</span>&#160;    </div><div class="line"><a name="l00130"></a><span class="lineno">  130</span>&#160;    <span class="comment">// data (volatile)</span></div><div class="line"><a name="l00131"></a><span class="lineno">  131</span>&#160;    make /n=(10,10) /o raw_data, process_data</div><div class="line"><a name="l00132"></a><span class="lineno">  132</span>&#160;    make /o dist_x, dist_x_smoo</div><div class="line"><a name="l00133"></a><span class="lineno">  133</span>&#160;    make /o dist_y, dist_y_smoo</div><div class="line"><a name="l00134"></a><span class="lineno">  134</span>&#160;    </div><div class="line"><a name="l00135"></a><span class="lineno">  135</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l00136"></a><span class="lineno">  136</span>&#160;end</div><div class="line"><a name="l00137"></a><span class="lineno">  137</span>&#160;</div><div class="line"><a name="l00142"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#ac729557a307bddd2f2ad298199976c01">  142</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#ac729557a307bddd2f2ad298199976c01">save_prefs</a>()</div><div class="line"><a name="l00143"></a><span class="lineno">  143</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00144"></a><span class="lineno">  144</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00145"></a><span class="lineno">  145</span>&#160;    svar /sdfr=df prefs_objects</div><div class="line"><a name="l00146"></a><span class="lineno">  146</span>&#160;</div><div class="line"><a name="l00147"></a><span class="lineno">  147</span>&#160;    <span class="keywordtype">string</span> fullPath = SpecialDirPath(&quot;Packages&quot;, 0, 0, 0)</div><div class="line"><a name="l00148"></a><span class="lineno">  148</span>&#160;    fullPath += <a class="code" href="pearl-anglescan-panel_8ipf.html#aca457d1f4414d20a911254b1de13ebbb">package_name</a></div><div class="line"><a name="l00149"></a><span class="lineno">  149</span>&#160;    NewPath/O/C/Q tempPackagePrefsPath, fullPath</div><div class="line"><a name="l00150"></a><span class="lineno">  150</span>&#160;    fullPath += &quot;:preferences.pxp&quot;</div><div class="line"><a name="l00151"></a><span class="lineno">  151</span>&#160;</div><div class="line"><a name="l00152"></a><span class="lineno">  152</span>&#160;    SetDataFolder root:packages</div><div class="line"><a name="l00153"></a><span class="lineno">  153</span>&#160;    SetDataFolder $package_name</div><div class="line"><a name="l00154"></a><span class="lineno">  154</span>&#160;    SaveData /O /Q /J=prefs_objects fullPath</div><div class="line"><a name="l00155"></a><span class="lineno">  155</span>&#160;</div><div class="line"><a name="l00156"></a><span class="lineno">  156</span>&#160;    KillPath/Z tempPackagePrefsPath</div><div class="line"><a name="l00157"></a><span class="lineno">  157</span>&#160;    </div><div class="line"><a name="l00158"></a><span class="lineno">  158</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00159"></a><span class="lineno">  159</span>&#160;end</div><div class="line"><a name="l00160"></a><span class="lineno">  160</span>&#160;</div><div class="line"><a name="l00168"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a92c27964d49ab8bcd7afc858ebe214a3">  168</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a92c27964d49ab8bcd7afc858ebe214a3">load_prefs</a>()</div><div class="line"><a name="l00169"></a><span class="lineno">  169</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00170"></a><span class="lineno">  170</span>&#160;</div><div class="line"><a name="l00171"></a><span class="lineno">  171</span>&#160;    variable result = -1</div><div class="line"><a name="l00172"></a><span class="lineno">  172</span>&#160;    setdatafolder root:</div><div class="line"><a name="l00173"></a><span class="lineno">  173</span>&#160;    NewDataFolder /O/S packages</div><div class="line"><a name="l00174"></a><span class="lineno">  174</span>&#160;    NewDataFolder /O/S $package_name</div><div class="line"><a name="l00175"></a><span class="lineno">  175</span>&#160;    <span class="keywordtype">string</span> fullPath = SpecialDirPath(&quot;Packages&quot;, 0, 0, 0)</div><div class="line"><a name="l00176"></a><span class="lineno">  176</span>&#160;    fullPath += <a class="code" href="pearl-anglescan-panel_8ipf.html#aca457d1f4414d20a911254b1de13ebbb">package_name</a></div><div class="line"><a name="l00177"></a><span class="lineno">  177</span>&#160;</div><div class="line"><a name="l00178"></a><span class="lineno">  178</span>&#160;    GetFileFolderInfo /Q /Z fullPath</div><div class="line"><a name="l00179"></a><span class="lineno">  179</span>&#160;    if (V_Flag == 0) <span class="comment">// Disk directory exists?</span></div><div class="line"><a name="l00180"></a><span class="lineno">  180</span>&#160;        fullPath += &quot;:preferences.pxp&quot;</div><div class="line"><a name="l00181"></a><span class="lineno">  181</span>&#160;        GetFileFolderInfo /Q /Z fullPath</div><div class="line"><a name="l00182"></a><span class="lineno">  182</span>&#160;        if (V_Flag == 0) <span class="comment">// Preference file exist?</span></div><div class="line"><a name="l00183"></a><span class="lineno">  183</span>&#160;            LoadData /O /R /Q fullPath</div><div class="line"><a name="l00184"></a><span class="lineno">  184</span>&#160;            result = 0</div><div class="line"><a name="l00185"></a><span class="lineno">  185</span>&#160;        endif</div><div class="line"><a name="l00186"></a><span class="lineno">  186</span>&#160;    endif</div><div class="line"><a name="l00187"></a><span class="lineno">  187</span>&#160;    </div><div class="line"><a name="l00188"></a><span class="lineno">  188</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00189"></a><span class="lineno">  189</span>&#160;    return result</div><div class="line"><a name="l00190"></a><span class="lineno">  190</span>&#160;end</div><div class="line"><a name="l00191"></a><span class="lineno">  191</span>&#160;</div><div class="line"><a name="l00204"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a21aab19fbcde395df6e1ea8654b3af9a">  204</a></span>&#160;function <a class="code" href="pearl-anglescan-panel_8ipf.html#a21aab19fbcde395df6e1ea8654b3af9a">asp_import_raw</a>(raw_data)</div><div class="line"><a name="l00205"></a><span class="lineno">  205</span>&#160;    wave raw_data</div><div class="line"><a name="l00206"></a><span class="lineno">  206</span>&#160;</div><div class="line"><a name="l00207"></a><span class="lineno">  207</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00208"></a><span class="lineno">  208</span>&#160;    dfref datadf = GetWavesDataFolderDFR(raw_data)</div><div class="line"><a name="l00209"></a><span class="lineno">  209</span>&#160;    dfref attrdf = datadf:attr</div><div class="line"><a name="l00210"></a><span class="lineno">  210</span>&#160;    if (!DataFolderRefStatus(attrdf))</div><div class="line"><a name="l00211"></a><span class="lineno">  211</span>&#160;        setdatafolder datadf</div><div class="line"><a name="l00212"></a><span class="lineno">  212</span>&#160;        setdatafolder ::</div><div class="line"><a name="l00213"></a><span class="lineno">  213</span>&#160;        dfref parentdf = GetDataFolderDFR()</div><div class="line"><a name="l00214"></a><span class="lineno">  214</span>&#160;        dfref attrdf = parentdf:attr</div><div class="line"><a name="l00215"></a><span class="lineno">  215</span>&#160;    endif</div><div class="line"><a name="l00216"></a><span class="lineno">  216</span>&#160;    setdatafolder $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00217"></a><span class="lineno">  217</span>&#160;    </div><div class="line"><a name="l00218"></a><span class="lineno">  218</span>&#160;    <span class="comment">// todo : check dimensions and scales</span></div><div class="line"><a name="l00219"></a><span class="lineno">  219</span>&#160;    </div><div class="line"><a name="l00220"></a><span class="lineno">  220</span>&#160;    svar source_path</div><div class="line"><a name="l00221"></a><span class="lineno">  221</span>&#160;    source_path = GetWavesDataFolder(raw_data, 2)</div><div class="line"><a name="l00222"></a><span class="lineno">  222</span>&#160;    </div><div class="line"><a name="l00223"></a><span class="lineno">  223</span>&#160;    duplicate /o raw_data, raw, process_data</div><div class="line"><a name="l00224"></a><span class="lineno">  224</span>&#160;    </div><div class="line"><a name="l00225"></a><span class="lineno">  225</span>&#160;    wave /sdfr=attrdf /z ManipulatorTheta</div><div class="line"><a name="l00226"></a><span class="lineno">  226</span>&#160;    wave /sdfr=attrdf /z ManipulatorTilt</div><div class="line"><a name="l00227"></a><span class="lineno">  227</span>&#160;    wave /sdfr=attrdf /z ManipulatorPhi</div><div class="line"><a name="l00228"></a><span class="lineno">  228</span>&#160;    if (WaveExists(ManipulatorTheta) &amp;&amp; WaveExists(ManipulatorTilt) &amp;&amp; WaveExists(ManipulatorPhi))</div><div class="line"><a name="l00229"></a><span class="lineno">  229</span>&#160;        duplicate /o attrdf:ManipulatorTheta, raw_theta, process_theta</div><div class="line"><a name="l00230"></a><span class="lineno">  230</span>&#160;        duplicate /o attrdf:ManipulatorTilt, raw_tilt, process_tilt</div><div class="line"><a name="l00231"></a><span class="lineno">  231</span>&#160;        duplicate /o attrdf:ManipulatorPhi, raw_phi, process_phi</div><div class="line"><a name="l00232"></a><span class="lineno">  232</span>&#160;    else</div><div class="line"><a name="l00233"></a><span class="lineno">  233</span>&#160;        DoAlert 0, &quot;Can&#39;t find manipulator angle waves.\rCheck that the attr folder exists, or provide values in the following table.&quot;</div><div class="line"><a name="l00234"></a><span class="lineno">  234</span>&#160;        make /n=(dimsize(raw_data, 1)) /o raw_theta, raw_tilt, raw_phi</div><div class="line"><a name="l00235"></a><span class="lineno">  235</span>&#160;        make /n=(dimsize(raw_data, 1)) /o process_theta, process_tilt, process_phi</div><div class="line"><a name="l00236"></a><span class="lineno">  236</span>&#160;        edit /k=1 raw_theta, raw_tilt, raw_phi</div><div class="line"><a name="l00237"></a><span class="lineno">  237</span>&#160;    endif</div><div class="line"><a name="l00238"></a><span class="lineno">  238</span>&#160;    </div><div class="line"><a name="l00239"></a><span class="lineno">  239</span>&#160;    make /o /n=(dimsize(raw_data, 0)) dist_x, dist_x_smoo</div><div class="line"><a name="l00240"></a><span class="lineno">  240</span>&#160;    make /o /n=(dimsize(raw_data, 1)) dist_y, dist_y_smoo</div><div class="line"><a name="l00241"></a><span class="lineno">  241</span>&#160;    </div><div class="line"><a name="l00242"></a><span class="lineno">  242</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00243"></a><span class="lineno">  243</span>&#160;end</div><div class="line"><a name="l00244"></a><span class="lineno">  244</span>&#160;</div><div class="line"><a name="l00249"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a66b3eef1fd0be13dfef0a66781f55062">  249</a></span>&#160;function <a class="code" href="pearl-anglescan-panel_8ipf.html#a66b3eef1fd0be13dfef0a66781f55062">asp_display_previews</a>()</div><div class="line"><a name="l00250"></a><span class="lineno">  250</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00251"></a><span class="lineno">  251</span>&#160;    wave /sdfr=df process_data</div><div class="line"><a name="l00252"></a><span class="lineno">  252</span>&#160;    svar /sdfr=df preview_graphname</div><div class="line"><a name="l00253"></a><span class="lineno">  253</span>&#160;</div><div class="line"><a name="l00254"></a><span class="lineno">  254</span>&#160;    if (strlen(preview_graphname) &amp;&amp; (wintype(preview_graphname) == 1))</div><div class="line"><a name="l00255"></a><span class="lineno">  255</span>&#160;        <a class="code" href="pearl-area-display_8ipf.html#afa2546f9cb03dfa8bf0cc9966f0b7a45">ad_update_profiles</a>(process_data)</div><div class="line"><a name="l00256"></a><span class="lineno">  256</span>&#160;        DoWindow /F $preview_graphname</div><div class="line"><a name="l00257"></a><span class="lineno">  257</span>&#160;    else</div><div class="line"><a name="l00258"></a><span class="lineno">  258</span>&#160;        preview_graphname = <a class="code" href="pearl-area-display_8ipf.html#a8fad5aebaca72887d5898b4c421bcdae">ad_display_profiles</a>(process_data)</div><div class="line"><a name="l00259"></a><span class="lineno">  259</span>&#160;    endif</div><div class="line"><a name="l00260"></a><span class="lineno">  260</span>&#160;    </div><div class="line"><a name="l00261"></a><span class="lineno">  261</span>&#160;    nvar /sdfr=df graph_contrast</div><div class="line"><a name="l00262"></a><span class="lineno">  262</span>&#160;    svar /sdfr=df graph_colortable</div><div class="line"><a name="l00263"></a><span class="lineno">  263</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a666dab03bb2e97ffef81cea450184d42">set_contrast</a>(graph_contrast, graph_contrast, graphname=preview_graphname, colortable=graph_colortable)</div><div class="line"><a name="l00264"></a><span class="lineno">  264</span>&#160;end</div><div class="line"><a name="l00265"></a><span class="lineno">  265</span>&#160;</div><div class="line"><a name="l00273"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a59886414c7dc2486c5a17f078896c705">  273</a></span>&#160;function <a class="code" href="pearl-anglescan-panel_8ipf.html#a59886414c7dc2486c5a17f078896c705">asp_display_dist_check</a>(xdist, ydist)</div><div class="line"><a name="l00274"></a><span class="lineno">  274</span>&#160;    variable xdist, ydist</div><div class="line"><a name="l00275"></a><span class="lineno">  275</span>&#160;    </div><div class="line"><a name="l00276"></a><span class="lineno">  276</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00277"></a><span class="lineno">  277</span>&#160;    wave /sdfr=df dist_x</div><div class="line"><a name="l00278"></a><span class="lineno">  278</span>&#160;    wave /sdfr=df dist_y</div><div class="line"><a name="l00279"></a><span class="lineno">  279</span>&#160;    wave /sdfr=df dist_x_smoo</div><div class="line"><a name="l00280"></a><span class="lineno">  280</span>&#160;    wave /sdfr=df dist_y_smoo</div><div class="line"><a name="l00281"></a><span class="lineno">  281</span>&#160;    svar /sdfr=df dist_x_graphname</div><div class="line"><a name="l00282"></a><span class="lineno">  282</span>&#160;    svar /sdfr=df dist_y_graphname</div><div class="line"><a name="l00283"></a><span class="lineno">  283</span>&#160;</div><div class="line"><a name="l00284"></a><span class="lineno">  284</span>&#160;    if (xdist)</div><div class="line"><a name="l00285"></a><span class="lineno">  285</span>&#160;        if (strlen(dist_x_graphname) &amp;&amp; (wintype(dist_x_graphname) == 1))</div><div class="line"><a name="l00286"></a><span class="lineno">  286</span>&#160;            DoWindow /F $dist_x_graphname</div><div class="line"><a name="l00287"></a><span class="lineno">  287</span>&#160;        else</div><div class="line"><a name="l00288"></a><span class="lineno">  288</span>&#160;            display /k=1 /n=graph_asp_dist_x dist_x, dist_x_smoo</div><div class="line"><a name="l00289"></a><span class="lineno">  289</span>&#160;            dist_x_graphname = s_name</div><div class="line"><a name="l00290"></a><span class="lineno">  290</span>&#160;            ModifyGraph /w=$dist_x_graphname mode(dist_x)=2</div><div class="line"><a name="l00291"></a><span class="lineno">  291</span>&#160;            ModifyGraph /w=$dist_x_graphname lsize(dist_x)=2</div><div class="line"><a name="l00292"></a><span class="lineno">  292</span>&#160;            ModifyGraph /w=$dist_x_graphname rgb(dist_x)=(0,0,0)</div><div class="line"><a name="l00293"></a><span class="lineno">  293</span>&#160;        endif</div><div class="line"><a name="l00294"></a><span class="lineno">  294</span>&#160;    endif</div><div class="line"><a name="l00295"></a><span class="lineno">  295</span>&#160;</div><div class="line"><a name="l00296"></a><span class="lineno">  296</span>&#160;    if (ydist)</div><div class="line"><a name="l00297"></a><span class="lineno">  297</span>&#160;        if (strlen(dist_y_graphname) &amp;&amp; (wintype(dist_y_graphname) == 1))</div><div class="line"><a name="l00298"></a><span class="lineno">  298</span>&#160;            DoWindow /F $dist_y_graphname</div><div class="line"><a name="l00299"></a><span class="lineno">  299</span>&#160;        else</div><div class="line"><a name="l00300"></a><span class="lineno">  300</span>&#160;            display /k=1 /n=graph_asp_dist_y dist_y, dist_y_smoo</div><div class="line"><a name="l00301"></a><span class="lineno">  301</span>&#160;            dist_y_graphname = s_name</div><div class="line"><a name="l00302"></a><span class="lineno">  302</span>&#160;            ModifyGraph /w=$dist_y_graphname mode(dist_y)=2</div><div class="line"><a name="l00303"></a><span class="lineno">  303</span>&#160;            ModifyGraph /w=$dist_y_graphname lsize(dist_y)=2</div><div class="line"><a name="l00304"></a><span class="lineno">  304</span>&#160;            ModifyGraph /w=$dist_y_graphname rgb(dist_y)=(0,0,0)</div><div class="line"><a name="l00305"></a><span class="lineno">  305</span>&#160;        endif</div><div class="line"><a name="l00306"></a><span class="lineno">  306</span>&#160;    endif</div><div class="line"><a name="l00307"></a><span class="lineno">  307</span>&#160;end</div><div class="line"><a name="l00308"></a><span class="lineno">  308</span>&#160;</div><div class="line"><a name="l00318"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">  318</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(check)</div><div class="line"><a name="l00319"></a><span class="lineno">  319</span>&#160;    variable check</div><div class="line"><a name="l00320"></a><span class="lineno">  320</span>&#160;    </div><div class="line"><a name="l00321"></a><span class="lineno">  321</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00322"></a><span class="lineno">  322</span>&#160;    wave /sdfr=df raw</div><div class="line"><a name="l00323"></a><span class="lineno">  323</span>&#160;    wave /sdfr=df raw_theta</div><div class="line"><a name="l00324"></a><span class="lineno">  324</span>&#160;    wave /sdfr=df raw_tilt</div><div class="line"><a name="l00325"></a><span class="lineno">  325</span>&#160;    wave /sdfr=df raw_phi</div><div class="line"><a name="l00326"></a><span class="lineno">  326</span>&#160;    nvar /sdfr=df theta_offset</div><div class="line"><a name="l00327"></a><span class="lineno">  327</span>&#160;    nvar /sdfr=df tilt_offset</div><div class="line"><a name="l00328"></a><span class="lineno">  328</span>&#160;    nvar /sdfr=df phi_offset</div><div class="line"><a name="l00329"></a><span class="lineno">  329</span>&#160;    nvar /sdfr=df alpha_offset</div><div class="line"><a name="l00330"></a><span class="lineno">  330</span>&#160;    </div><div class="line"><a name="l00331"></a><span class="lineno">  331</span>&#160;    duplicate /o raw, df:process_data</div><div class="line"><a name="l00332"></a><span class="lineno">  332</span>&#160;    duplicate /o raw_theta, df:process_theta</div><div class="line"><a name="l00333"></a><span class="lineno">  333</span>&#160;    duplicate /o raw_tilt, df:process_tilt</div><div class="line"><a name="l00334"></a><span class="lineno">  334</span>&#160;    duplicate /o raw_phi, df:process_phi</div><div class="line"><a name="l00335"></a><span class="lineno">  335</span>&#160;    </div><div class="line"><a name="l00336"></a><span class="lineno">  336</span>&#160;    wave /sdfr=df process_data</div><div class="line"><a name="l00337"></a><span class="lineno">  337</span>&#160;    wave /sdfr=df process_theta</div><div class="line"><a name="l00338"></a><span class="lineno">  338</span>&#160;    wave /sdfr=df process_tilt</div><div class="line"><a name="l00339"></a><span class="lineno">  339</span>&#160;    wave /sdfr=df process_phi</div><div class="line"><a name="l00340"></a><span class="lineno">  340</span>&#160;    </div><div class="line"><a name="l00341"></a><span class="lineno">  341</span>&#160;    process_theta = raw_theta - theta_offset</div><div class="line"><a name="l00342"></a><span class="lineno">  342</span>&#160;    process_tilt = raw_tilt - tilt_offset</div><div class="line"><a name="l00343"></a><span class="lineno">  343</span>&#160;    process_phi = raw_phi - phi_offset</div><div class="line"><a name="l00344"></a><span class="lineno">  344</span>&#160;    setscale /p x dimoffset(raw, 0) - alpha_offset, dimdelta(raw, 0), waveunits(raw, 0), process_data</div><div class="line"><a name="l00345"></a><span class="lineno">  345</span>&#160;end</div><div class="line"><a name="l00346"></a><span class="lineno">  346</span>&#160;</div><div class="line"><a name="l00358"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#af39609fc80e58f2188b3aa564f53b750">  358</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#af39609fc80e58f2188b3aa564f53b750">do_crop</a>(check, [force])</div><div class="line"><a name="l00359"></a><span class="lineno">  359</span>&#160;    variable check</div><div class="line"><a name="l00360"></a><span class="lineno">  360</span>&#160;    variable force</div><div class="line"><a name="l00361"></a><span class="lineno">  361</span>&#160;    </div><div class="line"><a name="l00362"></a><span class="lineno">  362</span>&#160;    if (ParamIsDefault(force))</div><div class="line"><a name="l00363"></a><span class="lineno">  363</span>&#160;        force = 0</div><div class="line"><a name="l00364"></a><span class="lineno">  364</span>&#160;    endif</div><div class="line"><a name="l00365"></a><span class="lineno">  365</span>&#160;    </div><div class="line"><a name="l00366"></a><span class="lineno">  366</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00367"></a><span class="lineno">  367</span>&#160;    wave /sdfr=df process_data</div><div class="line"><a name="l00368"></a><span class="lineno">  368</span>&#160;    wave /sdfr=df process_theta</div><div class="line"><a name="l00369"></a><span class="lineno">  369</span>&#160;    wave /sdfr=df process_tilt</div><div class="line"><a name="l00370"></a><span class="lineno">  370</span>&#160;    wave /sdfr=df process_phi</div><div class="line"><a name="l00371"></a><span class="lineno">  371</span>&#160;    nvar /sdfr=df crop_enable</div><div class="line"><a name="l00372"></a><span class="lineno">  372</span>&#160;    nvar /sdfr=df crop_alpha</div><div class="line"><a name="l00373"></a><span class="lineno">  373</span>&#160;    nvar /sdfr=df crop_theta</div><div class="line"><a name="l00374"></a><span class="lineno">  374</span>&#160;    svar /sdfr=df crop_rows</div><div class="line"><a name="l00375"></a><span class="lineno">  375</span>&#160;</div><div class="line"><a name="l00376"></a><span class="lineno">  376</span>&#160;    if (force || crop_enable)</div><div class="line"><a name="l00377"></a><span class="lineno">  377</span>&#160;    </div><div class="line"><a name="l00378"></a><span class="lineno">  378</span>&#160;        if (crop_alpha &gt; abs(dimdelta(process_data, 0)))</div><div class="line"><a name="l00379"></a><span class="lineno">  379</span>&#160;            <a class="code" href="pearl-anglescan-process_8ipf.html#ab65d25af7476ed18f7bf7359614a912b">crop_strip</a>(process_data, -crop_alpha, +crop_alpha)</div><div class="line"><a name="l00380"></a><span class="lineno">  380</span>&#160;        endif</div><div class="line"><a name="l00381"></a><span class="lineno">  381</span>&#160;        </div><div class="line"><a name="l00382"></a><span class="lineno">  382</span>&#160;        if ((crop_theta &gt;= 10) &amp;&amp; (crop_theta &lt; 90))</div><div class="line"><a name="l00383"></a><span class="lineno">  383</span>&#160;            <a class="code" href="pearl-anglescan-process_8ipf.html#aa79c0ff6073bd42e202b9fa3f8c00b9f">crop_strip_theta</a>(process_data, 0, crop_theta, process_theta, process_tilt, process_phi)</div><div class="line"><a name="l00384"></a><span class="lineno">  384</span>&#160;        endif</div><div class="line"><a name="l00385"></a><span class="lineno">  385</span>&#160;        </div><div class="line"><a name="l00386"></a><span class="lineno">  386</span>&#160;        if (strlen(crop_rows) &gt; 0)</div><div class="line"><a name="l00387"></a><span class="lineno">  387</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a16424e5787967d9c120fb09c7849956e">delete_rows</a>(crop_rows, process_data, process_theta, process_tilt, process_phi)</div><div class="line"><a name="l00388"></a><span class="lineno">  388</span>&#160;        endif</div><div class="line"><a name="l00389"></a><span class="lineno">  389</span>&#160;    endif</div><div class="line"><a name="l00390"></a><span class="lineno">  390</span>&#160;end</div><div class="line"><a name="l00391"></a><span class="lineno">  391</span>&#160;</div><div class="line"><a name="l00406"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a16424e5787967d9c120fb09c7849956e">  406</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a16424e5787967d9c120fb09c7849956e">delete_rows</a>(rows, data, theta, tilt, phi)</div><div class="line"><a name="l00407"></a><span class="lineno">  407</span>&#160;    <span class="keywordtype">string</span> rows</div><div class="line"><a name="l00408"></a><span class="lineno">  408</span>&#160;    wave data</div><div class="line"><a name="l00409"></a><span class="lineno">  409</span>&#160;    wave theta</div><div class="line"><a name="l00410"></a><span class="lineno">  410</span>&#160;    wave tilt</div><div class="line"><a name="l00411"></a><span class="lineno">  411</span>&#160;    wave phi</div><div class="line"><a name="l00412"></a><span class="lineno">  412</span>&#160;    </div><div class="line"><a name="l00413"></a><span class="lineno">  413</span>&#160;    make /n=(numpnts(theta)) /i /free idx</div><div class="line"><a name="l00414"></a><span class="lineno">  414</span>&#160;    idx = p</div><div class="line"><a name="l00415"></a><span class="lineno">  415</span>&#160;    variable nrows = ItemsInList(rows, &quot;,&quot;)</div><div class="line"><a name="l00416"></a><span class="lineno">  416</span>&#160;    variable irow</div><div class="line"><a name="l00417"></a><span class="lineno">  417</span>&#160;    <span class="keywordtype">string</span> srow</div><div class="line"><a name="l00418"></a><span class="lineno">  418</span>&#160;    variable q1, q2</div><div class="line"><a name="l00419"></a><span class="lineno">  419</span>&#160;    for (irow = 0; irow &lt; nrows; irow += 1)</div><div class="line"><a name="l00420"></a><span class="lineno">  420</span>&#160;        srow = StringFromList(irow, rows, &quot;,&quot;)</div><div class="line"><a name="l00421"></a><span class="lineno">  421</span>&#160;        q1 = str2num(StringFromList(0, srow, &quot;-&quot;))</div><div class="line"><a name="l00422"></a><span class="lineno">  422</span>&#160;        q2 = str2num(StringFromList(1, srow, &quot;-&quot;))</div><div class="line"><a name="l00423"></a><span class="lineno">  423</span>&#160;        if (numtype(q2))</div><div class="line"><a name="l00424"></a><span class="lineno">  424</span>&#160;            q2 = q1</div><div class="line"><a name="l00425"></a><span class="lineno">  425</span>&#160;        endif</div><div class="line"><a name="l00426"></a><span class="lineno">  426</span>&#160;        if (q1 &lt;= q2)</div><div class="line"><a name="l00427"></a><span class="lineno">  427</span>&#160;            idx[q1,q2] = -1</div><div class="line"><a name="l00428"></a><span class="lineno">  428</span>&#160;        endif</div><div class="line"><a name="l00429"></a><span class="lineno">  429</span>&#160;    endfor</div><div class="line"><a name="l00430"></a><span class="lineno">  430</span>&#160;    extract /free idx, idx, idx &gt;= 0</div><div class="line"><a name="l00431"></a><span class="lineno">  431</span>&#160;    variable nx = dimsize(data, 0)</div><div class="line"><a name="l00432"></a><span class="lineno">  432</span>&#160;    variable ny = numpnts(idx)</div><div class="line"><a name="l00433"></a><span class="lineno">  433</span>&#160;    theta = theta[idx]</div><div class="line"><a name="l00434"></a><span class="lineno">  434</span>&#160;    tilt = tilt[idx]</div><div class="line"><a name="l00435"></a><span class="lineno">  435</span>&#160;    phi = phi[idx]</div><div class="line"><a name="l00436"></a><span class="lineno">  436</span>&#160;    redimension /n=(ny) theta, tilt, phi</div><div class="line"><a name="l00437"></a><span class="lineno">  437</span>&#160;    duplicate /free data, data_copy</div><div class="line"><a name="l00438"></a><span class="lineno">  438</span>&#160;    redimension /n=(nx,ny) data</div><div class="line"><a name="l00439"></a><span class="lineno">  439</span>&#160;    data = data_copy[p][idx[q]]</div><div class="line"><a name="l00440"></a><span class="lineno">  440</span>&#160;end</div><div class="line"><a name="l00441"></a><span class="lineno">  441</span>&#160;</div><div class="line"><a name="l00453"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a8f7266ac2840155dede704fda66fe6b0">  453</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a8f7266ac2840155dede704fda66fe6b0">do_norm_alpha</a>(check, [force])</div><div class="line"><a name="l00454"></a><span class="lineno">  454</span>&#160;    variable check</div><div class="line"><a name="l00455"></a><span class="lineno">  455</span>&#160;    variable force</div><div class="line"><a name="l00456"></a><span class="lineno">  456</span>&#160;    </div><div class="line"><a name="l00457"></a><span class="lineno">  457</span>&#160;    if (ParamIsDefault(force))</div><div class="line"><a name="l00458"></a><span class="lineno">  458</span>&#160;        force = 0</div><div class="line"><a name="l00459"></a><span class="lineno">  459</span>&#160;    endif</div><div class="line"><a name="l00460"></a><span class="lineno">  460</span>&#160;    </div><div class="line"><a name="l00461"></a><span class="lineno">  461</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00462"></a><span class="lineno">  462</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00463"></a><span class="lineno">  463</span>&#160;    wave /sdfr=df process_data</div><div class="line"><a name="l00464"></a><span class="lineno">  464</span>&#160;    nvar /sdfr=df norm_alpha_enable</div><div class="line"><a name="l00465"></a><span class="lineno">  465</span>&#160;    nvar /sdfr=df norm_alpha_mode</div><div class="line"><a name="l00466"></a><span class="lineno">  466</span>&#160;    nvar /sdfr=df norm_alpha_smoothing</div><div class="line"><a name="l00467"></a><span class="lineno">  467</span>&#160;</div><div class="line"><a name="l00468"></a><span class="lineno">  468</span>&#160;    if (force || norm_alpha_enable)</div><div class="line"><a name="l00469"></a><span class="lineno">  469</span>&#160;        dfref temp_df = newfreedatafolder()</div><div class="line"><a name="l00470"></a><span class="lineno">  470</span>&#160;        setdatafolder temp_df</div><div class="line"><a name="l00471"></a><span class="lineno">  471</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#a48b7d774ed8d3f4329e9923e18e580e8">normalize_strip_x</a>(process_data, smooth_method=norm_alpha_mode, smooth_factor=norm_alpha_smoothing, check=check)</div><div class="line"><a name="l00472"></a><span class="lineno">  472</span>&#160;        if (check)</div><div class="line"><a name="l00473"></a><span class="lineno">  473</span>&#160;            wave check_dist</div><div class="line"><a name="l00474"></a><span class="lineno">  474</span>&#160;            wave check_smoo</div><div class="line"><a name="l00475"></a><span class="lineno">  475</span>&#160;            duplicate /o check_dist, df:dist_x</div><div class="line"><a name="l00476"></a><span class="lineno">  476</span>&#160;            duplicate /o check_smoo, df:dist_x_smoo</div><div class="line"><a name="l00477"></a><span class="lineno">  477</span>&#160;        endif</div><div class="line"><a name="l00478"></a><span class="lineno">  478</span>&#160;    endif</div><div class="line"><a name="l00479"></a><span class="lineno">  479</span>&#160;    </div><div class="line"><a name="l00480"></a><span class="lineno">  480</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00481"></a><span class="lineno">  481</span>&#160;end</div><div class="line"><a name="l00482"></a><span class="lineno">  482</span>&#160;</div><div class="line"><a name="l00494"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a790519191391ac03c75eb7b57ea0749e">  494</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a790519191391ac03c75eb7b57ea0749e">do_norm_phi</a>(check, [force])</div><div class="line"><a name="l00495"></a><span class="lineno">  495</span>&#160;    variable check</div><div class="line"><a name="l00496"></a><span class="lineno">  496</span>&#160;    variable force</div><div class="line"><a name="l00497"></a><span class="lineno">  497</span>&#160;    </div><div class="line"><a name="l00498"></a><span class="lineno">  498</span>&#160;    if (ParamIsDefault(force))</div><div class="line"><a name="l00499"></a><span class="lineno">  499</span>&#160;        force = 0</div><div class="line"><a name="l00500"></a><span class="lineno">  500</span>&#160;    endif</div><div class="line"><a name="l00501"></a><span class="lineno">  501</span>&#160;    </div><div class="line"><a name="l00502"></a><span class="lineno">  502</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00503"></a><span class="lineno">  503</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00504"></a><span class="lineno">  504</span>&#160;    wave /sdfr=df process_data</div><div class="line"><a name="l00505"></a><span class="lineno">  505</span>&#160;    wave /sdfr=df process_theta</div><div class="line"><a name="l00506"></a><span class="lineno">  506</span>&#160;    wave /sdfr=df process_phi</div><div class="line"><a name="l00507"></a><span class="lineno">  507</span>&#160;    nvar /sdfr=df norm_phi_enable</div><div class="line"><a name="l00508"></a><span class="lineno">  508</span>&#160;    nvar /sdfr=df norm_phi_mode</div><div class="line"><a name="l00509"></a><span class="lineno">  509</span>&#160;    nvar /sdfr=df norm_phi_thetarange</div><div class="line"><a name="l00510"></a><span class="lineno">  510</span>&#160;</div><div class="line"><a name="l00511"></a><span class="lineno">  511</span>&#160;    if (force || norm_phi_enable)</div><div class="line"><a name="l00512"></a><span class="lineno">  512</span>&#160;        dfref temp_df = newfreedatafolder()</div><div class="line"><a name="l00513"></a><span class="lineno">  513</span>&#160;        setdatafolder temp_df</div><div class="line"><a name="l00514"></a><span class="lineno">  514</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#aaa734fddecdd75c7cabe20ba777b41b9">normalize_strip_phi</a>(process_data, process_theta, process_phi, theta_range=norm_phi_thetarange, check=check)</div><div class="line"><a name="l00515"></a><span class="lineno">  515</span>&#160;        if (check)</div><div class="line"><a name="l00516"></a><span class="lineno">  516</span>&#160;            wave check_dist</div><div class="line"><a name="l00517"></a><span class="lineno">  517</span>&#160;            wave check_smoo</div><div class="line"><a name="l00518"></a><span class="lineno">  518</span>&#160;            duplicate /o check_dist, df:dist_y</div><div class="line"><a name="l00519"></a><span class="lineno">  519</span>&#160;            duplicate /o check_smoo, df:dist_y_smoo</div><div class="line"><a name="l00520"></a><span class="lineno">  520</span>&#160;        endif</div><div class="line"><a name="l00521"></a><span class="lineno">  521</span>&#160;    endif</div><div class="line"><a name="l00522"></a><span class="lineno">  522</span>&#160;    </div><div class="line"><a name="l00523"></a><span class="lineno">  523</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00524"></a><span class="lineno">  524</span>&#160;end</div><div class="line"><a name="l00525"></a><span class="lineno">  525</span>&#160;</div><div class="line"><a name="l00537"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a7b288598e3faa37e414b1443982c1a3e">  537</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a7b288598e3faa37e414b1443982c1a3e">do_norm_theta</a>(check, [force])</div><div class="line"><a name="l00538"></a><span class="lineno">  538</span>&#160;    variable check</div><div class="line"><a name="l00539"></a><span class="lineno">  539</span>&#160;    variable force</div><div class="line"><a name="l00540"></a><span class="lineno">  540</span>&#160;    </div><div class="line"><a name="l00541"></a><span class="lineno">  541</span>&#160;    if (ParamIsDefault(force))</div><div class="line"><a name="l00542"></a><span class="lineno">  542</span>&#160;        force = 0</div><div class="line"><a name="l00543"></a><span class="lineno">  543</span>&#160;    endif</div><div class="line"><a name="l00544"></a><span class="lineno">  544</span>&#160;    </div><div class="line"><a name="l00545"></a><span class="lineno">  545</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00546"></a><span class="lineno">  546</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00547"></a><span class="lineno">  547</span>&#160;    wave /sdfr=df process_data</div><div class="line"><a name="l00548"></a><span class="lineno">  548</span>&#160;    wave /sdfr=df process_theta</div><div class="line"><a name="l00549"></a><span class="lineno">  549</span>&#160;    nvar /sdfr=df norm_theta_enable</div><div class="line"><a name="l00550"></a><span class="lineno">  550</span>&#160;    nvar /sdfr=df norm_theta_mode</div><div class="line"><a name="l00551"></a><span class="lineno">  551</span>&#160;    nvar /sdfr=df norm_theta_domain</div><div class="line"><a name="l00552"></a><span class="lineno">  552</span>&#160;    nvar /sdfr=df norm_theta_smoothing</div><div class="line"><a name="l00553"></a><span class="lineno">  553</span>&#160;</div><div class="line"><a name="l00554"></a><span class="lineno">  554</span>&#160;    if (force || norm_theta_enable)</div><div class="line"><a name="l00555"></a><span class="lineno">  555</span>&#160;        dfref temp_df = newfreedatafolder()</div><div class="line"><a name="l00556"></a><span class="lineno">  556</span>&#160;        setdatafolder temp_df</div><div class="line"><a name="l00557"></a><span class="lineno">  557</span>&#160;        if (norm_theta_domain==1)</div><div class="line"><a name="l00558"></a><span class="lineno">  558</span>&#160;            <a class="code" href="pearl-anglescan-process_8ipf.html#a992920d621023e6b483ff51eee68b508">normalize_strip_theta_scans</a>(process_data, process_theta, smooth_method=norm_theta_mode, smooth_factor=norm_theta_smoothing, check=check)</div><div class="line"><a name="l00559"></a><span class="lineno">  559</span>&#160;        else</div><div class="line"><a name="l00560"></a><span class="lineno">  560</span>&#160;            <a class="code" href="pearl-anglescan-process_8ipf.html#a9b56897bd92d926d65f4c67bef1d41bb">normalize_strip_theta</a>(process_data, process_theta, smooth_method=norm_theta_mode, smooth_factor=norm_theta_smoothing, check=check)</div><div class="line"><a name="l00561"></a><span class="lineno">  561</span>&#160;        endif</div><div class="line"><a name="l00562"></a><span class="lineno">  562</span>&#160;        if (check)</div><div class="line"><a name="l00563"></a><span class="lineno">  563</span>&#160;            wave check_dist</div><div class="line"><a name="l00564"></a><span class="lineno">  564</span>&#160;            wave check_smoo</div><div class="line"><a name="l00565"></a><span class="lineno">  565</span>&#160;            duplicate /o check_dist, df:dist_y</div><div class="line"><a name="l00566"></a><span class="lineno">  566</span>&#160;            duplicate /o check_smoo, df:dist_y_smoo</div><div class="line"><a name="l00567"></a><span class="lineno">  567</span>&#160;        endif</div><div class="line"><a name="l00568"></a><span class="lineno">  568</span>&#160;    endif</div><div class="line"><a name="l00569"></a><span class="lineno">  569</span>&#160;    </div><div class="line"><a name="l00570"></a><span class="lineno">  570</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00571"></a><span class="lineno">  571</span>&#160;end</div><div class="line"><a name="l00572"></a><span class="lineno">  572</span>&#160;</div><div class="line"><a name="l00584"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#af6509fc7584b0bcbdc8561df2bc12a58">  584</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#af6509fc7584b0bcbdc8561df2bc12a58">do_norm_thetaphi</a>(check, [force])</div><div class="line"><a name="l00585"></a><span class="lineno">  585</span>&#160;    variable check</div><div class="line"><a name="l00586"></a><span class="lineno">  586</span>&#160;    variable force</div><div class="line"><a name="l00587"></a><span class="lineno">  587</span>&#160;    </div><div class="line"><a name="l00588"></a><span class="lineno">  588</span>&#160;    if (ParamIsDefault(force))</div><div class="line"><a name="l00589"></a><span class="lineno">  589</span>&#160;        force = 0</div><div class="line"><a name="l00590"></a><span class="lineno">  590</span>&#160;    endif</div><div class="line"><a name="l00591"></a><span class="lineno">  591</span>&#160;    </div><div class="line"><a name="l00592"></a><span class="lineno">  592</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00593"></a><span class="lineno">  593</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00594"></a><span class="lineno">  594</span>&#160;    wave /sdfr=df process_data</div><div class="line"><a name="l00595"></a><span class="lineno">  595</span>&#160;    wave /sdfr=df process_theta</div><div class="line"><a name="l00596"></a><span class="lineno">  596</span>&#160;    wave /sdfr=df process_phi</div><div class="line"><a name="l00597"></a><span class="lineno">  597</span>&#160;    nvar /sdfr=df norm_thetaphi_enable</div><div class="line"><a name="l00598"></a><span class="lineno">  598</span>&#160;    nvar /sdfr=df norm_thetaphi_mode</div><div class="line"><a name="l00599"></a><span class="lineno">  599</span>&#160;    nvar /sdfr=df norm_thetaphi_smoothing</div><div class="line"><a name="l00600"></a><span class="lineno">  600</span>&#160;</div><div class="line"><a name="l00601"></a><span class="lineno">  601</span>&#160;    if (force || norm_thetaphi_enable)</div><div class="line"><a name="l00602"></a><span class="lineno">  602</span>&#160;        dfref temp_df = newfreedatafolder()</div><div class="line"><a name="l00603"></a><span class="lineno">  603</span>&#160;        setdatafolder temp_df</div><div class="line"><a name="l00604"></a><span class="lineno">  604</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#ad0a93367d2e9b66bb7b81697e87adfaf">normalize_strip_thetaphi</a>(process_data, process_theta, process_phi, smooth_method=norm_thetaphi_mode, smooth_factor=norm_thetaphi_smoothing, check=check)</div><div class="line"><a name="l00605"></a><span class="lineno">  605</span>&#160;        if (check)</div><div class="line"><a name="l00606"></a><span class="lineno">  606</span>&#160;            wave check_dist</div><div class="line"><a name="l00607"></a><span class="lineno">  607</span>&#160;            wave check_smoo</div><div class="line"><a name="l00608"></a><span class="lineno">  608</span>&#160;            duplicate /o check_dist, df:dist_y</div><div class="line"><a name="l00609"></a><span class="lineno">  609</span>&#160;            duplicate /o check_smoo, df:dist_y_smoo</div><div class="line"><a name="l00610"></a><span class="lineno">  610</span>&#160;        endif</div><div class="line"><a name="l00611"></a><span class="lineno">  611</span>&#160;    endif</div><div class="line"><a name="l00612"></a><span class="lineno">  612</span>&#160;    </div><div class="line"><a name="l00613"></a><span class="lineno">  613</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00614"></a><span class="lineno">  614</span>&#160;end</div><div class="line"><a name="l00615"></a><span class="lineno">  615</span>&#160;</div><div class="line"><a name="l00620"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#af21424ce00e4bac1ac990d2bb83d46dc">  620</a></span>&#160;function <a class="code" href="pearl-anglescan-panel_8ipf.html#af21424ce00e4bac1ac990d2bb83d46dc">asp_calculate_output</a>()</div><div class="line"><a name="l00621"></a><span class="lineno">  621</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00622"></a><span class="lineno">  622</span>&#160;    setdatafolder $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00623"></a><span class="lineno">  623</span>&#160;    </div><div class="line"><a name="l00624"></a><span class="lineno">  624</span>&#160;    svar output_name</div><div class="line"><a name="l00625"></a><span class="lineno">  625</span>&#160;    </div><div class="line"><a name="l00626"></a><span class="lineno">  626</span>&#160;    wave process_data</div><div class="line"><a name="l00627"></a><span class="lineno">  627</span>&#160;    wave process_theta</div><div class="line"><a name="l00628"></a><span class="lineno">  628</span>&#160;    wave process_tilt</div><div class="line"><a name="l00629"></a><span class="lineno">  629</span>&#160;    wave process_phi</div><div class="line"><a name="l00630"></a><span class="lineno">  630</span>&#160;</div><div class="line"><a name="l00631"></a><span class="lineno">  631</span>&#160;    nvar folding=output_folding</div><div class="line"><a name="l00632"></a><span class="lineno">  632</span>&#160;    nvar horizon=output_horizon</div><div class="line"><a name="l00633"></a><span class="lineno">  633</span>&#160;</div><div class="line"><a name="l00634"></a><span class="lineno">  634</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00635"></a><span class="lineno">  635</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#af39609fc80e58f2188b3aa564f53b750">do_crop</a>(0)</div><div class="line"><a name="l00636"></a><span class="lineno">  636</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a8f7266ac2840155dede704fda66fe6b0">do_norm_alpha</a>(0)</div><div class="line"><a name="l00637"></a><span class="lineno">  637</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a790519191391ac03c75eb7b57ea0749e">do_norm_phi</a>(0)</div><div class="line"><a name="l00638"></a><span class="lineno">  638</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a7b288598e3faa37e414b1443982c1a3e">do_norm_theta</a>(0)</div><div class="line"><a name="l00639"></a><span class="lineno">  639</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#af6509fc7584b0bcbdc8561df2bc12a58">do_norm_thetaphi</a>(0)</div><div class="line"><a name="l00640"></a><span class="lineno">  640</span>&#160;    </div><div class="line"><a name="l00641"></a><span class="lineno">  641</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a229770447193d4fd12032b235aab4d28">pizza_service_2</a>(process_data, output_name, process_theta, process_tilt, process_phi, folding=folding, nograph=1)</div><div class="line"><a name="l00642"></a><span class="lineno">  642</span>&#160;    </div><div class="line"><a name="l00643"></a><span class="lineno">  643</span>&#160;    setdatafolder $output_name</div><div class="line"><a name="l00644"></a><span class="lineno">  644</span>&#160;    wave values</div><div class="line"><a name="l00645"></a><span class="lineno">  645</span>&#160;    wave pol</div><div class="line"><a name="l00646"></a><span class="lineno">  646</span>&#160;    if (horizon &gt; 0)</div><div class="line"><a name="l00647"></a><span class="lineno">  647</span>&#160;        values = pol &lt;= horizon ? values : nan</div><div class="line"><a name="l00648"></a><span class="lineno">  648</span>&#160;    endif</div><div class="line"><a name="l00649"></a><span class="lineno">  649</span>&#160;    </div><div class="line"><a name="l00650"></a><span class="lineno">  650</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00651"></a><span class="lineno">  651</span>&#160;end</div><div class="line"><a name="l00652"></a><span class="lineno">  652</span>&#160;</div><div class="line"><a name="l00666"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a8e540427fab71f879e84003c49c59f22">  666</a></span>&#160;function /s <a class="code" href="pearl-anglescan-panel_8ipf.html#a8e540427fab71f879e84003c49c59f22">asp_display_output</a>([data_df, data_name])</div><div class="line"><a name="l00667"></a><span class="lineno">  667</span>&#160;    dfref data_df</div><div class="line"><a name="l00668"></a><span class="lineno">  668</span>&#160;    <span class="keywordtype">string</span> data_name</div><div class="line"><a name="l00669"></a><span class="lineno">  669</span>&#160;    </div><div class="line"><a name="l00670"></a><span class="lineno">  670</span>&#160;    dfref pkg_df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00671"></a><span class="lineno">  671</span>&#160;    svar /sdfr=pkg_df output_name</div><div class="line"><a name="l00672"></a><span class="lineno">  672</span>&#160;    svar /sdfr=pkg_df output_graphname</div><div class="line"><a name="l00673"></a><span class="lineno">  673</span>&#160;    nvar /sdfr=pkg_df graph_projection</div><div class="line"><a name="l00674"></a><span class="lineno">  674</span>&#160;    nvar /sdfr=pkg_df graph_mode</div><div class="line"><a name="l00675"></a><span class="lineno">  675</span>&#160;    svar /sdfr=pkg_df graph_colortable</div><div class="line"><a name="l00676"></a><span class="lineno">  676</span>&#160;    nvar /sdfr=pkg_df graph_contrast</div><div class="line"><a name="l00677"></a><span class="lineno">  677</span>&#160;</div><div class="line"><a name="l00678"></a><span class="lineno">  678</span>&#160;    if (ParamIsDefault(data_df))</div><div class="line"><a name="l00679"></a><span class="lineno">  679</span>&#160;        dfref data_df = pkg_df</div><div class="line"><a name="l00680"></a><span class="lineno">  680</span>&#160;    endif</div><div class="line"><a name="l00681"></a><span class="lineno">  681</span>&#160;    if (ParamIsDefault(data_name))</div><div class="line"><a name="l00682"></a><span class="lineno">  682</span>&#160;        data_name = output_name</div><div class="line"><a name="l00683"></a><span class="lineno">  683</span>&#160;    endif</div><div class="line"><a name="l00684"></a><span class="lineno">  684</span>&#160;</div><div class="line"><a name="l00685"></a><span class="lineno">  685</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00686"></a><span class="lineno">  686</span>&#160;    setdatafolder data_df</div><div class="line"><a name="l00687"></a><span class="lineno">  687</span>&#160;</div><div class="line"><a name="l00688"></a><span class="lineno">  688</span>&#160;    if (graph_mode == 3)</div><div class="line"><a name="l00689"></a><span class="lineno">  689</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#acca0130cccf2286863bbf5b7f91c5b3b">interpolate_hemi_scan</a>(data_name, projection=graph_projection)</div><div class="line"><a name="l00690"></a><span class="lineno">  690</span>&#160;    endif</div><div class="line"><a name="l00691"></a><span class="lineno">  691</span>&#160;    </div><div class="line"><a name="l00692"></a><span class="lineno">  692</span>&#160;    <span class="keywordtype">string</span> graphname = data_name</div><div class="line"><a name="l00693"></a><span class="lineno">  693</span>&#160;    graphname = <a class="code" href="pearl-anglescan-process_8ipf.html#ae57302acfc822c4817f2b7eef55efea2">display_hemi_scan</a>(data_name, projection=graph_projection, graphtype=graph_mode, graphname=graphname)</div><div class="line"><a name="l00694"></a><span class="lineno">  694</span>&#160;    if (ParamIsDefault(data_df))</div><div class="line"><a name="l00695"></a><span class="lineno">  695</span>&#160;        output_graphname = graphname</div><div class="line"><a name="l00696"></a><span class="lineno">  696</span>&#160;    endif</div><div class="line"><a name="l00697"></a><span class="lineno">  697</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00698"></a><span class="lineno">  698</span>&#160;</div><div class="line"><a name="l00699"></a><span class="lineno">  699</span>&#160;    if (strlen(graphname) &amp;&amp; (wintype(graphname) == 1))</div><div class="line"><a name="l00700"></a><span class="lineno">  700</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#a666dab03bb2e97ffef81cea450184d42">set_contrast</a>(graph_contrast, graph_contrast, graphname=graphname, colortable=graph_colortable)</div><div class="line"><a name="l00701"></a><span class="lineno">  701</span>&#160;    endif</div><div class="line"><a name="l00702"></a><span class="lineno">  702</span>&#160;</div><div class="line"><a name="l00703"></a><span class="lineno">  703</span>&#160;    return graphname</div><div class="line"><a name="l00704"></a><span class="lineno">  704</span>&#160;end</div><div class="line"><a name="l00705"></a><span class="lineno">  705</span>&#160;</div><div class="line"><a name="l00710"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a93dc5a029ae9831066e6ad133522ee88">  710</a></span>&#160;function <a class="code" href="pearl-anglescan-panel_8ipf.html#a93dc5a029ae9831066e6ad133522ee88">asp_update_graph</a>()</div><div class="line"><a name="l00711"></a><span class="lineno">  711</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00712"></a><span class="lineno">  712</span>&#160;</div><div class="line"><a name="l00713"></a><span class="lineno">  713</span>&#160;    svar /sdfr=df preview_graphname</div><div class="line"><a name="l00714"></a><span class="lineno">  714</span>&#160;    svar /sdfr=df output_graphname</div><div class="line"><a name="l00715"></a><span class="lineno">  715</span>&#160;    svar /sdfr=df graph_colortable</div><div class="line"><a name="l00716"></a><span class="lineno">  716</span>&#160;    nvar /sdfr=df graph_contrast</div><div class="line"><a name="l00717"></a><span class="lineno">  717</span>&#160;</div><div class="line"><a name="l00718"></a><span class="lineno">  718</span>&#160;    if (strlen(preview_graphname) &amp;&amp; (wintype(preview_graphname) == 1))</div><div class="line"><a name="l00719"></a><span class="lineno">  719</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#a666dab03bb2e97ffef81cea450184d42">set_contrast</a>(graph_contrast, graph_contrast, graphname=preview_graphname, colortable=graph_colortable)</div><div class="line"><a name="l00720"></a><span class="lineno">  720</span>&#160;    endif</div><div class="line"><a name="l00721"></a><span class="lineno">  721</span>&#160;    if (strlen(output_graphname) &amp;&amp; (wintype(output_graphname) == 1))</div><div class="line"><a name="l00722"></a><span class="lineno">  722</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#a666dab03bb2e97ffef81cea450184d42">set_contrast</a>(graph_contrast, graph_contrast, graphname=output_graphname, colortable=graph_colortable)</div><div class="line"><a name="l00723"></a><span class="lineno">  723</span>&#160;    endif</div><div class="line"><a name="l00724"></a><span class="lineno">  724</span>&#160;end</div><div class="line"><a name="l00725"></a><span class="lineno">  725</span>&#160;</div><div class="line"><a name="l00728"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#aac9d4d0388cbe8e6aa8f47b1c5276d83">  728</a></span>&#160;function <a class="code" href="pearl-anglescan-panel_8ipf.html#aac9d4d0388cbe8e6aa8f47b1c5276d83">asp_close_graphs</a>()</div><div class="line"><a name="l00729"></a><span class="lineno">  729</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00730"></a><span class="lineno">  730</span>&#160;</div><div class="line"><a name="l00731"></a><span class="lineno">  731</span>&#160;    svar /sdfr=df preview_graphname</div><div class="line"><a name="l00732"></a><span class="lineno">  732</span>&#160;    svar /sdfr=df output_graphname</div><div class="line"><a name="l00733"></a><span class="lineno">  733</span>&#160;    svar /sdfr=df dist_x_graphname</div><div class="line"><a name="l00734"></a><span class="lineno">  734</span>&#160;    svar /sdfr=df dist_y_graphname</div><div class="line"><a name="l00735"></a><span class="lineno">  735</span>&#160;</div><div class="line"><a name="l00736"></a><span class="lineno">  736</span>&#160;    if (strlen(preview_graphname) &amp;&amp; (wintype(preview_graphname) == 1))</div><div class="line"><a name="l00737"></a><span class="lineno">  737</span>&#160;        killwindow $preview_graphname</div><div class="line"><a name="l00738"></a><span class="lineno">  738</span>&#160;    endif</div><div class="line"><a name="l00739"></a><span class="lineno">  739</span>&#160;    if (strlen(output_graphname) &amp;&amp; (wintype(output_graphname) == 1))</div><div class="line"><a name="l00740"></a><span class="lineno">  740</span>&#160;        killwindow $output_graphname</div><div class="line"><a name="l00741"></a><span class="lineno">  741</span>&#160;    endif</div><div class="line"><a name="l00742"></a><span class="lineno">  742</span>&#160;    if (strlen(dist_x_graphname) &amp;&amp; (wintype(dist_x_graphname) == 1))</div><div class="line"><a name="l00743"></a><span class="lineno">  743</span>&#160;        killwindow $dist_x_graphname</div><div class="line"><a name="l00744"></a><span class="lineno">  744</span>&#160;    endif</div><div class="line"><a name="l00745"></a><span class="lineno">  745</span>&#160;    if (strlen(dist_y_graphname) &amp;&amp; (wintype(dist_y_graphname) == 1))</div><div class="line"><a name="l00746"></a><span class="lineno">  746</span>&#160;        killwindow $dist_y_graphname</div><div class="line"><a name="l00747"></a><span class="lineno">  747</span>&#160;    endif</div><div class="line"><a name="l00748"></a><span class="lineno">  748</span>&#160;</div><div class="line"><a name="l00749"></a><span class="lineno">  749</span>&#160;    preview_graphname = &quot;&quot;</div><div class="line"><a name="l00750"></a><span class="lineno">  750</span>&#160;    output_graphname = &quot;&quot;</div><div class="line"><a name="l00751"></a><span class="lineno">  751</span>&#160;    dist_x_graphname = &quot;&quot;</div><div class="line"><a name="l00752"></a><span class="lineno">  752</span>&#160;    dist_y_graphname = &quot;&quot;</div><div class="line"><a name="l00753"></a><span class="lineno">  753</span>&#160;end</div><div class="line"><a name="l00754"></a><span class="lineno">  754</span>&#160;</div><div class="line"><a name="l00768"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#adf7c5a4e7c66c3d6e13d01674b9cf47f">  768</a></span>&#160;function /s <a class="code" href="pearl-anglescan-panel_8ipf.html#adf7c5a4e7c66c3d6e13d01674b9cf47f">asp_duplicate_output</a>(dest_name, [do_graph])</div><div class="line"><a name="l00769"></a><span class="lineno">  769</span>&#160;    <span class="keywordtype">string</span> dest_name</div><div class="line"><a name="l00770"></a><span class="lineno">  770</span>&#160;    variable do_graph</div><div class="line"><a name="l00771"></a><span class="lineno">  771</span>&#160;    </div><div class="line"><a name="l00772"></a><span class="lineno">  772</span>&#160;    if (ParamIsDefault(do_graph))</div><div class="line"><a name="l00773"></a><span class="lineno">  773</span>&#160;        do_graph = 0</div><div class="line"><a name="l00774"></a><span class="lineno">  774</span>&#160;    endif</div><div class="line"><a name="l00775"></a><span class="lineno">  775</span>&#160;</div><div class="line"><a name="l00776"></a><span class="lineno">  776</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00777"></a><span class="lineno">  777</span>&#160;    svar /sdfr=df source_path</div><div class="line"><a name="l00778"></a><span class="lineno">  778</span>&#160;    svar /sdfr=df output_name</div><div class="line"><a name="l00779"></a><span class="lineno">  779</span>&#160;    svar /sdfr=df output_graphname</div><div class="line"><a name="l00780"></a><span class="lineno">  780</span>&#160;    wave raw_data = $source_path</div><div class="line"><a name="l00781"></a><span class="lineno">  781</span>&#160;    </div><div class="line"><a name="l00782"></a><span class="lineno">  782</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00783"></a><span class="lineno">  783</span>&#160;    dfref raw_df = GetWavesDataFolderDFR(raw_data)</div><div class="line"><a name="l00784"></a><span class="lineno">  784</span>&#160;    setdatafolder raw_df</div><div class="line"><a name="l00785"></a><span class="lineno">  785</span>&#160;    newdatafolder /o /s $dest_name</div><div class="line"><a name="l00786"></a><span class="lineno">  786</span>&#160;    dfref dest_df = GetDataFolderDFR()</div><div class="line"><a name="l00787"></a><span class="lineno">  787</span>&#160;    setdatafolder df</div><div class="line"><a name="l00788"></a><span class="lineno">  788</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#aa5b1e2ab1dd43a73b7157406b803887e">duplicate_hemi_scan</a>(output_name, dest_df, &quot;&quot;)</div><div class="line"><a name="l00789"></a><span class="lineno">  789</span>&#160;    </div><div class="line"><a name="l00790"></a><span class="lineno">  790</span>&#160;    <span class="keywordtype">string</span> graphname = &quot;&quot;</div><div class="line"><a name="l00791"></a><span class="lineno">  791</span>&#160;    if (do_graph)</div><div class="line"><a name="l00792"></a><span class="lineno">  792</span>&#160;        graphname = <a class="code" href="pearl-anglescan-panel_8ipf.html#a8e540427fab71f879e84003c49c59f22">asp_display_output</a>(data_df=raw_df, data_name=dest_name)</div><div class="line"><a name="l00793"></a><span class="lineno">  793</span>&#160;    endif</div><div class="line"><a name="l00794"></a><span class="lineno">  794</span>&#160;    </div><div class="line"><a name="l00795"></a><span class="lineno">  795</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00796"></a><span class="lineno">  796</span>&#160;    return graphname</div><div class="line"><a name="l00797"></a><span class="lineno">  797</span>&#160;end</div><div class="line"><a name="l00798"></a><span class="lineno">  798</span>&#160;</div><div class="line"><a name="l00801"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a0e0f10d125f1cdacffa3bff9b0854aa9">  801</a></span>&#160;function <a class="code" href="pearl-anglescan-panel_8ipf.html#a0e0f10d125f1cdacffa3bff9b0854aa9">asp_save_output_itx</a>()</div><div class="line"><a name="l00802"></a><span class="lineno">  802</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00803"></a><span class="lineno">  803</span>&#160;    svar /sdfr=df output_name</div><div class="line"><a name="l00804"></a><span class="lineno">  804</span>&#160;    </div><div class="line"><a name="l00805"></a><span class="lineno">  805</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00806"></a><span class="lineno">  806</span>&#160;    setdatafolder df</div><div class="line"><a name="l00807"></a><span class="lineno">  807</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a48cbd596656bc6d849c53afb4c58b90d">save_hemi_scan</a>(output_name, &quot;&quot;, &quot;&quot;)</div><div class="line"><a name="l00808"></a><span class="lineno">  808</span>&#160;    </div><div class="line"><a name="l00809"></a><span class="lineno">  809</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00810"></a><span class="lineno">  810</span>&#160;end</div><div class="line"><a name="l00811"></a><span class="lineno">  811</span>&#160;</div><div class="line"><a name="l00816"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#abb4d53822bc34bda0e38332c7777ebac">  816</a></span>&#160;function <a class="code" href="pearl-anglescan-panel_8ipf.html#abb4d53822bc34bda0e38332c7777ebac">asp_save_output_etpi</a>(ekin)</div><div class="line"><a name="l00817"></a><span class="lineno">  817</span>&#160;    variable ekin</div><div class="line"><a name="l00818"></a><span class="lineno">  818</span>&#160;    </div><div class="line"><a name="l00819"></a><span class="lineno">  819</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00820"></a><span class="lineno">  820</span>&#160;    svar /sdfr=df output_name</div><div class="line"><a name="l00821"></a><span class="lineno">  821</span>&#160;    wave /sdfr=df process_data</div><div class="line"><a name="l00822"></a><span class="lineno">  822</span>&#160;    </div><div class="line"><a name="l00823"></a><span class="lineno">  823</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00824"></a><span class="lineno">  824</span>&#160;    setdatafolder df</div><div class="line"><a name="l00825"></a><span class="lineno">  825</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l00826"></a><span class="lineno">  826</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l00827"></a><span class="lineno">  827</span>&#160;    dfref data_df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(output_name, s_prefix, s_int)</div><div class="line"><a name="l00828"></a><span class="lineno">  828</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l00829"></a><span class="lineno">  829</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l00830"></a><span class="lineno">  830</span>&#160;    </div><div class="line"><a name="l00831"></a><span class="lineno">  831</span>&#160;    <a class="code" href="pearl-pmsco-import_8ipf.html#aa31bbaa2fc77b447e6c6f386b23abdd9">pmsco_save_scan</a>(&quot;&quot;, &quot;&quot;, num2str(ekin), s_polar, s_azim, &quot;&quot;, s_int, &quot;&quot;, sdfr=data_df)</div><div class="line"><a name="l00832"></a><span class="lineno">  832</span>&#160;    </div><div class="line"><a name="l00833"></a><span class="lineno">  833</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00834"></a><span class="lineno">  834</span>&#160;end</div><div class="line"><a name="l00835"></a><span class="lineno">  835</span>&#160;</div><div class="line"><a name="l00836"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#af5435ccaabba78f855b244929dc09ed0">  836</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#af5435ccaabba78f855b244929dc09ed0">check_norm_alpha</a>()</div><div class="line"><a name="l00837"></a><span class="lineno">  837</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00838"></a><span class="lineno">  838</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#af39609fc80e58f2188b3aa564f53b750">do_crop</a>(0)</div><div class="line"><a name="l00839"></a><span class="lineno">  839</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a8f7266ac2840155dede704fda66fe6b0">do_norm_alpha</a>(2, force=1)</div><div class="line"><a name="l00840"></a><span class="lineno">  840</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a59886414c7dc2486c5a17f078896c705">asp_display_dist_check</a>(1, 0)</div><div class="line"><a name="l00841"></a><span class="lineno">  841</span>&#160;end</div><div class="line"><a name="l00842"></a><span class="lineno">  842</span>&#160;</div><div class="line"><a name="l00843"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a91d5343cc96730de12b535cb0bef9df2">  843</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a91d5343cc96730de12b535cb0bef9df2">check_norm_phi</a>()</div><div class="line"><a name="l00844"></a><span class="lineno">  844</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00845"></a><span class="lineno">  845</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#af39609fc80e58f2188b3aa564f53b750">do_crop</a>(0)</div><div class="line"><a name="l00846"></a><span class="lineno">  846</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a790519191391ac03c75eb7b57ea0749e">do_norm_phi</a>(2, force=1)</div><div class="line"><a name="l00847"></a><span class="lineno">  847</span>&#160;    asp_display_dist_check(0, 1)</div><div class="line"><a name="l00848"></a><span class="lineno">  848</span>&#160;end</div><div class="line"><a name="l00849"></a><span class="lineno">  849</span>&#160;</div><div class="line"><a name="l00850"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#addddc12e5b622a3d00756d724e5d05a9">  850</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#addddc12e5b622a3d00756d724e5d05a9">check_norm_theta</a>()</div><div class="line"><a name="l00851"></a><span class="lineno">  851</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00852"></a><span class="lineno">  852</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#af39609fc80e58f2188b3aa564f53b750">do_crop</a>(0)</div><div class="line"><a name="l00853"></a><span class="lineno">  853</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a7b288598e3faa37e414b1443982c1a3e">do_norm_theta</a>(2, force=1)</div><div class="line"><a name="l00854"></a><span class="lineno">  854</span>&#160;    asp_display_dist_check(0, 1)</div><div class="line"><a name="l00855"></a><span class="lineno">  855</span>&#160;end</div><div class="line"><a name="l00856"></a><span class="lineno">  856</span>&#160;</div><div class="line"><a name="l00857"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a4708e7385790d1a9f2d58c4d64a60653">  857</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a4708e7385790d1a9f2d58c4d64a60653">check_norm_thetaphi</a>()</div><div class="line"><a name="l00858"></a><span class="lineno">  858</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00859"></a><span class="lineno">  859</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#af39609fc80e58f2188b3aa564f53b750">do_crop</a>(0)</div><div class="line"><a name="l00860"></a><span class="lineno">  860</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#af6509fc7584b0bcbdc8561df2bc12a58">do_norm_thetaphi</a>(2, force=1)</div><div class="line"><a name="l00861"></a><span class="lineno">  861</span>&#160;    asp_display_dist_check(0, 1)</div><div class="line"><a name="l00862"></a><span class="lineno">  862</span>&#160;end</div><div class="line"><a name="l00863"></a><span class="lineno">  863</span>&#160;</div><div class="line"><a name="l00864"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a2268cc96a879c1a055c1ff29c1b040ea">  864</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a2268cc96a879c1a055c1ff29c1b040ea">preview_crop</a>()</div><div class="line"><a name="l00865"></a><span class="lineno">  865</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00866"></a><span class="lineno">  866</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#af39609fc80e58f2188b3aa564f53b750">do_crop</a>(0, force=1)</div><div class="line"><a name="l00867"></a><span class="lineno">  867</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a66b3eef1fd0be13dfef0a66781f55062">asp_display_previews</a>()</div><div class="line"><a name="l00868"></a><span class="lineno">  868</span>&#160;end</div><div class="line"><a name="l00869"></a><span class="lineno">  869</span>&#160;</div><div class="line"><a name="l00870"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#ad355d06d3b57bb458bd62e6d6f1f2417">  870</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#ad355d06d3b57bb458bd62e6d6f1f2417">preview_norm_alpha</a>()</div><div class="line"><a name="l00871"></a><span class="lineno">  871</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00872"></a><span class="lineno">  872</span>&#160;    do_crop(0)</div><div class="line"><a name="l00873"></a><span class="lineno">  873</span>&#160;    do_norm_alpha(1, force=1)</div><div class="line"><a name="l00874"></a><span class="lineno">  874</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a66b3eef1fd0be13dfef0a66781f55062">asp_display_previews</a>()</div><div class="line"><a name="l00875"></a><span class="lineno">  875</span>&#160;end</div><div class="line"><a name="l00876"></a><span class="lineno">  876</span>&#160;</div><div class="line"><a name="l00877"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a0c228ce2048827dc8161691ec5c425fc">  877</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a0c228ce2048827dc8161691ec5c425fc">preview_norm_phi</a>()</div><div class="line"><a name="l00878"></a><span class="lineno">  878</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00879"></a><span class="lineno">  879</span>&#160;    do_crop(0)</div><div class="line"><a name="l00880"></a><span class="lineno">  880</span>&#160;    do_norm_phi(1, force=1)</div><div class="line"><a name="l00881"></a><span class="lineno">  881</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a66b3eef1fd0be13dfef0a66781f55062">asp_display_previews</a>()</div><div class="line"><a name="l00882"></a><span class="lineno">  882</span>&#160;end</div><div class="line"><a name="l00883"></a><span class="lineno">  883</span>&#160;</div><div class="line"><a name="l00884"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#abe1237d8bf79a2ec3791ad9fe184bc3f">  884</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#abe1237d8bf79a2ec3791ad9fe184bc3f">preview_norm_theta</a>()</div><div class="line"><a name="l00885"></a><span class="lineno">  885</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00886"></a><span class="lineno">  886</span>&#160;    do_crop(0)</div><div class="line"><a name="l00887"></a><span class="lineno">  887</span>&#160;    do_norm_theta(1, force=1)</div><div class="line"><a name="l00888"></a><span class="lineno">  888</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a66b3eef1fd0be13dfef0a66781f55062">asp_display_previews</a>()</div><div class="line"><a name="l00889"></a><span class="lineno">  889</span>&#160;end</div><div class="line"><a name="l00890"></a><span class="lineno">  890</span>&#160;</div><div class="line"><a name="l00891"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a3e798e20a99a03a789dd7914612e4fd2">  891</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a3e798e20a99a03a789dd7914612e4fd2">preview_norm_thetaphi</a>()</div><div class="line"><a name="l00892"></a><span class="lineno">  892</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00893"></a><span class="lineno">  893</span>&#160;    do_crop(0)</div><div class="line"><a name="l00894"></a><span class="lineno">  894</span>&#160;    do_norm_thetaphi(1, force=1)</div><div class="line"><a name="l00895"></a><span class="lineno">  895</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a66b3eef1fd0be13dfef0a66781f55062">asp_display_previews</a>()</div><div class="line"><a name="l00896"></a><span class="lineno">  896</span>&#160;end</div><div class="line"><a name="l00897"></a><span class="lineno">  897</span>&#160;</div><div class="line"><a name="l00900"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a452f09c3057638056ac2b5a15ac660b2">  900</a></span>&#160;function <a class="code" href="pearl-anglescan-panel_8ipf.html#a452f09c3057638056ac2b5a15ac660b2">asp_show_panel</a>()</div><div class="line"><a name="l00901"></a><span class="lineno">  901</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00902"></a><span class="lineno">  902</span>&#160;    svar /sdfr=df panel_name</div><div class="line"><a name="l00903"></a><span class="lineno">  903</span>&#160;</div><div class="line"><a name="l00904"></a><span class="lineno">  904</span>&#160;    if (strlen(panel_name) &amp;&amp; (wintype(panel_name) == 7))</div><div class="line"><a name="l00905"></a><span class="lineno">  905</span>&#160;        DoWindow /F $panel_name</div><div class="line"><a name="l00906"></a><span class="lineno">  906</span>&#160;        return 0</div><div class="line"><a name="l00907"></a><span class="lineno">  907</span>&#160;    endif</div><div class="line"><a name="l00908"></a><span class="lineno">  908</span>&#160;</div><div class="line"><a name="l00909"></a><span class="lineno">  909</span>&#160;    NewPanel /K=1 /N=anglescan_panel /W=(200,50,480,874) as &quot;angle scan processing&quot;</div><div class="line"><a name="l00910"></a><span class="lineno">  910</span>&#160;    panel_name = s_name</div><div class="line"><a name="l00911"></a><span class="lineno">  911</span>&#160;    </div><div class="line"><a name="l00912"></a><span class="lineno">  912</span>&#160;    GroupBox gb_source, title=&quot;data source&quot;</div><div class="line"><a name="l00913"></a><span class="lineno">  913</span>&#160;    Button b_source_select, size={50,20},proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a1e50019bc895a0787cb3f07d776e9463">bp_source_select</a>,title=<span class="stringliteral">&quot;select...&quot;</span></div><div class="line"><a name="l00914"></a><span class="lineno">  914</span>&#160;    Button b_source_select, help={<span class="stringliteral">&quot;select the source wave, e.g. ReducedData1. it must be in the scan or region data folder. the attr folder with the manipulator waves must be in the same folder or one level up.&quot;</span>}</div><div class="line"><a name="l00915"></a><span class="lineno">  915</span>&#160;    Button b_source_update, size={50,20},proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a7ab3962d1d9d50d6cd285d40d4a7ce50">bp_source_update</a>,title=<span class="stringliteral">&quot;update&quot;</span></div><div class="line"><a name="l00916"></a><span class="lineno">  916</span>&#160;    Button b_source_update, help={<span class="stringliteral">&quot;reload the process data from the previous source (link displayed below)&quot;</span>}</div><div class="line"><a name="l00917"></a><span class="lineno">  917</span>&#160;    TitleBox tb_source_path, size={240,21}</div><div class="line"><a name="l00918"></a><span class="lineno">  918</span>&#160;    TitleBox tb_source_path,variable= root:packages:pearl_anglescan_panel:source_path</div><div class="line"><a name="l00919"></a><span class="lineno">  919</span>&#160;</div><div class="line"><a name="l00920"></a><span class="lineno">  920</span>&#160;    GroupBox gb_offsets, title=<span class="stringliteral">&quot;offsets&quot;</span></div><div class="line"><a name="l00921"></a><span class="lineno">  921</span>&#160;    SetVariable sv_theta_offset, size={88,16},bodyWidth=60,title=<span class="stringliteral">&quot;theta&quot;</span></div><div class="line"><a name="l00922"></a><span class="lineno">  922</span>&#160;    SetVariable sv_theta_offset,value= root:packages:pearl_anglescan_panel:theta_offset</div><div class="line"><a name="l00923"></a><span class="lineno">  923</span>&#160;    SetVariable sv_theta_offset, help={<span class="stringliteral">&quot;manipulator theta value that corresponds to normal emission.&quot;</span>}</div><div class="line"><a name="l00924"></a><span class="lineno">  924</span>&#160;    SetVariable sv_tilt_offset, size={74,16},bodyWidth=60,title=<span class="stringliteral">&quot;tilt&quot;</span></div><div class="line"><a name="l00925"></a><span class="lineno">  925</span>&#160;    SetVariable sv_tilt_offset,value= root:packages:pearl_anglescan_panel:tilt_offset</div><div class="line"><a name="l00926"></a><span class="lineno">  926</span>&#160;    SetVariable sv_tilt_offset, help={<span class="stringliteral">&quot;manipulator tilt value that corresponds to normal emission.&quot;</span>}</div><div class="line"><a name="l00927"></a><span class="lineno">  927</span>&#160;    SetVariable sv_phi_offset, size={78,16},bodyWidth=60,title=<span class="stringliteral">&quot;phi&quot;</span></div><div class="line"><a name="l00928"></a><span class="lineno">  928</span>&#160;    SetVariable sv_phi_offset,value= root:packages:pearl_anglescan_panel:phi_offset</div><div class="line"><a name="l00929"></a><span class="lineno">  929</span>&#160;    SetVariable sv_phi_offset, help={<span class="stringliteral">&quot;manipulator phi value that should map to the 3 o&#39;clock angle.&quot;</span>}</div><div class="line"><a name="l00930"></a><span class="lineno">  930</span>&#160;    SetVariable sv_alpha_offset, size={90,16},bodyWidth=60,title=<span class="stringliteral">&quot;alpha&quot;</span></div><div class="line"><a name="l00931"></a><span class="lineno">  931</span>&#160;    SetVariable sv_alpha_offset,value= root:packages:pearl_anglescan_panel:alpha_offset</div><div class="line"><a name="l00932"></a><span class="lineno">  932</span>&#160;    SetVariable sv_alpha_offset, help={<span class="stringliteral">&quot;alpha value that corresponds to normal emission (if the sample normal is properly aligned).&quot;</span>}</div><div class="line"><a name="l00933"></a><span class="lineno">  933</span>&#160;    Button b_save_prefs, size={80,20},proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#ad8a01428a137278a31d4f1f4f9c634c5">bp_save_prefs</a>,title=<span class="stringliteral">&quot;save prefs&quot;</span></div><div class="line"><a name="l00934"></a><span class="lineno">  934</span>&#160;    Button b_save_prefs, help={<span class="stringliteral">&quot;save settings as preferences.&quot;</span>}</div><div class="line"><a name="l00935"></a><span class="lineno">  935</span>&#160;    Button b_load_prefs, size={80,20},proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a1868754e64cb1448e564c0936e78574d">bp_load_prefs</a>,title=<span class="stringliteral">&quot;load prefs&quot;</span></div><div class="line"><a name="l00936"></a><span class="lineno">  936</span>&#160;    Button b_load_prefs, help={<span class="stringliteral">&quot;load settings from preferences.&quot;</span>}</div><div class="line"><a name="l00937"></a><span class="lineno">  937</span>&#160;</div><div class="line"><a name="l00938"></a><span class="lineno">  938</span>&#160;    GroupBox gb_crop, title=<span class="stringliteral">&quot;crop and delete&quot;</span></div><div class="line"><a name="l00939"></a><span class="lineno">  939</span>&#160;    CheckBox cb_crop_enable, size={50,14}, title=<span class="stringliteral">&quot;enable&quot;</span></div><div class="line"><a name="l00940"></a><span class="lineno">  940</span>&#160;    CheckBox cb_crop_enable, help={<span class="stringliteral">&quot;crop at +/-alpha and +theta, delete arbitrary rows&quot;</span>}</div><div class="line"><a name="l00941"></a><span class="lineno">  941</span>&#160;    CheckBox cb_crop_enable, variable= root:packages:pearl_anglescan_panel:crop_enable</div><div class="line"><a name="l00942"></a><span class="lineno">  942</span>&#160;    SetVariable sv_crop_alpha, size={90,16},bodyWidth=60,title=<span class="stringliteral">&quot;alpha&quot;</span></div><div class="line"><a name="l00943"></a><span class="lineno">  943</span>&#160;    SetVariable sv_crop_alpha, limits={0,30,1},value= root:packages:pearl_anglescan_panel:crop_alpha</div><div class="line"><a name="l00944"></a><span class="lineno">  944</span>&#160;    SetVariable sv_crop_alpha, help={<span class="stringliteral">&quot;alpha (detection angle) cropping angle (positive boundary), relative to normal emission&quot;</span>}</div><div class="line"><a name="l00945"></a><span class="lineno">  945</span>&#160;    SetVariable sv_crop_theta, size={90,16},bodyWidth=60,title=<span class="stringliteral">&quot;theta&quot;</span></div><div class="line"><a name="l00946"></a><span class="lineno">  946</span>&#160;    SetVariable sv_crop_theta, limits={10,90,1},value= root:packages:pearl_anglescan_panel:crop_theta</div><div class="line"><a name="l00947"></a><span class="lineno">  947</span>&#160;    SetVariable sv_crop_theta, help={<span class="stringliteral">&quot;theta (polar angle) upper limit, relative to normal emission&quot;</span>}</div><div class="line"><a name="l00948"></a><span class="lineno">  948</span>&#160;    SetVariable sv_crop_rows, size={200,16},bodyWidth=160,title=<span class="stringliteral">&quot;rows&quot;</span></div><div class="line"><a name="l00949"></a><span class="lineno">  949</span>&#160;    SetVariable sv_crop_rows, limits={10,90,1},value= root:packages:pearl_anglescan_panel:crop_rows</div><div class="line"><a name="l00950"></a><span class="lineno">  950</span>&#160;    SetVariable sv_crop_rows, help={<span class="stringliteral">&quot;rows to delete from the raw data. comma-separated point indices, hyphen for range.&quot;</span>}</div><div class="line"><a name="l00951"></a><span class="lineno">  951</span>&#160;    Button b_crop_preview, size={80,20},proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a57c666f93cb4310fadf13b1916eaf134">bp_crop_preview</a>,title=<span class="stringliteral">&quot;preview&quot;</span></div><div class="line"><a name="l00952"></a><span class="lineno">  952</span>&#160;    Button b_crop_preview, help={<span class="stringliteral">&quot;show a preview of the cropped dataset.&quot;</span>}</div><div class="line"><a name="l00953"></a><span class="lineno">  953</span>&#160;</div><div class="line"><a name="l00954"></a><span class="lineno">  954</span>&#160;    GroupBox gb_norm_alpha, title=<span class="stringliteral">&quot;normalize alpha&quot;</span></div><div class="line"><a name="l00955"></a><span class="lineno">  955</span>&#160;    CheckBox cb_norm_alpha_enable, size={50,14}, title=<span class="stringliteral">&quot;enable&quot;</span></div><div class="line"><a name="l00956"></a><span class="lineno">  956</span>&#160;    CheckBox cb_norm_alpha_enable,variable= root:packages:pearl_anglescan_panel:norm_alpha_enable</div><div class="line"><a name="l00957"></a><span class="lineno">  957</span>&#160;    CheckBox cb_norm_alpha_enable, help={<span class="stringliteral">&quot;enable normalization of the alpha distribution&quot;</span>}</div><div class="line"><a name="l00958"></a><span class="lineno">  958</span>&#160;    PopupMenu pm_norm_alpha_mode, size={138,21}, bodyWidth=100, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#acc1028dcd046f441ceaac268ffac9af6">pmp_norm_alpha_mode</a>,title=<span class="stringliteral">&quot;method&quot;</span></div><div class="line"><a name="l00959"></a><span class="lineno">  959</span>&#160;    PopupMenu pm_norm_alpha_mode, mode=5, popvalue=<span class="stringliteral">&quot;loess&quot;</span>, value= #<span class="stringliteral">&quot;\&quot;none;binomial;boxcar;scienta;loess;\&quot;&quot;</span></div><div class="line"><a name="l00960"></a><span class="lineno">  960</span>&#160;    PopupMenu pm_norm_alpha_mode, help={<span class="stringliteral">&quot;alpha normalization method. recommended: loess&quot;</span>}</div><div class="line"><a name="l00961"></a><span class="lineno">  961</span>&#160;    SetVariable sv_norm_alpha_smoothing, size={112,16}, bodyWidth=60, title=<span class="stringliteral">&quot;smoothing&quot;</span></div><div class="line"><a name="l00962"></a><span class="lineno">  962</span>&#160;    SetVariable sv_norm_alpha_smoothing, limits={0,1,0.05}, value= root:packages:pearl_anglescan_panel:norm_alpha_smoothing</div><div class="line"><a name="l00963"></a><span class="lineno">  963</span>&#160;    SetVariable sv_norm_alpha_smoothing, help={<span class="stringliteral">&quot;smoothing parameter (depends on the normalization method).&quot;</span>}</div><div class="line"><a name="l00964"></a><span class="lineno">  964</span>&#160;    Button b_norm_alpha_check, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a630dfc775d45843c71c279bbb01d05a6">bp_norm_alpha_check</a>,title=<span class="stringliteral">&quot;check&quot;</span></div><div class="line"><a name="l00965"></a><span class="lineno">  965</span>&#160;    Button b_norm_alpha_check, help={<span class="stringliteral">&quot;show a graph of the normalization function&quot;</span>}</div><div class="line"><a name="l00966"></a><span class="lineno">  966</span>&#160;    Button b_norm_alpha_preview, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#aaaf3facc118f90a8f1b32948446899b3">bp_norm_alpha_preview</a>,title=<span class="stringliteral">&quot;preview&quot;</span></div><div class="line"><a name="l00967"></a><span class="lineno">  967</span>&#160;    Button b_norm_alpha_preview, help={<span class="stringliteral">&quot;show a preview of the normalized dataset (without other normalizations).&quot;</span>}</div><div class="line"><a name="l00968"></a><span class="lineno">  968</span>&#160;</div><div class="line"><a name="l00969"></a><span class="lineno">  969</span>&#160;    GroupBox gb_norm_phi, title=<span class="stringliteral">&quot;normalize phi&quot;</span></div><div class="line"><a name="l00970"></a><span class="lineno">  970</span>&#160;    CheckBox cb_norm_phi_enable, size={50,14}, title=<span class="stringliteral">&quot;enable&quot;</span></div><div class="line"><a name="l00971"></a><span class="lineno">  971</span>&#160;    CheckBox cb_norm_phi_enable,variable= root:packages:pearl_anglescan_panel:norm_phi_enable</div><div class="line"><a name="l00972"></a><span class="lineno">  972</span>&#160;    CheckBox cb_norm_phi_enable, help={<span class="stringliteral">&quot;enable normalization of the phi distribution to reduce the effect of wobble&quot;</span>}</div><div class="line"><a name="l00973"></a><span class="lineno">  973</span>&#160;    SetVariable sv_norm_phi_range, size={118,16}, bodyWidth=60, title=<span class="stringliteral">&quot;theta range&quot;</span></div><div class="line"><a name="l00974"></a><span class="lineno">  974</span>&#160;    SetVariable sv_norm_phi_range, limits={0,90,1}, value= root:packages:pearl_anglescan_panel:norm_phi_thetarange</div><div class="line"><a name="l00975"></a><span class="lineno">  975</span>&#160;    SetVariable sv_norm_phi_range, help={<span class="stringliteral">&quot;theta range (from normal) to factor into the normalization function&quot;</span>}</div><div class="line"><a name="l00976"></a><span class="lineno">  976</span>&#160;    Button b_norm_phi_check, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#ae42eb7f46e5c1a1b5d334ebb5e94d2d3">bp_norm_phi_check</a>, title=<span class="stringliteral">&quot;check&quot;</span></div><div class="line"><a name="l00977"></a><span class="lineno">  977</span>&#160;    Button b_norm_phi_check, help={<span class="stringliteral">&quot;show a graph of the normalization function&quot;</span>}</div><div class="line"><a name="l00978"></a><span class="lineno">  978</span>&#160;    Button b_norm_phi_preview, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a740c8a80ab2fc0550a05cf3b032821d0">bp_norm_phi_preview</a>, title=<span class="stringliteral">&quot;preview&quot;</span></div><div class="line"><a name="l00979"></a><span class="lineno">  979</span>&#160;    Button b_norm_phi_preview, help={<span class="stringliteral">&quot;show a preview of the normalized dataset (without other normalizations).&quot;</span>}</div><div class="line"><a name="l00980"></a><span class="lineno">  980</span>&#160;</div><div class="line"><a name="l00981"></a><span class="lineno">  981</span>&#160;    GroupBox gb_norm_theta, title=<span class="stringliteral">&quot;normalize theta&quot;</span></div><div class="line"><a name="l00982"></a><span class="lineno">  982</span>&#160;    CheckBox cb_norm_theta_enable, size={50,14},title=<span class="stringliteral">&quot;enable&quot;</span></div><div class="line"><a name="l00983"></a><span class="lineno">  983</span>&#160;    CheckBox cb_norm_theta_enable, variable= root:packages:pearl_anglescan_panel:norm_theta_enable</div><div class="line"><a name="l00984"></a><span class="lineno">  984</span>&#160;    CheckBox cb_norm_theta_enable, help={<span class="stringliteral">&quot;enable normalization of the theta distribution (integrated over phi)&quot;</span>}</div><div class="line"><a name="l00985"></a><span class="lineno">  985</span>&#160;    PopupMenu pm_norm_theta_domain, size={138,21}, bodyWidth=100, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a0153f4ed4892dd3b48276af190590e4f">pmp_norm_theta_domain</a>, title=<span class="stringliteral">&quot;domain&quot;</span></div><div class="line"><a name="l00986"></a><span class="lineno">  986</span>&#160;    PopupMenu pm_norm_theta_domain, mode=5, popvalue=<span class="stringliteral">&quot;loess&quot;</span>, value= #<span class="stringliteral">&quot;\&quot;global;scans;\&quot;&quot;</span></div><div class="line"><a name="l00987"></a><span class="lineno">  987</span>&#160;    PopupMenu pm_norm_theta_domain, help={<span class="stringliteral">&quot;smoothing domain: global or individual scans. use global unless there is a stronga or irregular phi variation.&quot;</span>}</div><div class="line"><a name="l00988"></a><span class="lineno">  988</span>&#160;    PopupMenu pm_norm_theta_mode, size={138,21},bodyWidth=100,proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#ae68496dbe344dc8a2c7c99b2d3f4b01c">pmp_norm_theta_mode</a>,title=<span class="stringliteral">&quot;method&quot;</span></div><div class="line"><a name="l00989"></a><span class="lineno">  989</span>&#160;    PopupMenu pm_norm_theta_mode,mode=5,popvalue=<span class="stringliteral">&quot;loess&quot;</span>,value= #<span class="stringliteral">&quot;\&quot;none;binomial;boxcar;polynomial;loess;\&quot;&quot;</span></div><div class="line"><a name="l00990"></a><span class="lineno">  990</span>&#160;    PopupMenu pm_norm_theta_mode, help={<span class="stringliteral">&quot;theta normalization method. recommended: loess&quot;</span>}</div><div class="line"><a name="l00991"></a><span class="lineno">  991</span>&#160;    SetVariable sv_norm_theta_smoothing, size={112,16}, bodyWidth=60, title=<span class="stringliteral">&quot;smoothing&quot;</span></div><div class="line"><a name="l00992"></a><span class="lineno">  992</span>&#160;    SetVariable sv_norm_theta_smoothing, limits={0,1,0.05}, value= root:packages:pearl_anglescan_panel:norm_theta_smoothing</div><div class="line"><a name="l00993"></a><span class="lineno">  993</span>&#160;    SetVariable sv_norm_theta_smoothing, help={<span class="stringliteral">&quot;smoothing parameter (depends on the normalization method).&quot;</span>}</div><div class="line"><a name="l00994"></a><span class="lineno">  994</span>&#160;    Button b_norm_theta_check, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a0931ce925d2dae6a1bb7e4a65a8a2be7">bp_norm_theta_check</a>, title=<span class="stringliteral">&quot;check&quot;</span></div><div class="line"><a name="l00995"></a><span class="lineno">  995</span>&#160;    Button b_norm_theta_check, help={<span class="stringliteral">&quot;show a graph of the normalization function&quot;</span>}</div><div class="line"><a name="l00996"></a><span class="lineno">  996</span>&#160;    Button b_norm_theta_preview, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#af57abb0a7d41b800d33bb748f9fc5c38">bp_norm_theta_preview</a>, title=<span class="stringliteral">&quot;preview&quot;</span></div><div class="line"><a name="l00997"></a><span class="lineno">  997</span>&#160;    Button b_norm_theta_preview, help={<span class="stringliteral">&quot;show a preview of the normalized dataset (without other normalizations).&quot;</span>}</div><div class="line"><a name="l00998"></a><span class="lineno">  998</span>&#160;</div><div class="line"><a name="l00999"></a><span class="lineno">  999</span>&#160;    GroupBox gb_norm_thetaphi, size={272,97},title=<span class="stringliteral">&quot;normalize (theta,phi)&quot;</span></div><div class="line"><a name="l01000"></a><span class="lineno"> 1000</span>&#160;    CheckBox cb_norm_thetaphi_enable, size={50,14},title=<span class="stringliteral">&quot;enable&quot;</span></div><div class="line"><a name="l01001"></a><span class="lineno"> 1001</span>&#160;    CheckBox cb_norm_thetaphi_enable, variable= root:packages:pearl_anglescan_panel:norm_thetaphi_enable</div><div class="line"><a name="l01002"></a><span class="lineno"> 1002</span>&#160;    CheckBox cb_norm_thetaphi_enable, help={<span class="stringliteral">&quot;enable normalization of the (theta, phi) distribution.&quot;</span>}</div><div class="line"><a name="l01003"></a><span class="lineno"> 1003</span>&#160;    PopupMenu pm_norm_thetaphi_mode, size={138,21}, bodyWidth=100, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a289996a12d0ef46af1dac49a67289931">pmp_norm_thetaphi_mode</a>,title=<span class="stringliteral">&quot;method&quot;</span></div><div class="line"><a name="l01004"></a><span class="lineno"> 1004</span>&#160;    PopupMenu pm_norm_thetaphi_mode, mode=5, popvalue=<span class="stringliteral">&quot;loess&quot;</span>, value= #<span class="stringliteral">&quot;\&quot;none;none;none;none;loess;\&quot;&quot;</span></div><div class="line"><a name="l01005"></a><span class="lineno"> 1005</span>&#160;    PopupMenu pm_norm_thetaphi_mode, help={<span class="stringliteral">&quot;theta normalization method. recommended: loess&quot;</span>}</div><div class="line"><a name="l01006"></a><span class="lineno"> 1006</span>&#160;    SetVariable sv_norm_thetaphi_smoothing, size={112,16}, bodyWidth=60, title=<span class="stringliteral">&quot;smoothing&quot;</span></div><div class="line"><a name="l01007"></a><span class="lineno"> 1007</span>&#160;    SetVariable sv_norm_thetaphi_smoothing, limits={0,1,0.05}, value= root:packages:pearl_anglescan_panel:norm_thetaphi_smoothing</div><div class="line"><a name="l01008"></a><span class="lineno"> 1008</span>&#160;    SetVariable sv_norm_thetaphi_smoothing, help={<span class="stringliteral">&quot;smoothing parameter (depends on the normalization method).&quot;</span>}</div><div class="line"><a name="l01009"></a><span class="lineno"> 1009</span>&#160;    Button b_norm_thetaphi_check, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a89caab501e8f15262d6e4f2fa5b4a1bd">bp_norm_thetaphi_check</a>, title=<span class="stringliteral">&quot;check&quot;</span></div><div class="line"><a name="l01010"></a><span class="lineno"> 1010</span>&#160;    Button b_norm_thetaphi_check, help={<span class="stringliteral">&quot;show a graph of the normalization function&quot;</span>}</div><div class="line"><a name="l01011"></a><span class="lineno"> 1011</span>&#160;    Button b_norm_thetaphi_preview, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#aaa3478a3b0f26b12a12196cfaa87a8ae">bp_norm_thetaphi_preview</a>, title=<span class="stringliteral">&quot;preview&quot;</span></div><div class="line"><a name="l01012"></a><span class="lineno"> 1012</span>&#160;    Button b_norm_thetaphi_preview, help={<span class="stringliteral">&quot;show a preview of the normalized dataset (without other normalizations).&quot;</span>}</div><div class="line"><a name="l01013"></a><span class="lineno"> 1013</span>&#160;</div><div class="line"><a name="l01014"></a><span class="lineno"> 1014</span>&#160;    GroupBox gb_output, title=<span class="stringliteral">&quot;output&quot;</span></div><div class="line"><a name="l01015"></a><span class="lineno"> 1015</span>&#160;    SetVariable sv_output_folding, size={95,16}, bodyWidth=60, title=<span class="stringliteral">&quot;folding&quot;</span></div><div class="line"><a name="l01016"></a><span class="lineno"> 1016</span>&#160;    SetVariable sv_output_folding, limits={1,20,1}, value= root:packages:pearl_anglescan_panel:output_folding</div><div class="line"><a name="l01017"></a><span class="lineno"> 1017</span>&#160;    SetVariable sv_output_folding, help={<span class="stringliteral">&quot;n-fold rotational average. 1=no averaging.&quot;</span>}</div><div class="line"><a name="l01018"></a><span class="lineno"> 1018</span>&#160;    SetVariable sv_output_horizon, size={98,16}, bodyWidth=60, title=<span class="stringliteral">&quot;horizon&quot;</span></div><div class="line"><a name="l01019"></a><span class="lineno"> 1019</span>&#160;    SetVariable sv_output_horizon, limits={1,90,1}, value= root:packages:pearl_anglescan_panel:output_horizon</div><div class="line"><a name="l01020"></a><span class="lineno"> 1020</span>&#160;    SetVariable sv_output_horizon, help={<span class="stringliteral">&quot;highest theta to display&quot;</span>}</div><div class="line"><a name="l01021"></a><span class="lineno"> 1021</span>&#160;    PopupMenu pm_graph_projection, size={149,21}, bodyWidth=100, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#af83bfcf48723e7f6eeb78b4e0d84277d">pmp_graph_projection</a>, title=<span class="stringliteral">&quot;projection&quot;</span></div><div class="line"><a name="l01022"></a><span class="lineno"> 1022</span>&#160;    PopupMenu pm_graph_projection, mode=2, popvalue=<span class="stringliteral">&quot;stereographic&quot;</span>, value= #<span class="stringliteral">&quot;\&quot;equidistant;stereographic;equal area;gnomonic;orthographic;\&quot;&quot;</span></div><div class="line"><a name="l01023"></a><span class="lineno"> 1023</span>&#160;    PopupMenu pm_graph_projection, help={<span class="stringliteral">&quot;projection (theta mapping) mode&quot;</span>}</div><div class="line"><a name="l01024"></a><span class="lineno"> 1024</span>&#160;    PopupMenu pm_graph_mode, size={129,21}, bodyWidth=100, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a1b41c992729d627445dbba0637b31ece">pmp_graph_mode</a>,title=<span class="stringliteral">&quot;mode&quot;</span></div><div class="line"><a name="l01025"></a><span class="lineno"> 1025</span>&#160;    PopupMenu pm_graph_mode, mode=2, popvalue=<span class="stringliteral">&quot;dots&quot;</span>, value= #<span class="stringliteral">&quot;\&quot;none;dots;none;image;\&quot;&quot;</span></div><div class="line"><a name="l01026"></a><span class="lineno"> 1026</span>&#160;    PopupMenu pm_graph_mode, help={<span class="stringliteral">&quot;graph type: dots = coloured dots on circles; image = interpolated matrix&quot;</span>}</div><div class="line"><a name="l01027"></a><span class="lineno"> 1027</span>&#160;    Button b_output_calc, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#adefddc5f384948c9dab3ee65b4a0668a">bp_output_calc</a>, title=<span class="stringliteral">&quot;calc + display&quot;</span></div><div class="line"><a name="l01028"></a><span class="lineno"> 1028</span>&#160;    Button b_output_calc, help={<span class="stringliteral">&quot;execute data processing with the enabled filters and display the diffractogram.&quot;</span>}</div><div class="line"><a name="l01029"></a><span class="lineno"> 1029</span>&#160;    Button b_output_duplicate, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#ae838bde232c45d81f88303e91b16326b">bp_output_duplicate</a>, title=<span class="stringliteral">&quot;duplicate ...&quot;</span></div><div class="line"><a name="l01030"></a><span class="lineno"> 1030</span>&#160;    Button b_output_duplicate, help={<span class="stringliteral">&quot;copy the result to an arbitrary data folder.&quot;</span>}</div><div class="line"><a name="l01031"></a><span class="lineno"> 1031</span>&#160;    Button b_output_itx, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a0bdc14f90bdc40045200ac23229b225d">bp_output_itx</a>, title=<span class="stringliteral">&quot;save ITX ...&quot;</span></div><div class="line"><a name="l01032"></a><span class="lineno"> 1032</span>&#160;    Button b_output_itx, help={<span class="stringliteral">&quot;save the result to an igor text file (itx).&quot;</span>}</div><div class="line"><a name="l01033"></a><span class="lineno"> 1033</span>&#160;    Button b_output_etpi, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a16d2f6a58fedc370d7901126bb814bbb">bp_output_etpi</a>, title=<span class="stringliteral">&quot;save ETPI ...&quot;</span></div><div class="line"><a name="l01034"></a><span class="lineno"> 1034</span>&#160;    Button b_output_etpi, help={<span class="stringliteral">&quot;save the result to a pmsco angle scan file (etpi).&quot;</span>}</div><div class="line"><a name="l01035"></a><span class="lineno"> 1035</span>&#160;</div><div class="line"><a name="l01036"></a><span class="lineno"> 1036</span>&#160;    GroupBox gb_graph, title=<span class="stringliteral">&quot;graph&quot;</span></div><div class="line"><a name="l01037"></a><span class="lineno"> 1037</span>&#160;    PopupMenu pm_graph_colortable, size={152,21}, bodyWidth=100, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#ac80c675f6f1a5505e9b6f0349ff5fe92">pmp_graph_colortable</a>, title=<span class="stringliteral">&quot;color table&quot;</span></div><div class="line"><a name="l01038"></a><span class="lineno"> 1038</span>&#160;    PopupMenu pm_graph_colortable, mode=0, value= #<span class="stringliteral">&quot;\&quot;*COLORTABLEPOPNONAMES*\&quot;&quot;</span></div><div class="line"><a name="l01039"></a><span class="lineno"> 1039</span>&#160;    PopupMenu pm_graph_colortable, help={<span class="stringliteral">&quot;color table to use in pseudocolor graphs.&quot;</span>}</div><div class="line"><a name="l01040"></a><span class="lineno"> 1040</span>&#160;    SetVariable sv_graph_contrast, size={119,16}, bodyWidth=60, title=<span class="stringliteral">&quot;contrast (%)&quot;</span></div><div class="line"><a name="l01041"></a><span class="lineno"> 1041</span>&#160;    SetVariable sv_graph_contrast, limits={0,25,1}, value= root:packages:pearl_anglescan_panel:graph_contrast</div><div class="line"><a name="l01042"></a><span class="lineno"> 1042</span>&#160;    SetVariable sv_graph_contrast, help={<span class="stringliteral">&quot;contrast value (percentile).&quot;</span>}</div><div class="line"><a name="l01043"></a><span class="lineno"> 1043</span>&#160;    Button b_graph_update, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a940f2115fb5b47e19516168d15346472">bp_graph_update</a>, title=<span class="stringliteral">&quot;update&quot;</span></div><div class="line"><a name="l01044"></a><span class="lineno"> 1044</span>&#160;    Button b_graph_update, help={<span class="stringliteral">&quot;update the existing graph.&quot;</span>}</div><div class="line"><a name="l01045"></a><span class="lineno"> 1045</span>&#160;    Button b_graph_png, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a9be861636d98d7891e6d106deac2f90b">bp_graph_png</a>, title=<span class="stringliteral">&quot;save PNG ...&quot;</span></div><div class="line"><a name="l01046"></a><span class="lineno"> 1046</span>&#160;    Button b_graph_png, help={<span class="stringliteral">&quot;save the graph in png format.&quot;</span>}</div><div class="line"><a name="l01047"></a><span class="lineno"> 1047</span>&#160;</div><div class="line"><a name="l01048"></a><span class="lineno"> 1048</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a65dbeab54647d7c27a139035d69c812f">arrange_controls</a>()</div><div class="line"><a name="l01049"></a><span class="lineno"> 1049</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a7ddecbeeaee3f9da87ac1ecdc26f530b">update_menus</a>()</div><div class="line"><a name="l01050"></a><span class="lineno"> 1050</span>&#160;end</div><div class="line"><a name="l01051"></a><span class="lineno"> 1051</span>&#160;</div><div class="line"><a name="l01052"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a65dbeab54647d7c27a139035d69c812f"> 1052</a></span>&#160;<span class="keyword">static</span> <span class="keyword">function</span> <a class="code" href="pearl-anglescan-panel_8ipf.html#a65dbeab54647d7c27a139035d69c812f">arrange_controls</a>()</div><div class="line"><a name="l01053"></a><span class="lineno"> 1053</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01054"></a><span class="lineno"> 1054</span>&#160;    svar /sdfr=df panel_name</div><div class="line"><a name="l01055"></a><span class="lineno"> 1055</span>&#160;</div><div class="line"><a name="l01056"></a><span class="lineno"> 1056</span>&#160;    variable gb_space = 2</div><div class="line"><a name="l01057"></a><span class="lineno"> 1057</span>&#160;    variable gb_internal_top = 16</div><div class="line"><a name="l01058"></a><span class="lineno"> 1058</span>&#160;    variable gb_internal_bot = 4</div><div class="line"><a name="l01059"></a><span class="lineno"> 1059</span>&#160;    variable line_space = 22</div><div class="line"><a name="l01060"></a><span class="lineno"> 1060</span>&#160;    </div><div class="line"><a name="l01061"></a><span class="lineno"> 1061</span>&#160;    variable cb_adj = 2</div><div class="line"><a name="l01062"></a><span class="lineno"> 1062</span>&#160;    variable sv_adj = 2</div><div class="line"><a name="l01063"></a><span class="lineno"> 1063</span>&#160;    variable pm_adj = 0</div><div class="line"><a name="l01064"></a><span class="lineno"> 1064</span>&#160;    variable b_adj = 0</div><div class="line"><a name="l01065"></a><span class="lineno"> 1065</span>&#160;    variable tb_adj = 0</div><div class="line"><a name="l01066"></a><span class="lineno"> 1066</span>&#160;    </div><div class="line"><a name="l01067"></a><span class="lineno"> 1067</span>&#160;    variable gb_top = 4</div><div class="line"><a name="l01068"></a><span class="lineno"> 1068</span>&#160;    variable gb_ht = 0</div><div class="line"><a name="l01069"></a><span class="lineno"> 1069</span>&#160;</div><div class="line"><a name="l01070"></a><span class="lineno"> 1070</span>&#160;    <span class="comment">// ht = line + 30</span></div><div class="line"><a name="l01071"></a><span class="lineno"> 1071</span>&#160;    <span class="comment">// gb = gb + ht + 2</span></div><div class="line"><a name="l01072"></a><span class="lineno"> 1072</span>&#160;    <span class="comment">// cb = gb + 18</span></div><div class="line"><a name="l01073"></a><span class="lineno"> 1073</span>&#160;    <span class="comment">// pm = gb + 38</span></div><div class="line"><a name="l01074"></a><span class="lineno"> 1074</span>&#160;    <span class="comment">// line += 26</span></div><div class="line"><a name="l01075"></a><span class="lineno"> 1075</span>&#160;    <span class="comment">// sv = line + 2</span></div><div class="line"><a name="l01076"></a><span class="lineno"> 1076</span>&#160;</div><div class="line"><a name="l01077"></a><span class="lineno"> 1077</span>&#160;    GroupBox gb_source,pos={4,gb_top}</div><div class="line"><a name="l01078"></a><span class="lineno"> 1078</span>&#160;    gb_ht = gb_internal_top</div><div class="line"><a name="l01079"></a><span class="lineno"> 1079</span>&#160;    Button b_source_select,pos={17, gb_top + gb_ht + b_adj},size={50,20}</div><div class="line"><a name="l01080"></a><span class="lineno"> 1080</span>&#160;    Button b_source_update, pos={67, gb_top + gb_ht + b_adj},size={50,20}</div><div class="line"><a name="l01081"></a><span class="lineno"> 1081</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01082"></a><span class="lineno"> 1082</span>&#160;    TitleBox tb_source_path,pos={18, gb_top + gb_ht + tb_adj},size={240,21}</div><div class="line"><a name="l01083"></a><span class="lineno"> 1083</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01084"></a><span class="lineno"> 1084</span>&#160;    gb_ht += gb_internal_bot</div><div class="line"><a name="l01085"></a><span class="lineno"> 1085</span>&#160;    GroupBox gb_source, size={272,gb_ht}</div><div class="line"><a name="l01086"></a><span class="lineno"> 1086</span>&#160;</div><div class="line"><a name="l01087"></a><span class="lineno"> 1087</span>&#160;    gb_top += gb_ht + gb_space</div><div class="line"><a name="l01088"></a><span class="lineno"> 1088</span>&#160;    GroupBox gb_offsets,pos={4,gb_top}</div><div class="line"><a name="l01089"></a><span class="lineno"> 1089</span>&#160;    gb_ht = gb_internal_top</div><div class="line"><a name="l01090"></a><span class="lineno"> 1090</span>&#160;    SetVariable sv_theta_offset,pos={46, gb_top + gb_ht + sv_adj},size={88,16}</div><div class="line"><a name="l01091"></a><span class="lineno"> 1091</span>&#160;    Button b_save_prefs,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01092"></a><span class="lineno"> 1092</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01093"></a><span class="lineno"> 1093</span>&#160;    SetVariable sv_tilt_offset,pos={60, gb_top + gb_ht + sv_adj},size={74,16}</div><div class="line"><a name="l01094"></a><span class="lineno"> 1094</span>&#160;    Button b_load_prefs,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01095"></a><span class="lineno"> 1095</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01096"></a><span class="lineno"> 1096</span>&#160;    SetVariable sv_phi_offset,pos={56, gb_top + gb_ht + sv_adj},size={78,16}</div><div class="line"><a name="l01097"></a><span class="lineno"> 1097</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01098"></a><span class="lineno"> 1098</span>&#160;    SetVariable sv_alpha_offset,pos={44, gb_top + gb_ht + sv_adj},size={90,16}</div><div class="line"><a name="l01099"></a><span class="lineno"> 1099</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01100"></a><span class="lineno"> 1100</span>&#160;    gb_ht += gb_internal_bot</div><div class="line"><a name="l01101"></a><span class="lineno"> 1101</span>&#160;    GroupBox gb_offsets, size={272,gb_ht}</div><div class="line"><a name="l01102"></a><span class="lineno"> 1102</span>&#160;</div><div class="line"><a name="l01103"></a><span class="lineno"> 1103</span>&#160;    gb_top += gb_ht + gb_space</div><div class="line"><a name="l01104"></a><span class="lineno"> 1104</span>&#160;    GroupBox gb_crop,pos={4,gb_top}</div><div class="line"><a name="l01105"></a><span class="lineno"> 1105</span>&#160;    gb_ht = gb_internal_top</div><div class="line"><a name="l01106"></a><span class="lineno"> 1106</span>&#160;    CheckBox cb_crop_enable,pos={73, gb_top + gb_ht + cb_adj},size={50,14}</div><div class="line"><a name="l01107"></a><span class="lineno"> 1107</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01108"></a><span class="lineno"> 1108</span>&#160;    SetVariable sv_crop_alpha, pos={44, gb_top + gb_ht + sv_adj}, size={90,16}</div><div class="line"><a name="l01109"></a><span class="lineno"> 1109</span>&#160;    Button b_crop_preview,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01110"></a><span class="lineno"> 1110</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01111"></a><span class="lineno"> 1111</span>&#160;    SetVariable sv_crop_theta, pos={44, gb_top + gb_ht + sv_adj}, size={90,16}</div><div class="line"><a name="l01112"></a><span class="lineno"> 1112</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01113"></a><span class="lineno"> 1113</span>&#160;    SetVariable sv_crop_rows, pos={44, gb_top + gb_ht + sv_adj}, size={190,16}</div><div class="line"><a name="l01114"></a><span class="lineno"> 1114</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01115"></a><span class="lineno"> 1115</span>&#160;    gb_ht += gb_internal_bot</div><div class="line"><a name="l01116"></a><span class="lineno"> 1116</span>&#160;    GroupBox gb_crop, size={272,gb_ht}</div><div class="line"><a name="l01117"></a><span class="lineno"> 1117</span>&#160;</div><div class="line"><a name="l01118"></a><span class="lineno"> 1118</span>&#160;    gb_top += gb_ht + gb_space</div><div class="line"><a name="l01119"></a><span class="lineno"> 1119</span>&#160;    GroupBox gb_norm_alpha,pos={4,gb_top}</div><div class="line"><a name="l01120"></a><span class="lineno"> 1120</span>&#160;    gb_ht = gb_internal_top</div><div class="line"><a name="l01121"></a><span class="lineno"> 1121</span>&#160;    CheckBox cb_norm_alpha_enable,pos={73, gb_top + gb_ht + cb_adj},size={50,14}</div><div class="line"><a name="l01122"></a><span class="lineno"> 1122</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01123"></a><span class="lineno"> 1123</span>&#160;    PopupMenu pm_norm_alpha_mode,pos={36, gb_top + gb_ht + pm_adj},size={138,21}</div><div class="line"><a name="l01124"></a><span class="lineno"> 1124</span>&#160;    Button b_norm_alpha_check,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01125"></a><span class="lineno"> 1125</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01126"></a><span class="lineno"> 1126</span>&#160;    SetVariable sv_norm_alpha_smoothing,pos={22, gb_top + gb_ht + sv_adj},size={112,16}</div><div class="line"><a name="l01127"></a><span class="lineno"> 1127</span>&#160;    Button b_norm_alpha_preview,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01128"></a><span class="lineno"> 1128</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01129"></a><span class="lineno"> 1129</span>&#160;    gb_ht += gb_internal_bot</div><div class="line"><a name="l01130"></a><span class="lineno"> 1130</span>&#160;    GroupBox gb_norm_alpha, size={272,gb_ht}</div><div class="line"><a name="l01131"></a><span class="lineno"> 1131</span>&#160;</div><div class="line"><a name="l01132"></a><span class="lineno"> 1132</span>&#160;    gb_top += gb_ht + gb_space</div><div class="line"><a name="l01133"></a><span class="lineno"> 1133</span>&#160;    GroupBox gb_norm_phi,pos={4,gb_top}</div><div class="line"><a name="l01134"></a><span class="lineno"> 1134</span>&#160;    gb_ht = gb_internal_top</div><div class="line"><a name="l01135"></a><span class="lineno"> 1135</span>&#160;    CheckBox cb_norm_phi_enable,pos={73, gb_top + gb_ht + cb_adj},size={50,14}</div><div class="line"><a name="l01136"></a><span class="lineno"> 1136</span>&#160;    Button b_norm_phi_check,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01137"></a><span class="lineno"> 1137</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01138"></a><span class="lineno"> 1138</span>&#160;    SetVariable sv_norm_phi_range,pos={15, gb_top + gb_ht + sv_adj},size={118,16}</div><div class="line"><a name="l01139"></a><span class="lineno"> 1139</span>&#160;    Button b_norm_phi_preview,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01140"></a><span class="lineno"> 1140</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01141"></a><span class="lineno"> 1141</span>&#160;    gb_ht += gb_internal_bot</div><div class="line"><a name="l01142"></a><span class="lineno"> 1142</span>&#160;    GroupBox gb_norm_phi, size={272,gb_ht}</div><div class="line"><a name="l01143"></a><span class="lineno"> 1143</span>&#160;</div><div class="line"><a name="l01144"></a><span class="lineno"> 1144</span>&#160;    gb_top += gb_ht + gb_space</div><div class="line"><a name="l01145"></a><span class="lineno"> 1145</span>&#160;    GroupBox gb_norm_theta,pos={4,gb_top}</div><div class="line"><a name="l01146"></a><span class="lineno"> 1146</span>&#160;    gb_ht = gb_internal_top</div><div class="line"><a name="l01147"></a><span class="lineno"> 1147</span>&#160;    CheckBox cb_norm_theta_enable,pos={73, gb_top + gb_ht + cb_adj},size={50,14}</div><div class="line"><a name="l01148"></a><span class="lineno"> 1148</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01149"></a><span class="lineno"> 1149</span>&#160;    PopupMenu pm_norm_theta_domain, pos={35, gb_top + gb_ht + pm_adj}, size={138,21}</div><div class="line"><a name="l01150"></a><span class="lineno"> 1150</span>&#160;    Button b_norm_theta_check,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01151"></a><span class="lineno"> 1151</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01152"></a><span class="lineno"> 1152</span>&#160;    PopupMenu pm_norm_theta_mode,pos={35, gb_top + gb_ht + pm_adj},size={138,21}</div><div class="line"><a name="l01153"></a><span class="lineno"> 1153</span>&#160;    Button b_norm_theta_preview,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01154"></a><span class="lineno"> 1154</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01155"></a><span class="lineno"> 1155</span>&#160;    SetVariable sv_norm_theta_smoothing,pos={21, gb_top + gb_ht + sv_adj},size={112,16}</div><div class="line"><a name="l01156"></a><span class="lineno"> 1156</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01157"></a><span class="lineno"> 1157</span>&#160;    gb_ht += gb_internal_bot</div><div class="line"><a name="l01158"></a><span class="lineno"> 1158</span>&#160;    GroupBox gb_norm_theta, size={272,gb_ht}</div><div class="line"><a name="l01159"></a><span class="lineno"> 1159</span>&#160;</div><div class="line"><a name="l01160"></a><span class="lineno"> 1160</span>&#160;    gb_top += gb_ht + gb_space</div><div class="line"><a name="l01161"></a><span class="lineno"> 1161</span>&#160;    GroupBox gb_norm_thetaphi,pos={4,gb_top}</div><div class="line"><a name="l01162"></a><span class="lineno"> 1162</span>&#160;    gb_ht = gb_internal_top</div><div class="line"><a name="l01163"></a><span class="lineno"> 1163</span>&#160;    CheckBox cb_norm_thetaphi_enable,pos={73, gb_top + gb_ht + cb_adj},size={50,14}</div><div class="line"><a name="l01164"></a><span class="lineno"> 1164</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01165"></a><span class="lineno"> 1165</span>&#160;    PopupMenu pm_norm_thetaphi_mode,pos={35, gb_top + gb_ht + pm_adj},size={138,21}</div><div class="line"><a name="l01166"></a><span class="lineno"> 1166</span>&#160;    Button b_norm_thetaphi_check,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01167"></a><span class="lineno"> 1167</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01168"></a><span class="lineno"> 1168</span>&#160;    SetVariable sv_norm_thetaphi_smoothing,pos={21, gb_top + gb_ht + sv_adj},size={112,16}</div><div class="line"><a name="l01169"></a><span class="lineno"> 1169</span>&#160;    Button b_norm_thetaphi_preview,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01170"></a><span class="lineno"> 1170</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01171"></a><span class="lineno"> 1171</span>&#160;    gb_ht += gb_internal_bot</div><div class="line"><a name="l01172"></a><span class="lineno"> 1172</span>&#160;    GroupBox gb_norm_thetaphi, size={272,gb_ht}</div><div class="line"><a name="l01173"></a><span class="lineno"> 1173</span>&#160;</div><div class="line"><a name="l01174"></a><span class="lineno"> 1174</span>&#160;    gb_top += gb_ht + gb_space</div><div class="line"><a name="l01175"></a><span class="lineno"> 1175</span>&#160;    GroupBox gb_output,pos={4,gb_top}</div><div class="line"><a name="l01176"></a><span class="lineno"> 1176</span>&#160;    gb_ht = gb_internal_top</div><div class="line"><a name="l01177"></a><span class="lineno"> 1177</span>&#160;    SetVariable sv_output_folding,pos={38, gb_top + gb_ht + sv_adj},size={95,16}</div><div class="line"><a name="l01178"></a><span class="lineno"> 1178</span>&#160;    Button b_output_calc,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01179"></a><span class="lineno"> 1179</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01180"></a><span class="lineno"> 1180</span>&#160;    SetVariable sv_output_horizon,pos={35, gb_top + gb_ht + sv_adj},size={98,16}</div><div class="line"><a name="l01181"></a><span class="lineno"> 1181</span>&#160;    Button b_output_duplicate,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01182"></a><span class="lineno"> 1182</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01183"></a><span class="lineno"> 1183</span>&#160;    PopupMenu pm_graph_projection,pos={24, gb_top + gb_ht + pm_adj},size={149,21}</div><div class="line"><a name="l01184"></a><span class="lineno"> 1184</span>&#160;    Button b_output_itx,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01185"></a><span class="lineno"> 1185</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01186"></a><span class="lineno"> 1186</span>&#160;    PopupMenu pm_graph_mode,pos={44, gb_top + gb_ht + pm_adj},size={129,21}</div><div class="line"><a name="l01187"></a><span class="lineno"> 1187</span>&#160;    Button b_output_etpi,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01188"></a><span class="lineno"> 1188</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01189"></a><span class="lineno"> 1189</span>&#160;    gb_ht += gb_internal_bot</div><div class="line"><a name="l01190"></a><span class="lineno"> 1190</span>&#160;    GroupBox gb_output, size={272,gb_ht}</div><div class="line"><a name="l01191"></a><span class="lineno"> 1191</span>&#160;</div><div class="line"><a name="l01192"></a><span class="lineno"> 1192</span>&#160;    gb_top += gb_ht + gb_space</div><div class="line"><a name="l01193"></a><span class="lineno"> 1193</span>&#160;    GroupBox gb_graph,pos={4,gb_top}</div><div class="line"><a name="l01194"></a><span class="lineno"> 1194</span>&#160;    gb_ht = gb_internal_top</div><div class="line"><a name="l01195"></a><span class="lineno"> 1195</span>&#160;    PopupMenu pm_graph_colortable,pos={21, gb_top + gb_ht + pm_adj},size={152,21}</div><div class="line"><a name="l01196"></a><span class="lineno"> 1196</span>&#160;    Button b_graph_update,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01197"></a><span class="lineno"> 1197</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01198"></a><span class="lineno"> 1198</span>&#160;    SetVariable sv_graph_contrast,pos={14, gb_top + gb_ht + sv_adj},size={119,16}</div><div class="line"><a name="l01199"></a><span class="lineno"> 1199</span>&#160;    Button b_graph_png,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01200"></a><span class="lineno"> 1200</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01201"></a><span class="lineno"> 1201</span>&#160;    gb_ht += gb_internal_bot</div><div class="line"><a name="l01202"></a><span class="lineno"> 1202</span>&#160;    GroupBox gb_graph, size={272,gb_ht}</div><div class="line"><a name="l01203"></a><span class="lineno"> 1203</span>&#160;    </div><div class="line"><a name="l01204"></a><span class="lineno"> 1204</span>&#160;    gb_top += gb_ht + gb_space</div><div class="line"><a name="l01205"></a><span class="lineno"> 1205</span>&#160;    <span class="comment">//MoveWindow 200, 100, 479, 100 + gb_top</span></div><div class="line"><a name="l01206"></a><span class="lineno"> 1206</span>&#160;end</div><div class="line"><a name="l01207"></a><span class="lineno"> 1207</span>&#160;</div><div class="line"><a name="l01210"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a7ddecbeeaee3f9da87ac1ecdc26f530b"> 1210</a></span>&#160;<span class="keyword">static</span> <span class="keyword">function</span> <a class="code" href="pearl-anglescan-panel_8ipf.html#a7ddecbeeaee3f9da87ac1ecdc26f530b">update_menus</a>()</div><div class="line"><a name="l01211"></a><span class="lineno"> 1211</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01212"></a><span class="lineno"> 1212</span>&#160;    svar /sdfr=df panel_name</div><div class="line"><a name="l01213"></a><span class="lineno"> 1213</span>&#160;    if (wintype(panel_name) == 7)</div><div class="line"><a name="l01214"></a><span class="lineno"> 1214</span>&#160;        variable m</div><div class="line"><a name="l01215"></a><span class="lineno"> 1215</span>&#160;        nvar /sdfr=df norm_alpha_mode</div><div class="line"><a name="l01216"></a><span class="lineno"> 1216</span>&#160;        m = norm_alpha_mode + 1</div><div class="line"><a name="l01217"></a><span class="lineno"> 1217</span>&#160;        PopupMenu pm_norm_alpha_mode win=$panel_name, mode=m</div><div class="line"><a name="l01218"></a><span class="lineno"> 1218</span>&#160;        nvar /sdfr=df norm_theta_domain</div><div class="line"><a name="l01219"></a><span class="lineno"> 1219</span>&#160;        m = norm_theta_domain + 1</div><div class="line"><a name="l01220"></a><span class="lineno"> 1220</span>&#160;        PopupMenu pm_norm_theta_domain win=$panel_name, mode=m</div><div class="line"><a name="l01221"></a><span class="lineno"> 1221</span>&#160;        nvar /sdfr=df norm_theta_mode</div><div class="line"><a name="l01222"></a><span class="lineno"> 1222</span>&#160;        m = norm_theta_mode + 1</div><div class="line"><a name="l01223"></a><span class="lineno"> 1223</span>&#160;        PopupMenu pm_norm_theta_mode win=$panel_name, mode=m</div><div class="line"><a name="l01224"></a><span class="lineno"> 1224</span>&#160;        nvar /sdfr=df norm_thetaphi_mode</div><div class="line"><a name="l01225"></a><span class="lineno"> 1225</span>&#160;        m = norm_thetaphi_mode + 1</div><div class="line"><a name="l01226"></a><span class="lineno"> 1226</span>&#160;        PopupMenu pm_norm_thetaphi_mode win=$panel_name, mode=m</div><div class="line"><a name="l01227"></a><span class="lineno"> 1227</span>&#160;        nvar /sdfr=df graph_mode</div><div class="line"><a name="l01228"></a><span class="lineno"> 1228</span>&#160;        m = graph_mode + 1</div><div class="line"><a name="l01229"></a><span class="lineno"> 1229</span>&#160;        PopupMenu pm_graph_mode win=$panel_name, mode=m</div><div class="line"><a name="l01230"></a><span class="lineno"> 1230</span>&#160;        nvar /sdfr=df graph_projection</div><div class="line"><a name="l01231"></a><span class="lineno"> 1231</span>&#160;        m = graph_projection + 1</div><div class="line"><a name="l01232"></a><span class="lineno"> 1232</span>&#160;        PopupMenu pm_graph_projection win=$panel_name, mode=m</div><div class="line"><a name="l01233"></a><span class="lineno"> 1233</span>&#160;        svar /sdfr=df graph_colortable</div><div class="line"><a name="l01234"></a><span class="lineno"> 1234</span>&#160;        m = 1 + WhichListItem(graph_colortable, CTabList())</div><div class="line"><a name="l01235"></a><span class="lineno"> 1235</span>&#160;        PopupMenu pm_graph_colortable win=$panel_name, mode=m</div><div class="line"><a name="l01236"></a><span class="lineno"> 1236</span>&#160;    endif</div><div class="line"><a name="l01237"></a><span class="lineno"> 1237</span>&#160;end</div><div class="line"><a name="l01238"></a><span class="lineno"> 1238</span>&#160;</div><div class="line"><a name="l01239"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a1868754e64cb1448e564c0936e78574d"> 1239</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a1868754e64cb1448e564c0936e78574d">bp_load_prefs</a>(ba) : ButtonControl</div><div class="line"><a name="l01240"></a><span class="lineno"> 1240</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01241"></a><span class="lineno"> 1241</span>&#160;</div><div class="line"><a name="l01242"></a><span class="lineno"> 1242</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01243"></a><span class="lineno"> 1243</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01244"></a><span class="lineno"> 1244</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a92c27964d49ab8bcd7afc858ebe214a3">load_prefs</a>()</div><div class="line"><a name="l01245"></a><span class="lineno"> 1245</span>&#160;            break</div><div class="line"><a name="l01246"></a><span class="lineno"> 1246</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01247"></a><span class="lineno"> 1247</span>&#160;            break</div><div class="line"><a name="l01248"></a><span class="lineno"> 1248</span>&#160;    endswitch</div><div class="line"><a name="l01249"></a><span class="lineno"> 1249</span>&#160;</div><div class="line"><a name="l01250"></a><span class="lineno"> 1250</span>&#160;    return 0</div><div class="line"><a name="l01251"></a><span class="lineno"> 1251</span>&#160;End</div><div class="line"><a name="l01252"></a><span class="lineno"> 1252</span>&#160;</div><div class="line"><a name="l01253"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#ad8a01428a137278a31d4f1f4f9c634c5"> 1253</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#ad8a01428a137278a31d4f1f4f9c634c5">bp_save_prefs</a>(ba) : ButtonControl</div><div class="line"><a name="l01254"></a><span class="lineno"> 1254</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01255"></a><span class="lineno"> 1255</span>&#160;</div><div class="line"><a name="l01256"></a><span class="lineno"> 1256</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01257"></a><span class="lineno"> 1257</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01258"></a><span class="lineno"> 1258</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#ac729557a307bddd2f2ad298199976c01">save_prefs</a>()</div><div class="line"><a name="l01259"></a><span class="lineno"> 1259</span>&#160;            break</div><div class="line"><a name="l01260"></a><span class="lineno"> 1260</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01261"></a><span class="lineno"> 1261</span>&#160;            break</div><div class="line"><a name="l01262"></a><span class="lineno"> 1262</span>&#160;    endswitch</div><div class="line"><a name="l01263"></a><span class="lineno"> 1263</span>&#160;</div><div class="line"><a name="l01264"></a><span class="lineno"> 1264</span>&#160;    return 0</div><div class="line"><a name="l01265"></a><span class="lineno"> 1265</span>&#160;End</div><div class="line"><a name="l01266"></a><span class="lineno"> 1266</span>&#160;</div><div class="line"><a name="l01267"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a1e50019bc895a0787cb3f07d776e9463"> 1267</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a1e50019bc895a0787cb3f07d776e9463">bp_source_select</a>(ba) : ButtonControl</div><div class="line"><a name="l01268"></a><span class="lineno"> 1268</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01269"></a><span class="lineno"> 1269</span>&#160;</div><div class="line"><a name="l01270"></a><span class="lineno"> 1270</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01271"></a><span class="lineno"> 1271</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01272"></a><span class="lineno"> 1272</span>&#160;            dfref dfBefore = GetDataFolderDFR()</div><div class="line"><a name="l01273"></a><span class="lineno"> 1273</span>&#160;            Execute /q/z &quot;CreateBrowser prompt=\&quot;Select 2D holo scan wave\&quot;, showWaves=1, showVars=0, showStrs=0&quot;</div><div class="line"><a name="l01274"></a><span class="lineno"> 1274</span>&#160;            dfref dfAfter = GetDataFolderDFR()</div><div class="line"><a name="l01275"></a><span class="lineno"> 1275</span>&#160;            SetDataFolder dfBefore</div><div class="line"><a name="l01276"></a><span class="lineno"> 1276</span>&#160;    </div><div class="line"><a name="l01277"></a><span class="lineno"> 1277</span>&#160;            SVAR list = S_BrowserList</div><div class="line"><a name="l01278"></a><span class="lineno"> 1278</span>&#160;            NVAR flag = V_Flag</div><div class="line"><a name="l01279"></a><span class="lineno"> 1279</span>&#160;            if ((flag != 0) &amp;&amp; (ItemsInList(list) &gt;= 1))</div><div class="line"><a name="l01280"></a><span class="lineno"> 1280</span>&#160;                <span class="keywordtype">string</span> wname = StringFromList(0, list)</div><div class="line"><a name="l01281"></a><span class="lineno"> 1281</span>&#160;                wave w = $wname</div><div class="line"><a name="l01282"></a><span class="lineno"> 1282</span>&#160;                <a class="code" href="pearl-anglescan-panel_8ipf.html#a21aab19fbcde395df6e1ea8654b3af9a">asp_import_raw</a>(w)</div><div class="line"><a name="l01283"></a><span class="lineno"> 1283</span>&#160;            endif</div><div class="line"><a name="l01284"></a><span class="lineno"> 1284</span>&#160;</div><div class="line"><a name="l01285"></a><span class="lineno"> 1285</span>&#160;            break</div><div class="line"><a name="l01286"></a><span class="lineno"> 1286</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01287"></a><span class="lineno"> 1287</span>&#160;            break</div><div class="line"><a name="l01288"></a><span class="lineno"> 1288</span>&#160;    endswitch</div><div class="line"><a name="l01289"></a><span class="lineno"> 1289</span>&#160;</div><div class="line"><a name="l01290"></a><span class="lineno"> 1290</span>&#160;    return 0</div><div class="line"><a name="l01291"></a><span class="lineno"> 1291</span>&#160;End</div><div class="line"><a name="l01292"></a><span class="lineno"> 1292</span>&#160;</div><div class="line"><a name="l01293"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a7ab3962d1d9d50d6cd285d40d4a7ce50"> 1293</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a7ab3962d1d9d50d6cd285d40d4a7ce50">bp_source_update</a>(ba) : ButtonControl</div><div class="line"><a name="l01294"></a><span class="lineno"> 1294</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01295"></a><span class="lineno"> 1295</span>&#160;</div><div class="line"><a name="l01296"></a><span class="lineno"> 1296</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01297"></a><span class="lineno"> 1297</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01298"></a><span class="lineno"> 1298</span>&#160;            dfref packdf = $package_path</div><div class="line"><a name="l01299"></a><span class="lineno"> 1299</span>&#160;            svar /sdfr=packdf source_path</div><div class="line"><a name="l01300"></a><span class="lineno"> 1300</span>&#160;            wave /z w = $source_path</div><div class="line"><a name="l01301"></a><span class="lineno"> 1301</span>&#160;            if (waveexists(w))</div><div class="line"><a name="l01302"></a><span class="lineno"> 1302</span>&#160;                <a class="code" href="pearl-anglescan-panel_8ipf.html#a21aab19fbcde395df6e1ea8654b3af9a">asp_import_raw</a>(w)</div><div class="line"><a name="l01303"></a><span class="lineno"> 1303</span>&#160;            else</div><div class="line"><a name="l01304"></a><span class="lineno"> 1304</span>&#160;                DoAlert 0, &quot;can&#39;t find source data.&quot;</div><div class="line"><a name="l01305"></a><span class="lineno"> 1305</span>&#160;            endif</div><div class="line"><a name="l01306"></a><span class="lineno"> 1306</span>&#160;            break</div><div class="line"><a name="l01307"></a><span class="lineno"> 1307</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01308"></a><span class="lineno"> 1308</span>&#160;            break</div><div class="line"><a name="l01309"></a><span class="lineno"> 1309</span>&#160;    endswitch</div><div class="line"><a name="l01310"></a><span class="lineno"> 1310</span>&#160;</div><div class="line"><a name="l01311"></a><span class="lineno"> 1311</span>&#160;    return 0</div><div class="line"><a name="l01312"></a><span class="lineno"> 1312</span>&#160;End</div><div class="line"><a name="l01313"></a><span class="lineno"> 1313</span>&#160;</div><div class="line"><a name="l01314"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a630dfc775d45843c71c279bbb01d05a6"> 1314</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a630dfc775d45843c71c279bbb01d05a6">bp_norm_alpha_check</a>(ba) : ButtonControl</div><div class="line"><a name="l01315"></a><span class="lineno"> 1315</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01316"></a><span class="lineno"> 1316</span>&#160;</div><div class="line"><a name="l01317"></a><span class="lineno"> 1317</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01318"></a><span class="lineno"> 1318</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01319"></a><span class="lineno"> 1319</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#af5435ccaabba78f855b244929dc09ed0">check_norm_alpha</a>()</div><div class="line"><a name="l01320"></a><span class="lineno"> 1320</span>&#160;            break</div><div class="line"><a name="l01321"></a><span class="lineno"> 1321</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01322"></a><span class="lineno"> 1322</span>&#160;            break</div><div class="line"><a name="l01323"></a><span class="lineno"> 1323</span>&#160;    endswitch</div><div class="line"><a name="l01324"></a><span class="lineno"> 1324</span>&#160;</div><div class="line"><a name="l01325"></a><span class="lineno"> 1325</span>&#160;    return 0</div><div class="line"><a name="l01326"></a><span class="lineno"> 1326</span>&#160;End</div><div class="line"><a name="l01327"></a><span class="lineno"> 1327</span>&#160;</div><div class="line"><a name="l01328"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a0931ce925d2dae6a1bb7e4a65a8a2be7"> 1328</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a0931ce925d2dae6a1bb7e4a65a8a2be7">bp_norm_theta_check</a>(ba) : ButtonControl</div><div class="line"><a name="l01329"></a><span class="lineno"> 1329</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01330"></a><span class="lineno"> 1330</span>&#160;</div><div class="line"><a name="l01331"></a><span class="lineno"> 1331</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01332"></a><span class="lineno"> 1332</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01333"></a><span class="lineno"> 1333</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#addddc12e5b622a3d00756d724e5d05a9">check_norm_theta</a>()</div><div class="line"><a name="l01334"></a><span class="lineno"> 1334</span>&#160;            break</div><div class="line"><a name="l01335"></a><span class="lineno"> 1335</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01336"></a><span class="lineno"> 1336</span>&#160;            break</div><div class="line"><a name="l01337"></a><span class="lineno"> 1337</span>&#160;    endswitch</div><div class="line"><a name="l01338"></a><span class="lineno"> 1338</span>&#160;</div><div class="line"><a name="l01339"></a><span class="lineno"> 1339</span>&#160;    return 0</div><div class="line"><a name="l01340"></a><span class="lineno"> 1340</span>&#160;End</div><div class="line"><a name="l01341"></a><span class="lineno"> 1341</span>&#160;</div><div class="line"><a name="l01342"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#ae42eb7f46e5c1a1b5d334ebb5e94d2d3"> 1342</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#ae42eb7f46e5c1a1b5d334ebb5e94d2d3">bp_norm_phi_check</a>(ba) : ButtonControl</div><div class="line"><a name="l01343"></a><span class="lineno"> 1343</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01344"></a><span class="lineno"> 1344</span>&#160;</div><div class="line"><a name="l01345"></a><span class="lineno"> 1345</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01346"></a><span class="lineno"> 1346</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01347"></a><span class="lineno"> 1347</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a91d5343cc96730de12b535cb0bef9df2">check_norm_phi</a>()</div><div class="line"><a name="l01348"></a><span class="lineno"> 1348</span>&#160;            break</div><div class="line"><a name="l01349"></a><span class="lineno"> 1349</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01350"></a><span class="lineno"> 1350</span>&#160;            break</div><div class="line"><a name="l01351"></a><span class="lineno"> 1351</span>&#160;    endswitch</div><div class="line"><a name="l01352"></a><span class="lineno"> 1352</span>&#160;</div><div class="line"><a name="l01353"></a><span class="lineno"> 1353</span>&#160;    return 0</div><div class="line"><a name="l01354"></a><span class="lineno"> 1354</span>&#160;End</div><div class="line"><a name="l01355"></a><span class="lineno"> 1355</span>&#160;</div><div class="line"><a name="l01356"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a89caab501e8f15262d6e4f2fa5b4a1bd"> 1356</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a89caab501e8f15262d6e4f2fa5b4a1bd">bp_norm_thetaphi_check</a>(ba) : ButtonControl</div><div class="line"><a name="l01357"></a><span class="lineno"> 1357</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01358"></a><span class="lineno"> 1358</span>&#160;</div><div class="line"><a name="l01359"></a><span class="lineno"> 1359</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01360"></a><span class="lineno"> 1360</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01361"></a><span class="lineno"> 1361</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a4708e7385790d1a9f2d58c4d64a60653">check_norm_thetaphi</a>()</div><div class="line"><a name="l01362"></a><span class="lineno"> 1362</span>&#160;            break</div><div class="line"><a name="l01363"></a><span class="lineno"> 1363</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01364"></a><span class="lineno"> 1364</span>&#160;            break</div><div class="line"><a name="l01365"></a><span class="lineno"> 1365</span>&#160;    endswitch</div><div class="line"><a name="l01366"></a><span class="lineno"> 1366</span>&#160;</div><div class="line"><a name="l01367"></a><span class="lineno"> 1367</span>&#160;    return 0</div><div class="line"><a name="l01368"></a><span class="lineno"> 1368</span>&#160;End</div><div class="line"><a name="l01369"></a><span class="lineno"> 1369</span>&#160;</div><div class="line"><a name="l01370"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a57c666f93cb4310fadf13b1916eaf134"> 1370</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a57c666f93cb4310fadf13b1916eaf134">bp_crop_preview</a>(ba) : ButtonControl</div><div class="line"><a name="l01371"></a><span class="lineno"> 1371</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01372"></a><span class="lineno"> 1372</span>&#160;</div><div class="line"><a name="l01373"></a><span class="lineno"> 1373</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01374"></a><span class="lineno"> 1374</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01375"></a><span class="lineno"> 1375</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a2268cc96a879c1a055c1ff29c1b040ea">preview_crop</a>()</div><div class="line"><a name="l01376"></a><span class="lineno"> 1376</span>&#160;            break</div><div class="line"><a name="l01377"></a><span class="lineno"> 1377</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01378"></a><span class="lineno"> 1378</span>&#160;            break</div><div class="line"><a name="l01379"></a><span class="lineno"> 1379</span>&#160;    endswitch</div><div class="line"><a name="l01380"></a><span class="lineno"> 1380</span>&#160;</div><div class="line"><a name="l01381"></a><span class="lineno"> 1381</span>&#160;    return 0</div><div class="line"><a name="l01382"></a><span class="lineno"> 1382</span>&#160;End</div><div class="line"><a name="l01383"></a><span class="lineno"> 1383</span>&#160;</div><div class="line"><a name="l01384"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#aaaf3facc118f90a8f1b32948446899b3"> 1384</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#aaaf3facc118f90a8f1b32948446899b3">bp_norm_alpha_preview</a>(ba) : ButtonControl</div><div class="line"><a name="l01385"></a><span class="lineno"> 1385</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01386"></a><span class="lineno"> 1386</span>&#160;</div><div class="line"><a name="l01387"></a><span class="lineno"> 1387</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01388"></a><span class="lineno"> 1388</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01389"></a><span class="lineno"> 1389</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#ad355d06d3b57bb458bd62e6d6f1f2417">preview_norm_alpha</a>()</div><div class="line"><a name="l01390"></a><span class="lineno"> 1390</span>&#160;            break</div><div class="line"><a name="l01391"></a><span class="lineno"> 1391</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01392"></a><span class="lineno"> 1392</span>&#160;            break</div><div class="line"><a name="l01393"></a><span class="lineno"> 1393</span>&#160;    endswitch</div><div class="line"><a name="l01394"></a><span class="lineno"> 1394</span>&#160;</div><div class="line"><a name="l01395"></a><span class="lineno"> 1395</span>&#160;    return 0</div><div class="line"><a name="l01396"></a><span class="lineno"> 1396</span>&#160;End</div><div class="line"><a name="l01397"></a><span class="lineno"> 1397</span>&#160;</div><div class="line"><a name="l01398"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a740c8a80ab2fc0550a05cf3b032821d0"> 1398</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a740c8a80ab2fc0550a05cf3b032821d0">bp_norm_phi_preview</a>(ba) : ButtonControl</div><div class="line"><a name="l01399"></a><span class="lineno"> 1399</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01400"></a><span class="lineno"> 1400</span>&#160;</div><div class="line"><a name="l01401"></a><span class="lineno"> 1401</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01402"></a><span class="lineno"> 1402</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01403"></a><span class="lineno"> 1403</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a0c228ce2048827dc8161691ec5c425fc">preview_norm_phi</a>()</div><div class="line"><a name="l01404"></a><span class="lineno"> 1404</span>&#160;            break</div><div class="line"><a name="l01405"></a><span class="lineno"> 1405</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01406"></a><span class="lineno"> 1406</span>&#160;            break</div><div class="line"><a name="l01407"></a><span class="lineno"> 1407</span>&#160;    endswitch</div><div class="line"><a name="l01408"></a><span class="lineno"> 1408</span>&#160;</div><div class="line"><a name="l01409"></a><span class="lineno"> 1409</span>&#160;    return 0</div><div class="line"><a name="l01410"></a><span class="lineno"> 1410</span>&#160;End</div><div class="line"><a name="l01411"></a><span class="lineno"> 1411</span>&#160;</div><div class="line"><a name="l01412"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#af57abb0a7d41b800d33bb748f9fc5c38"> 1412</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#af57abb0a7d41b800d33bb748f9fc5c38">bp_norm_theta_preview</a>(ba) : ButtonControl</div><div class="line"><a name="l01413"></a><span class="lineno"> 1413</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01414"></a><span class="lineno"> 1414</span>&#160;</div><div class="line"><a name="l01415"></a><span class="lineno"> 1415</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01416"></a><span class="lineno"> 1416</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01417"></a><span class="lineno"> 1417</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#abe1237d8bf79a2ec3791ad9fe184bc3f">preview_norm_theta</a>()</div><div class="line"><a name="l01418"></a><span class="lineno"> 1418</span>&#160;            break</div><div class="line"><a name="l01419"></a><span class="lineno"> 1419</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01420"></a><span class="lineno"> 1420</span>&#160;            break</div><div class="line"><a name="l01421"></a><span class="lineno"> 1421</span>&#160;    endswitch</div><div class="line"><a name="l01422"></a><span class="lineno"> 1422</span>&#160;</div><div class="line"><a name="l01423"></a><span class="lineno"> 1423</span>&#160;    return 0</div><div class="line"><a name="l01424"></a><span class="lineno"> 1424</span>&#160;End</div><div class="line"><a name="l01425"></a><span class="lineno"> 1425</span>&#160;</div><div class="line"><a name="l01426"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#aaa3478a3b0f26b12a12196cfaa87a8ae"> 1426</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#aaa3478a3b0f26b12a12196cfaa87a8ae">bp_norm_thetaphi_preview</a>(ba) : ButtonControl</div><div class="line"><a name="l01427"></a><span class="lineno"> 1427</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01428"></a><span class="lineno"> 1428</span>&#160;</div><div class="line"><a name="l01429"></a><span class="lineno"> 1429</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01430"></a><span class="lineno"> 1430</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01431"></a><span class="lineno"> 1431</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a3e798e20a99a03a789dd7914612e4fd2">preview_norm_thetaphi</a>()</div><div class="line"><a name="l01432"></a><span class="lineno"> 1432</span>&#160;            break</div><div class="line"><a name="l01433"></a><span class="lineno"> 1433</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01434"></a><span class="lineno"> 1434</span>&#160;            break</div><div class="line"><a name="l01435"></a><span class="lineno"> 1435</span>&#160;    endswitch</div><div class="line"><a name="l01436"></a><span class="lineno"> 1436</span>&#160;</div><div class="line"><a name="l01437"></a><span class="lineno"> 1437</span>&#160;    return 0</div><div class="line"><a name="l01438"></a><span class="lineno"> 1438</span>&#160;End</div><div class="line"><a name="l01439"></a><span class="lineno"> 1439</span>&#160;</div><div class="line"><a name="l01440"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#adefddc5f384948c9dab3ee65b4a0668a"> 1440</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#adefddc5f384948c9dab3ee65b4a0668a">bp_output_calc</a>(ba) : ButtonControl</div><div class="line"><a name="l01441"></a><span class="lineno"> 1441</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01442"></a><span class="lineno"> 1442</span>&#160;</div><div class="line"><a name="l01443"></a><span class="lineno"> 1443</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01444"></a><span class="lineno"> 1444</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01445"></a><span class="lineno"> 1445</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#af21424ce00e4bac1ac990d2bb83d46dc">asp_calculate_output</a>()</div><div class="line"><a name="l01446"></a><span class="lineno"> 1446</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a8e540427fab71f879e84003c49c59f22">asp_display_output</a>()</div><div class="line"><a name="l01447"></a><span class="lineno"> 1447</span>&#160;            break</div><div class="line"><a name="l01448"></a><span class="lineno"> 1448</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01449"></a><span class="lineno"> 1449</span>&#160;            break</div><div class="line"><a name="l01450"></a><span class="lineno"> 1450</span>&#160;    endswitch</div><div class="line"><a name="l01451"></a><span class="lineno"> 1451</span>&#160;</div><div class="line"><a name="l01452"></a><span class="lineno"> 1452</span>&#160;    return 0</div><div class="line"><a name="l01453"></a><span class="lineno"> 1453</span>&#160;End</div><div class="line"><a name="l01454"></a><span class="lineno"> 1454</span>&#160;</div><div class="line"><a name="l01455"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#ae838bde232c45d81f88303e91b16326b"> 1455</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#ae838bde232c45d81f88303e91b16326b">bp_output_duplicate</a>(ba) : ButtonControl</div><div class="line"><a name="l01456"></a><span class="lineno"> 1456</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01457"></a><span class="lineno"> 1457</span>&#160;</div><div class="line"><a name="l01458"></a><span class="lineno"> 1458</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01459"></a><span class="lineno"> 1459</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01460"></a><span class="lineno"> 1460</span>&#160;            <span class="keywordtype">string</span> dest_folder</div><div class="line"><a name="l01461"></a><span class="lineno"> 1461</span>&#160;            variable do_graph = 1</div><div class="line"><a name="l01462"></a><span class="lineno"> 1462</span>&#160;            prompt dest_folder, &quot;destination folder name (relative to data source)&quot;</div><div class="line"><a name="l01463"></a><span class="lineno"> 1463</span>&#160;            prompt do_graph, &quot;duplicate graph (yes = 1, no = 0)&quot;</div><div class="line"><a name="l01464"></a><span class="lineno"> 1464</span>&#160;            doprompt &quot;duplicate&quot;, dest_folder, do_graph</div><div class="line"><a name="l01465"></a><span class="lineno"> 1465</span>&#160;            if (!v_flag)</div><div class="line"><a name="l01466"></a><span class="lineno"> 1466</span>&#160;                <a class="code" href="pearl-anglescan-panel_8ipf.html#adf7c5a4e7c66c3d6e13d01674b9cf47f">asp_duplicate_output</a>(dest_folder, do_graph=do_graph)</div><div class="line"><a name="l01467"></a><span class="lineno"> 1467</span>&#160;            endif</div><div class="line"><a name="l01468"></a><span class="lineno"> 1468</span>&#160;            break</div><div class="line"><a name="l01469"></a><span class="lineno"> 1469</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01470"></a><span class="lineno"> 1470</span>&#160;            break</div><div class="line"><a name="l01471"></a><span class="lineno"> 1471</span>&#160;    endswitch</div><div class="line"><a name="l01472"></a><span class="lineno"> 1472</span>&#160;</div><div class="line"><a name="l01473"></a><span class="lineno"> 1473</span>&#160;    return 0</div><div class="line"><a name="l01474"></a><span class="lineno"> 1474</span>&#160;End</div><div class="line"><a name="l01475"></a><span class="lineno"> 1475</span>&#160;</div><div class="line"><a name="l01476"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a16d2f6a58fedc370d7901126bb814bbb"> 1476</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a16d2f6a58fedc370d7901126bb814bbb">bp_output_etpi</a>(ba) : ButtonControl</div><div class="line"><a name="l01477"></a><span class="lineno"> 1477</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01478"></a><span class="lineno"> 1478</span>&#160;</div><div class="line"><a name="l01479"></a><span class="lineno"> 1479</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01480"></a><span class="lineno"> 1480</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01481"></a><span class="lineno"> 1481</span>&#160;            dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01482"></a><span class="lineno"> 1482</span>&#160;            wave /sdfr=df process_data</div><div class="line"><a name="l01483"></a><span class="lineno"> 1483</span>&#160;            variable ekin</div><div class="line"><a name="l01484"></a><span class="lineno"> 1484</span>&#160;            ekin = NumberByKey(&quot;KineticEnergy&quot;, note(process_data), &quot;=&quot;, &quot;\r&quot;)</div><div class="line"><a name="l01485"></a><span class="lineno"> 1485</span>&#160;            prompt ekin, &quot;kinetic energy&quot;</div><div class="line"><a name="l01486"></a><span class="lineno"> 1486</span>&#160;            doprompt &quot;save etpi&quot;, ekin</div><div class="line"><a name="l01487"></a><span class="lineno"> 1487</span>&#160;            if (!v_flag)</div><div class="line"><a name="l01488"></a><span class="lineno"> 1488</span>&#160;                <a class="code" href="pearl-anglescan-panel_8ipf.html#abb4d53822bc34bda0e38332c7777ebac">asp_save_output_etpi</a>(ekin)</div><div class="line"><a name="l01489"></a><span class="lineno"> 1489</span>&#160;            endif</div><div class="line"><a name="l01490"></a><span class="lineno"> 1490</span>&#160;            break</div><div class="line"><a name="l01491"></a><span class="lineno"> 1491</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01492"></a><span class="lineno"> 1492</span>&#160;            break</div><div class="line"><a name="l01493"></a><span class="lineno"> 1493</span>&#160;    endswitch</div><div class="line"><a name="l01494"></a><span class="lineno"> 1494</span>&#160;</div><div class="line"><a name="l01495"></a><span class="lineno"> 1495</span>&#160;    return 0</div><div class="line"><a name="l01496"></a><span class="lineno"> 1496</span>&#160;End</div><div class="line"><a name="l01497"></a><span class="lineno"> 1497</span>&#160;</div><div class="line"><a name="l01498"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a0bdc14f90bdc40045200ac23229b225d"> 1498</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a0bdc14f90bdc40045200ac23229b225d">bp_output_itx</a>(ba) : ButtonControl</div><div class="line"><a name="l01499"></a><span class="lineno"> 1499</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01500"></a><span class="lineno"> 1500</span>&#160;</div><div class="line"><a name="l01501"></a><span class="lineno"> 1501</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01502"></a><span class="lineno"> 1502</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01503"></a><span class="lineno"> 1503</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a0e0f10d125f1cdacffa3bff9b0854aa9">asp_save_output_itx</a>()</div><div class="line"><a name="l01504"></a><span class="lineno"> 1504</span>&#160;            break</div><div class="line"><a name="l01505"></a><span class="lineno"> 1505</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01506"></a><span class="lineno"> 1506</span>&#160;            break</div><div class="line"><a name="l01507"></a><span class="lineno"> 1507</span>&#160;    endswitch</div><div class="line"><a name="l01508"></a><span class="lineno"> 1508</span>&#160;</div><div class="line"><a name="l01509"></a><span class="lineno"> 1509</span>&#160;    return 0</div><div class="line"><a name="l01510"></a><span class="lineno"> 1510</span>&#160;End</div><div class="line"><a name="l01511"></a><span class="lineno"> 1511</span>&#160;</div><div class="line"><a name="l01512"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a940f2115fb5b47e19516168d15346472"> 1512</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a940f2115fb5b47e19516168d15346472">bp_graph_update</a>(ba) : ButtonControl</div><div class="line"><a name="l01513"></a><span class="lineno"> 1513</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01514"></a><span class="lineno"> 1514</span>&#160;</div><div class="line"><a name="l01515"></a><span class="lineno"> 1515</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01516"></a><span class="lineno"> 1516</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01517"></a><span class="lineno"> 1517</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a93dc5a029ae9831066e6ad133522ee88">asp_update_graph</a>()</div><div class="line"><a name="l01518"></a><span class="lineno"> 1518</span>&#160;            break</div><div class="line"><a name="l01519"></a><span class="lineno"> 1519</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01520"></a><span class="lineno"> 1520</span>&#160;            break</div><div class="line"><a name="l01521"></a><span class="lineno"> 1521</span>&#160;    endswitch</div><div class="line"><a name="l01522"></a><span class="lineno"> 1522</span>&#160;</div><div class="line"><a name="l01523"></a><span class="lineno"> 1523</span>&#160;    return 0</div><div class="line"><a name="l01524"></a><span class="lineno"> 1524</span>&#160;End</div><div class="line"><a name="l01525"></a><span class="lineno"> 1525</span>&#160;</div><div class="line"><a name="l01526"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a9be861636d98d7891e6d106deac2f90b"> 1526</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a9be861636d98d7891e6d106deac2f90b">bp_graph_png</a>(ba) : ButtonControl</div><div class="line"><a name="l01527"></a><span class="lineno"> 1527</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01528"></a><span class="lineno"> 1528</span>&#160;</div><div class="line"><a name="l01529"></a><span class="lineno"> 1529</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01530"></a><span class="lineno"> 1530</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01531"></a><span class="lineno"> 1531</span>&#160;            dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01532"></a><span class="lineno"> 1532</span>&#160;            svar /sdfr=df source_path</div><div class="line"><a name="l01533"></a><span class="lineno"> 1533</span>&#160;            svar /sdfr=df output_graphname</div><div class="line"><a name="l01534"></a><span class="lineno"> 1534</span>&#160;            if (WinType(output_graphname) == 1)</div><div class="line"><a name="l01535"></a><span class="lineno"> 1535</span>&#160;                SavePICT /WIN=$output_graphname /E=-5 /B=144 /TRAN=0</div><div class="line"><a name="l01536"></a><span class="lineno"> 1536</span>&#160;            endif</div><div class="line"><a name="l01537"></a><span class="lineno"> 1537</span>&#160;            break</div><div class="line"><a name="l01538"></a><span class="lineno"> 1538</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01539"></a><span class="lineno"> 1539</span>&#160;            break</div><div class="line"><a name="l01540"></a><span class="lineno"> 1540</span>&#160;    endswitch</div><div class="line"><a name="l01541"></a><span class="lineno"> 1541</span>&#160;</div><div class="line"><a name="l01542"></a><span class="lineno"> 1542</span>&#160;    return 0</div><div class="line"><a name="l01543"></a><span class="lineno"> 1543</span>&#160;End</div><div class="line"><a name="l01544"></a><span class="lineno"> 1544</span>&#160;</div><div class="line"><a name="l01545"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#acc1028dcd046f441ceaac268ffac9af6"> 1545</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#acc1028dcd046f441ceaac268ffac9af6">pmp_norm_alpha_mode</a>(pa) : PopupMenuControl</div><div class="line"><a name="l01546"></a><span class="lineno"> 1546</span>&#160;    STRUCT WMPopupAction &amp;pa</div><div class="line"><a name="l01547"></a><span class="lineno"> 1547</span>&#160;</div><div class="line"><a name="l01548"></a><span class="lineno"> 1548</span>&#160;    switch( pa.eventCode )</div><div class="line"><a name="l01549"></a><span class="lineno"> 1549</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01550"></a><span class="lineno"> 1550</span>&#160;            dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01551"></a><span class="lineno"> 1551</span>&#160;            nvar /sdfr=df norm_alpha_mode</div><div class="line"><a name="l01552"></a><span class="lineno"> 1552</span>&#160;            norm_alpha_mode = pa.popNum - 1</div><div class="line"><a name="l01553"></a><span class="lineno"> 1553</span>&#160;            break</div><div class="line"><a name="l01554"></a><span class="lineno"> 1554</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01555"></a><span class="lineno"> 1555</span>&#160;            break</div><div class="line"><a name="l01556"></a><span class="lineno"> 1556</span>&#160;    endswitch</div><div class="line"><a name="l01557"></a><span class="lineno"> 1557</span>&#160;</div><div class="line"><a name="l01558"></a><span class="lineno"> 1558</span>&#160;    return 0</div><div class="line"><a name="l01559"></a><span class="lineno"> 1559</span>&#160;End</div><div class="line"><a name="l01560"></a><span class="lineno"> 1560</span>&#160;</div><div class="line"><a name="l01561"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a0153f4ed4892dd3b48276af190590e4f"> 1561</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a0153f4ed4892dd3b48276af190590e4f">pmp_norm_theta_domain</a>(pa) : PopupMenuControl</div><div class="line"><a name="l01562"></a><span class="lineno"> 1562</span>&#160;    STRUCT WMPopupAction &amp;pa</div><div class="line"><a name="l01563"></a><span class="lineno"> 1563</span>&#160;</div><div class="line"><a name="l01564"></a><span class="lineno"> 1564</span>&#160;    switch( pa.eventCode )</div><div class="line"><a name="l01565"></a><span class="lineno"> 1565</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01566"></a><span class="lineno"> 1566</span>&#160;            dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01567"></a><span class="lineno"> 1567</span>&#160;            nvar /sdfr=df norm_theta_domain</div><div class="line"><a name="l01568"></a><span class="lineno"> 1568</span>&#160;            norm_theta_domain = pa.popNum - 1</div><div class="line"><a name="l01569"></a><span class="lineno"> 1569</span>&#160;            break</div><div class="line"><a name="l01570"></a><span class="lineno"> 1570</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01571"></a><span class="lineno"> 1571</span>&#160;            break</div><div class="line"><a name="l01572"></a><span class="lineno"> 1572</span>&#160;    endswitch</div><div class="line"><a name="l01573"></a><span class="lineno"> 1573</span>&#160;</div><div class="line"><a name="l01574"></a><span class="lineno"> 1574</span>&#160;    return 0</div><div class="line"><a name="l01575"></a><span class="lineno"> 1575</span>&#160;End</div><div class="line"><a name="l01576"></a><span class="lineno"> 1576</span>&#160;</div><div class="line"><a name="l01577"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#ae68496dbe344dc8a2c7c99b2d3f4b01c"> 1577</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#ae68496dbe344dc8a2c7c99b2d3f4b01c">pmp_norm_theta_mode</a>(pa) : PopupMenuControl</div><div class="line"><a name="l01578"></a><span class="lineno"> 1578</span>&#160;    STRUCT WMPopupAction &amp;pa</div><div class="line"><a name="l01579"></a><span class="lineno"> 1579</span>&#160;</div><div class="line"><a name="l01580"></a><span class="lineno"> 1580</span>&#160;    switch( pa.eventCode )</div><div class="line"><a name="l01581"></a><span class="lineno"> 1581</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01582"></a><span class="lineno"> 1582</span>&#160;            dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01583"></a><span class="lineno"> 1583</span>&#160;            nvar /sdfr=df norm_theta_mode</div><div class="line"><a name="l01584"></a><span class="lineno"> 1584</span>&#160;            norm_theta_mode = pa.popNum - 1</div><div class="line"><a name="l01585"></a><span class="lineno"> 1585</span>&#160;            break</div><div class="line"><a name="l01586"></a><span class="lineno"> 1586</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01587"></a><span class="lineno"> 1587</span>&#160;            break</div><div class="line"><a name="l01588"></a><span class="lineno"> 1588</span>&#160;    endswitch</div><div class="line"><a name="l01589"></a><span class="lineno"> 1589</span>&#160;</div><div class="line"><a name="l01590"></a><span class="lineno"> 1590</span>&#160;    return 0</div><div class="line"><a name="l01591"></a><span class="lineno"> 1591</span>&#160;End</div><div class="line"><a name="l01592"></a><span class="lineno"> 1592</span>&#160;</div><div class="line"><a name="l01593"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a289996a12d0ef46af1dac49a67289931"> 1593</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a289996a12d0ef46af1dac49a67289931">pmp_norm_thetaphi_mode</a>(pa) : PopupMenuControl</div><div class="line"><a name="l01594"></a><span class="lineno"> 1594</span>&#160;    STRUCT WMPopupAction &amp;pa</div><div class="line"><a name="l01595"></a><span class="lineno"> 1595</span>&#160;</div><div class="line"><a name="l01596"></a><span class="lineno"> 1596</span>&#160;    switch( pa.eventCode )</div><div class="line"><a name="l01597"></a><span class="lineno"> 1597</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01598"></a><span class="lineno"> 1598</span>&#160;            dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01599"></a><span class="lineno"> 1599</span>&#160;            nvar /sdfr=df norm_thetaphi_mode</div><div class="line"><a name="l01600"></a><span class="lineno"> 1600</span>&#160;            norm_thetaphi_mode = pa.popNum - 1</div><div class="line"><a name="l01601"></a><span class="lineno"> 1601</span>&#160;            break</div><div class="line"><a name="l01602"></a><span class="lineno"> 1602</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01603"></a><span class="lineno"> 1603</span>&#160;            break</div><div class="line"><a name="l01604"></a><span class="lineno"> 1604</span>&#160;    endswitch</div><div class="line"><a name="l01605"></a><span class="lineno"> 1605</span>&#160;</div><div class="line"><a name="l01606"></a><span class="lineno"> 1606</span>&#160;    return 0</div><div class="line"><a name="l01607"></a><span class="lineno"> 1607</span>&#160;End</div><div class="line"><a name="l01608"></a><span class="lineno"> 1608</span>&#160;</div><div class="line"><a name="l01609"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a1b41c992729d627445dbba0637b31ece"> 1609</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a1b41c992729d627445dbba0637b31ece">pmp_graph_mode</a>(pa) : PopupMenuControl</div><div class="line"><a name="l01610"></a><span class="lineno"> 1610</span>&#160;    STRUCT WMPopupAction &amp;pa</div><div class="line"><a name="l01611"></a><span class="lineno"> 1611</span>&#160;</div><div class="line"><a name="l01612"></a><span class="lineno"> 1612</span>&#160;    switch( pa.eventCode )</div><div class="line"><a name="l01613"></a><span class="lineno"> 1613</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01614"></a><span class="lineno"> 1614</span>&#160;            dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01615"></a><span class="lineno"> 1615</span>&#160;            nvar /sdfr=df graph_mode</div><div class="line"><a name="l01616"></a><span class="lineno"> 1616</span>&#160;            graph_mode = pa.popNum - 1</div><div class="line"><a name="l01617"></a><span class="lineno"> 1617</span>&#160;            break</div><div class="line"><a name="l01618"></a><span class="lineno"> 1618</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01619"></a><span class="lineno"> 1619</span>&#160;            break</div><div class="line"><a name="l01620"></a><span class="lineno"> 1620</span>&#160;    endswitch</div><div class="line"><a name="l01621"></a><span class="lineno"> 1621</span>&#160;</div><div class="line"><a name="l01622"></a><span class="lineno"> 1622</span>&#160;    return 0</div><div class="line"><a name="l01623"></a><span class="lineno"> 1623</span>&#160;End</div><div class="line"><a name="l01624"></a><span class="lineno"> 1624</span>&#160;</div><div class="line"><a name="l01625"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#af83bfcf48723e7f6eeb78b4e0d84277d"> 1625</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#af83bfcf48723e7f6eeb78b4e0d84277d">pmp_graph_projection</a>(pa) : PopupMenuControl</div><div class="line"><a name="l01626"></a><span class="lineno"> 1626</span>&#160;    STRUCT WMPopupAction &amp;pa</div><div class="line"><a name="l01627"></a><span class="lineno"> 1627</span>&#160;</div><div class="line"><a name="l01628"></a><span class="lineno"> 1628</span>&#160;    switch( pa.eventCode )</div><div class="line"><a name="l01629"></a><span class="lineno"> 1629</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01630"></a><span class="lineno"> 1630</span>&#160;            dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01631"></a><span class="lineno"> 1631</span>&#160;            nvar /sdfr=df graph_projection</div><div class="line"><a name="l01632"></a><span class="lineno"> 1632</span>&#160;            graph_projection = pa.popNum - 1</div><div class="line"><a name="l01633"></a><span class="lineno"> 1633</span>&#160;            break</div><div class="line"><a name="l01634"></a><span class="lineno"> 1634</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01635"></a><span class="lineno"> 1635</span>&#160;            break</div><div class="line"><a name="l01636"></a><span class="lineno"> 1636</span>&#160;    endswitch</div><div class="line"><a name="l01637"></a><span class="lineno"> 1637</span>&#160;</div><div class="line"><a name="l01638"></a><span class="lineno"> 1638</span>&#160;    return 0</div><div class="line"><a name="l01639"></a><span class="lineno"> 1639</span>&#160;End</div><div class="line"><a name="l01640"></a><span class="lineno"> 1640</span>&#160;</div><div class="line"><a name="l01641"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#ac80c675f6f1a5505e9b6f0349ff5fe92"> 1641</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#ac80c675f6f1a5505e9b6f0349ff5fe92">pmp_graph_colortable</a>(pa) : PopupMenuControl</div><div class="line"><a name="l01642"></a><span class="lineno"> 1642</span>&#160;    STRUCT WMPopupAction &amp;pa</div><div class="line"><a name="l01643"></a><span class="lineno"> 1643</span>&#160;</div><div class="line"><a name="l01644"></a><span class="lineno"> 1644</span>&#160;    switch( pa.eventCode )</div><div class="line"><a name="l01645"></a><span class="lineno"> 1645</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01646"></a><span class="lineno"> 1646</span>&#160;            dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01647"></a><span class="lineno"> 1647</span>&#160;            svar /sdfr=df graph_colortable</div><div class="line"><a name="l01648"></a><span class="lineno"> 1648</span>&#160;            graph_colortable = StringFromList(pa.popNum - 1, CTabList())</div><div class="line"><a name="l01649"></a><span class="lineno"> 1649</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a93dc5a029ae9831066e6ad133522ee88">asp_update_graph</a>()</div><div class="line"><a name="l01650"></a><span class="lineno"> 1650</span>&#160;            break</div><div class="line"><a name="l01651"></a><span class="lineno"> 1651</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01652"></a><span class="lineno"> 1652</span>&#160;            break</div><div class="line"><a name="l01653"></a><span class="lineno"> 1653</span>&#160;    endswitch</div><div class="line"><a name="l01654"></a><span class="lineno"> 1654</span>&#160;</div><div class="line"><a name="l01655"></a><span class="lineno"> 1655</span>&#160;    return 0</div><div class="line"><a name="l01656"></a><span class="lineno"> 1656</span>&#160;End</div><div class="ttc" id="pearl-anglescan-panel_8ipf_html_a740c8a80ab2fc0550a05cf3b032821d0"><div class="ttname"><a href="pearl-anglescan-panel_8ipf.html#a740c8a80ab2fc0550a05cf3b032821d0">bp_norm_phi_preview</a></div><div class="ttdeci">static variable bp_norm_phi_preview(WMButtonAction *ba)</div><div class="ttdef"><b>Definition:</b> <a href="pearl-anglescan-panel_8ipf_source.html#l01398">pearl-anglescan-panel.ipf:1398</a></div></div>
+<a href="pearl-anglescan-panel_8ipf.html">Go to the documentation of this file.</a><div class="fragment"><div class="line"><a name="l00001"></a><span class="lineno">    1</span>&#160;<span class="preprocessor">#pragma rtGlobals=3     // Use modern global access method and strict wave access.</span></div><div class="line"><a name="l00002"></a><span class="lineno">    2</span>&#160;<span class="preprocessor">#pragma version = 1.8</span></div><div class="line"><a name="l00003"></a><span class="lineno">    3</span>&#160;<span class="preprocessor">#pragma IgorVersion = 6.2</span></div><div class="line"><a name="l00004"></a><span class="lineno">    4</span>&#160;<span class="preprocessor">#pragma ModuleName = PearlAnglescanPanel</span></div><div class="line"><a name="l00005"></a><span class="lineno">    5</span>&#160;<span class="preprocessor">#include &quot;pearl-anglescan-process&quot;</span></div><div class="line"><a name="l00006"></a><span class="lineno">    6</span>&#160;<span class="preprocessor">#include &quot;pearl-pmsco-import&quot;</span></div><div class="line"><a name="l00007"></a><span class="lineno">    7</span>&#160;</div><div class="line"><a name="l00008"></a><span class="lineno">    8</span>&#160;<span class="comment">// copyright (c) 2018-20 Paul Scherrer Institut</span></div><div class="line"><a name="l00009"></a><span class="lineno">    9</span>&#160;<span class="comment">//</span></div><div class="line"><a name="l00010"></a><span class="lineno">   10</span>&#160;<span class="comment">// Licensed under the Apache License, Version 2.0 (the &quot;License&quot;);</span></div><div class="line"><a name="l00011"></a><span class="lineno">   11</span>&#160;<span class="comment">//   you may not use this file except in compliance with the License.</span></div><div class="line"><a name="l00012"></a><span class="lineno">   12</span>&#160;<span class="comment">//   You may obtain a copy of the License at</span></div><div class="line"><a name="l00013"></a><span class="lineno">   13</span>&#160;<span class="comment">//   http:///www.apache.org/licenses/LICENSE-2.0</span></div><div class="line"><a name="l00014"></a><span class="lineno">   14</span>&#160;<span class="comment">//</span></div><div class="line"><a name="l00015"></a><span class="lineno">   15</span>&#160;<span class="comment">// Please acknowledge the use of this code.</span></div><div class="line"><a name="l00016"></a><span class="lineno">   16</span>&#160;</div><div class="line"><a name="l00038"></a><span class="lineno">   38</span>&#160;</div><div class="line"><a name="l00043"></a><span class="lineno">   43</span>&#160;</div><div class="line"><a name="l00045"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#aca457d1f4414d20a911254b1de13ebbb">   45</a></span>&#160;<span class="keyword">static</span> strconstant <a class="code" href="pearl-anglescan-panel_8ipf.html#aca457d1f4414d20a911254b1de13ebbb">package_name</a> = <span class="stringliteral">&quot;pearl_anglescan_panel&quot;</span></div><div class="line"><a name="l00047"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">   47</a></span>&#160;<span class="keyword">static</span> strconstant <a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a> = <span class="stringliteral">&quot;root:packages:pearl_anglescan_panel:&quot;</span></div><div class="line"><a name="l00048"></a><span class="lineno">   48</span>&#160;</div><div class="line"><a name="l00050"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a8e4eacc6efacf2c65615c1ea72d722ed">   50</a></span>&#160;<span class="keyword">static</span> <span class="keyword">function</span> <a class="code" href="pearl-anglescan-panel_8ipf.html#a8e4eacc6efacf2c65615c1ea72d722ed">AfterCompiledHook</a>()</div><div class="line"><a name="l00051"></a><span class="lineno">   51</span>&#160;</div><div class="line"><a name="l00052"></a><span class="lineno">   52</span>&#160;    dfref savedf = GetDataFolderDFR()</div><div class="line"><a name="l00053"></a><span class="lineno">   53</span>&#160;    variable do_init = 1</div><div class="line"><a name="l00054"></a><span class="lineno">   54</span>&#160;    if (DataFolderExists(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>))</div><div class="line"><a name="l00055"></a><span class="lineno">   55</span>&#160;        setdatafolder $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00056"></a><span class="lineno">   56</span>&#160;        nvar /z init_done</div><div class="line"><a name="l00057"></a><span class="lineno">   57</span>&#160;        if (nvar_exists(init_done))</div><div class="line"><a name="l00058"></a><span class="lineno">   58</span>&#160;            if (init_done)</div><div class="line"><a name="l00059"></a><span class="lineno">   59</span>&#160;                do_init = 0</div><div class="line"><a name="l00060"></a><span class="lineno">   60</span>&#160;            endif</div><div class="line"><a name="l00061"></a><span class="lineno">   61</span>&#160;        endif</div><div class="line"><a name="l00062"></a><span class="lineno">   62</span>&#160;    endif</div><div class="line"><a name="l00063"></a><span class="lineno">   63</span>&#160;</div><div class="line"><a name="l00064"></a><span class="lineno">   64</span>&#160;    if (do_init)</div><div class="line"><a name="l00065"></a><span class="lineno">   65</span>&#160;        <a class="code" href="pearl-anglescan-panel_8ipf.html#a45e930b8eadd7cf6a5f664befd87d725">init_package</a>()</div><div class="line"><a name="l00066"></a><span class="lineno">   66</span>&#160;        <a class="code" href="pearl-anglescan-panel_8ipf.html#a92c27964d49ab8bcd7afc858ebe214a3">load_prefs</a>()</div><div class="line"><a name="l00067"></a><span class="lineno">   67</span>&#160;        setdatafolder $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00068"></a><span class="lineno">   68</span>&#160;        variable /g init_done = 1</div><div class="line"><a name="l00069"></a><span class="lineno">   69</span>&#160;    endif</div><div class="line"><a name="l00070"></a><span class="lineno">   70</span>&#160;</div><div class="line"><a name="l00071"></a><span class="lineno">   71</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l00072"></a><span class="lineno">   72</span>&#160;    return 0</div><div class="line"><a name="l00073"></a><span class="lineno">   73</span>&#160;end</div><div class="line"><a name="l00074"></a><span class="lineno">   74</span>&#160;</div><div class="line"><a name="l00075"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a45e930b8eadd7cf6a5f664befd87d725">   75</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a45e930b8eadd7cf6a5f664befd87d725">init_package</a>()</div><div class="line"><a name="l00076"></a><span class="lineno">   76</span>&#160;    dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l00077"></a><span class="lineno">   77</span>&#160;    setdatafolder root:</div><div class="line"><a name="l00078"></a><span class="lineno">   78</span>&#160;    newdatafolder /o/s packages</div><div class="line"><a name="l00079"></a><span class="lineno">   79</span>&#160;    newdatafolder /o/s $package_name</div><div class="line"><a name="l00080"></a><span class="lineno">   80</span>&#160;</div><div class="line"><a name="l00081"></a><span class="lineno">   81</span>&#160;    <span class="comment">// configuration (persistent)</span></div><div class="line"><a name="l00082"></a><span class="lineno">   82</span>&#160;    <span class="keywordtype">string</span> /g graphname = &quot;graph_anglescan_panel&quot;</div><div class="line"><a name="l00083"></a><span class="lineno">   83</span>&#160;    <span class="keywordtype">string</span> /g <a class="code" href="pearl-anglescan-tracker_8ipf.html#a20720748c82a7eaa4b02d4084a4219b2">prefs_objects</a> = &quot;<a class="code" href="pearl-anglescan-tracker_8ipf.html#a20720748c82a7eaa4b02d4084a4219b2">prefs_objects</a>;theta_offset;tilt_offset;phi_offset;alpha_offset;crop_enable;crop_alpha;crop_theta;&quot;</div><div class="line"><a name="l00084"></a><span class="lineno">   84</span>&#160;    prefs_objects += &quot;norm_alpha_enable;norm_alpha_mode;norm_alpha_smoothing;norm_phi_enable;norm_phi_mode;norm_phi_thetarange;&quot;</div><div class="line"><a name="l00085"></a><span class="lineno">   85</span>&#160;    prefs_objects += &quot;norm_theta_enable;norm_theta_mode;norm_theta_domain;norm_theta_smoothing;norm_thetaphi_enable;norm_thetaphi_mode;norm_thetaphi_smoothing;&quot;</div><div class="line"><a name="l00086"></a><span class="lineno">   86</span>&#160;    prefs_objects += &quot;output_folding;output_horizon;graph_mode;graph_projection;graph_colortable;graph_contrast;&quot;</div><div class="line"><a name="l00087"></a><span class="lineno">   87</span>&#160;    </div><div class="line"><a name="l00088"></a><span class="lineno">   88</span>&#160;    <span class="comment">// recently used (persistent)</span></div><div class="line"><a name="l00089"></a><span class="lineno">   89</span>&#160;    variable /g theta_offset = 0</div><div class="line"><a name="l00090"></a><span class="lineno">   90</span>&#160;    variable /g tilt_offset = 0</div><div class="line"><a name="l00091"></a><span class="lineno">   91</span>&#160;    variable /g phi_offset = 0</div><div class="line"><a name="l00092"></a><span class="lineno">   92</span>&#160;    variable /g alpha_offset = 0</div><div class="line"><a name="l00093"></a><span class="lineno">   93</span>&#160;    variable /g crop_enable = 0</div><div class="line"><a name="l00094"></a><span class="lineno">   94</span>&#160;    variable /g crop_alpha = 25</div><div class="line"><a name="l00095"></a><span class="lineno">   95</span>&#160;    variable /g crop_theta = 88</div><div class="line"><a name="l00096"></a><span class="lineno">   96</span>&#160;    <span class="keywordtype">string</span> /g crop_rows = &quot;&quot;</div><div class="line"><a name="l00097"></a><span class="lineno">   97</span>&#160;    variable /g norm_alpha_enable = 0</div><div class="line"><a name="l00098"></a><span class="lineno">   98</span>&#160;    variable /g norm_alpha_mode = 4</div><div class="line"><a name="l00099"></a><span class="lineno">   99</span>&#160;    variable /g norm_alpha_smoothing = 0.25</div><div class="line"><a name="l00100"></a><span class="lineno">  100</span>&#160;    variable /g norm_theta_enable = 0</div><div class="line"><a name="l00101"></a><span class="lineno">  101</span>&#160;    variable /g norm_theta_mode = 4</div><div class="line"><a name="l00102"></a><span class="lineno">  102</span>&#160;    variable /g norm_theta_domain = 0</div><div class="line"><a name="l00103"></a><span class="lineno">  103</span>&#160;    variable /g norm_theta_smoothing = 0.25</div><div class="line"><a name="l00104"></a><span class="lineno">  104</span>&#160;    variable /g norm_thetaphi_enable = 0</div><div class="line"><a name="l00105"></a><span class="lineno">  105</span>&#160;    variable /g norm_thetaphi_mode = 4</div><div class="line"><a name="l00106"></a><span class="lineno">  106</span>&#160;    variable /g norm_thetaphi_smoothing = 0.25</div><div class="line"><a name="l00107"></a><span class="lineno">  107</span>&#160;    variable /g norm_phi_enable = 0</div><div class="line"><a name="l00108"></a><span class="lineno">  108</span>&#160;    variable /g norm_phi_mode = 4</div><div class="line"><a name="l00109"></a><span class="lineno">  109</span>&#160;    variable /g norm_phi_thetarange = 20</div><div class="line"><a name="l00110"></a><span class="lineno">  110</span>&#160;    <span class="keywordtype">string</span> /g output_name = &quot;holo1&quot;</div><div class="line"><a name="l00111"></a><span class="lineno">  111</span>&#160;    variable /g output_folding = 1</div><div class="line"><a name="l00112"></a><span class="lineno">  112</span>&#160;    variable /g output_horizon = 88</div><div class="line"><a name="l00113"></a><span class="lineno">  113</span>&#160;    variable /g graph_mode = 1</div><div class="line"><a name="l00114"></a><span class="lineno">  114</span>&#160;    variable /g graph_projection = <a class="code" href="pearl-anglescan-process_8ipf.html#ac151c6f989d6a568fdef0acb791f84db">kProjStereo</a></div><div class="line"><a name="l00115"></a><span class="lineno">  115</span>&#160;    <span class="keywordtype">string</span> /g graph_colortable = &quot;grays&quot;</div><div class="line"><a name="l00116"></a><span class="lineno">  116</span>&#160;    variable /g graph_contrast = 2</div><div class="line"><a name="l00117"></a><span class="lineno">  117</span>&#160;    </div><div class="line"><a name="l00118"></a><span class="lineno">  118</span>&#160;    <span class="comment">// recently used (volatile)</span></div><div class="line"><a name="l00119"></a><span class="lineno">  119</span>&#160;    <span class="keywordtype">string</span> /g source_path = &quot;&quot;</div><div class="line"><a name="l00120"></a><span class="lineno">  120</span>&#160;    <span class="keywordtype">string</span> /g export_folderpath = &quot;root:&quot;</div><div class="line"><a name="l00121"></a><span class="lineno">  121</span>&#160;    variable /g export_format = 1</div><div class="line"><a name="l00122"></a><span class="lineno">  122</span>&#160;</div><div class="line"><a name="l00123"></a><span class="lineno">  123</span>&#160;    <span class="comment">// administrative data (volatile)</span></div><div class="line"><a name="l00124"></a><span class="lineno">  124</span>&#160;    <span class="keywordtype">string</span> /g panel_name = &quot;&quot;</div><div class="line"><a name="l00125"></a><span class="lineno">  125</span>&#160;    <span class="keywordtype">string</span> /g preview_graphname = &quot;&quot;</div><div class="line"><a name="l00126"></a><span class="lineno">  126</span>&#160;    <span class="keywordtype">string</span> /g dist_x_graphname = &quot;&quot;</div><div class="line"><a name="l00127"></a><span class="lineno">  127</span>&#160;    <span class="keywordtype">string</span> /g dist_y_graphname = &quot;&quot;</div><div class="line"><a name="l00128"></a><span class="lineno">  128</span>&#160;    <span class="keywordtype">string</span> /g output_graphname = &quot;&quot;</div><div class="line"><a name="l00129"></a><span class="lineno">  129</span>&#160;    </div><div class="line"><a name="l00130"></a><span class="lineno">  130</span>&#160;    <span class="comment">// data (volatile)</span></div><div class="line"><a name="l00131"></a><span class="lineno">  131</span>&#160;    make /n=(10,10) /o raw_data, process_data</div><div class="line"><a name="l00132"></a><span class="lineno">  132</span>&#160;    make /o dist_x, dist_x_smoo</div><div class="line"><a name="l00133"></a><span class="lineno">  133</span>&#160;    make /o dist_y, dist_y_smoo</div><div class="line"><a name="l00134"></a><span class="lineno">  134</span>&#160;    </div><div class="line"><a name="l00135"></a><span class="lineno">  135</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l00136"></a><span class="lineno">  136</span>&#160;end</div><div class="line"><a name="l00137"></a><span class="lineno">  137</span>&#160;</div><div class="line"><a name="l00142"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#ac729557a307bddd2f2ad298199976c01">  142</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#ac729557a307bddd2f2ad298199976c01">save_prefs</a>()</div><div class="line"><a name="l00143"></a><span class="lineno">  143</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00144"></a><span class="lineno">  144</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00145"></a><span class="lineno">  145</span>&#160;    svar /sdfr=df prefs_objects</div><div class="line"><a name="l00146"></a><span class="lineno">  146</span>&#160;</div><div class="line"><a name="l00147"></a><span class="lineno">  147</span>&#160;    <span class="keywordtype">string</span> fullPath = SpecialDirPath(&quot;Packages&quot;, 0, 0, 0)</div><div class="line"><a name="l00148"></a><span class="lineno">  148</span>&#160;    fullPath += <a class="code" href="pearl-anglescan-panel_8ipf.html#aca457d1f4414d20a911254b1de13ebbb">package_name</a></div><div class="line"><a name="l00149"></a><span class="lineno">  149</span>&#160;    NewPath/O/C/Q tempPackagePrefsPath, fullPath</div><div class="line"><a name="l00150"></a><span class="lineno">  150</span>&#160;    fullPath += &quot;:preferences.pxp&quot;</div><div class="line"><a name="l00151"></a><span class="lineno">  151</span>&#160;</div><div class="line"><a name="l00152"></a><span class="lineno">  152</span>&#160;    SetDataFolder root:packages</div><div class="line"><a name="l00153"></a><span class="lineno">  153</span>&#160;    SetDataFolder $package_name</div><div class="line"><a name="l00154"></a><span class="lineno">  154</span>&#160;    SaveData /O /Q /J=prefs_objects fullPath</div><div class="line"><a name="l00155"></a><span class="lineno">  155</span>&#160;</div><div class="line"><a name="l00156"></a><span class="lineno">  156</span>&#160;    KillPath/Z tempPackagePrefsPath</div><div class="line"><a name="l00157"></a><span class="lineno">  157</span>&#160;    </div><div class="line"><a name="l00158"></a><span class="lineno">  158</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00159"></a><span class="lineno">  159</span>&#160;end</div><div class="line"><a name="l00160"></a><span class="lineno">  160</span>&#160;</div><div class="line"><a name="l00168"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a92c27964d49ab8bcd7afc858ebe214a3">  168</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a92c27964d49ab8bcd7afc858ebe214a3">load_prefs</a>()</div><div class="line"><a name="l00169"></a><span class="lineno">  169</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00170"></a><span class="lineno">  170</span>&#160;</div><div class="line"><a name="l00171"></a><span class="lineno">  171</span>&#160;    variable result = -1</div><div class="line"><a name="l00172"></a><span class="lineno">  172</span>&#160;    setdatafolder root:</div><div class="line"><a name="l00173"></a><span class="lineno">  173</span>&#160;    NewDataFolder /O/S packages</div><div class="line"><a name="l00174"></a><span class="lineno">  174</span>&#160;    NewDataFolder /O/S $package_name</div><div class="line"><a name="l00175"></a><span class="lineno">  175</span>&#160;    <span class="keywordtype">string</span> fullPath = SpecialDirPath(&quot;Packages&quot;, 0, 0, 0)</div><div class="line"><a name="l00176"></a><span class="lineno">  176</span>&#160;    fullPath += <a class="code" href="pearl-anglescan-panel_8ipf.html#aca457d1f4414d20a911254b1de13ebbb">package_name</a></div><div class="line"><a name="l00177"></a><span class="lineno">  177</span>&#160;</div><div class="line"><a name="l00178"></a><span class="lineno">  178</span>&#160;    GetFileFolderInfo /Q /Z fullPath</div><div class="line"><a name="l00179"></a><span class="lineno">  179</span>&#160;    if (V_Flag == 0) <span class="comment">// Disk directory exists?</span></div><div class="line"><a name="l00180"></a><span class="lineno">  180</span>&#160;        fullPath += &quot;:preferences.pxp&quot;</div><div class="line"><a name="l00181"></a><span class="lineno">  181</span>&#160;        GetFileFolderInfo /Q /Z fullPath</div><div class="line"><a name="l00182"></a><span class="lineno">  182</span>&#160;        if (V_Flag == 0) <span class="comment">// Preference file exist?</span></div><div class="line"><a name="l00183"></a><span class="lineno">  183</span>&#160;            LoadData /O /R /Q fullPath</div><div class="line"><a name="l00184"></a><span class="lineno">  184</span>&#160;            result = 0</div><div class="line"><a name="l00185"></a><span class="lineno">  185</span>&#160;        endif</div><div class="line"><a name="l00186"></a><span class="lineno">  186</span>&#160;    endif</div><div class="line"><a name="l00187"></a><span class="lineno">  187</span>&#160;    </div><div class="line"><a name="l00188"></a><span class="lineno">  188</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00189"></a><span class="lineno">  189</span>&#160;    return result</div><div class="line"><a name="l00190"></a><span class="lineno">  190</span>&#160;end</div><div class="line"><a name="l00191"></a><span class="lineno">  191</span>&#160;</div><div class="line"><a name="l00204"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a21aab19fbcde395df6e1ea8654b3af9a">  204</a></span>&#160;function <a class="code" href="pearl-anglescan-panel_8ipf.html#a21aab19fbcde395df6e1ea8654b3af9a">asp_import_raw</a>(raw_data)</div><div class="line"><a name="l00205"></a><span class="lineno">  205</span>&#160;    wave raw_data</div><div class="line"><a name="l00206"></a><span class="lineno">  206</span>&#160;</div><div class="line"><a name="l00207"></a><span class="lineno">  207</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00208"></a><span class="lineno">  208</span>&#160;    dfref datadf = GetWavesDataFolderDFR(raw_data)</div><div class="line"><a name="l00209"></a><span class="lineno">  209</span>&#160;    dfref attrdf = datadf:attr</div><div class="line"><a name="l00210"></a><span class="lineno">  210</span>&#160;    if (!DataFolderRefStatus(attrdf))</div><div class="line"><a name="l00211"></a><span class="lineno">  211</span>&#160;        setdatafolder datadf</div><div class="line"><a name="l00212"></a><span class="lineno">  212</span>&#160;        setdatafolder ::</div><div class="line"><a name="l00213"></a><span class="lineno">  213</span>&#160;        dfref parentdf = GetDataFolderDFR()</div><div class="line"><a name="l00214"></a><span class="lineno">  214</span>&#160;        dfref attrdf = parentdf:attr</div><div class="line"><a name="l00215"></a><span class="lineno">  215</span>&#160;    endif</div><div class="line"><a name="l00216"></a><span class="lineno">  216</span>&#160;    setdatafolder $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00217"></a><span class="lineno">  217</span>&#160;    </div><div class="line"><a name="l00218"></a><span class="lineno">  218</span>&#160;    <span class="comment">// todo : check dimensions and scales</span></div><div class="line"><a name="l00219"></a><span class="lineno">  219</span>&#160;    </div><div class="line"><a name="l00220"></a><span class="lineno">  220</span>&#160;    svar source_path</div><div class="line"><a name="l00221"></a><span class="lineno">  221</span>&#160;    source_path = GetWavesDataFolder(raw_data, 2)</div><div class="line"><a name="l00222"></a><span class="lineno">  222</span>&#160;    </div><div class="line"><a name="l00223"></a><span class="lineno">  223</span>&#160;    duplicate /o raw_data, raw, process_data</div><div class="line"><a name="l00224"></a><span class="lineno">  224</span>&#160;    </div><div class="line"><a name="l00225"></a><span class="lineno">  225</span>&#160;    wave /sdfr=attrdf /z ManipulatorTheta</div><div class="line"><a name="l00226"></a><span class="lineno">  226</span>&#160;    wave /sdfr=attrdf /z ManipulatorTilt</div><div class="line"><a name="l00227"></a><span class="lineno">  227</span>&#160;    wave /sdfr=attrdf /z ManipulatorPhi</div><div class="line"><a name="l00228"></a><span class="lineno">  228</span>&#160;    if (WaveExists(ManipulatorTheta) &amp;&amp; WaveExists(ManipulatorTilt) &amp;&amp; WaveExists(ManipulatorPhi))</div><div class="line"><a name="l00229"></a><span class="lineno">  229</span>&#160;        duplicate /o attrdf:ManipulatorTheta, raw_theta, process_theta</div><div class="line"><a name="l00230"></a><span class="lineno">  230</span>&#160;        duplicate /o attrdf:ManipulatorTilt, raw_tilt, process_tilt</div><div class="line"><a name="l00231"></a><span class="lineno">  231</span>&#160;        duplicate /o attrdf:ManipulatorPhi, raw_phi, process_phi</div><div class="line"><a name="l00232"></a><span class="lineno">  232</span>&#160;    else</div><div class="line"><a name="l00233"></a><span class="lineno">  233</span>&#160;        DoAlert 0, &quot;Can&#39;t find manipulator angle waves.\rCheck that the attr folder exists, or provide values in the following table.&quot;</div><div class="line"><a name="l00234"></a><span class="lineno">  234</span>&#160;        make /n=(dimsize(raw_data, 1)) /o raw_theta, raw_tilt, raw_phi</div><div class="line"><a name="l00235"></a><span class="lineno">  235</span>&#160;        make /n=(dimsize(raw_data, 1)) /o process_theta, process_tilt, process_phi</div><div class="line"><a name="l00236"></a><span class="lineno">  236</span>&#160;        edit /k=1 raw_theta, raw_tilt, raw_phi</div><div class="line"><a name="l00237"></a><span class="lineno">  237</span>&#160;    endif</div><div class="line"><a name="l00238"></a><span class="lineno">  238</span>&#160;    </div><div class="line"><a name="l00239"></a><span class="lineno">  239</span>&#160;    make /o /n=(dimsize(raw_data, 0)) dist_x, dist_x_smoo</div><div class="line"><a name="l00240"></a><span class="lineno">  240</span>&#160;    make /o /n=(dimsize(raw_data, 1)) dist_y, dist_y_smoo</div><div class="line"><a name="l00241"></a><span class="lineno">  241</span>&#160;    </div><div class="line"><a name="l00242"></a><span class="lineno">  242</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00243"></a><span class="lineno">  243</span>&#160;end</div><div class="line"><a name="l00244"></a><span class="lineno">  244</span>&#160;</div><div class="line"><a name="l00249"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a66b3eef1fd0be13dfef0a66781f55062">  249</a></span>&#160;function <a class="code" href="pearl-anglescan-panel_8ipf.html#a66b3eef1fd0be13dfef0a66781f55062">asp_display_previews</a>()</div><div class="line"><a name="l00250"></a><span class="lineno">  250</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00251"></a><span class="lineno">  251</span>&#160;    wave /sdfr=df process_data</div><div class="line"><a name="l00252"></a><span class="lineno">  252</span>&#160;    svar /sdfr=df preview_graphname</div><div class="line"><a name="l00253"></a><span class="lineno">  253</span>&#160;</div><div class="line"><a name="l00254"></a><span class="lineno">  254</span>&#160;    if (strlen(preview_graphname) &amp;&amp; (wintype(preview_graphname) == 1))</div><div class="line"><a name="l00255"></a><span class="lineno">  255</span>&#160;        <a class="code" href="pearl-area-display_8ipf.html#afa2546f9cb03dfa8bf0cc9966f0b7a45">ad_update_profiles</a>(process_data)</div><div class="line"><a name="l00256"></a><span class="lineno">  256</span>&#160;        DoWindow /F $preview_graphname</div><div class="line"><a name="l00257"></a><span class="lineno">  257</span>&#160;    else</div><div class="line"><a name="l00258"></a><span class="lineno">  258</span>&#160;        preview_graphname = <a class="code" href="pearl-area-display_8ipf.html#a8fad5aebaca72887d5898b4c421bcdae">ad_display_profiles</a>(process_data)</div><div class="line"><a name="l00259"></a><span class="lineno">  259</span>&#160;    endif</div><div class="line"><a name="l00260"></a><span class="lineno">  260</span>&#160;    </div><div class="line"><a name="l00261"></a><span class="lineno">  261</span>&#160;    nvar /sdfr=df graph_contrast</div><div class="line"><a name="l00262"></a><span class="lineno">  262</span>&#160;    svar /sdfr=df graph_colortable</div><div class="line"><a name="l00263"></a><span class="lineno">  263</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a666dab03bb2e97ffef81cea450184d42">set_contrast</a>(graph_contrast, graph_contrast, graphname=preview_graphname, colortable=graph_colortable)</div><div class="line"><a name="l00264"></a><span class="lineno">  264</span>&#160;end</div><div class="line"><a name="l00265"></a><span class="lineno">  265</span>&#160;</div><div class="line"><a name="l00273"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a59886414c7dc2486c5a17f078896c705">  273</a></span>&#160;function <a class="code" href="pearl-anglescan-panel_8ipf.html#a59886414c7dc2486c5a17f078896c705">asp_display_dist_check</a>(xdist, ydist)</div><div class="line"><a name="l00274"></a><span class="lineno">  274</span>&#160;    variable xdist, ydist</div><div class="line"><a name="l00275"></a><span class="lineno">  275</span>&#160;    </div><div class="line"><a name="l00276"></a><span class="lineno">  276</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00277"></a><span class="lineno">  277</span>&#160;    wave /sdfr=df dist_x</div><div class="line"><a name="l00278"></a><span class="lineno">  278</span>&#160;    wave /sdfr=df dist_y</div><div class="line"><a name="l00279"></a><span class="lineno">  279</span>&#160;    wave /sdfr=df dist_x_smoo</div><div class="line"><a name="l00280"></a><span class="lineno">  280</span>&#160;    wave /sdfr=df dist_y_smoo</div><div class="line"><a name="l00281"></a><span class="lineno">  281</span>&#160;    svar /sdfr=df dist_x_graphname</div><div class="line"><a name="l00282"></a><span class="lineno">  282</span>&#160;    svar /sdfr=df dist_y_graphname</div><div class="line"><a name="l00283"></a><span class="lineno">  283</span>&#160;</div><div class="line"><a name="l00284"></a><span class="lineno">  284</span>&#160;    if (xdist)</div><div class="line"><a name="l00285"></a><span class="lineno">  285</span>&#160;        if (strlen(dist_x_graphname) &amp;&amp; (wintype(dist_x_graphname) == 1))</div><div class="line"><a name="l00286"></a><span class="lineno">  286</span>&#160;            DoWindow /F $dist_x_graphname</div><div class="line"><a name="l00287"></a><span class="lineno">  287</span>&#160;        else</div><div class="line"><a name="l00288"></a><span class="lineno">  288</span>&#160;            display /k=1 /n=graph_asp_dist_x dist_x, dist_x_smoo</div><div class="line"><a name="l00289"></a><span class="lineno">  289</span>&#160;            dist_x_graphname = s_name</div><div class="line"><a name="l00290"></a><span class="lineno">  290</span>&#160;            ModifyGraph /w=$dist_x_graphname mode(dist_x)=2</div><div class="line"><a name="l00291"></a><span class="lineno">  291</span>&#160;            ModifyGraph /w=$dist_x_graphname lsize(dist_x)=2</div><div class="line"><a name="l00292"></a><span class="lineno">  292</span>&#160;            ModifyGraph /w=$dist_x_graphname rgb(dist_x)=(0,0,0)</div><div class="line"><a name="l00293"></a><span class="lineno">  293</span>&#160;        endif</div><div class="line"><a name="l00294"></a><span class="lineno">  294</span>&#160;    endif</div><div class="line"><a name="l00295"></a><span class="lineno">  295</span>&#160;</div><div class="line"><a name="l00296"></a><span class="lineno">  296</span>&#160;    if (ydist)</div><div class="line"><a name="l00297"></a><span class="lineno">  297</span>&#160;        if (strlen(dist_y_graphname) &amp;&amp; (wintype(dist_y_graphname) == 1))</div><div class="line"><a name="l00298"></a><span class="lineno">  298</span>&#160;            DoWindow /F $dist_y_graphname</div><div class="line"><a name="l00299"></a><span class="lineno">  299</span>&#160;        else</div><div class="line"><a name="l00300"></a><span class="lineno">  300</span>&#160;            display /k=1 /n=graph_asp_dist_y dist_y, dist_y_smoo</div><div class="line"><a name="l00301"></a><span class="lineno">  301</span>&#160;            dist_y_graphname = s_name</div><div class="line"><a name="l00302"></a><span class="lineno">  302</span>&#160;            ModifyGraph /w=$dist_y_graphname mode(dist_y)=2</div><div class="line"><a name="l00303"></a><span class="lineno">  303</span>&#160;            ModifyGraph /w=$dist_y_graphname lsize(dist_y)=2</div><div class="line"><a name="l00304"></a><span class="lineno">  304</span>&#160;            ModifyGraph /w=$dist_y_graphname rgb(dist_y)=(0,0,0)</div><div class="line"><a name="l00305"></a><span class="lineno">  305</span>&#160;        endif</div><div class="line"><a name="l00306"></a><span class="lineno">  306</span>&#160;    endif</div><div class="line"><a name="l00307"></a><span class="lineno">  307</span>&#160;end</div><div class="line"><a name="l00308"></a><span class="lineno">  308</span>&#160;</div><div class="line"><a name="l00318"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">  318</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(check)</div><div class="line"><a name="l00319"></a><span class="lineno">  319</span>&#160;    variable check</div><div class="line"><a name="l00320"></a><span class="lineno">  320</span>&#160;    </div><div class="line"><a name="l00321"></a><span class="lineno">  321</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00322"></a><span class="lineno">  322</span>&#160;    wave /sdfr=df raw</div><div class="line"><a name="l00323"></a><span class="lineno">  323</span>&#160;    wave /sdfr=df raw_theta</div><div class="line"><a name="l00324"></a><span class="lineno">  324</span>&#160;    wave /sdfr=df raw_tilt</div><div class="line"><a name="l00325"></a><span class="lineno">  325</span>&#160;    wave /sdfr=df raw_phi</div><div class="line"><a name="l00326"></a><span class="lineno">  326</span>&#160;    nvar /sdfr=df theta_offset</div><div class="line"><a name="l00327"></a><span class="lineno">  327</span>&#160;    nvar /sdfr=df tilt_offset</div><div class="line"><a name="l00328"></a><span class="lineno">  328</span>&#160;    nvar /sdfr=df phi_offset</div><div class="line"><a name="l00329"></a><span class="lineno">  329</span>&#160;    nvar /sdfr=df alpha_offset</div><div class="line"><a name="l00330"></a><span class="lineno">  330</span>&#160;    </div><div class="line"><a name="l00331"></a><span class="lineno">  331</span>&#160;    duplicate /o raw, df:process_data</div><div class="line"><a name="l00332"></a><span class="lineno">  332</span>&#160;    duplicate /o raw_theta, df:process_theta</div><div class="line"><a name="l00333"></a><span class="lineno">  333</span>&#160;    duplicate /o raw_tilt, df:process_tilt</div><div class="line"><a name="l00334"></a><span class="lineno">  334</span>&#160;    duplicate /o raw_phi, df:process_phi</div><div class="line"><a name="l00335"></a><span class="lineno">  335</span>&#160;    </div><div class="line"><a name="l00336"></a><span class="lineno">  336</span>&#160;    wave /sdfr=df process_data</div><div class="line"><a name="l00337"></a><span class="lineno">  337</span>&#160;    wave /sdfr=df process_theta</div><div class="line"><a name="l00338"></a><span class="lineno">  338</span>&#160;    wave /sdfr=df process_tilt</div><div class="line"><a name="l00339"></a><span class="lineno">  339</span>&#160;    wave /sdfr=df process_phi</div><div class="line"><a name="l00340"></a><span class="lineno">  340</span>&#160;    </div><div class="line"><a name="l00341"></a><span class="lineno">  341</span>&#160;    process_theta = raw_theta - theta_offset</div><div class="line"><a name="l00342"></a><span class="lineno">  342</span>&#160;    process_tilt = raw_tilt - tilt_offset</div><div class="line"><a name="l00343"></a><span class="lineno">  343</span>&#160;    process_phi = raw_phi - phi_offset</div><div class="line"><a name="l00344"></a><span class="lineno">  344</span>&#160;    setscale /p x dimoffset(raw, 0) - alpha_offset, dimdelta(raw, 0), waveunits(raw, 0), process_data</div><div class="line"><a name="l00345"></a><span class="lineno">  345</span>&#160;end</div><div class="line"><a name="l00346"></a><span class="lineno">  346</span>&#160;</div><div class="line"><a name="l00358"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#af39609fc80e58f2188b3aa564f53b750">  358</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#af39609fc80e58f2188b3aa564f53b750">do_crop</a>(check, [force])</div><div class="line"><a name="l00359"></a><span class="lineno">  359</span>&#160;    variable check</div><div class="line"><a name="l00360"></a><span class="lineno">  360</span>&#160;    variable force</div><div class="line"><a name="l00361"></a><span class="lineno">  361</span>&#160;    </div><div class="line"><a name="l00362"></a><span class="lineno">  362</span>&#160;    if (ParamIsDefault(force))</div><div class="line"><a name="l00363"></a><span class="lineno">  363</span>&#160;        force = 0</div><div class="line"><a name="l00364"></a><span class="lineno">  364</span>&#160;    endif</div><div class="line"><a name="l00365"></a><span class="lineno">  365</span>&#160;    </div><div class="line"><a name="l00366"></a><span class="lineno">  366</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00367"></a><span class="lineno">  367</span>&#160;    wave /sdfr=df process_data</div><div class="line"><a name="l00368"></a><span class="lineno">  368</span>&#160;    wave /sdfr=df process_theta</div><div class="line"><a name="l00369"></a><span class="lineno">  369</span>&#160;    wave /sdfr=df process_tilt</div><div class="line"><a name="l00370"></a><span class="lineno">  370</span>&#160;    wave /sdfr=df process_phi</div><div class="line"><a name="l00371"></a><span class="lineno">  371</span>&#160;    nvar /sdfr=df crop_enable</div><div class="line"><a name="l00372"></a><span class="lineno">  372</span>&#160;    nvar /sdfr=df crop_alpha</div><div class="line"><a name="l00373"></a><span class="lineno">  373</span>&#160;    nvar /sdfr=df crop_theta</div><div class="line"><a name="l00374"></a><span class="lineno">  374</span>&#160;    svar /sdfr=df crop_rows</div><div class="line"><a name="l00375"></a><span class="lineno">  375</span>&#160;</div><div class="line"><a name="l00376"></a><span class="lineno">  376</span>&#160;    if (force || crop_enable)</div><div class="line"><a name="l00377"></a><span class="lineno">  377</span>&#160;    </div><div class="line"><a name="l00378"></a><span class="lineno">  378</span>&#160;        if (crop_alpha &gt; abs(dimdelta(process_data, 0)))</div><div class="line"><a name="l00379"></a><span class="lineno">  379</span>&#160;            <a class="code" href="pearl-anglescan-process_8ipf.html#ab65d25af7476ed18f7bf7359614a912b">crop_strip</a>(process_data, -crop_alpha, +crop_alpha)</div><div class="line"><a name="l00380"></a><span class="lineno">  380</span>&#160;        endif</div><div class="line"><a name="l00381"></a><span class="lineno">  381</span>&#160;        </div><div class="line"><a name="l00382"></a><span class="lineno">  382</span>&#160;        if ((crop_theta &gt;= 10) &amp;&amp; (crop_theta &lt; 90))</div><div class="line"><a name="l00383"></a><span class="lineno">  383</span>&#160;            <a class="code" href="pearl-anglescan-process_8ipf.html#aa79c0ff6073bd42e202b9fa3f8c00b9f">crop_strip_theta</a>(process_data, -0.1, crop_theta + 0.1, process_theta, process_tilt, process_phi)</div><div class="line"><a name="l00384"></a><span class="lineno">  384</span>&#160;        endif</div><div class="line"><a name="l00385"></a><span class="lineno">  385</span>&#160;        </div><div class="line"><a name="l00386"></a><span class="lineno">  386</span>&#160;        if (strlen(crop_rows) &gt; 0)</div><div class="line"><a name="l00387"></a><span class="lineno">  387</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a16424e5787967d9c120fb09c7849956e">delete_rows</a>(crop_rows, process_data, process_theta, process_tilt, process_phi)</div><div class="line"><a name="l00388"></a><span class="lineno">  388</span>&#160;        endif</div><div class="line"><a name="l00389"></a><span class="lineno">  389</span>&#160;    endif</div><div class="line"><a name="l00390"></a><span class="lineno">  390</span>&#160;end</div><div class="line"><a name="l00391"></a><span class="lineno">  391</span>&#160;</div><div class="line"><a name="l00406"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a16424e5787967d9c120fb09c7849956e">  406</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a16424e5787967d9c120fb09c7849956e">delete_rows</a>(rows, data, theta, tilt, phi)</div><div class="line"><a name="l00407"></a><span class="lineno">  407</span>&#160;    <span class="keywordtype">string</span> rows</div><div class="line"><a name="l00408"></a><span class="lineno">  408</span>&#160;    wave data</div><div class="line"><a name="l00409"></a><span class="lineno">  409</span>&#160;    wave theta</div><div class="line"><a name="l00410"></a><span class="lineno">  410</span>&#160;    wave tilt</div><div class="line"><a name="l00411"></a><span class="lineno">  411</span>&#160;    wave phi</div><div class="line"><a name="l00412"></a><span class="lineno">  412</span>&#160;    </div><div class="line"><a name="l00413"></a><span class="lineno">  413</span>&#160;    make /n=(numpnts(theta)) /i /free idx</div><div class="line"><a name="l00414"></a><span class="lineno">  414</span>&#160;    idx = p</div><div class="line"><a name="l00415"></a><span class="lineno">  415</span>&#160;    variable nrows = ItemsInList(rows, &quot;,&quot;)</div><div class="line"><a name="l00416"></a><span class="lineno">  416</span>&#160;    variable irow</div><div class="line"><a name="l00417"></a><span class="lineno">  417</span>&#160;    <span class="keywordtype">string</span> srow</div><div class="line"><a name="l00418"></a><span class="lineno">  418</span>&#160;    variable q1, q2</div><div class="line"><a name="l00419"></a><span class="lineno">  419</span>&#160;    for (irow = 0; irow &lt; nrows; irow += 1)</div><div class="line"><a name="l00420"></a><span class="lineno">  420</span>&#160;        srow = StringFromList(irow, rows, &quot;,&quot;)</div><div class="line"><a name="l00421"></a><span class="lineno">  421</span>&#160;        q1 = str2num(StringFromList(0, srow, &quot;-&quot;))</div><div class="line"><a name="l00422"></a><span class="lineno">  422</span>&#160;        q2 = str2num(StringFromList(1, srow, &quot;-&quot;))</div><div class="line"><a name="l00423"></a><span class="lineno">  423</span>&#160;        if (numtype(q2))</div><div class="line"><a name="l00424"></a><span class="lineno">  424</span>&#160;            q2 = q1</div><div class="line"><a name="l00425"></a><span class="lineno">  425</span>&#160;        endif</div><div class="line"><a name="l00426"></a><span class="lineno">  426</span>&#160;        if (q1 &lt;= q2)</div><div class="line"><a name="l00427"></a><span class="lineno">  427</span>&#160;            idx[q1,q2] = -1</div><div class="line"><a name="l00428"></a><span class="lineno">  428</span>&#160;        endif</div><div class="line"><a name="l00429"></a><span class="lineno">  429</span>&#160;    endfor</div><div class="line"><a name="l00430"></a><span class="lineno">  430</span>&#160;    extract /free idx, idx, idx &gt;= 0</div><div class="line"><a name="l00431"></a><span class="lineno">  431</span>&#160;    variable nx = dimsize(data, 0)</div><div class="line"><a name="l00432"></a><span class="lineno">  432</span>&#160;    variable ny = numpnts(idx)</div><div class="line"><a name="l00433"></a><span class="lineno">  433</span>&#160;    theta = theta[idx]</div><div class="line"><a name="l00434"></a><span class="lineno">  434</span>&#160;    tilt = tilt[idx]</div><div class="line"><a name="l00435"></a><span class="lineno">  435</span>&#160;    phi = phi[idx]</div><div class="line"><a name="l00436"></a><span class="lineno">  436</span>&#160;    redimension /n=(ny) theta, tilt, phi</div><div class="line"><a name="l00437"></a><span class="lineno">  437</span>&#160;    duplicate /free data, data_copy</div><div class="line"><a name="l00438"></a><span class="lineno">  438</span>&#160;    redimension /n=(nx,ny) data</div><div class="line"><a name="l00439"></a><span class="lineno">  439</span>&#160;    data = data_copy[p][idx[q]]</div><div class="line"><a name="l00440"></a><span class="lineno">  440</span>&#160;end</div><div class="line"><a name="l00441"></a><span class="lineno">  441</span>&#160;</div><div class="line"><a name="l00453"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a8f7266ac2840155dede704fda66fe6b0">  453</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a8f7266ac2840155dede704fda66fe6b0">do_norm_alpha</a>(check, [force])</div><div class="line"><a name="l00454"></a><span class="lineno">  454</span>&#160;    variable check</div><div class="line"><a name="l00455"></a><span class="lineno">  455</span>&#160;    variable force</div><div class="line"><a name="l00456"></a><span class="lineno">  456</span>&#160;    </div><div class="line"><a name="l00457"></a><span class="lineno">  457</span>&#160;    if (ParamIsDefault(force))</div><div class="line"><a name="l00458"></a><span class="lineno">  458</span>&#160;        force = 0</div><div class="line"><a name="l00459"></a><span class="lineno">  459</span>&#160;    endif</div><div class="line"><a name="l00460"></a><span class="lineno">  460</span>&#160;    </div><div class="line"><a name="l00461"></a><span class="lineno">  461</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00462"></a><span class="lineno">  462</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00463"></a><span class="lineno">  463</span>&#160;    wave /sdfr=df process_data</div><div class="line"><a name="l00464"></a><span class="lineno">  464</span>&#160;    nvar /sdfr=df norm_alpha_enable</div><div class="line"><a name="l00465"></a><span class="lineno">  465</span>&#160;    nvar /sdfr=df norm_alpha_mode</div><div class="line"><a name="l00466"></a><span class="lineno">  466</span>&#160;    nvar /sdfr=df norm_alpha_smoothing</div><div class="line"><a name="l00467"></a><span class="lineno">  467</span>&#160;</div><div class="line"><a name="l00468"></a><span class="lineno">  468</span>&#160;    if (force || norm_alpha_enable)</div><div class="line"><a name="l00469"></a><span class="lineno">  469</span>&#160;        dfref temp_df = newfreedatafolder()</div><div class="line"><a name="l00470"></a><span class="lineno">  470</span>&#160;        setdatafolder temp_df</div><div class="line"><a name="l00471"></a><span class="lineno">  471</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#a48b7d774ed8d3f4329e9923e18e580e8">normalize_strip_x</a>(process_data, smooth_method=norm_alpha_mode, smooth_factor=norm_alpha_smoothing, check=check)</div><div class="line"><a name="l00472"></a><span class="lineno">  472</span>&#160;        if (check)</div><div class="line"><a name="l00473"></a><span class="lineno">  473</span>&#160;            wave check_dist</div><div class="line"><a name="l00474"></a><span class="lineno">  474</span>&#160;            wave check_smoo</div><div class="line"><a name="l00475"></a><span class="lineno">  475</span>&#160;            duplicate /o check_dist, df:dist_x</div><div class="line"><a name="l00476"></a><span class="lineno">  476</span>&#160;            duplicate /o check_smoo, df:dist_x_smoo</div><div class="line"><a name="l00477"></a><span class="lineno">  477</span>&#160;        endif</div><div class="line"><a name="l00478"></a><span class="lineno">  478</span>&#160;    endif</div><div class="line"><a name="l00479"></a><span class="lineno">  479</span>&#160;    </div><div class="line"><a name="l00480"></a><span class="lineno">  480</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00481"></a><span class="lineno">  481</span>&#160;end</div><div class="line"><a name="l00482"></a><span class="lineno">  482</span>&#160;</div><div class="line"><a name="l00494"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a790519191391ac03c75eb7b57ea0749e">  494</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a790519191391ac03c75eb7b57ea0749e">do_norm_phi</a>(check, [force])</div><div class="line"><a name="l00495"></a><span class="lineno">  495</span>&#160;    variable check</div><div class="line"><a name="l00496"></a><span class="lineno">  496</span>&#160;    variable force</div><div class="line"><a name="l00497"></a><span class="lineno">  497</span>&#160;    </div><div class="line"><a name="l00498"></a><span class="lineno">  498</span>&#160;    if (ParamIsDefault(force))</div><div class="line"><a name="l00499"></a><span class="lineno">  499</span>&#160;        force = 0</div><div class="line"><a name="l00500"></a><span class="lineno">  500</span>&#160;    endif</div><div class="line"><a name="l00501"></a><span class="lineno">  501</span>&#160;    </div><div class="line"><a name="l00502"></a><span class="lineno">  502</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00503"></a><span class="lineno">  503</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00504"></a><span class="lineno">  504</span>&#160;    wave /sdfr=df process_data</div><div class="line"><a name="l00505"></a><span class="lineno">  505</span>&#160;    wave /sdfr=df process_theta</div><div class="line"><a name="l00506"></a><span class="lineno">  506</span>&#160;    wave /sdfr=df process_phi</div><div class="line"><a name="l00507"></a><span class="lineno">  507</span>&#160;    nvar /sdfr=df norm_phi_enable</div><div class="line"><a name="l00508"></a><span class="lineno">  508</span>&#160;    nvar /sdfr=df norm_phi_mode</div><div class="line"><a name="l00509"></a><span class="lineno">  509</span>&#160;    nvar /sdfr=df norm_phi_thetarange</div><div class="line"><a name="l00510"></a><span class="lineno">  510</span>&#160;</div><div class="line"><a name="l00511"></a><span class="lineno">  511</span>&#160;    if (force || norm_phi_enable)</div><div class="line"><a name="l00512"></a><span class="lineno">  512</span>&#160;        dfref temp_df = newfreedatafolder()</div><div class="line"><a name="l00513"></a><span class="lineno">  513</span>&#160;        setdatafolder temp_df</div><div class="line"><a name="l00514"></a><span class="lineno">  514</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#aaa734fddecdd75c7cabe20ba777b41b9">normalize_strip_phi</a>(process_data, process_theta, process_phi, theta_range=norm_phi_thetarange, check=check)</div><div class="line"><a name="l00515"></a><span class="lineno">  515</span>&#160;        if (check)</div><div class="line"><a name="l00516"></a><span class="lineno">  516</span>&#160;            wave check_dist</div><div class="line"><a name="l00517"></a><span class="lineno">  517</span>&#160;            wave check_smoo</div><div class="line"><a name="l00518"></a><span class="lineno">  518</span>&#160;            duplicate /o check_dist, df:dist_y</div><div class="line"><a name="l00519"></a><span class="lineno">  519</span>&#160;            duplicate /o check_smoo, df:dist_y_smoo</div><div class="line"><a name="l00520"></a><span class="lineno">  520</span>&#160;        endif</div><div class="line"><a name="l00521"></a><span class="lineno">  521</span>&#160;    endif</div><div class="line"><a name="l00522"></a><span class="lineno">  522</span>&#160;    </div><div class="line"><a name="l00523"></a><span class="lineno">  523</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00524"></a><span class="lineno">  524</span>&#160;end</div><div class="line"><a name="l00525"></a><span class="lineno">  525</span>&#160;</div><div class="line"><a name="l00537"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a7b288598e3faa37e414b1443982c1a3e">  537</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a7b288598e3faa37e414b1443982c1a3e">do_norm_theta</a>(check, [force])</div><div class="line"><a name="l00538"></a><span class="lineno">  538</span>&#160;    variable check</div><div class="line"><a name="l00539"></a><span class="lineno">  539</span>&#160;    variable force</div><div class="line"><a name="l00540"></a><span class="lineno">  540</span>&#160;    </div><div class="line"><a name="l00541"></a><span class="lineno">  541</span>&#160;    if (ParamIsDefault(force))</div><div class="line"><a name="l00542"></a><span class="lineno">  542</span>&#160;        force = 0</div><div class="line"><a name="l00543"></a><span class="lineno">  543</span>&#160;    endif</div><div class="line"><a name="l00544"></a><span class="lineno">  544</span>&#160;    </div><div class="line"><a name="l00545"></a><span class="lineno">  545</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00546"></a><span class="lineno">  546</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00547"></a><span class="lineno">  547</span>&#160;    wave /sdfr=df process_data</div><div class="line"><a name="l00548"></a><span class="lineno">  548</span>&#160;    wave /sdfr=df process_theta</div><div class="line"><a name="l00549"></a><span class="lineno">  549</span>&#160;    nvar /sdfr=df norm_theta_enable</div><div class="line"><a name="l00550"></a><span class="lineno">  550</span>&#160;    nvar /sdfr=df norm_theta_mode</div><div class="line"><a name="l00551"></a><span class="lineno">  551</span>&#160;    nvar /sdfr=df norm_theta_domain</div><div class="line"><a name="l00552"></a><span class="lineno">  552</span>&#160;    nvar /sdfr=df norm_theta_smoothing</div><div class="line"><a name="l00553"></a><span class="lineno">  553</span>&#160;</div><div class="line"><a name="l00554"></a><span class="lineno">  554</span>&#160;    if (force || norm_theta_enable)</div><div class="line"><a name="l00555"></a><span class="lineno">  555</span>&#160;        dfref temp_df = newfreedatafolder()</div><div class="line"><a name="l00556"></a><span class="lineno">  556</span>&#160;        setdatafolder temp_df</div><div class="line"><a name="l00557"></a><span class="lineno">  557</span>&#160;        if (norm_theta_domain==1)</div><div class="line"><a name="l00558"></a><span class="lineno">  558</span>&#160;            <a class="code" href="pearl-anglescan-process_8ipf.html#a992920d621023e6b483ff51eee68b508">normalize_strip_theta_scans</a>(process_data, process_theta, smooth_method=norm_theta_mode, smooth_factor=norm_theta_smoothing, check=check)</div><div class="line"><a name="l00559"></a><span class="lineno">  559</span>&#160;        else</div><div class="line"><a name="l00560"></a><span class="lineno">  560</span>&#160;            <a class="code" href="pearl-anglescan-process_8ipf.html#a9b56897bd92d926d65f4c67bef1d41bb">normalize_strip_theta</a>(process_data, process_theta, smooth_method=norm_theta_mode, smooth_factor=norm_theta_smoothing, check=check)</div><div class="line"><a name="l00561"></a><span class="lineno">  561</span>&#160;        endif</div><div class="line"><a name="l00562"></a><span class="lineno">  562</span>&#160;        if (check)</div><div class="line"><a name="l00563"></a><span class="lineno">  563</span>&#160;            wave check_dist</div><div class="line"><a name="l00564"></a><span class="lineno">  564</span>&#160;            wave check_smoo</div><div class="line"><a name="l00565"></a><span class="lineno">  565</span>&#160;            duplicate /o check_dist, df:dist_y</div><div class="line"><a name="l00566"></a><span class="lineno">  566</span>&#160;            duplicate /o check_smoo, df:dist_y_smoo</div><div class="line"><a name="l00567"></a><span class="lineno">  567</span>&#160;        endif</div><div class="line"><a name="l00568"></a><span class="lineno">  568</span>&#160;    endif</div><div class="line"><a name="l00569"></a><span class="lineno">  569</span>&#160;    </div><div class="line"><a name="l00570"></a><span class="lineno">  570</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00571"></a><span class="lineno">  571</span>&#160;end</div><div class="line"><a name="l00572"></a><span class="lineno">  572</span>&#160;</div><div class="line"><a name="l00584"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#af6509fc7584b0bcbdc8561df2bc12a58">  584</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#af6509fc7584b0bcbdc8561df2bc12a58">do_norm_thetaphi</a>(check, [force])</div><div class="line"><a name="l00585"></a><span class="lineno">  585</span>&#160;    variable check</div><div class="line"><a name="l00586"></a><span class="lineno">  586</span>&#160;    variable force</div><div class="line"><a name="l00587"></a><span class="lineno">  587</span>&#160;    </div><div class="line"><a name="l00588"></a><span class="lineno">  588</span>&#160;    if (ParamIsDefault(force))</div><div class="line"><a name="l00589"></a><span class="lineno">  589</span>&#160;        force = 0</div><div class="line"><a name="l00590"></a><span class="lineno">  590</span>&#160;    endif</div><div class="line"><a name="l00591"></a><span class="lineno">  591</span>&#160;    </div><div class="line"><a name="l00592"></a><span class="lineno">  592</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00593"></a><span class="lineno">  593</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00594"></a><span class="lineno">  594</span>&#160;    wave /sdfr=df process_data</div><div class="line"><a name="l00595"></a><span class="lineno">  595</span>&#160;    wave /sdfr=df process_theta</div><div class="line"><a name="l00596"></a><span class="lineno">  596</span>&#160;    wave /sdfr=df process_phi</div><div class="line"><a name="l00597"></a><span class="lineno">  597</span>&#160;    nvar /sdfr=df norm_thetaphi_enable</div><div class="line"><a name="l00598"></a><span class="lineno">  598</span>&#160;    nvar /sdfr=df norm_thetaphi_mode</div><div class="line"><a name="l00599"></a><span class="lineno">  599</span>&#160;    nvar /sdfr=df norm_thetaphi_smoothing</div><div class="line"><a name="l00600"></a><span class="lineno">  600</span>&#160;</div><div class="line"><a name="l00601"></a><span class="lineno">  601</span>&#160;    if (force || norm_thetaphi_enable)</div><div class="line"><a name="l00602"></a><span class="lineno">  602</span>&#160;        dfref temp_df = newfreedatafolder()</div><div class="line"><a name="l00603"></a><span class="lineno">  603</span>&#160;        setdatafolder temp_df</div><div class="line"><a name="l00604"></a><span class="lineno">  604</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#ad0a93367d2e9b66bb7b81697e87adfaf">normalize_strip_thetaphi</a>(process_data, process_theta, process_phi, smooth_method=norm_thetaphi_mode, smooth_factor=norm_thetaphi_smoothing, check=check)</div><div class="line"><a name="l00605"></a><span class="lineno">  605</span>&#160;        if (check)</div><div class="line"><a name="l00606"></a><span class="lineno">  606</span>&#160;            wave check_dist</div><div class="line"><a name="l00607"></a><span class="lineno">  607</span>&#160;            wave check_smoo</div><div class="line"><a name="l00608"></a><span class="lineno">  608</span>&#160;            duplicate /o check_dist, df:dist_y</div><div class="line"><a name="l00609"></a><span class="lineno">  609</span>&#160;            duplicate /o check_smoo, df:dist_y_smoo</div><div class="line"><a name="l00610"></a><span class="lineno">  610</span>&#160;        endif</div><div class="line"><a name="l00611"></a><span class="lineno">  611</span>&#160;    endif</div><div class="line"><a name="l00612"></a><span class="lineno">  612</span>&#160;    </div><div class="line"><a name="l00613"></a><span class="lineno">  613</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00614"></a><span class="lineno">  614</span>&#160;end</div><div class="line"><a name="l00615"></a><span class="lineno">  615</span>&#160;</div><div class="line"><a name="l00620"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#af21424ce00e4bac1ac990d2bb83d46dc">  620</a></span>&#160;function <a class="code" href="pearl-anglescan-panel_8ipf.html#af21424ce00e4bac1ac990d2bb83d46dc">asp_calculate_output</a>()</div><div class="line"><a name="l00621"></a><span class="lineno">  621</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00622"></a><span class="lineno">  622</span>&#160;    setdatafolder $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00623"></a><span class="lineno">  623</span>&#160;    </div><div class="line"><a name="l00624"></a><span class="lineno">  624</span>&#160;    svar output_name</div><div class="line"><a name="l00625"></a><span class="lineno">  625</span>&#160;    </div><div class="line"><a name="l00626"></a><span class="lineno">  626</span>&#160;    wave process_data</div><div class="line"><a name="l00627"></a><span class="lineno">  627</span>&#160;    wave process_theta</div><div class="line"><a name="l00628"></a><span class="lineno">  628</span>&#160;    wave process_tilt</div><div class="line"><a name="l00629"></a><span class="lineno">  629</span>&#160;    wave process_phi</div><div class="line"><a name="l00630"></a><span class="lineno">  630</span>&#160;</div><div class="line"><a name="l00631"></a><span class="lineno">  631</span>&#160;    nvar folding=output_folding</div><div class="line"><a name="l00632"></a><span class="lineno">  632</span>&#160;    nvar horizon=output_horizon</div><div class="line"><a name="l00633"></a><span class="lineno">  633</span>&#160;</div><div class="line"><a name="l00634"></a><span class="lineno">  634</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00635"></a><span class="lineno">  635</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#af39609fc80e58f2188b3aa564f53b750">do_crop</a>(0)</div><div class="line"><a name="l00636"></a><span class="lineno">  636</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a8f7266ac2840155dede704fda66fe6b0">do_norm_alpha</a>(0)</div><div class="line"><a name="l00637"></a><span class="lineno">  637</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a790519191391ac03c75eb7b57ea0749e">do_norm_phi</a>(0)</div><div class="line"><a name="l00638"></a><span class="lineno">  638</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a7b288598e3faa37e414b1443982c1a3e">do_norm_theta</a>(0)</div><div class="line"><a name="l00639"></a><span class="lineno">  639</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#af6509fc7584b0bcbdc8561df2bc12a58">do_norm_thetaphi</a>(0)</div><div class="line"><a name="l00640"></a><span class="lineno">  640</span>&#160;    </div><div class="line"><a name="l00641"></a><span class="lineno">  641</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a229770447193d4fd12032b235aab4d28">pizza_service_2</a>(process_data, output_name, process_theta, process_tilt, process_phi, folding=folding, nograph=1)</div><div class="line"><a name="l00642"></a><span class="lineno">  642</span>&#160;    </div><div class="line"><a name="l00643"></a><span class="lineno">  643</span>&#160;    setdatafolder $output_name</div><div class="line"><a name="l00644"></a><span class="lineno">  644</span>&#160;    wave values</div><div class="line"><a name="l00645"></a><span class="lineno">  645</span>&#160;    wave pol</div><div class="line"><a name="l00646"></a><span class="lineno">  646</span>&#160;    if (horizon &gt; 0)</div><div class="line"><a name="l00647"></a><span class="lineno">  647</span>&#160;        values = pol &lt;= horizon ? values : nan</div><div class="line"><a name="l00648"></a><span class="lineno">  648</span>&#160;    endif</div><div class="line"><a name="l00649"></a><span class="lineno">  649</span>&#160;    </div><div class="line"><a name="l00650"></a><span class="lineno">  650</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00651"></a><span class="lineno">  651</span>&#160;end</div><div class="line"><a name="l00652"></a><span class="lineno">  652</span>&#160;</div><div class="line"><a name="l00666"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a8e540427fab71f879e84003c49c59f22">  666</a></span>&#160;function /s <a class="code" href="pearl-anglescan-panel_8ipf.html#a8e540427fab71f879e84003c49c59f22">asp_display_output</a>([data_df, data_name])</div><div class="line"><a name="l00667"></a><span class="lineno">  667</span>&#160;    dfref data_df</div><div class="line"><a name="l00668"></a><span class="lineno">  668</span>&#160;    <span class="keywordtype">string</span> data_name</div><div class="line"><a name="l00669"></a><span class="lineno">  669</span>&#160;    </div><div class="line"><a name="l00670"></a><span class="lineno">  670</span>&#160;    dfref pkg_df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00671"></a><span class="lineno">  671</span>&#160;    svar /sdfr=pkg_df output_name</div><div class="line"><a name="l00672"></a><span class="lineno">  672</span>&#160;    svar /sdfr=pkg_df output_graphname</div><div class="line"><a name="l00673"></a><span class="lineno">  673</span>&#160;    nvar /sdfr=pkg_df graph_projection</div><div class="line"><a name="l00674"></a><span class="lineno">  674</span>&#160;    nvar /sdfr=pkg_df graph_mode</div><div class="line"><a name="l00675"></a><span class="lineno">  675</span>&#160;    svar /sdfr=pkg_df graph_colortable</div><div class="line"><a name="l00676"></a><span class="lineno">  676</span>&#160;    nvar /sdfr=pkg_df graph_contrast</div><div class="line"><a name="l00677"></a><span class="lineno">  677</span>&#160;</div><div class="line"><a name="l00678"></a><span class="lineno">  678</span>&#160;    if (ParamIsDefault(data_df))</div><div class="line"><a name="l00679"></a><span class="lineno">  679</span>&#160;        dfref data_df = pkg_df</div><div class="line"><a name="l00680"></a><span class="lineno">  680</span>&#160;    endif</div><div class="line"><a name="l00681"></a><span class="lineno">  681</span>&#160;    if (ParamIsDefault(data_name))</div><div class="line"><a name="l00682"></a><span class="lineno">  682</span>&#160;        data_name = output_name</div><div class="line"><a name="l00683"></a><span class="lineno">  683</span>&#160;    endif</div><div class="line"><a name="l00684"></a><span class="lineno">  684</span>&#160;</div><div class="line"><a name="l00685"></a><span class="lineno">  685</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00686"></a><span class="lineno">  686</span>&#160;    setdatafolder data_df</div><div class="line"><a name="l00687"></a><span class="lineno">  687</span>&#160;</div><div class="line"><a name="l00688"></a><span class="lineno">  688</span>&#160;    if (graph_mode == 3)</div><div class="line"><a name="l00689"></a><span class="lineno">  689</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#acca0130cccf2286863bbf5b7f91c5b3b">interpolate_hemi_scan</a>(data_name, projection=graph_projection)</div><div class="line"><a name="l00690"></a><span class="lineno">  690</span>&#160;    endif</div><div class="line"><a name="l00691"></a><span class="lineno">  691</span>&#160;    </div><div class="line"><a name="l00692"></a><span class="lineno">  692</span>&#160;    <span class="keywordtype">string</span> graphname = data_name</div><div class="line"><a name="l00693"></a><span class="lineno">  693</span>&#160;    graphname = <a class="code" href="pearl-anglescan-process_8ipf.html#ae57302acfc822c4817f2b7eef55efea2">display_hemi_scan</a>(data_name, projection=graph_projection, graphtype=graph_mode, graphname=graphname)</div><div class="line"><a name="l00694"></a><span class="lineno">  694</span>&#160;    if (ParamIsDefault(data_df))</div><div class="line"><a name="l00695"></a><span class="lineno">  695</span>&#160;        output_graphname = graphname</div><div class="line"><a name="l00696"></a><span class="lineno">  696</span>&#160;    endif</div><div class="line"><a name="l00697"></a><span class="lineno">  697</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00698"></a><span class="lineno">  698</span>&#160;</div><div class="line"><a name="l00699"></a><span class="lineno">  699</span>&#160;    if (strlen(graphname) &amp;&amp; (wintype(graphname) == 1))</div><div class="line"><a name="l00700"></a><span class="lineno">  700</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#a666dab03bb2e97ffef81cea450184d42">set_contrast</a>(graph_contrast, graph_contrast, graphname=graphname, colortable=graph_colortable)</div><div class="line"><a name="l00701"></a><span class="lineno">  701</span>&#160;    endif</div><div class="line"><a name="l00702"></a><span class="lineno">  702</span>&#160;</div><div class="line"><a name="l00703"></a><span class="lineno">  703</span>&#160;    return graphname</div><div class="line"><a name="l00704"></a><span class="lineno">  704</span>&#160;end</div><div class="line"><a name="l00705"></a><span class="lineno">  705</span>&#160;</div><div class="line"><a name="l00710"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a93dc5a029ae9831066e6ad133522ee88">  710</a></span>&#160;function <a class="code" href="pearl-anglescan-panel_8ipf.html#a93dc5a029ae9831066e6ad133522ee88">asp_update_graph</a>()</div><div class="line"><a name="l00711"></a><span class="lineno">  711</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00712"></a><span class="lineno">  712</span>&#160;</div><div class="line"><a name="l00713"></a><span class="lineno">  713</span>&#160;    svar /sdfr=df preview_graphname</div><div class="line"><a name="l00714"></a><span class="lineno">  714</span>&#160;    svar /sdfr=df output_graphname</div><div class="line"><a name="l00715"></a><span class="lineno">  715</span>&#160;    svar /sdfr=df graph_colortable</div><div class="line"><a name="l00716"></a><span class="lineno">  716</span>&#160;    nvar /sdfr=df graph_contrast</div><div class="line"><a name="l00717"></a><span class="lineno">  717</span>&#160;</div><div class="line"><a name="l00718"></a><span class="lineno">  718</span>&#160;    if (strlen(preview_graphname) &amp;&amp; (wintype(preview_graphname) == 1))</div><div class="line"><a name="l00719"></a><span class="lineno">  719</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#a666dab03bb2e97ffef81cea450184d42">set_contrast</a>(graph_contrast, graph_contrast, graphname=preview_graphname, colortable=graph_colortable)</div><div class="line"><a name="l00720"></a><span class="lineno">  720</span>&#160;    endif</div><div class="line"><a name="l00721"></a><span class="lineno">  721</span>&#160;    if (strlen(output_graphname) &amp;&amp; (wintype(output_graphname) == 1))</div><div class="line"><a name="l00722"></a><span class="lineno">  722</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#a666dab03bb2e97ffef81cea450184d42">set_contrast</a>(graph_contrast, graph_contrast, graphname=output_graphname, colortable=graph_colortable)</div><div class="line"><a name="l00723"></a><span class="lineno">  723</span>&#160;    endif</div><div class="line"><a name="l00724"></a><span class="lineno">  724</span>&#160;end</div><div class="line"><a name="l00725"></a><span class="lineno">  725</span>&#160;</div><div class="line"><a name="l00728"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#aac9d4d0388cbe8e6aa8f47b1c5276d83">  728</a></span>&#160;function <a class="code" href="pearl-anglescan-panel_8ipf.html#aac9d4d0388cbe8e6aa8f47b1c5276d83">asp_close_graphs</a>()</div><div class="line"><a name="l00729"></a><span class="lineno">  729</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00730"></a><span class="lineno">  730</span>&#160;</div><div class="line"><a name="l00731"></a><span class="lineno">  731</span>&#160;    svar /sdfr=df preview_graphname</div><div class="line"><a name="l00732"></a><span class="lineno">  732</span>&#160;    svar /sdfr=df output_graphname</div><div class="line"><a name="l00733"></a><span class="lineno">  733</span>&#160;    svar /sdfr=df dist_x_graphname</div><div class="line"><a name="l00734"></a><span class="lineno">  734</span>&#160;    svar /sdfr=df dist_y_graphname</div><div class="line"><a name="l00735"></a><span class="lineno">  735</span>&#160;</div><div class="line"><a name="l00736"></a><span class="lineno">  736</span>&#160;    if (strlen(preview_graphname) &amp;&amp; (wintype(preview_graphname) == 1))</div><div class="line"><a name="l00737"></a><span class="lineno">  737</span>&#160;        killwindow $preview_graphname</div><div class="line"><a name="l00738"></a><span class="lineno">  738</span>&#160;    endif</div><div class="line"><a name="l00739"></a><span class="lineno">  739</span>&#160;    if (strlen(output_graphname) &amp;&amp; (wintype(output_graphname) == 1))</div><div class="line"><a name="l00740"></a><span class="lineno">  740</span>&#160;        killwindow $output_graphname</div><div class="line"><a name="l00741"></a><span class="lineno">  741</span>&#160;    endif</div><div class="line"><a name="l00742"></a><span class="lineno">  742</span>&#160;    if (strlen(dist_x_graphname) &amp;&amp; (wintype(dist_x_graphname) == 1))</div><div class="line"><a name="l00743"></a><span class="lineno">  743</span>&#160;        killwindow $dist_x_graphname</div><div class="line"><a name="l00744"></a><span class="lineno">  744</span>&#160;    endif</div><div class="line"><a name="l00745"></a><span class="lineno">  745</span>&#160;    if (strlen(dist_y_graphname) &amp;&amp; (wintype(dist_y_graphname) == 1))</div><div class="line"><a name="l00746"></a><span class="lineno">  746</span>&#160;        killwindow $dist_y_graphname</div><div class="line"><a name="l00747"></a><span class="lineno">  747</span>&#160;    endif</div><div class="line"><a name="l00748"></a><span class="lineno">  748</span>&#160;</div><div class="line"><a name="l00749"></a><span class="lineno">  749</span>&#160;    preview_graphname = &quot;&quot;</div><div class="line"><a name="l00750"></a><span class="lineno">  750</span>&#160;    output_graphname = &quot;&quot;</div><div class="line"><a name="l00751"></a><span class="lineno">  751</span>&#160;    dist_x_graphname = &quot;&quot;</div><div class="line"><a name="l00752"></a><span class="lineno">  752</span>&#160;    dist_y_graphname = &quot;&quot;</div><div class="line"><a name="l00753"></a><span class="lineno">  753</span>&#160;end</div><div class="line"><a name="l00754"></a><span class="lineno">  754</span>&#160;</div><div class="line"><a name="l00768"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#adf7c5a4e7c66c3d6e13d01674b9cf47f">  768</a></span>&#160;function /s <a class="code" href="pearl-anglescan-panel_8ipf.html#adf7c5a4e7c66c3d6e13d01674b9cf47f">asp_duplicate_output</a>(dest_name, [do_graph])</div><div class="line"><a name="l00769"></a><span class="lineno">  769</span>&#160;    <span class="keywordtype">string</span> dest_name</div><div class="line"><a name="l00770"></a><span class="lineno">  770</span>&#160;    variable do_graph</div><div class="line"><a name="l00771"></a><span class="lineno">  771</span>&#160;    </div><div class="line"><a name="l00772"></a><span class="lineno">  772</span>&#160;    if (ParamIsDefault(do_graph))</div><div class="line"><a name="l00773"></a><span class="lineno">  773</span>&#160;        do_graph = 0</div><div class="line"><a name="l00774"></a><span class="lineno">  774</span>&#160;    endif</div><div class="line"><a name="l00775"></a><span class="lineno">  775</span>&#160;</div><div class="line"><a name="l00776"></a><span class="lineno">  776</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00777"></a><span class="lineno">  777</span>&#160;    svar /sdfr=df source_path</div><div class="line"><a name="l00778"></a><span class="lineno">  778</span>&#160;    svar /sdfr=df output_name</div><div class="line"><a name="l00779"></a><span class="lineno">  779</span>&#160;    svar /sdfr=df output_graphname</div><div class="line"><a name="l00780"></a><span class="lineno">  780</span>&#160;    wave raw_data = $source_path</div><div class="line"><a name="l00781"></a><span class="lineno">  781</span>&#160;    </div><div class="line"><a name="l00782"></a><span class="lineno">  782</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00783"></a><span class="lineno">  783</span>&#160;    dfref raw_df = GetWavesDataFolderDFR(raw_data)</div><div class="line"><a name="l00784"></a><span class="lineno">  784</span>&#160;    setdatafolder raw_df</div><div class="line"><a name="l00785"></a><span class="lineno">  785</span>&#160;    newdatafolder /o /s $dest_name</div><div class="line"><a name="l00786"></a><span class="lineno">  786</span>&#160;    dfref dest_df = GetDataFolderDFR()</div><div class="line"><a name="l00787"></a><span class="lineno">  787</span>&#160;    setdatafolder df</div><div class="line"><a name="l00788"></a><span class="lineno">  788</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#aa5b1e2ab1dd43a73b7157406b803887e">duplicate_hemi_scan</a>(output_name, dest_df, &quot;&quot;)</div><div class="line"><a name="l00789"></a><span class="lineno">  789</span>&#160;    </div><div class="line"><a name="l00790"></a><span class="lineno">  790</span>&#160;    <span class="keywordtype">string</span> graphname = &quot;&quot;</div><div class="line"><a name="l00791"></a><span class="lineno">  791</span>&#160;    if (do_graph)</div><div class="line"><a name="l00792"></a><span class="lineno">  792</span>&#160;        graphname = <a class="code" href="pearl-anglescan-panel_8ipf.html#a8e540427fab71f879e84003c49c59f22">asp_display_output</a>(data_df=raw_df, data_name=dest_name)</div><div class="line"><a name="l00793"></a><span class="lineno">  793</span>&#160;    endif</div><div class="line"><a name="l00794"></a><span class="lineno">  794</span>&#160;    </div><div class="line"><a name="l00795"></a><span class="lineno">  795</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00796"></a><span class="lineno">  796</span>&#160;    return graphname</div><div class="line"><a name="l00797"></a><span class="lineno">  797</span>&#160;end</div><div class="line"><a name="l00798"></a><span class="lineno">  798</span>&#160;</div><div class="line"><a name="l00801"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a0e0f10d125f1cdacffa3bff9b0854aa9">  801</a></span>&#160;function <a class="code" href="pearl-anglescan-panel_8ipf.html#a0e0f10d125f1cdacffa3bff9b0854aa9">asp_save_output_itx</a>()</div><div class="line"><a name="l00802"></a><span class="lineno">  802</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00803"></a><span class="lineno">  803</span>&#160;    svar /sdfr=df output_name</div><div class="line"><a name="l00804"></a><span class="lineno">  804</span>&#160;    </div><div class="line"><a name="l00805"></a><span class="lineno">  805</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00806"></a><span class="lineno">  806</span>&#160;    setdatafolder df</div><div class="line"><a name="l00807"></a><span class="lineno">  807</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a48cbd596656bc6d849c53afb4c58b90d">save_hemi_scan</a>(output_name, &quot;&quot;, &quot;&quot;)</div><div class="line"><a name="l00808"></a><span class="lineno">  808</span>&#160;    </div><div class="line"><a name="l00809"></a><span class="lineno">  809</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00810"></a><span class="lineno">  810</span>&#160;end</div><div class="line"><a name="l00811"></a><span class="lineno">  811</span>&#160;</div><div class="line"><a name="l00816"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#abb4d53822bc34bda0e38332c7777ebac">  816</a></span>&#160;function <a class="code" href="pearl-anglescan-panel_8ipf.html#abb4d53822bc34bda0e38332c7777ebac">asp_save_output_etpi</a>(ekin)</div><div class="line"><a name="l00817"></a><span class="lineno">  817</span>&#160;    variable ekin</div><div class="line"><a name="l00818"></a><span class="lineno">  818</span>&#160;    </div><div class="line"><a name="l00819"></a><span class="lineno">  819</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00820"></a><span class="lineno">  820</span>&#160;    svar /sdfr=df output_name</div><div class="line"><a name="l00821"></a><span class="lineno">  821</span>&#160;    wave /sdfr=df process_data</div><div class="line"><a name="l00822"></a><span class="lineno">  822</span>&#160;    </div><div class="line"><a name="l00823"></a><span class="lineno">  823</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00824"></a><span class="lineno">  824</span>&#160;    setdatafolder df</div><div class="line"><a name="l00825"></a><span class="lineno">  825</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l00826"></a><span class="lineno">  826</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l00827"></a><span class="lineno">  827</span>&#160;    dfref data_df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(output_name, s_prefix, s_int)</div><div class="line"><a name="l00828"></a><span class="lineno">  828</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l00829"></a><span class="lineno">  829</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l00830"></a><span class="lineno">  830</span>&#160;    </div><div class="line"><a name="l00831"></a><span class="lineno">  831</span>&#160;    <a class="code" href="pearl-pmsco-import_8ipf.html#aa31bbaa2fc77b447e6c6f386b23abdd9">pmsco_save_scan</a>(&quot;&quot;, &quot;&quot;, num2str(ekin), s_polar, s_azim, &quot;&quot;, s_int, &quot;&quot;, sdfr=data_df)</div><div class="line"><a name="l00832"></a><span class="lineno">  832</span>&#160;    </div><div class="line"><a name="l00833"></a><span class="lineno">  833</span>&#160;    SetDataFolder saveDF</div><div class="line"><a name="l00834"></a><span class="lineno">  834</span>&#160;end</div><div class="line"><a name="l00835"></a><span class="lineno">  835</span>&#160;</div><div class="line"><a name="l00836"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#af5435ccaabba78f855b244929dc09ed0">  836</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#af5435ccaabba78f855b244929dc09ed0">check_norm_alpha</a>()</div><div class="line"><a name="l00837"></a><span class="lineno">  837</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00838"></a><span class="lineno">  838</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#af39609fc80e58f2188b3aa564f53b750">do_crop</a>(0)</div><div class="line"><a name="l00839"></a><span class="lineno">  839</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a8f7266ac2840155dede704fda66fe6b0">do_norm_alpha</a>(2, force=1)</div><div class="line"><a name="l00840"></a><span class="lineno">  840</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a59886414c7dc2486c5a17f078896c705">asp_display_dist_check</a>(1, 0)</div><div class="line"><a name="l00841"></a><span class="lineno">  841</span>&#160;end</div><div class="line"><a name="l00842"></a><span class="lineno">  842</span>&#160;</div><div class="line"><a name="l00843"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a91d5343cc96730de12b535cb0bef9df2">  843</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a91d5343cc96730de12b535cb0bef9df2">check_norm_phi</a>()</div><div class="line"><a name="l00844"></a><span class="lineno">  844</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00845"></a><span class="lineno">  845</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#af39609fc80e58f2188b3aa564f53b750">do_crop</a>(0)</div><div class="line"><a name="l00846"></a><span class="lineno">  846</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a790519191391ac03c75eb7b57ea0749e">do_norm_phi</a>(2, force=1)</div><div class="line"><a name="l00847"></a><span class="lineno">  847</span>&#160;    asp_display_dist_check(0, 1)</div><div class="line"><a name="l00848"></a><span class="lineno">  848</span>&#160;end</div><div class="line"><a name="l00849"></a><span class="lineno">  849</span>&#160;</div><div class="line"><a name="l00850"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#addddc12e5b622a3d00756d724e5d05a9">  850</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#addddc12e5b622a3d00756d724e5d05a9">check_norm_theta</a>()</div><div class="line"><a name="l00851"></a><span class="lineno">  851</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00852"></a><span class="lineno">  852</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#af39609fc80e58f2188b3aa564f53b750">do_crop</a>(0)</div><div class="line"><a name="l00853"></a><span class="lineno">  853</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a7b288598e3faa37e414b1443982c1a3e">do_norm_theta</a>(2, force=1)</div><div class="line"><a name="l00854"></a><span class="lineno">  854</span>&#160;    asp_display_dist_check(0, 1)</div><div class="line"><a name="l00855"></a><span class="lineno">  855</span>&#160;end</div><div class="line"><a name="l00856"></a><span class="lineno">  856</span>&#160;</div><div class="line"><a name="l00857"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a4708e7385790d1a9f2d58c4d64a60653">  857</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a4708e7385790d1a9f2d58c4d64a60653">check_norm_thetaphi</a>()</div><div class="line"><a name="l00858"></a><span class="lineno">  858</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00859"></a><span class="lineno">  859</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#af39609fc80e58f2188b3aa564f53b750">do_crop</a>(0)</div><div class="line"><a name="l00860"></a><span class="lineno">  860</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#af6509fc7584b0bcbdc8561df2bc12a58">do_norm_thetaphi</a>(2, force=1)</div><div class="line"><a name="l00861"></a><span class="lineno">  861</span>&#160;    asp_display_dist_check(0, 1)</div><div class="line"><a name="l00862"></a><span class="lineno">  862</span>&#160;end</div><div class="line"><a name="l00863"></a><span class="lineno">  863</span>&#160;</div><div class="line"><a name="l00864"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a2268cc96a879c1a055c1ff29c1b040ea">  864</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a2268cc96a879c1a055c1ff29c1b040ea">preview_crop</a>()</div><div class="line"><a name="l00865"></a><span class="lineno">  865</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00866"></a><span class="lineno">  866</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#af39609fc80e58f2188b3aa564f53b750">do_crop</a>(0, force=1)</div><div class="line"><a name="l00867"></a><span class="lineno">  867</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a66b3eef1fd0be13dfef0a66781f55062">asp_display_previews</a>()</div><div class="line"><a name="l00868"></a><span class="lineno">  868</span>&#160;end</div><div class="line"><a name="l00869"></a><span class="lineno">  869</span>&#160;</div><div class="line"><a name="l00870"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#ad355d06d3b57bb458bd62e6d6f1f2417">  870</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#ad355d06d3b57bb458bd62e6d6f1f2417">preview_norm_alpha</a>()</div><div class="line"><a name="l00871"></a><span class="lineno">  871</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00872"></a><span class="lineno">  872</span>&#160;    do_crop(0)</div><div class="line"><a name="l00873"></a><span class="lineno">  873</span>&#160;    do_norm_alpha(1, force=1)</div><div class="line"><a name="l00874"></a><span class="lineno">  874</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a66b3eef1fd0be13dfef0a66781f55062">asp_display_previews</a>()</div><div class="line"><a name="l00875"></a><span class="lineno">  875</span>&#160;end</div><div class="line"><a name="l00876"></a><span class="lineno">  876</span>&#160;</div><div class="line"><a name="l00877"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a0c228ce2048827dc8161691ec5c425fc">  877</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a0c228ce2048827dc8161691ec5c425fc">preview_norm_phi</a>()</div><div class="line"><a name="l00878"></a><span class="lineno">  878</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00879"></a><span class="lineno">  879</span>&#160;    do_crop(0)</div><div class="line"><a name="l00880"></a><span class="lineno">  880</span>&#160;    do_norm_phi(1, force=1)</div><div class="line"><a name="l00881"></a><span class="lineno">  881</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a66b3eef1fd0be13dfef0a66781f55062">asp_display_previews</a>()</div><div class="line"><a name="l00882"></a><span class="lineno">  882</span>&#160;end</div><div class="line"><a name="l00883"></a><span class="lineno">  883</span>&#160;</div><div class="line"><a name="l00884"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#abe1237d8bf79a2ec3791ad9fe184bc3f">  884</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#abe1237d8bf79a2ec3791ad9fe184bc3f">preview_norm_theta</a>()</div><div class="line"><a name="l00885"></a><span class="lineno">  885</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00886"></a><span class="lineno">  886</span>&#160;    do_crop(0)</div><div class="line"><a name="l00887"></a><span class="lineno">  887</span>&#160;    do_norm_theta(1, force=1)</div><div class="line"><a name="l00888"></a><span class="lineno">  888</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a66b3eef1fd0be13dfef0a66781f55062">asp_display_previews</a>()</div><div class="line"><a name="l00889"></a><span class="lineno">  889</span>&#160;end</div><div class="line"><a name="l00890"></a><span class="lineno">  890</span>&#160;</div><div class="line"><a name="l00891"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a3e798e20a99a03a789dd7914612e4fd2">  891</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a3e798e20a99a03a789dd7914612e4fd2">preview_norm_thetaphi</a>()</div><div class="line"><a name="l00892"></a><span class="lineno">  892</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a>(0)</div><div class="line"><a name="l00893"></a><span class="lineno">  893</span>&#160;    do_crop(0)</div><div class="line"><a name="l00894"></a><span class="lineno">  894</span>&#160;    do_norm_thetaphi(1, force=1)</div><div class="line"><a name="l00895"></a><span class="lineno">  895</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a66b3eef1fd0be13dfef0a66781f55062">asp_display_previews</a>()</div><div class="line"><a name="l00896"></a><span class="lineno">  896</span>&#160;end</div><div class="line"><a name="l00897"></a><span class="lineno">  897</span>&#160;</div><div class="line"><a name="l00900"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a452f09c3057638056ac2b5a15ac660b2">  900</a></span>&#160;function <a class="code" href="pearl-anglescan-panel_8ipf.html#a452f09c3057638056ac2b5a15ac660b2">asp_show_panel</a>()</div><div class="line"><a name="l00901"></a><span class="lineno">  901</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l00902"></a><span class="lineno">  902</span>&#160;    svar /sdfr=df panel_name</div><div class="line"><a name="l00903"></a><span class="lineno">  903</span>&#160;</div><div class="line"><a name="l00904"></a><span class="lineno">  904</span>&#160;    if (strlen(panel_name) &amp;&amp; (wintype(panel_name) == 7))</div><div class="line"><a name="l00905"></a><span class="lineno">  905</span>&#160;        DoWindow /F $panel_name</div><div class="line"><a name="l00906"></a><span class="lineno">  906</span>&#160;        return 0</div><div class="line"><a name="l00907"></a><span class="lineno">  907</span>&#160;    endif</div><div class="line"><a name="l00908"></a><span class="lineno">  908</span>&#160;</div><div class="line"><a name="l00909"></a><span class="lineno">  909</span>&#160;    NewPanel /K=1 /N=anglescan_panel /W=(200,50,480,874) as &quot;angle scan processing&quot;</div><div class="line"><a name="l00910"></a><span class="lineno">  910</span>&#160;    panel_name = s_name</div><div class="line"><a name="l00911"></a><span class="lineno">  911</span>&#160;    </div><div class="line"><a name="l00912"></a><span class="lineno">  912</span>&#160;    GroupBox gb_source, title=&quot;data source&quot;</div><div class="line"><a name="l00913"></a><span class="lineno">  913</span>&#160;    Button b_source_select, size={50,20},proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a1e50019bc895a0787cb3f07d776e9463">bp_source_select</a>,title=<span class="stringliteral">&quot;select...&quot;</span></div><div class="line"><a name="l00914"></a><span class="lineno">  914</span>&#160;    Button b_source_select, help={<span class="stringliteral">&quot;select the source wave, e.g. ReducedData1. it must be in the scan or region data folder. the attr folder with the manipulator waves must be in the same folder or one level up.&quot;</span>}</div><div class="line"><a name="l00915"></a><span class="lineno">  915</span>&#160;    Button b_source_update, size={50,20},proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a7ab3962d1d9d50d6cd285d40d4a7ce50">bp_source_update</a>,title=<span class="stringliteral">&quot;update&quot;</span></div><div class="line"><a name="l00916"></a><span class="lineno">  916</span>&#160;    Button b_source_update, help={<span class="stringliteral">&quot;reload the process data from the previous source (link displayed below)&quot;</span>}</div><div class="line"><a name="l00917"></a><span class="lineno">  917</span>&#160;    TitleBox tb_source_path, size={240,21}</div><div class="line"><a name="l00918"></a><span class="lineno">  918</span>&#160;    TitleBox tb_source_path,variable= root:packages:pearl_anglescan_panel:source_path</div><div class="line"><a name="l00919"></a><span class="lineno">  919</span>&#160;</div><div class="line"><a name="l00920"></a><span class="lineno">  920</span>&#160;    GroupBox gb_offsets, title=<span class="stringliteral">&quot;offsets&quot;</span></div><div class="line"><a name="l00921"></a><span class="lineno">  921</span>&#160;    SetVariable sv_theta_offset, size={88,16},bodyWidth=60,title=<span class="stringliteral">&quot;theta&quot;</span></div><div class="line"><a name="l00922"></a><span class="lineno">  922</span>&#160;    SetVariable sv_theta_offset,value= root:packages:pearl_anglescan_panel:theta_offset</div><div class="line"><a name="l00923"></a><span class="lineno">  923</span>&#160;    SetVariable sv_theta_offset, help={<span class="stringliteral">&quot;manipulator theta value that corresponds to normal emission.&quot;</span>}</div><div class="line"><a name="l00924"></a><span class="lineno">  924</span>&#160;    SetVariable sv_tilt_offset, size={74,16},bodyWidth=60,title=<span class="stringliteral">&quot;tilt&quot;</span></div><div class="line"><a name="l00925"></a><span class="lineno">  925</span>&#160;    SetVariable sv_tilt_offset,value= root:packages:pearl_anglescan_panel:tilt_offset</div><div class="line"><a name="l00926"></a><span class="lineno">  926</span>&#160;    SetVariable sv_tilt_offset, help={<span class="stringliteral">&quot;manipulator tilt value that corresponds to normal emission.&quot;</span>}</div><div class="line"><a name="l00927"></a><span class="lineno">  927</span>&#160;    SetVariable sv_phi_offset, size={78,16},bodyWidth=60,title=<span class="stringliteral">&quot;phi&quot;</span></div><div class="line"><a name="l00928"></a><span class="lineno">  928</span>&#160;    SetVariable sv_phi_offset,value= root:packages:pearl_anglescan_panel:phi_offset</div><div class="line"><a name="l00929"></a><span class="lineno">  929</span>&#160;    SetVariable sv_phi_offset, help={<span class="stringliteral">&quot;manipulator phi value that should map to the 3 o&#39;clock angle.&quot;</span>}</div><div class="line"><a name="l00930"></a><span class="lineno">  930</span>&#160;    SetVariable sv_alpha_offset, size={90,16},bodyWidth=60,title=<span class="stringliteral">&quot;alpha&quot;</span></div><div class="line"><a name="l00931"></a><span class="lineno">  931</span>&#160;    SetVariable sv_alpha_offset,value= root:packages:pearl_anglescan_panel:alpha_offset</div><div class="line"><a name="l00932"></a><span class="lineno">  932</span>&#160;    SetVariable sv_alpha_offset, help={<span class="stringliteral">&quot;alpha value that corresponds to normal emission (if the sample normal is properly aligned).&quot;</span>}</div><div class="line"><a name="l00933"></a><span class="lineno">  933</span>&#160;    Button b_save_prefs, size={80,20},proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#ad8a01428a137278a31d4f1f4f9c634c5">bp_save_prefs</a>,title=<span class="stringliteral">&quot;save prefs&quot;</span></div><div class="line"><a name="l00934"></a><span class="lineno">  934</span>&#160;    Button b_save_prefs, help={<span class="stringliteral">&quot;save settings as preferences.&quot;</span>}</div><div class="line"><a name="l00935"></a><span class="lineno">  935</span>&#160;    Button b_load_prefs, size={80,20},proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a1868754e64cb1448e564c0936e78574d">bp_load_prefs</a>,title=<span class="stringliteral">&quot;load prefs&quot;</span></div><div class="line"><a name="l00936"></a><span class="lineno">  936</span>&#160;    Button b_load_prefs, help={<span class="stringliteral">&quot;load settings from preferences.&quot;</span>}</div><div class="line"><a name="l00937"></a><span class="lineno">  937</span>&#160;</div><div class="line"><a name="l00938"></a><span class="lineno">  938</span>&#160;    GroupBox gb_crop, title=<span class="stringliteral">&quot;crop and delete&quot;</span></div><div class="line"><a name="l00939"></a><span class="lineno">  939</span>&#160;    CheckBox cb_crop_enable, size={50,14}, title=<span class="stringliteral">&quot;enable&quot;</span></div><div class="line"><a name="l00940"></a><span class="lineno">  940</span>&#160;    CheckBox cb_crop_enable, help={<span class="stringliteral">&quot;crop at +/-alpha and +theta, delete arbitrary rows&quot;</span>}</div><div class="line"><a name="l00941"></a><span class="lineno">  941</span>&#160;    CheckBox cb_crop_enable, variable= root:packages:pearl_anglescan_panel:crop_enable</div><div class="line"><a name="l00942"></a><span class="lineno">  942</span>&#160;    SetVariable sv_crop_alpha, size={90,16},bodyWidth=60,title=<span class="stringliteral">&quot;alpha&quot;</span></div><div class="line"><a name="l00943"></a><span class="lineno">  943</span>&#160;    SetVariable sv_crop_alpha, limits={0,30,1},value= root:packages:pearl_anglescan_panel:crop_alpha</div><div class="line"><a name="l00944"></a><span class="lineno">  944</span>&#160;    SetVariable sv_crop_alpha, help={<span class="stringliteral">&quot;alpha (detection angle) cropping angle (positive boundary), relative to normal emission&quot;</span>}</div><div class="line"><a name="l00945"></a><span class="lineno">  945</span>&#160;    SetVariable sv_crop_theta, size={90,16},bodyWidth=60,title=<span class="stringliteral">&quot;theta&quot;</span></div><div class="line"><a name="l00946"></a><span class="lineno">  946</span>&#160;    SetVariable sv_crop_theta, limits={10,90,1},value= root:packages:pearl_anglescan_panel:crop_theta</div><div class="line"><a name="l00947"></a><span class="lineno">  947</span>&#160;    SetVariable sv_crop_theta, help={<span class="stringliteral">&quot;theta (polar angle) upper limit, relative to normal emission&quot;</span>}</div><div class="line"><a name="l00948"></a><span class="lineno">  948</span>&#160;    SetVariable sv_crop_rows, size={200,16},bodyWidth=160,title=<span class="stringliteral">&quot;rows&quot;</span></div><div class="line"><a name="l00949"></a><span class="lineno">  949</span>&#160;    SetVariable sv_crop_rows, limits={10,90,1},value= root:packages:pearl_anglescan_panel:crop_rows</div><div class="line"><a name="l00950"></a><span class="lineno">  950</span>&#160;    SetVariable sv_crop_rows, help={<span class="stringliteral">&quot;rows to delete from the raw data. comma-separated point indices, hyphen for range.&quot;</span>}</div><div class="line"><a name="l00951"></a><span class="lineno">  951</span>&#160;    Button b_crop_preview, size={80,20},proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a57c666f93cb4310fadf13b1916eaf134">bp_crop_preview</a>,title=<span class="stringliteral">&quot;preview&quot;</span></div><div class="line"><a name="l00952"></a><span class="lineno">  952</span>&#160;    Button b_crop_preview, help={<span class="stringliteral">&quot;show a preview of the cropped dataset.&quot;</span>}</div><div class="line"><a name="l00953"></a><span class="lineno">  953</span>&#160;</div><div class="line"><a name="l00954"></a><span class="lineno">  954</span>&#160;    GroupBox gb_norm_alpha, title=<span class="stringliteral">&quot;normalize alpha&quot;</span></div><div class="line"><a name="l00955"></a><span class="lineno">  955</span>&#160;    CheckBox cb_norm_alpha_enable, size={50,14}, title=<span class="stringliteral">&quot;enable&quot;</span></div><div class="line"><a name="l00956"></a><span class="lineno">  956</span>&#160;    CheckBox cb_norm_alpha_enable,variable= root:packages:pearl_anglescan_panel:norm_alpha_enable</div><div class="line"><a name="l00957"></a><span class="lineno">  957</span>&#160;    CheckBox cb_norm_alpha_enable, help={<span class="stringliteral">&quot;enable normalization of the alpha distribution&quot;</span>}</div><div class="line"><a name="l00958"></a><span class="lineno">  958</span>&#160;    PopupMenu pm_norm_alpha_mode, size={138,21}, bodyWidth=100, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#acc1028dcd046f441ceaac268ffac9af6">pmp_norm_alpha_mode</a>,title=<span class="stringliteral">&quot;method&quot;</span></div><div class="line"><a name="l00959"></a><span class="lineno">  959</span>&#160;    PopupMenu pm_norm_alpha_mode, mode=5, popvalue=<span class="stringliteral">&quot;loess&quot;</span>, value= #<span class="stringliteral">&quot;\&quot;none;binomial;boxcar;scienta;loess;\&quot;&quot;</span></div><div class="line"><a name="l00960"></a><span class="lineno">  960</span>&#160;    PopupMenu pm_norm_alpha_mode, help={<span class="stringliteral">&quot;alpha normalization method. recommended: loess&quot;</span>}</div><div class="line"><a name="l00961"></a><span class="lineno">  961</span>&#160;    SetVariable sv_norm_alpha_smoothing, size={112,16}, bodyWidth=60, title=<span class="stringliteral">&quot;smoothing&quot;</span></div><div class="line"><a name="l00962"></a><span class="lineno">  962</span>&#160;    SetVariable sv_norm_alpha_smoothing, limits={0,1,0.05}, value= root:packages:pearl_anglescan_panel:norm_alpha_smoothing</div><div class="line"><a name="l00963"></a><span class="lineno">  963</span>&#160;    SetVariable sv_norm_alpha_smoothing, help={<span class="stringliteral">&quot;smoothing parameter (depends on the normalization method).&quot;</span>}</div><div class="line"><a name="l00964"></a><span class="lineno">  964</span>&#160;    Button b_norm_alpha_check, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a630dfc775d45843c71c279bbb01d05a6">bp_norm_alpha_check</a>,title=<span class="stringliteral">&quot;check&quot;</span></div><div class="line"><a name="l00965"></a><span class="lineno">  965</span>&#160;    Button b_norm_alpha_check, help={<span class="stringliteral">&quot;show a graph of the normalization function&quot;</span>}</div><div class="line"><a name="l00966"></a><span class="lineno">  966</span>&#160;    Button b_norm_alpha_preview, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#aaaf3facc118f90a8f1b32948446899b3">bp_norm_alpha_preview</a>,title=<span class="stringliteral">&quot;preview&quot;</span></div><div class="line"><a name="l00967"></a><span class="lineno">  967</span>&#160;    Button b_norm_alpha_preview, help={<span class="stringliteral">&quot;show a preview of the normalized dataset (without other normalizations).&quot;</span>}</div><div class="line"><a name="l00968"></a><span class="lineno">  968</span>&#160;</div><div class="line"><a name="l00969"></a><span class="lineno">  969</span>&#160;    GroupBox gb_norm_phi, title=<span class="stringliteral">&quot;normalize phi&quot;</span></div><div class="line"><a name="l00970"></a><span class="lineno">  970</span>&#160;    CheckBox cb_norm_phi_enable, size={50,14}, title=<span class="stringliteral">&quot;enable&quot;</span></div><div class="line"><a name="l00971"></a><span class="lineno">  971</span>&#160;    CheckBox cb_norm_phi_enable,variable= root:packages:pearl_anglescan_panel:norm_phi_enable</div><div class="line"><a name="l00972"></a><span class="lineno">  972</span>&#160;    CheckBox cb_norm_phi_enable, help={<span class="stringliteral">&quot;enable normalization of the phi distribution to reduce the effect of wobble&quot;</span>}</div><div class="line"><a name="l00973"></a><span class="lineno">  973</span>&#160;    SetVariable sv_norm_phi_range, size={118,16}, bodyWidth=60, title=<span class="stringliteral">&quot;theta range&quot;</span></div><div class="line"><a name="l00974"></a><span class="lineno">  974</span>&#160;    SetVariable sv_norm_phi_range, limits={0,90,1}, value= root:packages:pearl_anglescan_panel:norm_phi_thetarange</div><div class="line"><a name="l00975"></a><span class="lineno">  975</span>&#160;    SetVariable sv_norm_phi_range, help={<span class="stringliteral">&quot;theta range (from normal) to factor into the normalization function&quot;</span>}</div><div class="line"><a name="l00976"></a><span class="lineno">  976</span>&#160;    Button b_norm_phi_check, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#ae42eb7f46e5c1a1b5d334ebb5e94d2d3">bp_norm_phi_check</a>, title=<span class="stringliteral">&quot;check&quot;</span></div><div class="line"><a name="l00977"></a><span class="lineno">  977</span>&#160;    Button b_norm_phi_check, help={<span class="stringliteral">&quot;show a graph of the normalization function&quot;</span>}</div><div class="line"><a name="l00978"></a><span class="lineno">  978</span>&#160;    Button b_norm_phi_preview, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a740c8a80ab2fc0550a05cf3b032821d0">bp_norm_phi_preview</a>, title=<span class="stringliteral">&quot;preview&quot;</span></div><div class="line"><a name="l00979"></a><span class="lineno">  979</span>&#160;    Button b_norm_phi_preview, help={<span class="stringliteral">&quot;show a preview of the normalized dataset (without other normalizations).&quot;</span>}</div><div class="line"><a name="l00980"></a><span class="lineno">  980</span>&#160;</div><div class="line"><a name="l00981"></a><span class="lineno">  981</span>&#160;    GroupBox gb_norm_theta, title=<span class="stringliteral">&quot;normalize theta&quot;</span></div><div class="line"><a name="l00982"></a><span class="lineno">  982</span>&#160;    CheckBox cb_norm_theta_enable, size={50,14},title=<span class="stringliteral">&quot;enable&quot;</span></div><div class="line"><a name="l00983"></a><span class="lineno">  983</span>&#160;    CheckBox cb_norm_theta_enable, variable= root:packages:pearl_anglescan_panel:norm_theta_enable</div><div class="line"><a name="l00984"></a><span class="lineno">  984</span>&#160;    CheckBox cb_norm_theta_enable, help={<span class="stringliteral">&quot;enable normalization of the theta distribution (integrated over phi)&quot;</span>}</div><div class="line"><a name="l00985"></a><span class="lineno">  985</span>&#160;    PopupMenu pm_norm_theta_domain, size={138,21}, bodyWidth=100, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a0153f4ed4892dd3b48276af190590e4f">pmp_norm_theta_domain</a>, title=<span class="stringliteral">&quot;domain&quot;</span></div><div class="line"><a name="l00986"></a><span class="lineno">  986</span>&#160;    PopupMenu pm_norm_theta_domain, mode=5, popvalue=<span class="stringliteral">&quot;loess&quot;</span>, value= #<span class="stringliteral">&quot;\&quot;global;scans;\&quot;&quot;</span></div><div class="line"><a name="l00987"></a><span class="lineno">  987</span>&#160;    PopupMenu pm_norm_theta_domain, help={<span class="stringliteral">&quot;smoothing domain: global or individual scans. use global unless there is a stronga or irregular phi variation.&quot;</span>}</div><div class="line"><a name="l00988"></a><span class="lineno">  988</span>&#160;    PopupMenu pm_norm_theta_mode, size={138,21},bodyWidth=100,proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#ae68496dbe344dc8a2c7c99b2d3f4b01c">pmp_norm_theta_mode</a>,title=<span class="stringliteral">&quot;method&quot;</span></div><div class="line"><a name="l00989"></a><span class="lineno">  989</span>&#160;    PopupMenu pm_norm_theta_mode,mode=5,popvalue=<span class="stringliteral">&quot;loess&quot;</span>,value= #<span class="stringliteral">&quot;\&quot;none;binomial;boxcar;polynomial;loess;\&quot;&quot;</span></div><div class="line"><a name="l00990"></a><span class="lineno">  990</span>&#160;    PopupMenu pm_norm_theta_mode, help={<span class="stringliteral">&quot;theta normalization method. recommended: loess&quot;</span>}</div><div class="line"><a name="l00991"></a><span class="lineno">  991</span>&#160;    SetVariable sv_norm_theta_smoothing, size={112,16}, bodyWidth=60, title=<span class="stringliteral">&quot;smoothing&quot;</span></div><div class="line"><a name="l00992"></a><span class="lineno">  992</span>&#160;    SetVariable sv_norm_theta_smoothing, limits={0,1,0.05}, value= root:packages:pearl_anglescan_panel:norm_theta_smoothing</div><div class="line"><a name="l00993"></a><span class="lineno">  993</span>&#160;    SetVariable sv_norm_theta_smoothing, help={<span class="stringliteral">&quot;smoothing parameter (depends on the normalization method).&quot;</span>}</div><div class="line"><a name="l00994"></a><span class="lineno">  994</span>&#160;    Button b_norm_theta_check, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a0931ce925d2dae6a1bb7e4a65a8a2be7">bp_norm_theta_check</a>, title=<span class="stringliteral">&quot;check&quot;</span></div><div class="line"><a name="l00995"></a><span class="lineno">  995</span>&#160;    Button b_norm_theta_check, help={<span class="stringliteral">&quot;show a graph of the normalization function&quot;</span>}</div><div class="line"><a name="l00996"></a><span class="lineno">  996</span>&#160;    Button b_norm_theta_preview, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#af57abb0a7d41b800d33bb748f9fc5c38">bp_norm_theta_preview</a>, title=<span class="stringliteral">&quot;preview&quot;</span></div><div class="line"><a name="l00997"></a><span class="lineno">  997</span>&#160;    Button b_norm_theta_preview, help={<span class="stringliteral">&quot;show a preview of the normalized dataset (without other normalizations).&quot;</span>}</div><div class="line"><a name="l00998"></a><span class="lineno">  998</span>&#160;</div><div class="line"><a name="l00999"></a><span class="lineno">  999</span>&#160;    GroupBox gb_norm_thetaphi, size={272,97},title=<span class="stringliteral">&quot;normalize (theta,phi)&quot;</span></div><div class="line"><a name="l01000"></a><span class="lineno"> 1000</span>&#160;    CheckBox cb_norm_thetaphi_enable, size={50,14},title=<span class="stringliteral">&quot;enable&quot;</span></div><div class="line"><a name="l01001"></a><span class="lineno"> 1001</span>&#160;    CheckBox cb_norm_thetaphi_enable, variable= root:packages:pearl_anglescan_panel:norm_thetaphi_enable</div><div class="line"><a name="l01002"></a><span class="lineno"> 1002</span>&#160;    CheckBox cb_norm_thetaphi_enable, help={<span class="stringliteral">&quot;enable normalization of the (theta, phi) distribution.&quot;</span>}</div><div class="line"><a name="l01003"></a><span class="lineno"> 1003</span>&#160;    PopupMenu pm_norm_thetaphi_mode, size={138,21}, bodyWidth=100, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a289996a12d0ef46af1dac49a67289931">pmp_norm_thetaphi_mode</a>,title=<span class="stringliteral">&quot;method&quot;</span></div><div class="line"><a name="l01004"></a><span class="lineno"> 1004</span>&#160;    PopupMenu pm_norm_thetaphi_mode, mode=5, popvalue=<span class="stringliteral">&quot;loess&quot;</span>, value= #<span class="stringliteral">&quot;\&quot;none;none;none;none;loess;\&quot;&quot;</span></div><div class="line"><a name="l01005"></a><span class="lineno"> 1005</span>&#160;    PopupMenu pm_norm_thetaphi_mode, help={<span class="stringliteral">&quot;theta normalization method. recommended: loess&quot;</span>}</div><div class="line"><a name="l01006"></a><span class="lineno"> 1006</span>&#160;    SetVariable sv_norm_thetaphi_smoothing, size={112,16}, bodyWidth=60, title=<span class="stringliteral">&quot;smoothing&quot;</span></div><div class="line"><a name="l01007"></a><span class="lineno"> 1007</span>&#160;    SetVariable sv_norm_thetaphi_smoothing, limits={0,1,0.05}, value= root:packages:pearl_anglescan_panel:norm_thetaphi_smoothing</div><div class="line"><a name="l01008"></a><span class="lineno"> 1008</span>&#160;    SetVariable sv_norm_thetaphi_smoothing, help={<span class="stringliteral">&quot;smoothing parameter (depends on the normalization method).&quot;</span>}</div><div class="line"><a name="l01009"></a><span class="lineno"> 1009</span>&#160;    Button b_norm_thetaphi_check, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a89caab501e8f15262d6e4f2fa5b4a1bd">bp_norm_thetaphi_check</a>, title=<span class="stringliteral">&quot;check&quot;</span></div><div class="line"><a name="l01010"></a><span class="lineno"> 1010</span>&#160;    Button b_norm_thetaphi_check, help={<span class="stringliteral">&quot;show a graph of the normalization function&quot;</span>}</div><div class="line"><a name="l01011"></a><span class="lineno"> 1011</span>&#160;    Button b_norm_thetaphi_preview, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#aaa3478a3b0f26b12a12196cfaa87a8ae">bp_norm_thetaphi_preview</a>, title=<span class="stringliteral">&quot;preview&quot;</span></div><div class="line"><a name="l01012"></a><span class="lineno"> 1012</span>&#160;    Button b_norm_thetaphi_preview, help={<span class="stringliteral">&quot;show a preview of the normalized dataset (without other normalizations).&quot;</span>}</div><div class="line"><a name="l01013"></a><span class="lineno"> 1013</span>&#160;</div><div class="line"><a name="l01014"></a><span class="lineno"> 1014</span>&#160;    GroupBox gb_output, title=<span class="stringliteral">&quot;output&quot;</span></div><div class="line"><a name="l01015"></a><span class="lineno"> 1015</span>&#160;    SetVariable sv_output_folding, size={95,16}, bodyWidth=60, title=<span class="stringliteral">&quot;folding&quot;</span></div><div class="line"><a name="l01016"></a><span class="lineno"> 1016</span>&#160;    SetVariable sv_output_folding, limits={1,20,1}, value= root:packages:pearl_anglescan_panel:output_folding</div><div class="line"><a name="l01017"></a><span class="lineno"> 1017</span>&#160;    SetVariable sv_output_folding, help={<span class="stringliteral">&quot;n-fold rotational average. 1=no averaging.&quot;</span>}</div><div class="line"><a name="l01018"></a><span class="lineno"> 1018</span>&#160;    SetVariable sv_output_horizon, size={98,16}, bodyWidth=60, title=<span class="stringliteral">&quot;horizon&quot;</span></div><div class="line"><a name="l01019"></a><span class="lineno"> 1019</span>&#160;    SetVariable sv_output_horizon, limits={1,90,1}, value= root:packages:pearl_anglescan_panel:output_horizon</div><div class="line"><a name="l01020"></a><span class="lineno"> 1020</span>&#160;    SetVariable sv_output_horizon, help={<span class="stringliteral">&quot;highest theta to display&quot;</span>}</div><div class="line"><a name="l01021"></a><span class="lineno"> 1021</span>&#160;    PopupMenu pm_graph_projection, size={149,21}, bodyWidth=100, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#af83bfcf48723e7f6eeb78b4e0d84277d">pmp_graph_projection</a>, title=<span class="stringliteral">&quot;projection&quot;</span></div><div class="line"><a name="l01022"></a><span class="lineno"> 1022</span>&#160;    PopupMenu pm_graph_projection, mode=2, popvalue=<span class="stringliteral">&quot;stereographic&quot;</span>, value= #<span class="stringliteral">&quot;\&quot;equidistant;stereographic;equal area;gnomonic;orthographic;\&quot;&quot;</span></div><div class="line"><a name="l01023"></a><span class="lineno"> 1023</span>&#160;    PopupMenu pm_graph_projection, help={<span class="stringliteral">&quot;projection (theta mapping) mode&quot;</span>}</div><div class="line"><a name="l01024"></a><span class="lineno"> 1024</span>&#160;    PopupMenu pm_graph_mode, size={129,21}, bodyWidth=100, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a1b41c992729d627445dbba0637b31ece">pmp_graph_mode</a>,title=<span class="stringliteral">&quot;mode&quot;</span></div><div class="line"><a name="l01025"></a><span class="lineno"> 1025</span>&#160;    PopupMenu pm_graph_mode, mode=2, popvalue=<span class="stringliteral">&quot;dots&quot;</span>, value= #<span class="stringliteral">&quot;\&quot;none;dots;none;image;\&quot;&quot;</span></div><div class="line"><a name="l01026"></a><span class="lineno"> 1026</span>&#160;    PopupMenu pm_graph_mode, help={<span class="stringliteral">&quot;graph type: dots = coloured dots on circles; image = interpolated matrix&quot;</span>}</div><div class="line"><a name="l01027"></a><span class="lineno"> 1027</span>&#160;    Button b_output_calc, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#adefddc5f384948c9dab3ee65b4a0668a">bp_output_calc</a>, title=<span class="stringliteral">&quot;calc + display&quot;</span></div><div class="line"><a name="l01028"></a><span class="lineno"> 1028</span>&#160;    Button b_output_calc, help={<span class="stringliteral">&quot;execute data processing with the enabled filters and display the diffractogram.&quot;</span>}</div><div class="line"><a name="l01029"></a><span class="lineno"> 1029</span>&#160;    Button b_output_duplicate, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#ae838bde232c45d81f88303e91b16326b">bp_output_duplicate</a>, title=<span class="stringliteral">&quot;duplicate ...&quot;</span></div><div class="line"><a name="l01030"></a><span class="lineno"> 1030</span>&#160;    Button b_output_duplicate, help={<span class="stringliteral">&quot;copy the result to an arbitrary data folder.&quot;</span>}</div><div class="line"><a name="l01031"></a><span class="lineno"> 1031</span>&#160;    Button b_output_itx, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a0bdc14f90bdc40045200ac23229b225d">bp_output_itx</a>, title=<span class="stringliteral">&quot;save ITX ...&quot;</span></div><div class="line"><a name="l01032"></a><span class="lineno"> 1032</span>&#160;    Button b_output_itx, help={<span class="stringliteral">&quot;save the result to an igor text file (itx).&quot;</span>}</div><div class="line"><a name="l01033"></a><span class="lineno"> 1033</span>&#160;    Button b_output_etpi, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a16d2f6a58fedc370d7901126bb814bbb">bp_output_etpi</a>, title=<span class="stringliteral">&quot;save ETPI ...&quot;</span></div><div class="line"><a name="l01034"></a><span class="lineno"> 1034</span>&#160;    Button b_output_etpi, help={<span class="stringliteral">&quot;save the result to a pmsco angle scan file (etpi).&quot;</span>}</div><div class="line"><a name="l01035"></a><span class="lineno"> 1035</span>&#160;</div><div class="line"><a name="l01036"></a><span class="lineno"> 1036</span>&#160;    GroupBox gb_graph, title=<span class="stringliteral">&quot;graph&quot;</span></div><div class="line"><a name="l01037"></a><span class="lineno"> 1037</span>&#160;    PopupMenu pm_graph_colortable, size={152,21}, bodyWidth=100, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#ac80c675f6f1a5505e9b6f0349ff5fe92">pmp_graph_colortable</a>, title=<span class="stringliteral">&quot;color table&quot;</span></div><div class="line"><a name="l01038"></a><span class="lineno"> 1038</span>&#160;    PopupMenu pm_graph_colortable, mode=0, value= #<span class="stringliteral">&quot;\&quot;*COLORTABLEPOPNONAMES*\&quot;&quot;</span></div><div class="line"><a name="l01039"></a><span class="lineno"> 1039</span>&#160;    PopupMenu pm_graph_colortable, help={<span class="stringliteral">&quot;color table to use in pseudocolor graphs.&quot;</span>}</div><div class="line"><a name="l01040"></a><span class="lineno"> 1040</span>&#160;    SetVariable sv_graph_contrast, size={119,16}, bodyWidth=60, title=<span class="stringliteral">&quot;contrast (%)&quot;</span></div><div class="line"><a name="l01041"></a><span class="lineno"> 1041</span>&#160;    SetVariable sv_graph_contrast, limits={0,25,1}, value= root:packages:pearl_anglescan_panel:graph_contrast</div><div class="line"><a name="l01042"></a><span class="lineno"> 1042</span>&#160;    SetVariable sv_graph_contrast, help={<span class="stringliteral">&quot;contrast value (percentile).&quot;</span>}</div><div class="line"><a name="l01043"></a><span class="lineno"> 1043</span>&#160;    Button b_graph_update, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a940f2115fb5b47e19516168d15346472">bp_graph_update</a>, title=<span class="stringliteral">&quot;update&quot;</span></div><div class="line"><a name="l01044"></a><span class="lineno"> 1044</span>&#160;    Button b_graph_update, help={<span class="stringliteral">&quot;update the existing graph.&quot;</span>}</div><div class="line"><a name="l01045"></a><span class="lineno"> 1045</span>&#160;    Button b_graph_png, size={80,20}, proc=<a class="code" href="namespace_pearl_anglescan_panel.html">PearlAnglescanPanel</a>#<a class="code" href="pearl-anglescan-panel_8ipf.html#a9be861636d98d7891e6d106deac2f90b">bp_graph_png</a>, title=<span class="stringliteral">&quot;save PNG ...&quot;</span></div><div class="line"><a name="l01046"></a><span class="lineno"> 1046</span>&#160;    Button b_graph_png, help={<span class="stringliteral">&quot;save the graph in png format.&quot;</span>}</div><div class="line"><a name="l01047"></a><span class="lineno"> 1047</span>&#160;</div><div class="line"><a name="l01048"></a><span class="lineno"> 1048</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a65dbeab54647d7c27a139035d69c812f">arrange_controls</a>()</div><div class="line"><a name="l01049"></a><span class="lineno"> 1049</span>&#160;    <a class="code" href="pearl-anglescan-panel_8ipf.html#a7ddecbeeaee3f9da87ac1ecdc26f530b">update_menus</a>()</div><div class="line"><a name="l01050"></a><span class="lineno"> 1050</span>&#160;end</div><div class="line"><a name="l01051"></a><span class="lineno"> 1051</span>&#160;</div><div class="line"><a name="l01052"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a65dbeab54647d7c27a139035d69c812f"> 1052</a></span>&#160;<span class="keyword">static</span> <span class="keyword">function</span> <a class="code" href="pearl-anglescan-panel_8ipf.html#a65dbeab54647d7c27a139035d69c812f">arrange_controls</a>()</div><div class="line"><a name="l01053"></a><span class="lineno"> 1053</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01054"></a><span class="lineno"> 1054</span>&#160;    svar /sdfr=df panel_name</div><div class="line"><a name="l01055"></a><span class="lineno"> 1055</span>&#160;</div><div class="line"><a name="l01056"></a><span class="lineno"> 1056</span>&#160;    variable gb_space = 2</div><div class="line"><a name="l01057"></a><span class="lineno"> 1057</span>&#160;    variable gb_internal_top = 16</div><div class="line"><a name="l01058"></a><span class="lineno"> 1058</span>&#160;    variable gb_internal_bot = 4</div><div class="line"><a name="l01059"></a><span class="lineno"> 1059</span>&#160;    variable line_space = 22</div><div class="line"><a name="l01060"></a><span class="lineno"> 1060</span>&#160;    </div><div class="line"><a name="l01061"></a><span class="lineno"> 1061</span>&#160;    variable cb_adj = 2</div><div class="line"><a name="l01062"></a><span class="lineno"> 1062</span>&#160;    variable sv_adj = 2</div><div class="line"><a name="l01063"></a><span class="lineno"> 1063</span>&#160;    variable pm_adj = 0</div><div class="line"><a name="l01064"></a><span class="lineno"> 1064</span>&#160;    variable b_adj = 0</div><div class="line"><a name="l01065"></a><span class="lineno"> 1065</span>&#160;    variable tb_adj = 0</div><div class="line"><a name="l01066"></a><span class="lineno"> 1066</span>&#160;    </div><div class="line"><a name="l01067"></a><span class="lineno"> 1067</span>&#160;    variable gb_top = 4</div><div class="line"><a name="l01068"></a><span class="lineno"> 1068</span>&#160;    variable gb_ht = 0</div><div class="line"><a name="l01069"></a><span class="lineno"> 1069</span>&#160;</div><div class="line"><a name="l01070"></a><span class="lineno"> 1070</span>&#160;    <span class="comment">// ht = line + 30</span></div><div class="line"><a name="l01071"></a><span class="lineno"> 1071</span>&#160;    <span class="comment">// gb = gb + ht + 2</span></div><div class="line"><a name="l01072"></a><span class="lineno"> 1072</span>&#160;    <span class="comment">// cb = gb + 18</span></div><div class="line"><a name="l01073"></a><span class="lineno"> 1073</span>&#160;    <span class="comment">// pm = gb + 38</span></div><div class="line"><a name="l01074"></a><span class="lineno"> 1074</span>&#160;    <span class="comment">// line += 26</span></div><div class="line"><a name="l01075"></a><span class="lineno"> 1075</span>&#160;    <span class="comment">// sv = line + 2</span></div><div class="line"><a name="l01076"></a><span class="lineno"> 1076</span>&#160;</div><div class="line"><a name="l01077"></a><span class="lineno"> 1077</span>&#160;    GroupBox gb_source,pos={4,gb_top}</div><div class="line"><a name="l01078"></a><span class="lineno"> 1078</span>&#160;    gb_ht = gb_internal_top</div><div class="line"><a name="l01079"></a><span class="lineno"> 1079</span>&#160;    Button b_source_select,pos={17, gb_top + gb_ht + b_adj},size={50,20}</div><div class="line"><a name="l01080"></a><span class="lineno"> 1080</span>&#160;    Button b_source_update, pos={67, gb_top + gb_ht + b_adj},size={50,20}</div><div class="line"><a name="l01081"></a><span class="lineno"> 1081</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01082"></a><span class="lineno"> 1082</span>&#160;    TitleBox tb_source_path,pos={18, gb_top + gb_ht + tb_adj},size={240,21}</div><div class="line"><a name="l01083"></a><span class="lineno"> 1083</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01084"></a><span class="lineno"> 1084</span>&#160;    gb_ht += gb_internal_bot</div><div class="line"><a name="l01085"></a><span class="lineno"> 1085</span>&#160;    GroupBox gb_source, size={272,gb_ht}</div><div class="line"><a name="l01086"></a><span class="lineno"> 1086</span>&#160;</div><div class="line"><a name="l01087"></a><span class="lineno"> 1087</span>&#160;    gb_top += gb_ht + gb_space</div><div class="line"><a name="l01088"></a><span class="lineno"> 1088</span>&#160;    GroupBox gb_offsets,pos={4,gb_top}</div><div class="line"><a name="l01089"></a><span class="lineno"> 1089</span>&#160;    gb_ht = gb_internal_top</div><div class="line"><a name="l01090"></a><span class="lineno"> 1090</span>&#160;    SetVariable sv_theta_offset,pos={46, gb_top + gb_ht + sv_adj},size={88,16}</div><div class="line"><a name="l01091"></a><span class="lineno"> 1091</span>&#160;    Button b_save_prefs,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01092"></a><span class="lineno"> 1092</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01093"></a><span class="lineno"> 1093</span>&#160;    SetVariable sv_tilt_offset,pos={60, gb_top + gb_ht + sv_adj},size={74,16}</div><div class="line"><a name="l01094"></a><span class="lineno"> 1094</span>&#160;    Button b_load_prefs,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01095"></a><span class="lineno"> 1095</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01096"></a><span class="lineno"> 1096</span>&#160;    SetVariable sv_phi_offset,pos={56, gb_top + gb_ht + sv_adj},size={78,16}</div><div class="line"><a name="l01097"></a><span class="lineno"> 1097</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01098"></a><span class="lineno"> 1098</span>&#160;    SetVariable sv_alpha_offset,pos={44, gb_top + gb_ht + sv_adj},size={90,16}</div><div class="line"><a name="l01099"></a><span class="lineno"> 1099</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01100"></a><span class="lineno"> 1100</span>&#160;    gb_ht += gb_internal_bot</div><div class="line"><a name="l01101"></a><span class="lineno"> 1101</span>&#160;    GroupBox gb_offsets, size={272,gb_ht}</div><div class="line"><a name="l01102"></a><span class="lineno"> 1102</span>&#160;</div><div class="line"><a name="l01103"></a><span class="lineno"> 1103</span>&#160;    gb_top += gb_ht + gb_space</div><div class="line"><a name="l01104"></a><span class="lineno"> 1104</span>&#160;    GroupBox gb_crop,pos={4,gb_top}</div><div class="line"><a name="l01105"></a><span class="lineno"> 1105</span>&#160;    gb_ht = gb_internal_top</div><div class="line"><a name="l01106"></a><span class="lineno"> 1106</span>&#160;    CheckBox cb_crop_enable,pos={73, gb_top + gb_ht + cb_adj},size={50,14}</div><div class="line"><a name="l01107"></a><span class="lineno"> 1107</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01108"></a><span class="lineno"> 1108</span>&#160;    SetVariable sv_crop_alpha, pos={44, gb_top + gb_ht + sv_adj}, size={90,16}</div><div class="line"><a name="l01109"></a><span class="lineno"> 1109</span>&#160;    Button b_crop_preview,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01110"></a><span class="lineno"> 1110</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01111"></a><span class="lineno"> 1111</span>&#160;    SetVariable sv_crop_theta, pos={44, gb_top + gb_ht + sv_adj}, size={90,16}</div><div class="line"><a name="l01112"></a><span class="lineno"> 1112</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01113"></a><span class="lineno"> 1113</span>&#160;    SetVariable sv_crop_rows, pos={44, gb_top + gb_ht + sv_adj}, size={190,16}</div><div class="line"><a name="l01114"></a><span class="lineno"> 1114</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01115"></a><span class="lineno"> 1115</span>&#160;    gb_ht += gb_internal_bot</div><div class="line"><a name="l01116"></a><span class="lineno"> 1116</span>&#160;    GroupBox gb_crop, size={272,gb_ht}</div><div class="line"><a name="l01117"></a><span class="lineno"> 1117</span>&#160;</div><div class="line"><a name="l01118"></a><span class="lineno"> 1118</span>&#160;    gb_top += gb_ht + gb_space</div><div class="line"><a name="l01119"></a><span class="lineno"> 1119</span>&#160;    GroupBox gb_norm_alpha,pos={4,gb_top}</div><div class="line"><a name="l01120"></a><span class="lineno"> 1120</span>&#160;    gb_ht = gb_internal_top</div><div class="line"><a name="l01121"></a><span class="lineno"> 1121</span>&#160;    CheckBox cb_norm_alpha_enable,pos={73, gb_top + gb_ht + cb_adj},size={50,14}</div><div class="line"><a name="l01122"></a><span class="lineno"> 1122</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01123"></a><span class="lineno"> 1123</span>&#160;    PopupMenu pm_norm_alpha_mode,pos={36, gb_top + gb_ht + pm_adj},size={138,21}</div><div class="line"><a name="l01124"></a><span class="lineno"> 1124</span>&#160;    Button b_norm_alpha_check,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01125"></a><span class="lineno"> 1125</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01126"></a><span class="lineno"> 1126</span>&#160;    SetVariable sv_norm_alpha_smoothing,pos={22, gb_top + gb_ht + sv_adj},size={112,16}</div><div class="line"><a name="l01127"></a><span class="lineno"> 1127</span>&#160;    Button b_norm_alpha_preview,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01128"></a><span class="lineno"> 1128</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01129"></a><span class="lineno"> 1129</span>&#160;    gb_ht += gb_internal_bot</div><div class="line"><a name="l01130"></a><span class="lineno"> 1130</span>&#160;    GroupBox gb_norm_alpha, size={272,gb_ht}</div><div class="line"><a name="l01131"></a><span class="lineno"> 1131</span>&#160;</div><div class="line"><a name="l01132"></a><span class="lineno"> 1132</span>&#160;    gb_top += gb_ht + gb_space</div><div class="line"><a name="l01133"></a><span class="lineno"> 1133</span>&#160;    GroupBox gb_norm_phi,pos={4,gb_top}</div><div class="line"><a name="l01134"></a><span class="lineno"> 1134</span>&#160;    gb_ht = gb_internal_top</div><div class="line"><a name="l01135"></a><span class="lineno"> 1135</span>&#160;    CheckBox cb_norm_phi_enable,pos={73, gb_top + gb_ht + cb_adj},size={50,14}</div><div class="line"><a name="l01136"></a><span class="lineno"> 1136</span>&#160;    Button b_norm_phi_check,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01137"></a><span class="lineno"> 1137</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01138"></a><span class="lineno"> 1138</span>&#160;    SetVariable sv_norm_phi_range,pos={15, gb_top + gb_ht + sv_adj},size={118,16}</div><div class="line"><a name="l01139"></a><span class="lineno"> 1139</span>&#160;    Button b_norm_phi_preview,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01140"></a><span class="lineno"> 1140</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01141"></a><span class="lineno"> 1141</span>&#160;    gb_ht += gb_internal_bot</div><div class="line"><a name="l01142"></a><span class="lineno"> 1142</span>&#160;    GroupBox gb_norm_phi, size={272,gb_ht}</div><div class="line"><a name="l01143"></a><span class="lineno"> 1143</span>&#160;</div><div class="line"><a name="l01144"></a><span class="lineno"> 1144</span>&#160;    gb_top += gb_ht + gb_space</div><div class="line"><a name="l01145"></a><span class="lineno"> 1145</span>&#160;    GroupBox gb_norm_theta,pos={4,gb_top}</div><div class="line"><a name="l01146"></a><span class="lineno"> 1146</span>&#160;    gb_ht = gb_internal_top</div><div class="line"><a name="l01147"></a><span class="lineno"> 1147</span>&#160;    CheckBox cb_norm_theta_enable,pos={73, gb_top + gb_ht + cb_adj},size={50,14}</div><div class="line"><a name="l01148"></a><span class="lineno"> 1148</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01149"></a><span class="lineno"> 1149</span>&#160;    PopupMenu pm_norm_theta_domain, pos={35, gb_top + gb_ht + pm_adj}, size={138,21}</div><div class="line"><a name="l01150"></a><span class="lineno"> 1150</span>&#160;    Button b_norm_theta_check,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01151"></a><span class="lineno"> 1151</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01152"></a><span class="lineno"> 1152</span>&#160;    PopupMenu pm_norm_theta_mode,pos={35, gb_top + gb_ht + pm_adj},size={138,21}</div><div class="line"><a name="l01153"></a><span class="lineno"> 1153</span>&#160;    Button b_norm_theta_preview,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01154"></a><span class="lineno"> 1154</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01155"></a><span class="lineno"> 1155</span>&#160;    SetVariable sv_norm_theta_smoothing,pos={21, gb_top + gb_ht + sv_adj},size={112,16}</div><div class="line"><a name="l01156"></a><span class="lineno"> 1156</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01157"></a><span class="lineno"> 1157</span>&#160;    gb_ht += gb_internal_bot</div><div class="line"><a name="l01158"></a><span class="lineno"> 1158</span>&#160;    GroupBox gb_norm_theta, size={272,gb_ht}</div><div class="line"><a name="l01159"></a><span class="lineno"> 1159</span>&#160;</div><div class="line"><a name="l01160"></a><span class="lineno"> 1160</span>&#160;    gb_top += gb_ht + gb_space</div><div class="line"><a name="l01161"></a><span class="lineno"> 1161</span>&#160;    GroupBox gb_norm_thetaphi,pos={4,gb_top}</div><div class="line"><a name="l01162"></a><span class="lineno"> 1162</span>&#160;    gb_ht = gb_internal_top</div><div class="line"><a name="l01163"></a><span class="lineno"> 1163</span>&#160;    CheckBox cb_norm_thetaphi_enable,pos={73, gb_top + gb_ht + cb_adj},size={50,14}</div><div class="line"><a name="l01164"></a><span class="lineno"> 1164</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01165"></a><span class="lineno"> 1165</span>&#160;    PopupMenu pm_norm_thetaphi_mode,pos={35, gb_top + gb_ht + pm_adj},size={138,21}</div><div class="line"><a name="l01166"></a><span class="lineno"> 1166</span>&#160;    Button b_norm_thetaphi_check,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01167"></a><span class="lineno"> 1167</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01168"></a><span class="lineno"> 1168</span>&#160;    SetVariable sv_norm_thetaphi_smoothing,pos={21, gb_top + gb_ht + sv_adj},size={112,16}</div><div class="line"><a name="l01169"></a><span class="lineno"> 1169</span>&#160;    Button b_norm_thetaphi_preview,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01170"></a><span class="lineno"> 1170</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01171"></a><span class="lineno"> 1171</span>&#160;    gb_ht += gb_internal_bot</div><div class="line"><a name="l01172"></a><span class="lineno"> 1172</span>&#160;    GroupBox gb_norm_thetaphi, size={272,gb_ht}</div><div class="line"><a name="l01173"></a><span class="lineno"> 1173</span>&#160;</div><div class="line"><a name="l01174"></a><span class="lineno"> 1174</span>&#160;    gb_top += gb_ht + gb_space</div><div class="line"><a name="l01175"></a><span class="lineno"> 1175</span>&#160;    GroupBox gb_output,pos={4,gb_top}</div><div class="line"><a name="l01176"></a><span class="lineno"> 1176</span>&#160;    gb_ht = gb_internal_top</div><div class="line"><a name="l01177"></a><span class="lineno"> 1177</span>&#160;    SetVariable sv_output_folding,pos={38, gb_top + gb_ht + sv_adj},size={95,16}</div><div class="line"><a name="l01178"></a><span class="lineno"> 1178</span>&#160;    Button b_output_calc,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01179"></a><span class="lineno"> 1179</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01180"></a><span class="lineno"> 1180</span>&#160;    SetVariable sv_output_horizon,pos={35, gb_top + gb_ht + sv_adj},size={98,16}</div><div class="line"><a name="l01181"></a><span class="lineno"> 1181</span>&#160;    Button b_output_duplicate,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01182"></a><span class="lineno"> 1182</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01183"></a><span class="lineno"> 1183</span>&#160;    PopupMenu pm_graph_projection,pos={24, gb_top + gb_ht + pm_adj},size={149,21}</div><div class="line"><a name="l01184"></a><span class="lineno"> 1184</span>&#160;    Button b_output_itx,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01185"></a><span class="lineno"> 1185</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01186"></a><span class="lineno"> 1186</span>&#160;    PopupMenu pm_graph_mode,pos={44, gb_top + gb_ht + pm_adj},size={129,21}</div><div class="line"><a name="l01187"></a><span class="lineno"> 1187</span>&#160;    Button b_output_etpi,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01188"></a><span class="lineno"> 1188</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01189"></a><span class="lineno"> 1189</span>&#160;    gb_ht += gb_internal_bot</div><div class="line"><a name="l01190"></a><span class="lineno"> 1190</span>&#160;    GroupBox gb_output, size={272,gb_ht}</div><div class="line"><a name="l01191"></a><span class="lineno"> 1191</span>&#160;</div><div class="line"><a name="l01192"></a><span class="lineno"> 1192</span>&#160;    gb_top += gb_ht + gb_space</div><div class="line"><a name="l01193"></a><span class="lineno"> 1193</span>&#160;    GroupBox gb_graph,pos={4,gb_top}</div><div class="line"><a name="l01194"></a><span class="lineno"> 1194</span>&#160;    gb_ht = gb_internal_top</div><div class="line"><a name="l01195"></a><span class="lineno"> 1195</span>&#160;    PopupMenu pm_graph_colortable,pos={21, gb_top + gb_ht + pm_adj},size={152,21}</div><div class="line"><a name="l01196"></a><span class="lineno"> 1196</span>&#160;    Button b_graph_update,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01197"></a><span class="lineno"> 1197</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01198"></a><span class="lineno"> 1198</span>&#160;    SetVariable sv_graph_contrast,pos={14, gb_top + gb_ht + sv_adj},size={119,16}</div><div class="line"><a name="l01199"></a><span class="lineno"> 1199</span>&#160;    Button b_graph_png,pos={186, gb_top + gb_ht + b_adj},size={80,20}</div><div class="line"><a name="l01200"></a><span class="lineno"> 1200</span>&#160;    gb_ht += line_space</div><div class="line"><a name="l01201"></a><span class="lineno"> 1201</span>&#160;    gb_ht += gb_internal_bot</div><div class="line"><a name="l01202"></a><span class="lineno"> 1202</span>&#160;    GroupBox gb_graph, size={272,gb_ht}</div><div class="line"><a name="l01203"></a><span class="lineno"> 1203</span>&#160;    </div><div class="line"><a name="l01204"></a><span class="lineno"> 1204</span>&#160;    gb_top += gb_ht + gb_space</div><div class="line"><a name="l01205"></a><span class="lineno"> 1205</span>&#160;    <span class="comment">//MoveWindow 200, 100, 479, 100 + gb_top</span></div><div class="line"><a name="l01206"></a><span class="lineno"> 1206</span>&#160;end</div><div class="line"><a name="l01207"></a><span class="lineno"> 1207</span>&#160;</div><div class="line"><a name="l01210"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a7ddecbeeaee3f9da87ac1ecdc26f530b"> 1210</a></span>&#160;<span class="keyword">static</span> <span class="keyword">function</span> <a class="code" href="pearl-anglescan-panel_8ipf.html#a7ddecbeeaee3f9da87ac1ecdc26f530b">update_menus</a>()</div><div class="line"><a name="l01211"></a><span class="lineno"> 1211</span>&#160;    dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01212"></a><span class="lineno"> 1212</span>&#160;    svar /sdfr=df panel_name</div><div class="line"><a name="l01213"></a><span class="lineno"> 1213</span>&#160;    if (wintype(panel_name) == 7)</div><div class="line"><a name="l01214"></a><span class="lineno"> 1214</span>&#160;        variable m</div><div class="line"><a name="l01215"></a><span class="lineno"> 1215</span>&#160;        nvar /sdfr=df norm_alpha_mode</div><div class="line"><a name="l01216"></a><span class="lineno"> 1216</span>&#160;        m = norm_alpha_mode + 1</div><div class="line"><a name="l01217"></a><span class="lineno"> 1217</span>&#160;        PopupMenu pm_norm_alpha_mode win=$panel_name, mode=m</div><div class="line"><a name="l01218"></a><span class="lineno"> 1218</span>&#160;        nvar /sdfr=df norm_theta_domain</div><div class="line"><a name="l01219"></a><span class="lineno"> 1219</span>&#160;        m = norm_theta_domain + 1</div><div class="line"><a name="l01220"></a><span class="lineno"> 1220</span>&#160;        PopupMenu pm_norm_theta_domain win=$panel_name, mode=m</div><div class="line"><a name="l01221"></a><span class="lineno"> 1221</span>&#160;        nvar /sdfr=df norm_theta_mode</div><div class="line"><a name="l01222"></a><span class="lineno"> 1222</span>&#160;        m = norm_theta_mode + 1</div><div class="line"><a name="l01223"></a><span class="lineno"> 1223</span>&#160;        PopupMenu pm_norm_theta_mode win=$panel_name, mode=m</div><div class="line"><a name="l01224"></a><span class="lineno"> 1224</span>&#160;        nvar /sdfr=df norm_thetaphi_mode</div><div class="line"><a name="l01225"></a><span class="lineno"> 1225</span>&#160;        m = norm_thetaphi_mode + 1</div><div class="line"><a name="l01226"></a><span class="lineno"> 1226</span>&#160;        PopupMenu pm_norm_thetaphi_mode win=$panel_name, mode=m</div><div class="line"><a name="l01227"></a><span class="lineno"> 1227</span>&#160;        nvar /sdfr=df graph_mode</div><div class="line"><a name="l01228"></a><span class="lineno"> 1228</span>&#160;        m = graph_mode + 1</div><div class="line"><a name="l01229"></a><span class="lineno"> 1229</span>&#160;        PopupMenu pm_graph_mode win=$panel_name, mode=m</div><div class="line"><a name="l01230"></a><span class="lineno"> 1230</span>&#160;        nvar /sdfr=df graph_projection</div><div class="line"><a name="l01231"></a><span class="lineno"> 1231</span>&#160;        m = graph_projection + 1</div><div class="line"><a name="l01232"></a><span class="lineno"> 1232</span>&#160;        PopupMenu pm_graph_projection win=$panel_name, mode=m</div><div class="line"><a name="l01233"></a><span class="lineno"> 1233</span>&#160;        svar /sdfr=df graph_colortable</div><div class="line"><a name="l01234"></a><span class="lineno"> 1234</span>&#160;        m = 1 + WhichListItem(graph_colortable, CTabList())</div><div class="line"><a name="l01235"></a><span class="lineno"> 1235</span>&#160;        PopupMenu pm_graph_colortable win=$panel_name, mode=m</div><div class="line"><a name="l01236"></a><span class="lineno"> 1236</span>&#160;    endif</div><div class="line"><a name="l01237"></a><span class="lineno"> 1237</span>&#160;end</div><div class="line"><a name="l01238"></a><span class="lineno"> 1238</span>&#160;</div><div class="line"><a name="l01239"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a1868754e64cb1448e564c0936e78574d"> 1239</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a1868754e64cb1448e564c0936e78574d">bp_load_prefs</a>(ba) : ButtonControl</div><div class="line"><a name="l01240"></a><span class="lineno"> 1240</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01241"></a><span class="lineno"> 1241</span>&#160;</div><div class="line"><a name="l01242"></a><span class="lineno"> 1242</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01243"></a><span class="lineno"> 1243</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01244"></a><span class="lineno"> 1244</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a92c27964d49ab8bcd7afc858ebe214a3">load_prefs</a>()</div><div class="line"><a name="l01245"></a><span class="lineno"> 1245</span>&#160;            break</div><div class="line"><a name="l01246"></a><span class="lineno"> 1246</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01247"></a><span class="lineno"> 1247</span>&#160;            break</div><div class="line"><a name="l01248"></a><span class="lineno"> 1248</span>&#160;    endswitch</div><div class="line"><a name="l01249"></a><span class="lineno"> 1249</span>&#160;</div><div class="line"><a name="l01250"></a><span class="lineno"> 1250</span>&#160;    return 0</div><div class="line"><a name="l01251"></a><span class="lineno"> 1251</span>&#160;End</div><div class="line"><a name="l01252"></a><span class="lineno"> 1252</span>&#160;</div><div class="line"><a name="l01253"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#ad8a01428a137278a31d4f1f4f9c634c5"> 1253</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#ad8a01428a137278a31d4f1f4f9c634c5">bp_save_prefs</a>(ba) : ButtonControl</div><div class="line"><a name="l01254"></a><span class="lineno"> 1254</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01255"></a><span class="lineno"> 1255</span>&#160;</div><div class="line"><a name="l01256"></a><span class="lineno"> 1256</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01257"></a><span class="lineno"> 1257</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01258"></a><span class="lineno"> 1258</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#ac729557a307bddd2f2ad298199976c01">save_prefs</a>()</div><div class="line"><a name="l01259"></a><span class="lineno"> 1259</span>&#160;            break</div><div class="line"><a name="l01260"></a><span class="lineno"> 1260</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01261"></a><span class="lineno"> 1261</span>&#160;            break</div><div class="line"><a name="l01262"></a><span class="lineno"> 1262</span>&#160;    endswitch</div><div class="line"><a name="l01263"></a><span class="lineno"> 1263</span>&#160;</div><div class="line"><a name="l01264"></a><span class="lineno"> 1264</span>&#160;    return 0</div><div class="line"><a name="l01265"></a><span class="lineno"> 1265</span>&#160;End</div><div class="line"><a name="l01266"></a><span class="lineno"> 1266</span>&#160;</div><div class="line"><a name="l01267"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a1e50019bc895a0787cb3f07d776e9463"> 1267</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a1e50019bc895a0787cb3f07d776e9463">bp_source_select</a>(ba) : ButtonControl</div><div class="line"><a name="l01268"></a><span class="lineno"> 1268</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01269"></a><span class="lineno"> 1269</span>&#160;</div><div class="line"><a name="l01270"></a><span class="lineno"> 1270</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01271"></a><span class="lineno"> 1271</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01272"></a><span class="lineno"> 1272</span>&#160;            dfref dfBefore = GetDataFolderDFR()</div><div class="line"><a name="l01273"></a><span class="lineno"> 1273</span>&#160;            Execute /q/z &quot;CreateBrowser prompt=\&quot;Select 2D holo scan wave\&quot;, showWaves=1, showVars=0, showStrs=0&quot;</div><div class="line"><a name="l01274"></a><span class="lineno"> 1274</span>&#160;            dfref dfAfter = GetDataFolderDFR()</div><div class="line"><a name="l01275"></a><span class="lineno"> 1275</span>&#160;            SetDataFolder dfBefore</div><div class="line"><a name="l01276"></a><span class="lineno"> 1276</span>&#160;    </div><div class="line"><a name="l01277"></a><span class="lineno"> 1277</span>&#160;            SVAR list = S_BrowserList</div><div class="line"><a name="l01278"></a><span class="lineno"> 1278</span>&#160;            NVAR flag = V_Flag</div><div class="line"><a name="l01279"></a><span class="lineno"> 1279</span>&#160;            if ((flag != 0) &amp;&amp; (ItemsInList(list) &gt;= 1))</div><div class="line"><a name="l01280"></a><span class="lineno"> 1280</span>&#160;                <span class="keywordtype">string</span> wname = StringFromList(0, list)</div><div class="line"><a name="l01281"></a><span class="lineno"> 1281</span>&#160;                wave w = $wname</div><div class="line"><a name="l01282"></a><span class="lineno"> 1282</span>&#160;                <a class="code" href="pearl-anglescan-panel_8ipf.html#a21aab19fbcde395df6e1ea8654b3af9a">asp_import_raw</a>(w)</div><div class="line"><a name="l01283"></a><span class="lineno"> 1283</span>&#160;            endif</div><div class="line"><a name="l01284"></a><span class="lineno"> 1284</span>&#160;</div><div class="line"><a name="l01285"></a><span class="lineno"> 1285</span>&#160;            break</div><div class="line"><a name="l01286"></a><span class="lineno"> 1286</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01287"></a><span class="lineno"> 1287</span>&#160;            break</div><div class="line"><a name="l01288"></a><span class="lineno"> 1288</span>&#160;    endswitch</div><div class="line"><a name="l01289"></a><span class="lineno"> 1289</span>&#160;</div><div class="line"><a name="l01290"></a><span class="lineno"> 1290</span>&#160;    return 0</div><div class="line"><a name="l01291"></a><span class="lineno"> 1291</span>&#160;End</div><div class="line"><a name="l01292"></a><span class="lineno"> 1292</span>&#160;</div><div class="line"><a name="l01293"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a7ab3962d1d9d50d6cd285d40d4a7ce50"> 1293</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a7ab3962d1d9d50d6cd285d40d4a7ce50">bp_source_update</a>(ba) : ButtonControl</div><div class="line"><a name="l01294"></a><span class="lineno"> 1294</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01295"></a><span class="lineno"> 1295</span>&#160;</div><div class="line"><a name="l01296"></a><span class="lineno"> 1296</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01297"></a><span class="lineno"> 1297</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01298"></a><span class="lineno"> 1298</span>&#160;            dfref packdf = $package_path</div><div class="line"><a name="l01299"></a><span class="lineno"> 1299</span>&#160;            svar /sdfr=packdf source_path</div><div class="line"><a name="l01300"></a><span class="lineno"> 1300</span>&#160;            wave /z w = $source_path</div><div class="line"><a name="l01301"></a><span class="lineno"> 1301</span>&#160;            if (waveexists(w))</div><div class="line"><a name="l01302"></a><span class="lineno"> 1302</span>&#160;                <a class="code" href="pearl-anglescan-panel_8ipf.html#a21aab19fbcde395df6e1ea8654b3af9a">asp_import_raw</a>(w)</div><div class="line"><a name="l01303"></a><span class="lineno"> 1303</span>&#160;            else</div><div class="line"><a name="l01304"></a><span class="lineno"> 1304</span>&#160;                DoAlert 0, &quot;can&#39;t find source data.&quot;</div><div class="line"><a name="l01305"></a><span class="lineno"> 1305</span>&#160;            endif</div><div class="line"><a name="l01306"></a><span class="lineno"> 1306</span>&#160;            break</div><div class="line"><a name="l01307"></a><span class="lineno"> 1307</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01308"></a><span class="lineno"> 1308</span>&#160;            break</div><div class="line"><a name="l01309"></a><span class="lineno"> 1309</span>&#160;    endswitch</div><div class="line"><a name="l01310"></a><span class="lineno"> 1310</span>&#160;</div><div class="line"><a name="l01311"></a><span class="lineno"> 1311</span>&#160;    return 0</div><div class="line"><a name="l01312"></a><span class="lineno"> 1312</span>&#160;End</div><div class="line"><a name="l01313"></a><span class="lineno"> 1313</span>&#160;</div><div class="line"><a name="l01314"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a630dfc775d45843c71c279bbb01d05a6"> 1314</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a630dfc775d45843c71c279bbb01d05a6">bp_norm_alpha_check</a>(ba) : ButtonControl</div><div class="line"><a name="l01315"></a><span class="lineno"> 1315</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01316"></a><span class="lineno"> 1316</span>&#160;</div><div class="line"><a name="l01317"></a><span class="lineno"> 1317</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01318"></a><span class="lineno"> 1318</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01319"></a><span class="lineno"> 1319</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#af5435ccaabba78f855b244929dc09ed0">check_norm_alpha</a>()</div><div class="line"><a name="l01320"></a><span class="lineno"> 1320</span>&#160;            break</div><div class="line"><a name="l01321"></a><span class="lineno"> 1321</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01322"></a><span class="lineno"> 1322</span>&#160;            break</div><div class="line"><a name="l01323"></a><span class="lineno"> 1323</span>&#160;    endswitch</div><div class="line"><a name="l01324"></a><span class="lineno"> 1324</span>&#160;</div><div class="line"><a name="l01325"></a><span class="lineno"> 1325</span>&#160;    return 0</div><div class="line"><a name="l01326"></a><span class="lineno"> 1326</span>&#160;End</div><div class="line"><a name="l01327"></a><span class="lineno"> 1327</span>&#160;</div><div class="line"><a name="l01328"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a0931ce925d2dae6a1bb7e4a65a8a2be7"> 1328</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a0931ce925d2dae6a1bb7e4a65a8a2be7">bp_norm_theta_check</a>(ba) : ButtonControl</div><div class="line"><a name="l01329"></a><span class="lineno"> 1329</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01330"></a><span class="lineno"> 1330</span>&#160;</div><div class="line"><a name="l01331"></a><span class="lineno"> 1331</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01332"></a><span class="lineno"> 1332</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01333"></a><span class="lineno"> 1333</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#addddc12e5b622a3d00756d724e5d05a9">check_norm_theta</a>()</div><div class="line"><a name="l01334"></a><span class="lineno"> 1334</span>&#160;            break</div><div class="line"><a name="l01335"></a><span class="lineno"> 1335</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01336"></a><span class="lineno"> 1336</span>&#160;            break</div><div class="line"><a name="l01337"></a><span class="lineno"> 1337</span>&#160;    endswitch</div><div class="line"><a name="l01338"></a><span class="lineno"> 1338</span>&#160;</div><div class="line"><a name="l01339"></a><span class="lineno"> 1339</span>&#160;    return 0</div><div class="line"><a name="l01340"></a><span class="lineno"> 1340</span>&#160;End</div><div class="line"><a name="l01341"></a><span class="lineno"> 1341</span>&#160;</div><div class="line"><a name="l01342"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#ae42eb7f46e5c1a1b5d334ebb5e94d2d3"> 1342</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#ae42eb7f46e5c1a1b5d334ebb5e94d2d3">bp_norm_phi_check</a>(ba) : ButtonControl</div><div class="line"><a name="l01343"></a><span class="lineno"> 1343</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01344"></a><span class="lineno"> 1344</span>&#160;</div><div class="line"><a name="l01345"></a><span class="lineno"> 1345</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01346"></a><span class="lineno"> 1346</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01347"></a><span class="lineno"> 1347</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a91d5343cc96730de12b535cb0bef9df2">check_norm_phi</a>()</div><div class="line"><a name="l01348"></a><span class="lineno"> 1348</span>&#160;            break</div><div class="line"><a name="l01349"></a><span class="lineno"> 1349</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01350"></a><span class="lineno"> 1350</span>&#160;            break</div><div class="line"><a name="l01351"></a><span class="lineno"> 1351</span>&#160;    endswitch</div><div class="line"><a name="l01352"></a><span class="lineno"> 1352</span>&#160;</div><div class="line"><a name="l01353"></a><span class="lineno"> 1353</span>&#160;    return 0</div><div class="line"><a name="l01354"></a><span class="lineno"> 1354</span>&#160;End</div><div class="line"><a name="l01355"></a><span class="lineno"> 1355</span>&#160;</div><div class="line"><a name="l01356"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a89caab501e8f15262d6e4f2fa5b4a1bd"> 1356</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a89caab501e8f15262d6e4f2fa5b4a1bd">bp_norm_thetaphi_check</a>(ba) : ButtonControl</div><div class="line"><a name="l01357"></a><span class="lineno"> 1357</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01358"></a><span class="lineno"> 1358</span>&#160;</div><div class="line"><a name="l01359"></a><span class="lineno"> 1359</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01360"></a><span class="lineno"> 1360</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01361"></a><span class="lineno"> 1361</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a4708e7385790d1a9f2d58c4d64a60653">check_norm_thetaphi</a>()</div><div class="line"><a name="l01362"></a><span class="lineno"> 1362</span>&#160;            break</div><div class="line"><a name="l01363"></a><span class="lineno"> 1363</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01364"></a><span class="lineno"> 1364</span>&#160;            break</div><div class="line"><a name="l01365"></a><span class="lineno"> 1365</span>&#160;    endswitch</div><div class="line"><a name="l01366"></a><span class="lineno"> 1366</span>&#160;</div><div class="line"><a name="l01367"></a><span class="lineno"> 1367</span>&#160;    return 0</div><div class="line"><a name="l01368"></a><span class="lineno"> 1368</span>&#160;End</div><div class="line"><a name="l01369"></a><span class="lineno"> 1369</span>&#160;</div><div class="line"><a name="l01370"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a57c666f93cb4310fadf13b1916eaf134"> 1370</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a57c666f93cb4310fadf13b1916eaf134">bp_crop_preview</a>(ba) : ButtonControl</div><div class="line"><a name="l01371"></a><span class="lineno"> 1371</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01372"></a><span class="lineno"> 1372</span>&#160;</div><div class="line"><a name="l01373"></a><span class="lineno"> 1373</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01374"></a><span class="lineno"> 1374</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01375"></a><span class="lineno"> 1375</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a2268cc96a879c1a055c1ff29c1b040ea">preview_crop</a>()</div><div class="line"><a name="l01376"></a><span class="lineno"> 1376</span>&#160;            break</div><div class="line"><a name="l01377"></a><span class="lineno"> 1377</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01378"></a><span class="lineno"> 1378</span>&#160;            break</div><div class="line"><a name="l01379"></a><span class="lineno"> 1379</span>&#160;    endswitch</div><div class="line"><a name="l01380"></a><span class="lineno"> 1380</span>&#160;</div><div class="line"><a name="l01381"></a><span class="lineno"> 1381</span>&#160;    return 0</div><div class="line"><a name="l01382"></a><span class="lineno"> 1382</span>&#160;End</div><div class="line"><a name="l01383"></a><span class="lineno"> 1383</span>&#160;</div><div class="line"><a name="l01384"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#aaaf3facc118f90a8f1b32948446899b3"> 1384</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#aaaf3facc118f90a8f1b32948446899b3">bp_norm_alpha_preview</a>(ba) : ButtonControl</div><div class="line"><a name="l01385"></a><span class="lineno"> 1385</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01386"></a><span class="lineno"> 1386</span>&#160;</div><div class="line"><a name="l01387"></a><span class="lineno"> 1387</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01388"></a><span class="lineno"> 1388</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01389"></a><span class="lineno"> 1389</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#ad355d06d3b57bb458bd62e6d6f1f2417">preview_norm_alpha</a>()</div><div class="line"><a name="l01390"></a><span class="lineno"> 1390</span>&#160;            break</div><div class="line"><a name="l01391"></a><span class="lineno"> 1391</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01392"></a><span class="lineno"> 1392</span>&#160;            break</div><div class="line"><a name="l01393"></a><span class="lineno"> 1393</span>&#160;    endswitch</div><div class="line"><a name="l01394"></a><span class="lineno"> 1394</span>&#160;</div><div class="line"><a name="l01395"></a><span class="lineno"> 1395</span>&#160;    return 0</div><div class="line"><a name="l01396"></a><span class="lineno"> 1396</span>&#160;End</div><div class="line"><a name="l01397"></a><span class="lineno"> 1397</span>&#160;</div><div class="line"><a name="l01398"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a740c8a80ab2fc0550a05cf3b032821d0"> 1398</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a740c8a80ab2fc0550a05cf3b032821d0">bp_norm_phi_preview</a>(ba) : ButtonControl</div><div class="line"><a name="l01399"></a><span class="lineno"> 1399</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01400"></a><span class="lineno"> 1400</span>&#160;</div><div class="line"><a name="l01401"></a><span class="lineno"> 1401</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01402"></a><span class="lineno"> 1402</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01403"></a><span class="lineno"> 1403</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a0c228ce2048827dc8161691ec5c425fc">preview_norm_phi</a>()</div><div class="line"><a name="l01404"></a><span class="lineno"> 1404</span>&#160;            break</div><div class="line"><a name="l01405"></a><span class="lineno"> 1405</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01406"></a><span class="lineno"> 1406</span>&#160;            break</div><div class="line"><a name="l01407"></a><span class="lineno"> 1407</span>&#160;    endswitch</div><div class="line"><a name="l01408"></a><span class="lineno"> 1408</span>&#160;</div><div class="line"><a name="l01409"></a><span class="lineno"> 1409</span>&#160;    return 0</div><div class="line"><a name="l01410"></a><span class="lineno"> 1410</span>&#160;End</div><div class="line"><a name="l01411"></a><span class="lineno"> 1411</span>&#160;</div><div class="line"><a name="l01412"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#af57abb0a7d41b800d33bb748f9fc5c38"> 1412</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#af57abb0a7d41b800d33bb748f9fc5c38">bp_norm_theta_preview</a>(ba) : ButtonControl</div><div class="line"><a name="l01413"></a><span class="lineno"> 1413</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01414"></a><span class="lineno"> 1414</span>&#160;</div><div class="line"><a name="l01415"></a><span class="lineno"> 1415</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01416"></a><span class="lineno"> 1416</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01417"></a><span class="lineno"> 1417</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#abe1237d8bf79a2ec3791ad9fe184bc3f">preview_norm_theta</a>()</div><div class="line"><a name="l01418"></a><span class="lineno"> 1418</span>&#160;            break</div><div class="line"><a name="l01419"></a><span class="lineno"> 1419</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01420"></a><span class="lineno"> 1420</span>&#160;            break</div><div class="line"><a name="l01421"></a><span class="lineno"> 1421</span>&#160;    endswitch</div><div class="line"><a name="l01422"></a><span class="lineno"> 1422</span>&#160;</div><div class="line"><a name="l01423"></a><span class="lineno"> 1423</span>&#160;    return 0</div><div class="line"><a name="l01424"></a><span class="lineno"> 1424</span>&#160;End</div><div class="line"><a name="l01425"></a><span class="lineno"> 1425</span>&#160;</div><div class="line"><a name="l01426"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#aaa3478a3b0f26b12a12196cfaa87a8ae"> 1426</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#aaa3478a3b0f26b12a12196cfaa87a8ae">bp_norm_thetaphi_preview</a>(ba) : ButtonControl</div><div class="line"><a name="l01427"></a><span class="lineno"> 1427</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01428"></a><span class="lineno"> 1428</span>&#160;</div><div class="line"><a name="l01429"></a><span class="lineno"> 1429</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01430"></a><span class="lineno"> 1430</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01431"></a><span class="lineno"> 1431</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a3e798e20a99a03a789dd7914612e4fd2">preview_norm_thetaphi</a>()</div><div class="line"><a name="l01432"></a><span class="lineno"> 1432</span>&#160;            break</div><div class="line"><a name="l01433"></a><span class="lineno"> 1433</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01434"></a><span class="lineno"> 1434</span>&#160;            break</div><div class="line"><a name="l01435"></a><span class="lineno"> 1435</span>&#160;    endswitch</div><div class="line"><a name="l01436"></a><span class="lineno"> 1436</span>&#160;</div><div class="line"><a name="l01437"></a><span class="lineno"> 1437</span>&#160;    return 0</div><div class="line"><a name="l01438"></a><span class="lineno"> 1438</span>&#160;End</div><div class="line"><a name="l01439"></a><span class="lineno"> 1439</span>&#160;</div><div class="line"><a name="l01440"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#adefddc5f384948c9dab3ee65b4a0668a"> 1440</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#adefddc5f384948c9dab3ee65b4a0668a">bp_output_calc</a>(ba) : ButtonControl</div><div class="line"><a name="l01441"></a><span class="lineno"> 1441</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01442"></a><span class="lineno"> 1442</span>&#160;</div><div class="line"><a name="l01443"></a><span class="lineno"> 1443</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01444"></a><span class="lineno"> 1444</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01445"></a><span class="lineno"> 1445</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#af21424ce00e4bac1ac990d2bb83d46dc">asp_calculate_output</a>()</div><div class="line"><a name="l01446"></a><span class="lineno"> 1446</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a8e540427fab71f879e84003c49c59f22">asp_display_output</a>()</div><div class="line"><a name="l01447"></a><span class="lineno"> 1447</span>&#160;            break</div><div class="line"><a name="l01448"></a><span class="lineno"> 1448</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01449"></a><span class="lineno"> 1449</span>&#160;            break</div><div class="line"><a name="l01450"></a><span class="lineno"> 1450</span>&#160;    endswitch</div><div class="line"><a name="l01451"></a><span class="lineno"> 1451</span>&#160;</div><div class="line"><a name="l01452"></a><span class="lineno"> 1452</span>&#160;    return 0</div><div class="line"><a name="l01453"></a><span class="lineno"> 1453</span>&#160;End</div><div class="line"><a name="l01454"></a><span class="lineno"> 1454</span>&#160;</div><div class="line"><a name="l01455"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#ae838bde232c45d81f88303e91b16326b"> 1455</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#ae838bde232c45d81f88303e91b16326b">bp_output_duplicate</a>(ba) : ButtonControl</div><div class="line"><a name="l01456"></a><span class="lineno"> 1456</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01457"></a><span class="lineno"> 1457</span>&#160;</div><div class="line"><a name="l01458"></a><span class="lineno"> 1458</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01459"></a><span class="lineno"> 1459</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01460"></a><span class="lineno"> 1460</span>&#160;            <span class="keywordtype">string</span> dest_folder</div><div class="line"><a name="l01461"></a><span class="lineno"> 1461</span>&#160;            variable do_graph = 1</div><div class="line"><a name="l01462"></a><span class="lineno"> 1462</span>&#160;            prompt dest_folder, &quot;destination folder name (relative to data source)&quot;</div><div class="line"><a name="l01463"></a><span class="lineno"> 1463</span>&#160;            prompt do_graph, &quot;duplicate graph (yes = 1, no = 0)&quot;</div><div class="line"><a name="l01464"></a><span class="lineno"> 1464</span>&#160;            doprompt &quot;duplicate&quot;, dest_folder, do_graph</div><div class="line"><a name="l01465"></a><span class="lineno"> 1465</span>&#160;            if (!v_flag)</div><div class="line"><a name="l01466"></a><span class="lineno"> 1466</span>&#160;                <a class="code" href="pearl-anglescan-panel_8ipf.html#adf7c5a4e7c66c3d6e13d01674b9cf47f">asp_duplicate_output</a>(dest_folder, do_graph=do_graph)</div><div class="line"><a name="l01467"></a><span class="lineno"> 1467</span>&#160;            endif</div><div class="line"><a name="l01468"></a><span class="lineno"> 1468</span>&#160;            break</div><div class="line"><a name="l01469"></a><span class="lineno"> 1469</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01470"></a><span class="lineno"> 1470</span>&#160;            break</div><div class="line"><a name="l01471"></a><span class="lineno"> 1471</span>&#160;    endswitch</div><div class="line"><a name="l01472"></a><span class="lineno"> 1472</span>&#160;</div><div class="line"><a name="l01473"></a><span class="lineno"> 1473</span>&#160;    return 0</div><div class="line"><a name="l01474"></a><span class="lineno"> 1474</span>&#160;End</div><div class="line"><a name="l01475"></a><span class="lineno"> 1475</span>&#160;</div><div class="line"><a name="l01476"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a16d2f6a58fedc370d7901126bb814bbb"> 1476</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a16d2f6a58fedc370d7901126bb814bbb">bp_output_etpi</a>(ba) : ButtonControl</div><div class="line"><a name="l01477"></a><span class="lineno"> 1477</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01478"></a><span class="lineno"> 1478</span>&#160;</div><div class="line"><a name="l01479"></a><span class="lineno"> 1479</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01480"></a><span class="lineno"> 1480</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01481"></a><span class="lineno"> 1481</span>&#160;            dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01482"></a><span class="lineno"> 1482</span>&#160;            wave /sdfr=df process_data</div><div class="line"><a name="l01483"></a><span class="lineno"> 1483</span>&#160;            variable ekin</div><div class="line"><a name="l01484"></a><span class="lineno"> 1484</span>&#160;            ekin = NumberByKey(&quot;KineticEnergy&quot;, note(process_data), &quot;=&quot;, &quot;\r&quot;)</div><div class="line"><a name="l01485"></a><span class="lineno"> 1485</span>&#160;            prompt ekin, &quot;kinetic energy&quot;</div><div class="line"><a name="l01486"></a><span class="lineno"> 1486</span>&#160;            doprompt &quot;save etpi&quot;, ekin</div><div class="line"><a name="l01487"></a><span class="lineno"> 1487</span>&#160;            if (!v_flag)</div><div class="line"><a name="l01488"></a><span class="lineno"> 1488</span>&#160;                <a class="code" href="pearl-anglescan-panel_8ipf.html#abb4d53822bc34bda0e38332c7777ebac">asp_save_output_etpi</a>(ekin)</div><div class="line"><a name="l01489"></a><span class="lineno"> 1489</span>&#160;            endif</div><div class="line"><a name="l01490"></a><span class="lineno"> 1490</span>&#160;            break</div><div class="line"><a name="l01491"></a><span class="lineno"> 1491</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01492"></a><span class="lineno"> 1492</span>&#160;            break</div><div class="line"><a name="l01493"></a><span class="lineno"> 1493</span>&#160;    endswitch</div><div class="line"><a name="l01494"></a><span class="lineno"> 1494</span>&#160;</div><div class="line"><a name="l01495"></a><span class="lineno"> 1495</span>&#160;    return 0</div><div class="line"><a name="l01496"></a><span class="lineno"> 1496</span>&#160;End</div><div class="line"><a name="l01497"></a><span class="lineno"> 1497</span>&#160;</div><div class="line"><a name="l01498"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a0bdc14f90bdc40045200ac23229b225d"> 1498</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a0bdc14f90bdc40045200ac23229b225d">bp_output_itx</a>(ba) : ButtonControl</div><div class="line"><a name="l01499"></a><span class="lineno"> 1499</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01500"></a><span class="lineno"> 1500</span>&#160;</div><div class="line"><a name="l01501"></a><span class="lineno"> 1501</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01502"></a><span class="lineno"> 1502</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01503"></a><span class="lineno"> 1503</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a0e0f10d125f1cdacffa3bff9b0854aa9">asp_save_output_itx</a>()</div><div class="line"><a name="l01504"></a><span class="lineno"> 1504</span>&#160;            break</div><div class="line"><a name="l01505"></a><span class="lineno"> 1505</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01506"></a><span class="lineno"> 1506</span>&#160;            break</div><div class="line"><a name="l01507"></a><span class="lineno"> 1507</span>&#160;    endswitch</div><div class="line"><a name="l01508"></a><span class="lineno"> 1508</span>&#160;</div><div class="line"><a name="l01509"></a><span class="lineno"> 1509</span>&#160;    return 0</div><div class="line"><a name="l01510"></a><span class="lineno"> 1510</span>&#160;End</div><div class="line"><a name="l01511"></a><span class="lineno"> 1511</span>&#160;</div><div class="line"><a name="l01512"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a940f2115fb5b47e19516168d15346472"> 1512</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a940f2115fb5b47e19516168d15346472">bp_graph_update</a>(ba) : ButtonControl</div><div class="line"><a name="l01513"></a><span class="lineno"> 1513</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01514"></a><span class="lineno"> 1514</span>&#160;</div><div class="line"><a name="l01515"></a><span class="lineno"> 1515</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01516"></a><span class="lineno"> 1516</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01517"></a><span class="lineno"> 1517</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a93dc5a029ae9831066e6ad133522ee88">asp_update_graph</a>()</div><div class="line"><a name="l01518"></a><span class="lineno"> 1518</span>&#160;            break</div><div class="line"><a name="l01519"></a><span class="lineno"> 1519</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01520"></a><span class="lineno"> 1520</span>&#160;            break</div><div class="line"><a name="l01521"></a><span class="lineno"> 1521</span>&#160;    endswitch</div><div class="line"><a name="l01522"></a><span class="lineno"> 1522</span>&#160;</div><div class="line"><a name="l01523"></a><span class="lineno"> 1523</span>&#160;    return 0</div><div class="line"><a name="l01524"></a><span class="lineno"> 1524</span>&#160;End</div><div class="line"><a name="l01525"></a><span class="lineno"> 1525</span>&#160;</div><div class="line"><a name="l01526"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a9be861636d98d7891e6d106deac2f90b"> 1526</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a9be861636d98d7891e6d106deac2f90b">bp_graph_png</a>(ba) : ButtonControl</div><div class="line"><a name="l01527"></a><span class="lineno"> 1527</span>&#160;    STRUCT WMButtonAction &amp;ba</div><div class="line"><a name="l01528"></a><span class="lineno"> 1528</span>&#160;</div><div class="line"><a name="l01529"></a><span class="lineno"> 1529</span>&#160;    switch( ba.eventCode )</div><div class="line"><a name="l01530"></a><span class="lineno"> 1530</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01531"></a><span class="lineno"> 1531</span>&#160;            dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01532"></a><span class="lineno"> 1532</span>&#160;            svar /sdfr=df source_path</div><div class="line"><a name="l01533"></a><span class="lineno"> 1533</span>&#160;            svar /sdfr=df output_graphname</div><div class="line"><a name="l01534"></a><span class="lineno"> 1534</span>&#160;            if (WinType(output_graphname) == 1)</div><div class="line"><a name="l01535"></a><span class="lineno"> 1535</span>&#160;                SavePICT /WIN=$output_graphname /E=-5 /B=144 /TRAN=0</div><div class="line"><a name="l01536"></a><span class="lineno"> 1536</span>&#160;            endif</div><div class="line"><a name="l01537"></a><span class="lineno"> 1537</span>&#160;            break</div><div class="line"><a name="l01538"></a><span class="lineno"> 1538</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01539"></a><span class="lineno"> 1539</span>&#160;            break</div><div class="line"><a name="l01540"></a><span class="lineno"> 1540</span>&#160;    endswitch</div><div class="line"><a name="l01541"></a><span class="lineno"> 1541</span>&#160;</div><div class="line"><a name="l01542"></a><span class="lineno"> 1542</span>&#160;    return 0</div><div class="line"><a name="l01543"></a><span class="lineno"> 1543</span>&#160;End</div><div class="line"><a name="l01544"></a><span class="lineno"> 1544</span>&#160;</div><div class="line"><a name="l01545"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#acc1028dcd046f441ceaac268ffac9af6"> 1545</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#acc1028dcd046f441ceaac268ffac9af6">pmp_norm_alpha_mode</a>(pa) : PopupMenuControl</div><div class="line"><a name="l01546"></a><span class="lineno"> 1546</span>&#160;    STRUCT WMPopupAction &amp;pa</div><div class="line"><a name="l01547"></a><span class="lineno"> 1547</span>&#160;</div><div class="line"><a name="l01548"></a><span class="lineno"> 1548</span>&#160;    switch( pa.eventCode )</div><div class="line"><a name="l01549"></a><span class="lineno"> 1549</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01550"></a><span class="lineno"> 1550</span>&#160;            dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01551"></a><span class="lineno"> 1551</span>&#160;            nvar /sdfr=df norm_alpha_mode</div><div class="line"><a name="l01552"></a><span class="lineno"> 1552</span>&#160;            norm_alpha_mode = pa.popNum - 1</div><div class="line"><a name="l01553"></a><span class="lineno"> 1553</span>&#160;            break</div><div class="line"><a name="l01554"></a><span class="lineno"> 1554</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01555"></a><span class="lineno"> 1555</span>&#160;            break</div><div class="line"><a name="l01556"></a><span class="lineno"> 1556</span>&#160;    endswitch</div><div class="line"><a name="l01557"></a><span class="lineno"> 1557</span>&#160;</div><div class="line"><a name="l01558"></a><span class="lineno"> 1558</span>&#160;    return 0</div><div class="line"><a name="l01559"></a><span class="lineno"> 1559</span>&#160;End</div><div class="line"><a name="l01560"></a><span class="lineno"> 1560</span>&#160;</div><div class="line"><a name="l01561"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a0153f4ed4892dd3b48276af190590e4f"> 1561</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a0153f4ed4892dd3b48276af190590e4f">pmp_norm_theta_domain</a>(pa) : PopupMenuControl</div><div class="line"><a name="l01562"></a><span class="lineno"> 1562</span>&#160;    STRUCT WMPopupAction &amp;pa</div><div class="line"><a name="l01563"></a><span class="lineno"> 1563</span>&#160;</div><div class="line"><a name="l01564"></a><span class="lineno"> 1564</span>&#160;    switch( pa.eventCode )</div><div class="line"><a name="l01565"></a><span class="lineno"> 1565</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01566"></a><span class="lineno"> 1566</span>&#160;            dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01567"></a><span class="lineno"> 1567</span>&#160;            nvar /sdfr=df norm_theta_domain</div><div class="line"><a name="l01568"></a><span class="lineno"> 1568</span>&#160;            norm_theta_domain = pa.popNum - 1</div><div class="line"><a name="l01569"></a><span class="lineno"> 1569</span>&#160;            break</div><div class="line"><a name="l01570"></a><span class="lineno"> 1570</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01571"></a><span class="lineno"> 1571</span>&#160;            break</div><div class="line"><a name="l01572"></a><span class="lineno"> 1572</span>&#160;    endswitch</div><div class="line"><a name="l01573"></a><span class="lineno"> 1573</span>&#160;</div><div class="line"><a name="l01574"></a><span class="lineno"> 1574</span>&#160;    return 0</div><div class="line"><a name="l01575"></a><span class="lineno"> 1575</span>&#160;End</div><div class="line"><a name="l01576"></a><span class="lineno"> 1576</span>&#160;</div><div class="line"><a name="l01577"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#ae68496dbe344dc8a2c7c99b2d3f4b01c"> 1577</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#ae68496dbe344dc8a2c7c99b2d3f4b01c">pmp_norm_theta_mode</a>(pa) : PopupMenuControl</div><div class="line"><a name="l01578"></a><span class="lineno"> 1578</span>&#160;    STRUCT WMPopupAction &amp;pa</div><div class="line"><a name="l01579"></a><span class="lineno"> 1579</span>&#160;</div><div class="line"><a name="l01580"></a><span class="lineno"> 1580</span>&#160;    switch( pa.eventCode )</div><div class="line"><a name="l01581"></a><span class="lineno"> 1581</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01582"></a><span class="lineno"> 1582</span>&#160;            dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01583"></a><span class="lineno"> 1583</span>&#160;            nvar /sdfr=df norm_theta_mode</div><div class="line"><a name="l01584"></a><span class="lineno"> 1584</span>&#160;            norm_theta_mode = pa.popNum - 1</div><div class="line"><a name="l01585"></a><span class="lineno"> 1585</span>&#160;            break</div><div class="line"><a name="l01586"></a><span class="lineno"> 1586</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01587"></a><span class="lineno"> 1587</span>&#160;            break</div><div class="line"><a name="l01588"></a><span class="lineno"> 1588</span>&#160;    endswitch</div><div class="line"><a name="l01589"></a><span class="lineno"> 1589</span>&#160;</div><div class="line"><a name="l01590"></a><span class="lineno"> 1590</span>&#160;    return 0</div><div class="line"><a name="l01591"></a><span class="lineno"> 1591</span>&#160;End</div><div class="line"><a name="l01592"></a><span class="lineno"> 1592</span>&#160;</div><div class="line"><a name="l01593"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a289996a12d0ef46af1dac49a67289931"> 1593</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a289996a12d0ef46af1dac49a67289931">pmp_norm_thetaphi_mode</a>(pa) : PopupMenuControl</div><div class="line"><a name="l01594"></a><span class="lineno"> 1594</span>&#160;    STRUCT WMPopupAction &amp;pa</div><div class="line"><a name="l01595"></a><span class="lineno"> 1595</span>&#160;</div><div class="line"><a name="l01596"></a><span class="lineno"> 1596</span>&#160;    switch( pa.eventCode )</div><div class="line"><a name="l01597"></a><span class="lineno"> 1597</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01598"></a><span class="lineno"> 1598</span>&#160;            dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01599"></a><span class="lineno"> 1599</span>&#160;            nvar /sdfr=df norm_thetaphi_mode</div><div class="line"><a name="l01600"></a><span class="lineno"> 1600</span>&#160;            norm_thetaphi_mode = pa.popNum - 1</div><div class="line"><a name="l01601"></a><span class="lineno"> 1601</span>&#160;            break</div><div class="line"><a name="l01602"></a><span class="lineno"> 1602</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01603"></a><span class="lineno"> 1603</span>&#160;            break</div><div class="line"><a name="l01604"></a><span class="lineno"> 1604</span>&#160;    endswitch</div><div class="line"><a name="l01605"></a><span class="lineno"> 1605</span>&#160;</div><div class="line"><a name="l01606"></a><span class="lineno"> 1606</span>&#160;    return 0</div><div class="line"><a name="l01607"></a><span class="lineno"> 1607</span>&#160;End</div><div class="line"><a name="l01608"></a><span class="lineno"> 1608</span>&#160;</div><div class="line"><a name="l01609"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#a1b41c992729d627445dbba0637b31ece"> 1609</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#a1b41c992729d627445dbba0637b31ece">pmp_graph_mode</a>(pa) : PopupMenuControl</div><div class="line"><a name="l01610"></a><span class="lineno"> 1610</span>&#160;    STRUCT WMPopupAction &amp;pa</div><div class="line"><a name="l01611"></a><span class="lineno"> 1611</span>&#160;</div><div class="line"><a name="l01612"></a><span class="lineno"> 1612</span>&#160;    switch( pa.eventCode )</div><div class="line"><a name="l01613"></a><span class="lineno"> 1613</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01614"></a><span class="lineno"> 1614</span>&#160;            dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01615"></a><span class="lineno"> 1615</span>&#160;            nvar /sdfr=df graph_mode</div><div class="line"><a name="l01616"></a><span class="lineno"> 1616</span>&#160;            graph_mode = pa.popNum - 1</div><div class="line"><a name="l01617"></a><span class="lineno"> 1617</span>&#160;            break</div><div class="line"><a name="l01618"></a><span class="lineno"> 1618</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01619"></a><span class="lineno"> 1619</span>&#160;            break</div><div class="line"><a name="l01620"></a><span class="lineno"> 1620</span>&#160;    endswitch</div><div class="line"><a name="l01621"></a><span class="lineno"> 1621</span>&#160;</div><div class="line"><a name="l01622"></a><span class="lineno"> 1622</span>&#160;    return 0</div><div class="line"><a name="l01623"></a><span class="lineno"> 1623</span>&#160;End</div><div class="line"><a name="l01624"></a><span class="lineno"> 1624</span>&#160;</div><div class="line"><a name="l01625"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#af83bfcf48723e7f6eeb78b4e0d84277d"> 1625</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#af83bfcf48723e7f6eeb78b4e0d84277d">pmp_graph_projection</a>(pa) : PopupMenuControl</div><div class="line"><a name="l01626"></a><span class="lineno"> 1626</span>&#160;    STRUCT WMPopupAction &amp;pa</div><div class="line"><a name="l01627"></a><span class="lineno"> 1627</span>&#160;</div><div class="line"><a name="l01628"></a><span class="lineno"> 1628</span>&#160;    switch( pa.eventCode )</div><div class="line"><a name="l01629"></a><span class="lineno"> 1629</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01630"></a><span class="lineno"> 1630</span>&#160;            dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01631"></a><span class="lineno"> 1631</span>&#160;            nvar /sdfr=df graph_projection</div><div class="line"><a name="l01632"></a><span class="lineno"> 1632</span>&#160;            graph_projection = pa.popNum - 1</div><div class="line"><a name="l01633"></a><span class="lineno"> 1633</span>&#160;            break</div><div class="line"><a name="l01634"></a><span class="lineno"> 1634</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01635"></a><span class="lineno"> 1635</span>&#160;            break</div><div class="line"><a name="l01636"></a><span class="lineno"> 1636</span>&#160;    endswitch</div><div class="line"><a name="l01637"></a><span class="lineno"> 1637</span>&#160;</div><div class="line"><a name="l01638"></a><span class="lineno"> 1638</span>&#160;    return 0</div><div class="line"><a name="l01639"></a><span class="lineno"> 1639</span>&#160;End</div><div class="line"><a name="l01640"></a><span class="lineno"> 1640</span>&#160;</div><div class="line"><a name="l01641"></a><span class="lineno"><a class="line" href="pearl-anglescan-panel_8ipf.html#ac80c675f6f1a5505e9b6f0349ff5fe92"> 1641</a></span>&#160;static function <a class="code" href="pearl-anglescan-panel_8ipf.html#ac80c675f6f1a5505e9b6f0349ff5fe92">pmp_graph_colortable</a>(pa) : PopupMenuControl</div><div class="line"><a name="l01642"></a><span class="lineno"> 1642</span>&#160;    STRUCT WMPopupAction &amp;pa</div><div class="line"><a name="l01643"></a><span class="lineno"> 1643</span>&#160;</div><div class="line"><a name="l01644"></a><span class="lineno"> 1644</span>&#160;    switch( pa.eventCode )</div><div class="line"><a name="l01645"></a><span class="lineno"> 1645</span>&#160;        case 2: <span class="comment">// mouse up</span></div><div class="line"><a name="l01646"></a><span class="lineno"> 1646</span>&#160;            dfref df = $(<a class="code" href="pearl-anglescan-panel_8ipf.html#a75bb92ef5f80843e66a7243bd958ef8b">package_path</a>)</div><div class="line"><a name="l01647"></a><span class="lineno"> 1647</span>&#160;            svar /sdfr=df graph_colortable</div><div class="line"><a name="l01648"></a><span class="lineno"> 1648</span>&#160;            graph_colortable = StringFromList(pa.popNum - 1, CTabList())</div><div class="line"><a name="l01649"></a><span class="lineno"> 1649</span>&#160;            <a class="code" href="pearl-anglescan-panel_8ipf.html#a93dc5a029ae9831066e6ad133522ee88">asp_update_graph</a>()</div><div class="line"><a name="l01650"></a><span class="lineno"> 1650</span>&#160;            break</div><div class="line"><a name="l01651"></a><span class="lineno"> 1651</span>&#160;        case -1: <span class="comment">// control being killed</span></div><div class="line"><a name="l01652"></a><span class="lineno"> 1652</span>&#160;            break</div><div class="line"><a name="l01653"></a><span class="lineno"> 1653</span>&#160;    endswitch</div><div class="line"><a name="l01654"></a><span class="lineno"> 1654</span>&#160;</div><div class="line"><a name="l01655"></a><span class="lineno"> 1655</span>&#160;    return 0</div><div class="line"><a name="l01656"></a><span class="lineno"> 1656</span>&#160;End</div><div class="ttc" id="pearl-anglescan-panel_8ipf_html_a740c8a80ab2fc0550a05cf3b032821d0"><div class="ttname"><a href="pearl-anglescan-panel_8ipf.html#a740c8a80ab2fc0550a05cf3b032821d0">bp_norm_phi_preview</a></div><div class="ttdeci">static variable bp_norm_phi_preview(WMButtonAction *ba)</div><div class="ttdef"><b>Definition:</b> <a href="pearl-anglescan-panel_8ipf_source.html#l01398">pearl-anglescan-panel.ipf:1398</a></div></div>
 <div class="ttc" id="pearl-anglescan-process_8ipf_html_a229770447193d4fd12032b235aab4d28"><div class="ttname"><a href="pearl-anglescan-process_8ipf.html#a229770447193d4fd12032b235aab4d28">pizza_service_2</a></div><div class="ttdeci">variable pizza_service_2(wave data, string nickname, wave m_theta, wave m_tilt, wave m_phi, variable npolar=defaultValue, variable nograph=defaultValue, variable folding=defaultValue, variable xpdplot=defaultValue)</div><div class="ttdoc">create a pizza plot from a measured (energy-integrated) data strip </div><div class="ttdef"><b>Definition:</b> <a href="pearl-anglescan-process_8ipf_source.html#l00862">pearl-anglescan-process.ipf:862</a></div></div>
 <div class="ttc" id="pearl-anglescan-process_8ipf_html_a9b56897bd92d926d65f4c67bef1d41bb"><div class="ttname"><a href="pearl-anglescan-process_8ipf.html#a9b56897bd92d926d65f4c67bef1d41bb">normalize_strip_theta</a></div><div class="ttdeci">variable normalize_strip_theta(wave strip, wave theta, variable theta_offset=defaultValue, variable smooth_method=defaultValue, variable smooth_factor=defaultValue, variable check=defaultValue)</div><div class="ttdoc">divide the strip by the average polar distribution. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-anglescan-process_8ipf_source.html#l00366">pearl-anglescan-process.ipf:366</a></div></div>
 <div class="ttc" id="pearl-anglescan-panel_8ipf_html_a1836e607851ba4d5a4048f4cfb8121a7"><div class="ttname"><a href="pearl-anglescan-panel_8ipf.html#a1836e607851ba4d5a4048f4cfb8121a7">do_init_process</a></div><div class="ttdeci">static variable do_init_process(variable check)</div><div class="ttdoc">initialize the process data with a copy of the raw data. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-anglescan-panel_8ipf_source.html#l00318">pearl-anglescan-panel.ipf:318</a></div></div>
@@ -172,7 +172,7 @@ $(document).ready(function(){initNavTree('pearl-anglescan-panel_8ipf_source.html
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-anglescan-panel_8ipf.html">pearl-anglescan-panel.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-anglescan-process_8ipf.html b/doc/html/pearl-anglescan-process_8ipf.html
index 8fef9ea..cdece11 100644
--- a/doc/html/pearl-anglescan-process_8ipf.html
+++ b/doc/html/pearl-anglescan-process_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -3502,7 +3502,7 @@ caution: binomial and boxcar smoothing are not aware of theta. this may give unp
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-anglescan-process_8ipf.html">pearl-anglescan-process.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-anglescan-process_8ipf_source.html b/doc/html/pearl-anglescan-process_8ipf_source.html
index b28783a..01e7a39 100644
--- a/doc/html/pearl-anglescan-process_8ipf_source.html
+++ b/doc/html/pearl-anglescan-process_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -85,7 +85,7 @@ $(document).ready(function(){initNavTree('pearl-anglescan-process_8ipf_source.ht
 <div class="title">pearl-anglescan-process.ipf</div>  </div>
 </div><!--header-->
 <div class="contents">
-<a href="pearl-anglescan-process_8ipf.html">Go to the documentation of this file.</a><div class="fragment"><div class="line"><a name="l00001"></a><span class="lineno">    1</span>&#160;<span class="preprocessor">#pragma rtGlobals=3     // Use modern global access method and strict wave access.</span></div><div class="line"><a name="l00002"></a><span class="lineno">    2</span>&#160;<span class="preprocessor">#pragma version = 1.8</span></div><div class="line"><a name="l00003"></a><span class="lineno">    3</span>&#160;<span class="preprocessor">#pragma IgorVersion = 6.2</span></div><div class="line"><a name="l00004"></a><span class="lineno">    4</span>&#160;<span class="preprocessor">#pragma ModuleName = PearlAnglescanProcess</span></div><div class="line"><a name="l00005"></a><span class="lineno">    5</span>&#160;<span class="preprocessor">#include &quot;pearl-vector-operations&quot;</span></div><div class="line"><a name="l00006"></a><span class="lineno">    6</span>&#160;<span class="preprocessor">#include &quot;pearl-polar-coordinates&quot;</span></div><div class="line"><a name="l00007"></a><span class="lineno">    7</span>&#160;<span class="preprocessor">#include &lt;New Polar Graphs&gt;</span></div><div class="line"><a name="l00008"></a><span class="lineno">    8</span>&#160;</div><div class="line"><a name="l00009"></a><span class="lineno">    9</span>&#160;<span class="comment">// copyright (c) 2013-17 Paul Scherrer Institut</span></div><div class="line"><a name="l00010"></a><span class="lineno">   10</span>&#160;<span class="comment">//</span></div><div class="line"><a name="l00011"></a><span class="lineno">   11</span>&#160;<span class="comment">// Licensed under the Apache License, Version 2.0 (the &quot;License&quot;);</span></div><div class="line"><a name="l00012"></a><span class="lineno">   12</span>&#160;<span class="comment">//   you may not use this file except in compliance with the License.</span></div><div class="line"><a name="l00013"></a><span class="lineno">   13</span>&#160;<span class="comment">//   You may obtain a copy of the License at</span></div><div class="line"><a name="l00014"></a><span class="lineno">   14</span>&#160;<span class="comment">//   http:///www.apache.org/licenses/LICENSE-2.0</span></div><div class="line"><a name="l00015"></a><span class="lineno">   15</span>&#160;<span class="comment">//</span></div><div class="line"><a name="l00016"></a><span class="lineno">   16</span>&#160;<span class="comment">// Please acknowledge the use of this code.</span></div><div class="line"><a name="l00017"></a><span class="lineno">   17</span>&#160;</div><div class="line"><a name="l00076"></a><span class="lineno">   76</span>&#160;</div><div class="line"><a name="l00081"></a><span class="lineno">   81</span>&#160;</div><div class="line"><a name="l00082"></a><span class="lineno">   82</span>&#160;</div><div class="line"><a name="l00105"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a13e0d37ae23f68cdc5da3d84cb4beed8">  105</a></span>&#160;<span class="keyword">function</span> <a class="code" href="pearl-anglescan-process_8ipf.html#a13e0d37ae23f68cdc5da3d84cb4beed8">strip_delete_frames</a>(strip, qlo, qhi, theta, tilt, phi)</div><div class="line"><a name="l00106"></a><span class="lineno">  106</span>&#160;    wave strip <span class="comment">// 2D data, X-axis = analyser angle, Y-axis = arbitrary manipulator scan</span></div><div class="line"><a name="l00107"></a><span class="lineno">  107</span>&#160;    variable qlo</div><div class="line"><a name="l00108"></a><span class="lineno">  108</span>&#160;    variable qhi</div><div class="line"><a name="l00109"></a><span class="lineno">  109</span>&#160;    wave theta</div><div class="line"><a name="l00110"></a><span class="lineno">  110</span>&#160;    wave tilt</div><div class="line"><a name="l00111"></a><span class="lineno">  111</span>&#160;    wave phi</div><div class="line"><a name="l00112"></a><span class="lineno">  112</span>&#160;    </div><div class="line"><a name="l00113"></a><span class="lineno">  113</span>&#160;    <span class="keywordflow">if</span> (qlo &gt; qhi)</div><div class="line"><a name="l00114"></a><span class="lineno">  114</span>&#160;        <span class="keywordflow">return</span> -1</div><div class="line"><a name="l00115"></a><span class="lineno">  115</span>&#160;    endif</div><div class="line"><a name="l00116"></a><span class="lineno">  116</span>&#160;    </div><div class="line"><a name="l00117"></a><span class="lineno">  117</span>&#160;    <span class="comment">// source indices</span></div><div class="line"><a name="l00118"></a><span class="lineno">  118</span>&#160;    variable snx = dimsize(strip, 0)</div><div class="line"><a name="l00119"></a><span class="lineno">  119</span>&#160;    variable sny = dimsize(strip, 1)</div><div class="line"><a name="l00120"></a><span class="lineno">  120</span>&#160;    variable sq1lo = 0</div><div class="line"><a name="l00121"></a><span class="lineno">  121</span>&#160;    variable sq1hi = max(qlo-1, 0)</div><div class="line"><a name="l00122"></a><span class="lineno">  122</span>&#160;    variable sq2lo = min(qhi+1, sny - 1)</div><div class="line"><a name="l00123"></a><span class="lineno">  123</span>&#160;    variable sq2hi = dimsize(strip, 1) - 1</div><div class="line"><a name="l00124"></a><span class="lineno">  124</span>&#160;    </div><div class="line"><a name="l00125"></a><span class="lineno">  125</span>&#160;    <span class="comment">// dest indices</span></div><div class="line"><a name="l00126"></a><span class="lineno">  126</span>&#160;    variable dnx = snx</div><div class="line"><a name="l00127"></a><span class="lineno">  127</span>&#160;    variable dny = sny - (sq2lo - sq1hi + 1)</div><div class="line"><a name="l00128"></a><span class="lineno">  128</span>&#160;    variable dq1lo = 0</div><div class="line"><a name="l00129"></a><span class="lineno">  129</span>&#160;    variable dq1hi = sq1hi</div><div class="line"><a name="l00130"></a><span class="lineno">  130</span>&#160;    variable dq2lo = dq1hi + 1</div><div class="line"><a name="l00131"></a><span class="lineno">  131</span>&#160;    variable dq2hi = dny - 1</div><div class="line"><a name="l00132"></a><span class="lineno">  132</span>&#160;    variable q1ofs = sq1lo - dq1lo</div><div class="line"><a name="l00133"></a><span class="lineno">  133</span>&#160;    variable q2ofs = sq2lo - dq2lo</div><div class="line"><a name="l00134"></a><span class="lineno">  134</span>&#160;    </div><div class="line"><a name="l00135"></a><span class="lineno">  135</span>&#160;    duplicate /free strip, strip_copy</div><div class="line"><a name="l00136"></a><span class="lineno">  136</span>&#160;    redimension /n=(dnx,dny) strip</div><div class="line"><a name="l00137"></a><span class="lineno">  137</span>&#160;    strip[][dq1lo,dq1hi] = strip_copy[p][q + q1ofs]</div><div class="line"><a name="l00138"></a><span class="lineno">  138</span>&#160;    strip[][dq2lo,dq2hi] = strip_copy[p][q + q2ofs]</div><div class="line"><a name="l00139"></a><span class="lineno">  139</span>&#160;    </div><div class="line"><a name="l00140"></a><span class="lineno">  140</span>&#160;    duplicate /free theta, theta_copy</div><div class="line"><a name="l00141"></a><span class="lineno">  141</span>&#160;    redimension /n=(dny) theta</div><div class="line"><a name="l00142"></a><span class="lineno">  142</span>&#160;    theta[dq1lo,dq1hi] = theta_copy[p + q1ofs]</div><div class="line"><a name="l00143"></a><span class="lineno">  143</span>&#160;    theta[dq2lo,dq2hi] = theta_copy[p + q2ofs]</div><div class="line"><a name="l00144"></a><span class="lineno">  144</span>&#160;    </div><div class="line"><a name="l00145"></a><span class="lineno">  145</span>&#160;    duplicate /free tilt, tilt_copy</div><div class="line"><a name="l00146"></a><span class="lineno">  146</span>&#160;    redimension /n=(dny) tilt</div><div class="line"><a name="l00147"></a><span class="lineno">  147</span>&#160;    tilt[dq1lo,dq1hi] = tilt_copy[p + q1ofs]</div><div class="line"><a name="l00148"></a><span class="lineno">  148</span>&#160;    tilt[dq2lo,dq2hi] = tilt_copy[p + q2ofs]</div><div class="line"><a name="l00149"></a><span class="lineno">  149</span>&#160;    </div><div class="line"><a name="l00150"></a><span class="lineno">  150</span>&#160;    duplicate /free phi, phi_copy</div><div class="line"><a name="l00151"></a><span class="lineno">  151</span>&#160;    redimension /n=(dny) phi</div><div class="line"><a name="l00152"></a><span class="lineno">  152</span>&#160;    phi[dq1lo,dq1hi] = phi_copy[p + q1ofs]</div><div class="line"><a name="l00153"></a><span class="lineno">  153</span>&#160;    phi[dq2lo,dq2hi] = phi_copy[p + q2ofs]</div><div class="line"><a name="l00154"></a><span class="lineno">  154</span>&#160;    </div><div class="line"><a name="l00155"></a><span class="lineno">  155</span>&#160;    return 0</div><div class="line"><a name="l00156"></a><span class="lineno">  156</span>&#160;end</div><div class="line"><a name="l00157"></a><span class="lineno">  157</span>&#160;</div><div class="line"><a name="l00187"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a48b7d774ed8d3f4329e9923e18e580e8">  187</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a48b7d774ed8d3f4329e9923e18e580e8">normalize_strip_x</a>(strip, [smooth_method, smooth_factor, check])</div><div class="line"><a name="l00188"></a><span class="lineno">  188</span>&#160;    wave strip</div><div class="line"><a name="l00189"></a><span class="lineno">  189</span>&#160;    variable smooth_method</div><div class="line"><a name="l00190"></a><span class="lineno">  190</span>&#160;    variable smooth_factor</div><div class="line"><a name="l00191"></a><span class="lineno">  191</span>&#160;    variable check</div><div class="line"><a name="l00192"></a><span class="lineno">  192</span>&#160;    </div><div class="line"><a name="l00193"></a><span class="lineno">  193</span>&#160;    if (ParamIsDefault(smooth_method))</div><div class="line"><a name="l00194"></a><span class="lineno">  194</span>&#160;        smooth_method = 4</div><div class="line"><a name="l00195"></a><span class="lineno">  195</span>&#160;    endif</div><div class="line"><a name="l00196"></a><span class="lineno">  196</span>&#160;    if (ParamIsDefault(smooth_factor))</div><div class="line"><a name="l00197"></a><span class="lineno">  197</span>&#160;        switch(smooth_method)</div><div class="line"><a name="l00198"></a><span class="lineno">  198</span>&#160;            case 4:</div><div class="line"><a name="l00199"></a><span class="lineno">  199</span>&#160;                smooth_factor = 0.5</div><div class="line"><a name="l00200"></a><span class="lineno">  200</span>&#160;                break</div><div class="line"><a name="l00201"></a><span class="lineno">  201</span>&#160;            default:</div><div class="line"><a name="l00202"></a><span class="lineno">  202</span>&#160;                smooth_factor = 2</div><div class="line"><a name="l00203"></a><span class="lineno">  203</span>&#160;        endswitch</div><div class="line"><a name="l00204"></a><span class="lineno">  204</span>&#160;    endif</div><div class="line"><a name="l00205"></a><span class="lineno">  205</span>&#160;    if (ParamIsDefault(check))</div><div class="line"><a name="l00206"></a><span class="lineno">  206</span>&#160;        check = 0</div><div class="line"><a name="l00207"></a><span class="lineno">  207</span>&#160;    endif</div><div class="line"><a name="l00208"></a><span class="lineno">  208</span>&#160;    </div><div class="line"><a name="l00209"></a><span class="lineno">  209</span>&#160;    <span class="comment">// average over all scan positions</span></div><div class="line"><a name="l00210"></a><span class="lineno">  210</span>&#160;    wave raw_dist = <a class="code" href="pearl-area-profiles_8ipf.html#ab1a65cf82f6933db3dd7b564582e8ed1">ad_profile_x</a>(strip, -inf, inf, &quot;&quot;)</div><div class="line"><a name="l00211"></a><span class="lineno">  211</span>&#160;    </div><div class="line"><a name="l00212"></a><span class="lineno">  212</span>&#160;    <span class="comment">// remove nans</span></div><div class="line"><a name="l00213"></a><span class="lineno">  213</span>&#160;    extract /free /indx raw_dist, clean_index, numtype(raw_dist) == 0</div><div class="line"><a name="l00214"></a><span class="lineno">  214</span>&#160;    duplicate /free raw_dist, dist, dist_x</div><div class="line"><a name="l00215"></a><span class="lineno">  215</span>&#160;    redimension /n=(numpnts(clean_index)) dist, dist_x</div><div class="line"><a name="l00216"></a><span class="lineno">  216</span>&#160;    dist = raw_dist[clean_index[p]]</div><div class="line"><a name="l00217"></a><span class="lineno">  217</span>&#160;    dist_x = pnt2x(raw_dist, clean_index[p])</div><div class="line"><a name="l00218"></a><span class="lineno">  218</span>&#160;    variable div = mean(dist)</div><div class="line"><a name="l00219"></a><span class="lineno">  219</span>&#160;    dist /= div</div><div class="line"><a name="l00220"></a><span class="lineno">  220</span>&#160;</div><div class="line"><a name="l00221"></a><span class="lineno">  221</span>&#160;    if (check)</div><div class="line"><a name="l00222"></a><span class="lineno">  222</span>&#160;        duplicate /o raw_dist, check_dist</div><div class="line"><a name="l00223"></a><span class="lineno">  223</span>&#160;        check_dist = numtype(raw_dist) == 0 ? interp(x, dist_x, dist) : nan</div><div class="line"><a name="l00224"></a><span class="lineno">  224</span>&#160;    endif</div><div class="line"><a name="l00225"></a><span class="lineno">  225</span>&#160;    </div><div class="line"><a name="l00226"></a><span class="lineno">  226</span>&#160;    <span class="comment">// smooth distribution function</span></div><div class="line"><a name="l00227"></a><span class="lineno">  227</span>&#160;    switch(smooth_method)</div><div class="line"><a name="l00228"></a><span class="lineno">  228</span>&#160;        case 1:</div><div class="line"><a name="l00229"></a><span class="lineno">  229</span>&#160;            Smooth /B /E=3 smooth_factor, dist</div><div class="line"><a name="l00230"></a><span class="lineno">  230</span>&#160;            break</div><div class="line"><a name="l00231"></a><span class="lineno">  231</span>&#160;        case 2:</div><div class="line"><a name="l00232"></a><span class="lineno">  232</span>&#160;            Smooth /E=3 smooth_factor, dist</div><div class="line"><a name="l00233"></a><span class="lineno">  233</span>&#160;            break</div><div class="line"><a name="l00234"></a><span class="lineno">  234</span>&#160;        case 3:</div><div class="line"><a name="l00235"></a><span class="lineno">  235</span>&#160;            make /n=1 /d /free fit_params</div><div class="line"><a name="l00236"></a><span class="lineno">  236</span>&#160;            fit_scienta_ang_transm(raw_dist, fit_params)</div><div class="line"><a name="l00237"></a><span class="lineno">  237</span>&#160;            duplicate /free raw_dist, dist, dist_x</div><div class="line"><a name="l00238"></a><span class="lineno">  238</span>&#160;            dist_x = x</div><div class="line"><a name="l00239"></a><span class="lineno">  239</span>&#160;            dist = scienta_ang_transm(fit_params, x)</div><div class="line"><a name="l00240"></a><span class="lineno">  240</span>&#160;            break</div><div class="line"><a name="l00241"></a><span class="lineno">  241</span>&#160;        case 4:</div><div class="line"><a name="l00242"></a><span class="lineno">  242</span>&#160;            loess /smth=(smooth_factor) srcWave=dist, factors={dist_x}</div><div class="line"><a name="l00243"></a><span class="lineno">  243</span>&#160;            <span class="keywordflow">break</span></div><div class="line"><a name="l00244"></a><span class="lineno">  244</span>&#160;    endswitch</div><div class="line"><a name="l00245"></a><span class="lineno">  245</span>&#160;    </div><div class="line"><a name="l00246"></a><span class="lineno">  246</span>&#160;    <span class="keywordflow">if</span> (check)</div><div class="line"><a name="l00247"></a><span class="lineno">  247</span>&#160;        duplicate /o raw_dist, check_smoo</div><div class="line"><a name="l00248"></a><span class="lineno">  248</span>&#160;        check_smoo = interp(x, dist_x, dist)</div><div class="line"><a name="l00249"></a><span class="lineno">  249</span>&#160;    endif</div><div class="line"><a name="l00250"></a><span class="lineno">  250</span>&#160;</div><div class="line"><a name="l00251"></a><span class="lineno">  251</span>&#160;    <span class="comment">// divide</span></div><div class="line"><a name="l00252"></a><span class="lineno">  252</span>&#160;    <span class="keywordflow">if</span> (check != 2)</div><div class="line"><a name="l00253"></a><span class="lineno">  253</span>&#160;        strip /= interp(x, dist_x, dist)</div><div class="line"><a name="l00254"></a><span class="lineno">  254</span>&#160;    endif</div><div class="line"><a name="l00255"></a><span class="lineno">  255</span>&#160;end</div><div class="line"><a name="l00256"></a><span class="lineno">  256</span>&#160;</div><div class="line"><a name="l00283"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#aaa734fddecdd75c7cabe20ba777b41b9">  283</a></span>&#160;<span class="keyword">function</span> <a class="code" href="pearl-anglescan-process_8ipf.html#aaa734fddecdd75c7cabe20ba777b41b9">normalize_strip_phi</a>(strip, theta, phi, [theta_offset, theta_range, check])</div><div class="line"><a name="l00284"></a><span class="lineno">  284</span>&#160;    wave strip</div><div class="line"><a name="l00285"></a><span class="lineno">  285</span>&#160;    wave theta</div><div class="line"><a name="l00286"></a><span class="lineno">  286</span>&#160;    wave phi</div><div class="line"><a name="l00287"></a><span class="lineno">  287</span>&#160;    variable theta_offset</div><div class="line"><a name="l00288"></a><span class="lineno">  288</span>&#160;    variable theta_range</div><div class="line"><a name="l00289"></a><span class="lineno">  289</span>&#160;    variable check</div><div class="line"><a name="l00290"></a><span class="lineno">  290</span>&#160;    </div><div class="line"><a name="l00291"></a><span class="lineno">  291</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(check))</div><div class="line"><a name="l00292"></a><span class="lineno">  292</span>&#160;        check = 0</div><div class="line"><a name="l00293"></a><span class="lineno">  293</span>&#160;    endif</div><div class="line"><a name="l00294"></a><span class="lineno">  294</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(theta_offset))</div><div class="line"><a name="l00295"></a><span class="lineno">  295</span>&#160;        theta_offset = 0</div><div class="line"><a name="l00296"></a><span class="lineno">  296</span>&#160;    endif</div><div class="line"><a name="l00297"></a><span class="lineno">  297</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(theta_range))</div><div class="line"><a name="l00298"></a><span class="lineno">  298</span>&#160;        theta_offset = 10</div><div class="line"><a name="l00299"></a><span class="lineno">  299</span>&#160;    endif</div><div class="line"><a name="l00300"></a><span class="lineno">  300</span>&#160;</div><div class="line"><a name="l00301"></a><span class="lineno">  301</span>&#160;    <span class="comment">// average over analyser angles</span></div><div class="line"><a name="l00302"></a><span class="lineno">  302</span>&#160;    wave dist = <a class="code" href="pearl-area-profiles_8ipf.html#abb1eed32a982037ebab00f5c3ea95e62">ad_profile_y</a>(strip, -inf, inf, <span class="stringliteral">&quot;&quot;</span>)</div><div class="line"><a name="l00303"></a><span class="lineno">  303</span>&#160;    </div><div class="line"><a name="l00304"></a><span class="lineno">  304</span>&#160;    <span class="comment">// smooth distribution function</span></div><div class="line"><a name="l00305"></a><span class="lineno">  305</span>&#160;    duplicate /free dist, dist_smoo</div><div class="line"><a name="l00306"></a><span class="lineno">  306</span>&#160;    duplicate /free theta, theta_int</div><div class="line"><a name="l00307"></a><span class="lineno">  307</span>&#160;    theta_int = theta - theta_offset</div><div class="line"><a name="l00308"></a><span class="lineno">  308</span>&#160;    duplicate /free phi, phi_int</div><div class="line"><a name="l00309"></a><span class="lineno">  309</span>&#160;    setscale /p x phi_int[0], phi_int[1] - phi_int[0], waveunits(phi, -1), dist, dist_smoo</div><div class="line"><a name="l00310"></a><span class="lineno">  310</span>&#160;</div><div class="line"><a name="l00311"></a><span class="lineno">  311</span>&#160;    extract /free /indx dist, red_idx, theta_int &lt; theta_range</div><div class="line"><a name="l00312"></a><span class="lineno">  312</span>&#160;    duplicate /free red_idx, red_dist, red_phi</div><div class="line"><a name="l00313"></a><span class="lineno">  313</span>&#160;    red_dist = dist[red_idx]</div><div class="line"><a name="l00314"></a><span class="lineno">  314</span>&#160;    red_phi = phi_int[red_idx]</div><div class="line"><a name="l00315"></a><span class="lineno">  315</span>&#160;    </div><div class="line"><a name="l00316"></a><span class="lineno">  316</span>&#160;    variable wavg = mean(red_dist)</div><div class="line"><a name="l00317"></a><span class="lineno">  317</span>&#160;    make /n=4 /d /free coef</div><div class="line"><a name="l00318"></a><span class="lineno">  318</span>&#160;    coef[0] = {wavg, wavg/100, pi/180, 0}</div><div class="line"><a name="l00319"></a><span class="lineno">  319</span>&#160;    CurveFit /q /h=<span class="stringliteral">&quot;0010&quot;</span> /g /w=2 sin, kwcWave=coef, red_dist /x=red_phi</div><div class="line"><a name="l00320"></a><span class="lineno">  320</span>&#160;    dist_smoo = coef[0] + coef[1] * sin(coef[2] * phi_int[p] + coef[3])</div><div class="line"><a name="l00321"></a><span class="lineno">  321</span>&#160;    </div><div class="line"><a name="l00322"></a><span class="lineno">  322</span>&#160;    <span class="comment">// divide</span></div><div class="line"><a name="l00323"></a><span class="lineno">  323</span>&#160;    <span class="keywordflow">if</span> (check != 2)</div><div class="line"><a name="l00324"></a><span class="lineno">  324</span>&#160;        strip = strip / dist_smoo[q] * coef[0]</div><div class="line"><a name="l00325"></a><span class="lineno">  325</span>&#160;    endif</div><div class="line"><a name="l00326"></a><span class="lineno">  326</span>&#160;    </div><div class="line"><a name="l00327"></a><span class="lineno">  327</span>&#160;    <span class="comment">// check</span></div><div class="line"><a name="l00328"></a><span class="lineno">  328</span>&#160;    <span class="keywordflow">if</span> (check)</div><div class="line"><a name="l00329"></a><span class="lineno">  329</span>&#160;        duplicate /o dist, check_dist</div><div class="line"><a name="l00330"></a><span class="lineno">  330</span>&#160;        duplicate /o dist_smoo, check_smoo</div><div class="line"><a name="l00331"></a><span class="lineno">  331</span>&#160;        setscale /p x dimoffset(dist,0), dimdelta(dist,0), waveunits(dist,0), check_dist, check_smoo</div><div class="line"><a name="l00332"></a><span class="lineno">  332</span>&#160;    endif</div><div class="line"><a name="l00333"></a><span class="lineno">  333</span>&#160;end</div><div class="line"><a name="l00334"></a><span class="lineno">  334</span>&#160;</div><div class="line"><a name="l00366"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a9b56897bd92d926d65f4c67bef1d41bb">  366</a></span>&#160;<span class="keyword">function</span> <a class="code" href="pearl-anglescan-process_8ipf.html#a9b56897bd92d926d65f4c67bef1d41bb">normalize_strip_theta</a>(strip, theta, [theta_offset, smooth_method, smooth_factor, check])</div><div class="line"><a name="l00367"></a><span class="lineno">  367</span>&#160;    wave strip</div><div class="line"><a name="l00368"></a><span class="lineno">  368</span>&#160;    wave theta</div><div class="line"><a name="l00369"></a><span class="lineno">  369</span>&#160;    variable theta_offset</div><div class="line"><a name="l00370"></a><span class="lineno">  370</span>&#160;    variable smooth_method</div><div class="line"><a name="l00371"></a><span class="lineno">  371</span>&#160;    variable smooth_factor</div><div class="line"><a name="l00372"></a><span class="lineno">  372</span>&#160;    variable check</div><div class="line"><a name="l00373"></a><span class="lineno">  373</span>&#160;    </div><div class="line"><a name="l00374"></a><span class="lineno">  374</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(check))</div><div class="line"><a name="l00375"></a><span class="lineno">  375</span>&#160;        check = 0</div><div class="line"><a name="l00376"></a><span class="lineno">  376</span>&#160;    endif</div><div class="line"><a name="l00377"></a><span class="lineno">  377</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(theta_offset))</div><div class="line"><a name="l00378"></a><span class="lineno">  378</span>&#160;        theta_offset = 0</div><div class="line"><a name="l00379"></a><span class="lineno">  379</span>&#160;    endif</div><div class="line"><a name="l00380"></a><span class="lineno">  380</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(smooth_method))</div><div class="line"><a name="l00381"></a><span class="lineno">  381</span>&#160;        smooth_method = 4</div><div class="line"><a name="l00382"></a><span class="lineno">  382</span>&#160;    endif</div><div class="line"><a name="l00383"></a><span class="lineno">  383</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(smooth_factor))</div><div class="line"><a name="l00384"></a><span class="lineno">  384</span>&#160;        smooth_factor = 0.5</div><div class="line"><a name="l00385"></a><span class="lineno">  385</span>&#160;    endif</div><div class="line"><a name="l00386"></a><span class="lineno">  386</span>&#160;</div><div class="line"><a name="l00387"></a><span class="lineno">  387</span>&#160;    <span class="comment">// average over analyser angles</span></div><div class="line"><a name="l00388"></a><span class="lineno">  388</span>&#160;    wave dist = <a class="code" href="pearl-area-profiles_8ipf.html#abb1eed32a982037ebab00f5c3ea95e62">ad_profile_y</a>(strip, -inf, inf, <span class="stringliteral">&quot;&quot;</span>)</div><div class="line"><a name="l00389"></a><span class="lineno">  389</span>&#160;    </div><div class="line"><a name="l00390"></a><span class="lineno">  390</span>&#160;    <span class="comment">// smooth distribution function</span></div><div class="line"><a name="l00391"></a><span class="lineno">  391</span>&#160;    duplicate /free dist, dist_smoo</div><div class="line"><a name="l00392"></a><span class="lineno">  392</span>&#160;    duplicate /free theta, theta_int</div><div class="line"><a name="l00393"></a><span class="lineno">  393</span>&#160;    theta_int = theta - theta_offset</div><div class="line"><a name="l00394"></a><span class="lineno">  394</span>&#160;    setscale /p x theta_int[0], theta_int[1] - theta_int[0], waveunits(theta,-1), dist, dist_smoo</div><div class="line"><a name="l00395"></a><span class="lineno">  395</span>&#160;    variable nx = dimsize(strip, 0)</div><div class="line"><a name="l00396"></a><span class="lineno">  396</span>&#160;    variable ix</div><div class="line"><a name="l00397"></a><span class="lineno">  397</span>&#160;    </div><div class="line"><a name="l00398"></a><span class="lineno">  398</span>&#160;    switch(smooth_method)</div><div class="line"><a name="l00399"></a><span class="lineno">  399</span>&#160;        case 1:</div><div class="line"><a name="l00400"></a><span class="lineno">  400</span>&#160;            Smooth /B /E=3 smooth_factor, dist_smoo</div><div class="line"><a name="l00401"></a><span class="lineno">  401</span>&#160;            break</div><div class="line"><a name="l00402"></a><span class="lineno">  402</span>&#160;        case 2:</div><div class="line"><a name="l00403"></a><span class="lineno">  403</span>&#160;            Smooth /E=3 smooth_factor, dist_smoo</div><div class="line"><a name="l00404"></a><span class="lineno">  404</span>&#160;            break</div><div class="line"><a name="l00405"></a><span class="lineno">  405</span>&#160;        case 4:</div><div class="line"><a name="l00406"></a><span class="lineno">  406</span>&#160;            loess /dest=dist_smoo /smth=(smooth_factor) srcWave=dist, factors={theta_int}</div><div class="line"><a name="l00407"></a><span class="lineno">  407</span>&#160;            <span class="keywordflow">break</span></div><div class="line"><a name="l00408"></a><span class="lineno">  408</span>&#160;        <span class="keywordflow">case</span> 3:</div><div class="line"><a name="l00409"></a><span class="lineno">  409</span>&#160;            <span class="keywordflow">for</span> (ix = 0; ix &lt; nx; ix += 1)</div><div class="line"><a name="l00410"></a><span class="lineno">  410</span>&#160;                dist = strip[ix][p]</div><div class="line"><a name="l00411"></a><span class="lineno">  411</span>&#160;                <span class="keywordflow">if</span> (smooth_factor &gt; 1)</div><div class="line"><a name="l00412"></a><span class="lineno">  412</span>&#160;                    CurveFit /nthr=0 /q /w=2 poly smooth_factor+1, dist /x=theta_int /d=dist_smoo</div><div class="line"><a name="l00413"></a><span class="lineno">  413</span>&#160;                <span class="keywordflow">else</span></div><div class="line"><a name="l00414"></a><span class="lineno">  414</span>&#160;                    CurveFit /nthr=0 /q /w=2 line, dist /x=theta_int /d=dist_smoo</div><div class="line"><a name="l00415"></a><span class="lineno">  415</span>&#160;                endif</div><div class="line"><a name="l00416"></a><span class="lineno">  416</span>&#160;                strip[ix,ix][] /= dist_smoo[q]</div><div class="line"><a name="l00417"></a><span class="lineno">  417</span>&#160;            endfor</div><div class="line"><a name="l00418"></a><span class="lineno">  418</span>&#160;            dist_smoo = 1</div><div class="line"><a name="l00419"></a><span class="lineno">  419</span>&#160;            <span class="keywordflow">break</span></div><div class="line"><a name="l00420"></a><span class="lineno">  420</span>&#160;    endswitch</div><div class="line"><a name="l00421"></a><span class="lineno">  421</span>&#160;    </div><div class="line"><a name="l00422"></a><span class="lineno">  422</span>&#160;    <span class="comment">// divide</span></div><div class="line"><a name="l00423"></a><span class="lineno">  423</span>&#160;    <span class="keywordflow">if</span> (check != 2)</div><div class="line"><a name="l00424"></a><span class="lineno">  424</span>&#160;        strip /= dist_smoo[q]</div><div class="line"><a name="l00425"></a><span class="lineno">  425</span>&#160;    endif</div><div class="line"><a name="l00426"></a><span class="lineno">  426</span>&#160;    </div><div class="line"><a name="l00427"></a><span class="lineno">  427</span>&#160;    <span class="comment">// check</span></div><div class="line"><a name="l00428"></a><span class="lineno">  428</span>&#160;    <span class="keywordflow">if</span> (check)</div><div class="line"><a name="l00429"></a><span class="lineno">  429</span>&#160;        duplicate /o dist, check_dist</div><div class="line"><a name="l00430"></a><span class="lineno">  430</span>&#160;        duplicate /o dist_smoo, check_smoo</div><div class="line"><a name="l00431"></a><span class="lineno">  431</span>&#160;        setscale /p x dimoffset(dist,0), dimdelta(dist,0), waveunits(dist,0), check_dist, check_smoo</div><div class="line"><a name="l00432"></a><span class="lineno">  432</span>&#160;    endif</div><div class="line"><a name="l00433"></a><span class="lineno">  433</span>&#160;end</div><div class="line"><a name="l00434"></a><span class="lineno">  434</span>&#160;</div><div class="line"><a name="l00464"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ad0a93367d2e9b66bb7b81697e87adfaf">  464</a></span>&#160;<span class="keyword">function</span> <a class="code" href="pearl-anglescan-process_8ipf.html#ad0a93367d2e9b66bb7b81697e87adfaf">normalize_strip_thetaphi</a>(strip, theta, phi, [theta_offset, smooth_method, smooth_factor, check])</div><div class="line"><a name="l00465"></a><span class="lineno">  465</span>&#160;    wave strip</div><div class="line"><a name="l00466"></a><span class="lineno">  466</span>&#160;    wave theta</div><div class="line"><a name="l00467"></a><span class="lineno">  467</span>&#160;    wave phi</div><div class="line"><a name="l00468"></a><span class="lineno">  468</span>&#160;    variable theta_offset</div><div class="line"><a name="l00469"></a><span class="lineno">  469</span>&#160;    variable smooth_method</div><div class="line"><a name="l00470"></a><span class="lineno">  470</span>&#160;    variable smooth_factor</div><div class="line"><a name="l00471"></a><span class="lineno">  471</span>&#160;    variable check</div><div class="line"><a name="l00472"></a><span class="lineno">  472</span>&#160;    </div><div class="line"><a name="l00473"></a><span class="lineno">  473</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(check))</div><div class="line"><a name="l00474"></a><span class="lineno">  474</span>&#160;        check = 0</div><div class="line"><a name="l00475"></a><span class="lineno">  475</span>&#160;    endif</div><div class="line"><a name="l00476"></a><span class="lineno">  476</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(theta_offset))</div><div class="line"><a name="l00477"></a><span class="lineno">  477</span>&#160;        theta_offset = 0</div><div class="line"><a name="l00478"></a><span class="lineno">  478</span>&#160;    endif</div><div class="line"><a name="l00479"></a><span class="lineno">  479</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(smooth_method))</div><div class="line"><a name="l00480"></a><span class="lineno">  480</span>&#160;        smooth_method = 4</div><div class="line"><a name="l00481"></a><span class="lineno">  481</span>&#160;    endif</div><div class="line"><a name="l00482"></a><span class="lineno">  482</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(smooth_factor))</div><div class="line"><a name="l00483"></a><span class="lineno">  483</span>&#160;        smooth_factor = 0.5</div><div class="line"><a name="l00484"></a><span class="lineno">  484</span>&#160;    endif</div><div class="line"><a name="l00485"></a><span class="lineno">  485</span>&#160;</div><div class="line"><a name="l00486"></a><span class="lineno">  486</span>&#160;    <span class="comment">// average over analyser angles</span></div><div class="line"><a name="l00487"></a><span class="lineno">  487</span>&#160;    wave dist = <a class="code" href="pearl-area-profiles_8ipf.html#abb1eed32a982037ebab00f5c3ea95e62">ad_profile_y</a>(strip, -inf, inf, <span class="stringliteral">&quot;&quot;</span>)</div><div class="line"><a name="l00488"></a><span class="lineno">  488</span>&#160;    </div><div class="line"><a name="l00489"></a><span class="lineno">  489</span>&#160;    <span class="comment">// smooth distribution function</span></div><div class="line"><a name="l00490"></a><span class="lineno">  490</span>&#160;    duplicate /free dist, dist_smoo</div><div class="line"><a name="l00491"></a><span class="lineno">  491</span>&#160;    duplicate /free theta, theta_int</div><div class="line"><a name="l00492"></a><span class="lineno">  492</span>&#160;    theta_int = theta - theta_offset</div><div class="line"><a name="l00493"></a><span class="lineno">  493</span>&#160;    setscale /p x theta_int[0], theta_int[1] - theta_int[0], waveunits(theta,-1), dist, dist_smoo</div><div class="line"><a name="l00494"></a><span class="lineno">  494</span>&#160;    variable nx = dimsize(strip, 0)</div><div class="line"><a name="l00495"></a><span class="lineno">  495</span>&#160;    variable ix</div><div class="line"><a name="l00496"></a><span class="lineno">  496</span>&#160;    </div><div class="line"><a name="l00497"></a><span class="lineno">  497</span>&#160;    switch(smooth_method)</div><div class="line"><a name="l00498"></a><span class="lineno">  498</span>&#160;        case 4:</div><div class="line"><a name="l00499"></a><span class="lineno">  499</span>&#160;            loess /dest=dist_smoo /smth=(smooth_factor) srcWave=dist, factors={theta_int, phi}</div><div class="line"><a name="l00500"></a><span class="lineno">  500</span>&#160;            <span class="keywordflow">break</span></div><div class="line"><a name="l00501"></a><span class="lineno">  501</span>&#160;        <span class="keywordflow">default</span>:</div><div class="line"><a name="l00502"></a><span class="lineno">  502</span>&#160;            abort <span class="stringliteral">&quot;smooth method not supported&quot;</span></div><div class="line"><a name="l00503"></a><span class="lineno">  503</span>&#160;    endswitch</div><div class="line"><a name="l00504"></a><span class="lineno">  504</span>&#160;    </div><div class="line"><a name="l00505"></a><span class="lineno">  505</span>&#160;    <span class="comment">// divide</span></div><div class="line"><a name="l00506"></a><span class="lineno">  506</span>&#160;    <span class="keywordflow">if</span> (check != 2)</div><div class="line"><a name="l00507"></a><span class="lineno">  507</span>&#160;        strip /= dist_smoo[q]</div><div class="line"><a name="l00508"></a><span class="lineno">  508</span>&#160;    endif</div><div class="line"><a name="l00509"></a><span class="lineno">  509</span>&#160;    </div><div class="line"><a name="l00510"></a><span class="lineno">  510</span>&#160;    <span class="comment">// check</span></div><div class="line"><a name="l00511"></a><span class="lineno">  511</span>&#160;    <span class="keywordflow">if</span> (check)</div><div class="line"><a name="l00512"></a><span class="lineno">  512</span>&#160;        duplicate /o dist, check_dist</div><div class="line"><a name="l00513"></a><span class="lineno">  513</span>&#160;        duplicate /o dist_smoo, check_smoo</div><div class="line"><a name="l00514"></a><span class="lineno">  514</span>&#160;        setscale /p x dimoffset(dist,0), dimdelta(dist,0), waveunits(dist,0), check_dist, check_smoo</div><div class="line"><a name="l00515"></a><span class="lineno">  515</span>&#160;    endif</div><div class="line"><a name="l00516"></a><span class="lineno">  516</span>&#160;end</div><div class="line"><a name="l00517"></a><span class="lineno">  517</span>&#160;</div><div class="line"><a name="l00523"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a992920d621023e6b483ff51eee68b508">  523</a></span>&#160;<span class="keyword">function</span> <a class="code" href="pearl-anglescan-process_8ipf.html#a992920d621023e6b483ff51eee68b508">normalize_strip_theta_scans</a>(strip, theta, [theta_offset, smooth_method, smooth_factor, check])</div><div class="line"><a name="l00524"></a><span class="lineno">  524</span>&#160;    wave strip</div><div class="line"><a name="l00525"></a><span class="lineno">  525</span>&#160;    wave theta</div><div class="line"><a name="l00526"></a><span class="lineno">  526</span>&#160;    variable theta_offset</div><div class="line"><a name="l00527"></a><span class="lineno">  527</span>&#160;    variable smooth_method</div><div class="line"><a name="l00528"></a><span class="lineno">  528</span>&#160;    variable smooth_factor</div><div class="line"><a name="l00529"></a><span class="lineno">  529</span>&#160;    variable check</div><div class="line"><a name="l00530"></a><span class="lineno">  530</span>&#160;    </div><div class="line"><a name="l00531"></a><span class="lineno">  531</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(check))</div><div class="line"><a name="l00532"></a><span class="lineno">  532</span>&#160;        check = 0</div><div class="line"><a name="l00533"></a><span class="lineno">  533</span>&#160;    endif</div><div class="line"><a name="l00534"></a><span class="lineno">  534</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(theta_offset))</div><div class="line"><a name="l00535"></a><span class="lineno">  535</span>&#160;        theta_offset = 0</div><div class="line"><a name="l00536"></a><span class="lineno">  536</span>&#160;    endif</div><div class="line"><a name="l00537"></a><span class="lineno">  537</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(smooth_method))</div><div class="line"><a name="l00538"></a><span class="lineno">  538</span>&#160;        smooth_method = 4</div><div class="line"><a name="l00539"></a><span class="lineno">  539</span>&#160;    endif</div><div class="line"><a name="l00540"></a><span class="lineno">  540</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(smooth_factor))</div><div class="line"><a name="l00541"></a><span class="lineno">  541</span>&#160;        smooth_factor = 0.5</div><div class="line"><a name="l00542"></a><span class="lineno">  542</span>&#160;    endif</div><div class="line"><a name="l00543"></a><span class="lineno">  543</span>&#160;</div><div class="line"><a name="l00544"></a><span class="lineno">  544</span>&#160;    <span class="comment">// average over analyser angles</span></div><div class="line"><a name="l00545"></a><span class="lineno">  545</span>&#160;    wave dist = <a class="code" href="pearl-area-profiles_8ipf.html#abb1eed32a982037ebab00f5c3ea95e62">ad_profile_y</a>(strip, -inf, inf, <span class="stringliteral">&quot;&quot;</span>)</div><div class="line"><a name="l00546"></a><span class="lineno">  546</span>&#160;    </div><div class="line"><a name="l00547"></a><span class="lineno">  547</span>&#160;    <span class="comment">// smooth distribution function</span></div><div class="line"><a name="l00548"></a><span class="lineno">  548</span>&#160;    duplicate /free dist, dist_smoo</div><div class="line"><a name="l00549"></a><span class="lineno">  549</span>&#160;    duplicate /free theta, theta_int</div><div class="line"><a name="l00550"></a><span class="lineno">  550</span>&#160;    theta_int = theta - theta_offset</div><div class="line"><a name="l00551"></a><span class="lineno">  551</span>&#160;    setscale /p x theta_int[0], theta_int[1] - theta_int[0], waveunits(theta,-1), dist, dist_smoo</div><div class="line"><a name="l00552"></a><span class="lineno">  552</span>&#160;</div><div class="line"><a name="l00553"></a><span class="lineno">  553</span>&#160;    <span class="comment">// analyse scanning scheme</span></div><div class="line"><a name="l00554"></a><span class="lineno">  554</span>&#160;    duplicate /free theta_int, d1_theta, d2_theta</div><div class="line"><a name="l00555"></a><span class="lineno">  555</span>&#160;    Differentiate /METH=2 theta_int /D=d1_theta</div><div class="line"><a name="l00556"></a><span class="lineno">  556</span>&#160;    Differentiate /METH=2 d1_theta /D=d2_theta</div><div class="line"><a name="l00557"></a><span class="lineno">  557</span>&#160;    d2_theta =  abs(d2_theta)</div><div class="line"><a name="l00558"></a><span class="lineno">  558</span>&#160;    make /free w_levels</div><div class="line"><a name="l00559"></a><span class="lineno">  559</span>&#160;    FindLevels /edge=1 /p /q /d=w_levels d2_theta, 0.1</div><div class="line"><a name="l00560"></a><span class="lineno">  560</span>&#160;    if (v_flag != 1)</div><div class="line"><a name="l00561"></a><span class="lineno">  561</span>&#160;        abort &quot;unrecognized scanning scheme&quot;</div><div class="line"><a name="l00562"></a><span class="lineno">  562</span>&#160;    endif</div><div class="line"><a name="l00563"></a><span class="lineno">  563</span>&#160;    w_levels = ceil(w_levels)</div><div class="line"><a name="l00564"></a><span class="lineno">  564</span>&#160;    InsertPoints 0, 1, w_levels</div><div class="line"><a name="l00565"></a><span class="lineno">  565</span>&#160;    w_levels[0] = 0</div><div class="line"><a name="l00566"></a><span class="lineno">  566</span>&#160;    InsertPoints numpnts(w_levels), 1, w_levels</div><div class="line"><a name="l00567"></a><span class="lineno">  567</span>&#160;    w_levels[numpnts(w_levels)-1] = numpnts(theta_int)</div><div class="line"><a name="l00568"></a><span class="lineno">  568</span>&#160;    </div><div class="line"><a name="l00569"></a><span class="lineno">  569</span>&#160;    variable n_scans = numpnts(w_levels) - 1</div><div class="line"><a name="l00570"></a><span class="lineno">  570</span>&#160;    variable i_scan</div><div class="line"><a name="l00571"></a><span class="lineno">  571</span>&#160;    variable p1, p2</div><div class="line"><a name="l00572"></a><span class="lineno">  572</span>&#160;    for (i_scan = 0; i_scan &lt; n_scans; i_scan += 1)</div><div class="line"><a name="l00573"></a><span class="lineno">  573</span>&#160;        p1 = w_levels[i_scan]</div><div class="line"><a name="l00574"></a><span class="lineno">  574</span>&#160;        p2 = w_levels[i_scan+1] - 1</div><div class="line"><a name="l00575"></a><span class="lineno">  575</span>&#160;        duplicate /free /r=[p1, p2] dist, dist_piece, smooth_piece</div><div class="line"><a name="l00576"></a><span class="lineno">  576</span>&#160;        duplicate /free /r=[p1, p2] theta_int, theta_piece</div><div class="line"><a name="l00577"></a><span class="lineno">  577</span>&#160;        switch(smooth_method)</div><div class="line"><a name="l00578"></a><span class="lineno">  578</span>&#160;            case 4:</div><div class="line"><a name="l00579"></a><span class="lineno">  579</span>&#160;                loess /dest=smooth_piece /smth=(smooth_factor) srcWave=dist_piece, factors={theta_piece}</div><div class="line"><a name="l00580"></a><span class="lineno">  580</span>&#160;                <span class="keywordflow">break</span></div><div class="line"><a name="l00581"></a><span class="lineno">  581</span>&#160;            <span class="keywordflow">default</span>:</div><div class="line"><a name="l00582"></a><span class="lineno">  582</span>&#160;                abort <span class="stringliteral">&quot;smooth method not supported&quot;</span></div><div class="line"><a name="l00583"></a><span class="lineno">  583</span>&#160;        endswitch</div><div class="line"><a name="l00584"></a><span class="lineno">  584</span>&#160;        dist_smoo[p1, p2] = smooth_piece[p - p1]</div><div class="line"><a name="l00585"></a><span class="lineno">  585</span>&#160;    endfor</div><div class="line"><a name="l00586"></a><span class="lineno">  586</span>&#160;    </div><div class="line"><a name="l00587"></a><span class="lineno">  587</span>&#160;    <span class="comment">// divide</span></div><div class="line"><a name="l00588"></a><span class="lineno">  588</span>&#160;    <span class="keywordflow">if</span> (check != 2)</div><div class="line"><a name="l00589"></a><span class="lineno">  589</span>&#160;        strip /= dist_smoo[q]</div><div class="line"><a name="l00590"></a><span class="lineno">  590</span>&#160;    endif</div><div class="line"><a name="l00591"></a><span class="lineno">  591</span>&#160;</div><div class="line"><a name="l00592"></a><span class="lineno">  592</span>&#160;    <span class="comment">// check</span></div><div class="line"><a name="l00593"></a><span class="lineno">  593</span>&#160;    <span class="keywordflow">if</span> (check)</div><div class="line"><a name="l00594"></a><span class="lineno">  594</span>&#160;        duplicate /o dist, check_dist</div><div class="line"><a name="l00595"></a><span class="lineno">  595</span>&#160;        duplicate /o dist_smoo, check_smoo</div><div class="line"><a name="l00596"></a><span class="lineno">  596</span>&#160;        setscale /p x dimoffset(dist,0), dimdelta(dist,0), waveunits(dist,0), check_dist, check_smoo</div><div class="line"><a name="l00597"></a><span class="lineno">  597</span>&#160;    endif</div><div class="line"><a name="l00598"></a><span class="lineno">  598</span>&#160;end</div><div class="line"><a name="l00599"></a><span class="lineno">  599</span>&#160;</div><div class="line"><a name="l00613"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ac617c3b400488b656493af8ca08f1791">  613</a></span>&#160;<span class="keyword">function</span> <a class="code" href="pearl-anglescan-process_8ipf.html#ac617c3b400488b656493af8ca08f1791">normalize_strip_2d</a>(strip, theta, [theta_offset, smooth_method, smooth_factor, check])</div><div class="line"><a name="l00614"></a><span class="lineno">  614</span>&#160;    wave strip</div><div class="line"><a name="l00615"></a><span class="lineno">  615</span>&#160;    wave theta</div><div class="line"><a name="l00616"></a><span class="lineno">  616</span>&#160;    variable theta_offset</div><div class="line"><a name="l00617"></a><span class="lineno">  617</span>&#160;    variable smooth_method</div><div class="line"><a name="l00618"></a><span class="lineno">  618</span>&#160;    variable smooth_factor</div><div class="line"><a name="l00619"></a><span class="lineno">  619</span>&#160;    variable check</div><div class="line"><a name="l00620"></a><span class="lineno">  620</span>&#160;    </div><div class="line"><a name="l00621"></a><span class="lineno">  621</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(check))</div><div class="line"><a name="l00622"></a><span class="lineno">  622</span>&#160;        check = 0</div><div class="line"><a name="l00623"></a><span class="lineno">  623</span>&#160;    endif</div><div class="line"><a name="l00624"></a><span class="lineno">  624</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(theta_offset))</div><div class="line"><a name="l00625"></a><span class="lineno">  625</span>&#160;        theta_offset = 0</div><div class="line"><a name="l00626"></a><span class="lineno">  626</span>&#160;    endif</div><div class="line"><a name="l00627"></a><span class="lineno">  627</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(smooth_method))</div><div class="line"><a name="l00628"></a><span class="lineno">  628</span>&#160;        smooth_method = 4</div><div class="line"><a name="l00629"></a><span class="lineno">  629</span>&#160;    endif</div><div class="line"><a name="l00630"></a><span class="lineno">  630</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(smooth_factor))</div><div class="line"><a name="l00631"></a><span class="lineno">  631</span>&#160;        smooth_factor = 0.5</div><div class="line"><a name="l00632"></a><span class="lineno">  632</span>&#160;    endif</div><div class="line"><a name="l00633"></a><span class="lineno">  633</span>&#160;</div><div class="line"><a name="l00634"></a><span class="lineno">  634</span>&#160;    variable nx = dimsize(strip, 0)</div><div class="line"><a name="l00635"></a><span class="lineno">  635</span>&#160;    variable ny = dimsize(strip, 1)</div><div class="line"><a name="l00636"></a><span class="lineno">  636</span>&#160;    </div><div class="line"><a name="l00637"></a><span class="lineno">  637</span>&#160;    duplicate /free strip, dist, alpha_int, theta_int</div><div class="line"><a name="l00638"></a><span class="lineno">  638</span>&#160;    theta_int = theta[q] - theta_offset</div><div class="line"><a name="l00639"></a><span class="lineno">  639</span>&#160;    alpha_int = dimoffset(strip, 0) + p * dimdelta(strip, 0)</div><div class="line"><a name="l00640"></a><span class="lineno">  640</span>&#160;    redimension /n=(nx * ny) dist, alpha_int, theta_int</div><div class="line"><a name="l00641"></a><span class="lineno">  641</span>&#160;    </div><div class="line"><a name="l00642"></a><span class="lineno">  642</span>&#160;    switch(smooth_method)</div><div class="line"><a name="l00643"></a><span class="lineno">  643</span>&#160;        case 4:</div><div class="line"><a name="l00644"></a><span class="lineno">  644</span>&#160;            loess /dest=dist_smoo /smth=(smooth_factor) srcWave=dist, factors={alpha_int, theta_int}</div><div class="line"><a name="l00645"></a><span class="lineno">  645</span>&#160;            redimension /n=(nx, ny) dist_smoo</div><div class="line"><a name="l00646"></a><span class="lineno">  646</span>&#160;            <span class="keywordflow">break</span></div><div class="line"><a name="l00647"></a><span class="lineno">  647</span>&#160;        <span class="keywordflow">default</span>:</div><div class="line"><a name="l00648"></a><span class="lineno">  648</span>&#160;            Abort <span class="stringliteral">&quot;undefined smooth method&quot;</span></div><div class="line"><a name="l00649"></a><span class="lineno">  649</span>&#160;            <span class="keywordflow">break</span></div><div class="line"><a name="l00650"></a><span class="lineno">  650</span>&#160;    endswitch</div><div class="line"><a name="l00651"></a><span class="lineno">  651</span>&#160;    </div><div class="line"><a name="l00652"></a><span class="lineno">  652</span>&#160;    <span class="comment">// divide</span></div><div class="line"><a name="l00653"></a><span class="lineno">  653</span>&#160;    <span class="keywordflow">if</span> (check != 2)</div><div class="line"><a name="l00654"></a><span class="lineno">  654</span>&#160;        strip /= dist_smoo</div><div class="line"><a name="l00655"></a><span class="lineno">  655</span>&#160;    endif</div><div class="line"><a name="l00656"></a><span class="lineno">  656</span>&#160;    </div><div class="line"><a name="l00657"></a><span class="lineno">  657</span>&#160;    <span class="comment">// check</span></div><div class="line"><a name="l00658"></a><span class="lineno">  658</span>&#160;    <span class="keywordflow">if</span> (check)</div><div class="line"><a name="l00659"></a><span class="lineno">  659</span>&#160;        <span class="comment">//duplicate /o dist, check_dist</span></div><div class="line"><a name="l00660"></a><span class="lineno">  660</span>&#160;        duplicate /o dist_smoo, check_smoo</div><div class="line"><a name="l00661"></a><span class="lineno">  661</span>&#160;    endif</div><div class="line"><a name="l00662"></a><span class="lineno">  662</span>&#160;end</div><div class="line"><a name="l00663"></a><span class="lineno">  663</span>&#160;</div><div class="line"><a name="l00673"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ab65d25af7476ed18f7bf7359614a912b">  673</a></span>&#160;<span class="keyword">function</span> <a class="code" href="pearl-anglescan-process_8ipf.html#ab65d25af7476ed18f7bf7359614a912b">crop_strip</a>(strip, xlo, xhi)</div><div class="line"><a name="l00674"></a><span class="lineno">  674</span>&#160;    wave strip</div><div class="line"><a name="l00675"></a><span class="lineno">  675</span>&#160;    variable xlo</div><div class="line"><a name="l00676"></a><span class="lineno">  676</span>&#160;    variable xhi</div><div class="line"><a name="l00677"></a><span class="lineno">  677</span>&#160;    </div><div class="line"><a name="l00678"></a><span class="lineno">  678</span>&#160;    variable plo = round((xlo - dimoffset(strip, 0)) / dimdelta(strip, 0))</div><div class="line"><a name="l00679"></a><span class="lineno">  679</span>&#160;    variable phi = round((xhi - dimoffset(strip, 0)) / dimdelta(strip, 0))</div><div class="line"><a name="l00680"></a><span class="lineno">  680</span>&#160;    xlo = plo * dimdelta(strip, 0) + dimoffset(strip, 0)</div><div class="line"><a name="l00681"></a><span class="lineno">  681</span>&#160;    xhi = phi * dimdelta(strip, 0) + dimoffset(strip, 0)</div><div class="line"><a name="l00682"></a><span class="lineno">  682</span>&#160;    variable nx = phi - plo + 1</div><div class="line"><a name="l00683"></a><span class="lineno">  683</span>&#160;    variable ny = dimsize(strip, 1)</div><div class="line"><a name="l00684"></a><span class="lineno">  684</span>&#160;    </div><div class="line"><a name="l00685"></a><span class="lineno">  685</span>&#160;    duplicate /free strip, strip_copy</div><div class="line"><a name="l00686"></a><span class="lineno">  686</span>&#160;    redimension /n=(nx,ny) strip</div><div class="line"><a name="l00687"></a><span class="lineno">  687</span>&#160;    strip = strip_copy[p + plo][q]</div><div class="line"><a name="l00688"></a><span class="lineno">  688</span>&#160;    setscale /i x xlo, xhi, waveunits(strip, 0), strip</div><div class="line"><a name="l00689"></a><span class="lineno">  689</span>&#160;end</div><div class="line"><a name="l00690"></a><span class="lineno">  690</span>&#160;</div><div class="line"><a name="l00705"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#aa79c0ff6073bd42e202b9fa3f8c00b9f">  705</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#aa79c0ff6073bd42e202b9fa3f8c00b9f">crop_strip_theta</a>(strip, theta_lo, theta_hi, theta, tilt, phi)</div><div class="line"><a name="l00706"></a><span class="lineno">  706</span>&#160;    wave strip</div><div class="line"><a name="l00707"></a><span class="lineno">  707</span>&#160;    variable theta_lo</div><div class="line"><a name="l00708"></a><span class="lineno">  708</span>&#160;    variable theta_hi</div><div class="line"><a name="l00709"></a><span class="lineno">  709</span>&#160;    wave theta</div><div class="line"><a name="l00710"></a><span class="lineno">  710</span>&#160;    wave tilt</div><div class="line"><a name="l00711"></a><span class="lineno">  711</span>&#160;    wave phi</div><div class="line"><a name="l00712"></a><span class="lineno">  712</span>&#160;    </div><div class="line"><a name="l00713"></a><span class="lineno">  713</span>&#160;    extract /indx /free theta, idx, (theta &gt;= theta_lo) &amp;&amp; (theta &lt;= theta_hi)</div><div class="line"><a name="l00714"></a><span class="lineno">  714</span>&#160;    variable nx = dimsize(strip, 0)</div><div class="line"><a name="l00715"></a><span class="lineno">  715</span>&#160;    variable ny = numpnts(idx)</div><div class="line"><a name="l00716"></a><span class="lineno">  716</span>&#160;    </div><div class="line"><a name="l00717"></a><span class="lineno">  717</span>&#160;    theta = theta[idx]</div><div class="line"><a name="l00718"></a><span class="lineno">  718</span>&#160;    tilt = tilt[idx]</div><div class="line"><a name="l00719"></a><span class="lineno">  719</span>&#160;    phi = phi[idx]</div><div class="line"><a name="l00720"></a><span class="lineno">  720</span>&#160;    redimension /n=(ny) theta, tilt, phi</div><div class="line"><a name="l00721"></a><span class="lineno">  721</span>&#160;    </div><div class="line"><a name="l00722"></a><span class="lineno">  722</span>&#160;    duplicate /free strip, strip_copy</div><div class="line"><a name="l00723"></a><span class="lineno">  723</span>&#160;    redimension /n=(nx,ny) strip</div><div class="line"><a name="l00724"></a><span class="lineno">  724</span>&#160;    strip = strip_copy[p][idx[q]]</div><div class="line"><a name="l00725"></a><span class="lineno">  725</span>&#160;end</div><div class="line"><a name="l00726"></a><span class="lineno">  726</span>&#160;</div><div class="line"><a name="l00769"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#afed227ae79873fd32c96afbf606d1965">  769</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#afed227ae79873fd32c96afbf606d1965">pizza_service</a>(data, nickname, theta_offset, tilt_offset, phi_offset, [npolar, nograph, folding, xpdplot])</div><div class="line"><a name="l00770"></a><span class="lineno">  770</span>&#160;    wave data</div><div class="line"><a name="l00771"></a><span class="lineno">  771</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l00772"></a><span class="lineno">  772</span>&#160;    variable theta_offset</div><div class="line"><a name="l00773"></a><span class="lineno">  773</span>&#160;    variable tilt_offset</div><div class="line"><a name="l00774"></a><span class="lineno">  774</span>&#160;    variable phi_offset</div><div class="line"><a name="l00775"></a><span class="lineno">  775</span>&#160;    variable npolar</div><div class="line"><a name="l00776"></a><span class="lineno">  776</span>&#160;    variable nograph</div><div class="line"><a name="l00777"></a><span class="lineno">  777</span>&#160;    variable folding</div><div class="line"><a name="l00778"></a><span class="lineno">  778</span>&#160;    variable xpdplot</div><div class="line"><a name="l00779"></a><span class="lineno">  779</span>&#160;        </div><div class="line"><a name="l00780"></a><span class="lineno">  780</span>&#160;    if (ParamIsDefault(npolar))</div><div class="line"><a name="l00781"></a><span class="lineno">  781</span>&#160;        npolar = 91</div><div class="line"><a name="l00782"></a><span class="lineno">  782</span>&#160;    endif</div><div class="line"><a name="l00783"></a><span class="lineno">  783</span>&#160;    if (ParamIsDefault(nograph))</div><div class="line"><a name="l00784"></a><span class="lineno">  784</span>&#160;        nograph = 0</div><div class="line"><a name="l00785"></a><span class="lineno">  785</span>&#160;    endif</div><div class="line"><a name="l00786"></a><span class="lineno">  786</span>&#160;    if (ParamIsDefault(folding))</div><div class="line"><a name="l00787"></a><span class="lineno">  787</span>&#160;        folding = 1</div><div class="line"><a name="l00788"></a><span class="lineno">  788</span>&#160;    endif</div><div class="line"><a name="l00789"></a><span class="lineno">  789</span>&#160;    if (ParamIsDefault(xpdplot))</div><div class="line"><a name="l00790"></a><span class="lineno">  790</span>&#160;        xpdplot = 0</div><div class="line"><a name="l00791"></a><span class="lineno">  791</span>&#160;    endif</div><div class="line"><a name="l00792"></a><span class="lineno">  792</span>&#160;    </div><div class="line"><a name="l00793"></a><span class="lineno">  793</span>&#160;    <span class="comment">// sort out data folder structure</span></div><div class="line"><a name="l00794"></a><span class="lineno">  794</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00795"></a><span class="lineno">  795</span>&#160;    dfref dataDF = GetWavesDataFolderDFR(data)</div><div class="line"><a name="l00796"></a><span class="lineno">  796</span>&#160;    setdatafolder dataDF</div><div class="line"><a name="l00797"></a><span class="lineno">  797</span>&#160;    if (DataFolderExists(&quot;:attr&quot;))</div><div class="line"><a name="l00798"></a><span class="lineno">  798</span>&#160;        setdatafolder :attr</div><div class="line"><a name="l00799"></a><span class="lineno">  799</span>&#160;    endif</div><div class="line"><a name="l00800"></a><span class="lineno">  800</span>&#160;    dfref attrDF = GetDataFolderDFR()</div><div class="line"><a name="l00801"></a><span class="lineno">  801</span>&#160;    </div><div class="line"><a name="l00802"></a><span class="lineno">  802</span>&#160;    wave /sdfr=attrDF ManipulatorTheta</div><div class="line"><a name="l00803"></a><span class="lineno">  803</span>&#160;    wave /sdfr=attrDF ManipulatorTilt</div><div class="line"><a name="l00804"></a><span class="lineno">  804</span>&#160;    wave /sdfr=attrDF ManipulatorPhi</div><div class="line"><a name="l00805"></a><span class="lineno">  805</span>&#160;</div><div class="line"><a name="l00806"></a><span class="lineno">  806</span>&#160;    if ((dimsize(ManipulatorTheta, 0) != dimsize(data, 1)) || (dimsize(ManipulatorTilt, 0) != dimsize(data, 1)) || (dimsize(ManipulatorPhi, 0) != dimsize(data, 1)))</div><div class="line"><a name="l00807"></a><span class="lineno">  807</span>&#160;        Abort &quot;Warning: The dimension size of the manipulator waves does not match the Y dimension of the data wave!\rIf you restructured the data wave, please use <a class="code" href="pearl-anglescan-process_8ipf.html#a229770447193d4fd12032b235aab4d28">pizza_service_2</a> with properly scaled manipulator waves.&quot;</div><div class="line"><a name="l00808"></a><span class="lineno">  808</span>&#160;    endif</div><div class="line"><a name="l00809"></a><span class="lineno">  809</span>&#160;</div><div class="line"><a name="l00810"></a><span class="lineno">  810</span>&#160;    duplicate /free ManipulatorTheta, m_theta</div><div class="line"><a name="l00811"></a><span class="lineno">  811</span>&#160;    duplicate /free ManipulatorTilt, m_tilt</div><div class="line"><a name="l00812"></a><span class="lineno">  812</span>&#160;    duplicate /free ManipulatorPhi, m_phi</div><div class="line"><a name="l00813"></a><span class="lineno">  813</span>&#160;</div><div class="line"><a name="l00814"></a><span class="lineno">  814</span>&#160;    m_theta -= theta_offset</div><div class="line"><a name="l00815"></a><span class="lineno">  815</span>&#160;    m_tilt -= tilt_offset</div><div class="line"><a name="l00816"></a><span class="lineno">  816</span>&#160;    m_phi -= phi_offset</div><div class="line"><a name="l00817"></a><span class="lineno">  817</span>&#160;    </div><div class="line"><a name="l00818"></a><span class="lineno">  818</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a229770447193d4fd12032b235aab4d28">pizza_service_2</a>(data, nickname, m_theta, m_tilt, m_phi, npolar=npolar, nograph=nograph, folding=folding, xpdplot=xpdplot)</div><div class="line"><a name="l00819"></a><span class="lineno">  819</span>&#160;    </div><div class="line"><a name="l00820"></a><span class="lineno">  820</span>&#160;    setdatafolder saveDF</div><div class="line"><a name="l00821"></a><span class="lineno">  821</span>&#160;end</div><div class="line"><a name="l00822"></a><span class="lineno">  822</span>&#160;</div><div class="line"><a name="l00862"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a229770447193d4fd12032b235aab4d28">  862</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a229770447193d4fd12032b235aab4d28">pizza_service_2</a>(data, nickname, m_theta, m_tilt, m_phi, [npolar, nograph, folding, xpdplot])</div><div class="line"><a name="l00863"></a><span class="lineno">  863</span>&#160;    wave data</div><div class="line"><a name="l00864"></a><span class="lineno">  864</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l00865"></a><span class="lineno">  865</span>&#160;    wave m_theta</div><div class="line"><a name="l00866"></a><span class="lineno">  866</span>&#160;    wave m_tilt</div><div class="line"><a name="l00867"></a><span class="lineno">  867</span>&#160;    wave m_phi</div><div class="line"><a name="l00868"></a><span class="lineno">  868</span>&#160;    variable npolar</div><div class="line"><a name="l00869"></a><span class="lineno">  869</span>&#160;    variable nograph</div><div class="line"><a name="l00870"></a><span class="lineno">  870</span>&#160;    variable folding</div><div class="line"><a name="l00871"></a><span class="lineno">  871</span>&#160;    variable xpdplot</div><div class="line"><a name="l00872"></a><span class="lineno">  872</span>&#160;        </div><div class="line"><a name="l00873"></a><span class="lineno">  873</span>&#160;    if (ParamIsDefault(npolar))</div><div class="line"><a name="l00874"></a><span class="lineno">  874</span>&#160;        npolar = 91</div><div class="line"><a name="l00875"></a><span class="lineno">  875</span>&#160;    endif</div><div class="line"><a name="l00876"></a><span class="lineno">  876</span>&#160;    if (ParamIsDefault(nograph))</div><div class="line"><a name="l00877"></a><span class="lineno">  877</span>&#160;        nograph = 0</div><div class="line"><a name="l00878"></a><span class="lineno">  878</span>&#160;    endif</div><div class="line"><a name="l00879"></a><span class="lineno">  879</span>&#160;    if (ParamIsDefault(folding))</div><div class="line"><a name="l00880"></a><span class="lineno">  880</span>&#160;        folding = 1</div><div class="line"><a name="l00881"></a><span class="lineno">  881</span>&#160;    endif</div><div class="line"><a name="l00882"></a><span class="lineno">  882</span>&#160;    if (ParamIsDefault(xpdplot))</div><div class="line"><a name="l00883"></a><span class="lineno">  883</span>&#160;        xpdplot = 0</div><div class="line"><a name="l00884"></a><span class="lineno">  884</span>&#160;    endif</div><div class="line"><a name="l00885"></a><span class="lineno">  885</span>&#160;    </div><div class="line"><a name="l00886"></a><span class="lineno">  886</span>&#160;    if ((dimsize(m_theta, 0) != dimsize(data, 1)) || (dimsize(m_tilt, 0) != dimsize(data, 1)) || (dimsize(m_phi, 0) != dimsize(data, 1)))</div><div class="line"><a name="l00887"></a><span class="lineno">  887</span>&#160;        Abort &quot;Warning: The dimension size of the manipulator waves does not match the Y dimension of the data wave!&quot;</div><div class="line"><a name="l00888"></a><span class="lineno">  888</span>&#160;    endif</div><div class="line"><a name="l00889"></a><span class="lineno">  889</span>&#160;    </div><div class="line"><a name="l00890"></a><span class="lineno">  890</span>&#160;    <span class="keywordtype">string</span> graphname = &quot;graph_&quot; + nickname</div><div class="line"><a name="l00891"></a><span class="lineno">  891</span>&#160;    <span class="keywordtype">string</span> outprefix = nickname</div><div class="line"><a name="l00892"></a><span class="lineno">  892</span>&#160;    </div><div class="line"><a name="l00893"></a><span class="lineno">  893</span>&#160;    <span class="comment">// sort out data folder structure</span></div><div class="line"><a name="l00894"></a><span class="lineno">  894</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00895"></a><span class="lineno">  895</span>&#160;    dfref dataDF = GetWavesDataFolderDFR(data)</div><div class="line"><a name="l00896"></a><span class="lineno">  896</span>&#160;    setdatafolder dataDF</div><div class="line"><a name="l00897"></a><span class="lineno">  897</span>&#160;</div><div class="line"><a name="l00898"></a><span class="lineno">  898</span>&#160;    if (xpdplot)</div><div class="line"><a name="l00899"></a><span class="lineno">  899</span>&#160;        setdatafolder root:</div><div class="line"><a name="l00900"></a><span class="lineno">  900</span>&#160;        outprefix = nickname</div><div class="line"><a name="l00901"></a><span class="lineno">  901</span>&#160;    else</div><div class="line"><a name="l00902"></a><span class="lineno">  902</span>&#160;        setdatafolder dataDF</div><div class="line"><a name="l00903"></a><span class="lineno">  903</span>&#160;        newdatafolder /s/o $nickname</div><div class="line"><a name="l00904"></a><span class="lineno">  904</span>&#160;        outprefix = &quot;&quot;</div><div class="line"><a name="l00905"></a><span class="lineno">  905</span>&#160;    endif</div><div class="line"><a name="l00906"></a><span class="lineno">  906</span>&#160;    dfref destDF = GetDataFolderDFR()</div><div class="line"><a name="l00907"></a><span class="lineno">  907</span>&#160;    </div><div class="line"><a name="l00908"></a><span class="lineno">  908</span>&#160;    <span class="comment">// performance monitoring</span></div><div class="line"><a name="l00909"></a><span class="lineno">  909</span>&#160;    variable timerRefNum</div><div class="line"><a name="l00910"></a><span class="lineno">  910</span>&#160;    variable /g pol_perf_secs</div><div class="line"><a name="l00911"></a><span class="lineno">  911</span>&#160;    timerRefNum = startMSTimer</div><div class="line"><a name="l00912"></a><span class="lineno">  912</span>&#160;    </div><div class="line"><a name="l00913"></a><span class="lineno">  913</span>&#160;    duplicate /free m_tilt, corr_tilt</div><div class="line"><a name="l00914"></a><span class="lineno">  914</span>&#160;    duplicate /free m_phi, corr_phi</div><div class="line"><a name="l00915"></a><span class="lineno">  915</span>&#160;    corr_tilt = -m_tilt <span class="comment">// checked 140702</span></div><div class="line"><a name="l00916"></a><span class="lineno">  916</span>&#160;    corr_phi = m_phi    <span class="comment">// checked 140702</span></div><div class="line"><a name="l00917"></a><span class="lineno">  917</span>&#160;    </div><div class="line"><a name="l00918"></a><span class="lineno">  918</span>&#160;    make /n=1/d/free d_polar, d_azi</div><div class="line"><a name="l00919"></a><span class="lineno">  919</span>&#160;    </div><div class="line"><a name="l00920"></a><span class="lineno">  920</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a2b38c6c9b6e60593ba69d3773b6bc779">convert_angles_ttpd2polar</a>(m_theta, corr_tilt, corr_phi, data, d_polar, d_azi)</div><div class="line"><a name="l00921"></a><span class="lineno">  921</span>&#160;    d_azi += 180    <span class="comment">// changed 151030 (v1.6)</span></div><div class="line"><a name="l00922"></a><span class="lineno">  922</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a902ac3a24e33f651e83ee03d31707da7">make_hemi_grid</a>(npolar, outprefix, xpdplot=xpdplot)</div><div class="line"><a name="l00923"></a><span class="lineno">  923</span>&#160;    variable ifold</div><div class="line"><a name="l00924"></a><span class="lineno">  924</span>&#160;    for (ifold = 0; ifold &lt; folding; ifold += 1)</div><div class="line"><a name="l00925"></a><span class="lineno">  925</span>&#160;        d_azi = d_azi &gt;= 360 ? d_azi - 360 : d_azi</div><div class="line"><a name="l00926"></a><span class="lineno">  926</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#a4952bc53e3d6d272d25b5e35e91696b5">hemi_add_anglescan</a>(outprefix, data, d_polar, d_azi)</div><div class="line"><a name="l00927"></a><span class="lineno">  927</span>&#160;        d_azi += 360 / folding</div><div class="line"><a name="l00928"></a><span class="lineno">  928</span>&#160;    endfor</div><div class="line"><a name="l00929"></a><span class="lineno">  929</span>&#160;    </div><div class="line"><a name="l00930"></a><span class="lineno">  930</span>&#160;    <span class="comment">// normalize folding</span></div><div class="line"><a name="l00931"></a><span class="lineno">  931</span>&#160;    if (strlen(outprefix))</div><div class="line"><a name="l00932"></a><span class="lineno">  932</span>&#160;        <span class="keywordtype">string</span> s_prefix = outprefix + &quot;_&quot;</div><div class="line"><a name="l00933"></a><span class="lineno">  933</span>&#160;        <span class="keywordtype">string</span> s_int = s_prefix + &quot;i&quot;</div><div class="line"><a name="l00934"></a><span class="lineno">  934</span>&#160;    else</div><div class="line"><a name="l00935"></a><span class="lineno">  935</span>&#160;        s_prefix = &quot;&quot;</div><div class="line"><a name="l00936"></a><span class="lineno">  936</span>&#160;        s_int = &quot;values&quot;</div><div class="line"><a name="l00937"></a><span class="lineno">  937</span>&#160;    endif</div><div class="line"><a name="l00938"></a><span class="lineno">  938</span>&#160;    if (folding &gt; 1)</div><div class="line"><a name="l00939"></a><span class="lineno">  939</span>&#160;        wave values = $s_int</div><div class="line"><a name="l00940"></a><span class="lineno">  940</span>&#160;        values /= folding</div><div class="line"><a name="l00941"></a><span class="lineno">  941</span>&#160;    endif</div><div class="line"><a name="l00942"></a><span class="lineno">  942</span>&#160;    </div><div class="line"><a name="l00943"></a><span class="lineno">  943</span>&#160;    if (!nograph)</div><div class="line"><a name="l00944"></a><span class="lineno">  944</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#ae57302acfc822c4817f2b7eef55efea2">display_hemi_scan</a>(outprefix, graphname = graphname)</div><div class="line"><a name="l00945"></a><span class="lineno">  945</span>&#160;    endif</div><div class="line"><a name="l00946"></a><span class="lineno">  946</span>&#160;    </div><div class="line"><a name="l00947"></a><span class="lineno">  947</span>&#160;    if (timerRefNum &gt;= 0)</div><div class="line"><a name="l00948"></a><span class="lineno">  948</span>&#160;        pol_perf_secs = stopMSTimer(timerRefNum) / 1e6</div><div class="line"><a name="l00949"></a><span class="lineno">  949</span>&#160;    endif</div><div class="line"><a name="l00950"></a><span class="lineno">  950</span>&#160;</div><div class="line"><a name="l00951"></a><span class="lineno">  951</span>&#160;    setdatafolder saveDF</div><div class="line"><a name="l00952"></a><span class="lineno">  952</span>&#160;end</div><div class="line"><a name="l00953"></a><span class="lineno">  953</span>&#160;</div><div class="line"><a name="l00979"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a01bac9e7d4ba743c3c34177a05070466">  979</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a01bac9e7d4ba743c3c34177a05070466">show_analyser_line</a>(theta, tilt, phi, theta_offset, tilt_offset, phi_offset, [npolar, nograph, xpdplot])</div><div class="line"><a name="l00980"></a><span class="lineno">  980</span>&#160;    variable theta</div><div class="line"><a name="l00981"></a><span class="lineno">  981</span>&#160;    variable tilt</div><div class="line"><a name="l00982"></a><span class="lineno">  982</span>&#160;    variable phi</div><div class="line"><a name="l00983"></a><span class="lineno">  983</span>&#160;    variable theta_offset</div><div class="line"><a name="l00984"></a><span class="lineno">  984</span>&#160;    variable tilt_offset</div><div class="line"><a name="l00985"></a><span class="lineno">  985</span>&#160;    variable phi_offset</div><div class="line"><a name="l00986"></a><span class="lineno">  986</span>&#160;    variable npolar</div><div class="line"><a name="l00987"></a><span class="lineno">  987</span>&#160;    variable nograph</div><div class="line"><a name="l00988"></a><span class="lineno">  988</span>&#160;    variable xpdplot</div><div class="line"><a name="l00989"></a><span class="lineno">  989</span>&#160;        </div><div class="line"><a name="l00990"></a><span class="lineno">  990</span>&#160;    <span class="keywordtype">string</span> nickname = &quot;analyser&quot;</div><div class="line"><a name="l00991"></a><span class="lineno">  991</span>&#160;</div><div class="line"><a name="l00992"></a><span class="lineno">  992</span>&#160;    if (ParamIsDefault(npolar))</div><div class="line"><a name="l00993"></a><span class="lineno">  993</span>&#160;        npolar = 91</div><div class="line"><a name="l00994"></a><span class="lineno">  994</span>&#160;    endif</div><div class="line"><a name="l00995"></a><span class="lineno">  995</span>&#160;    if (ParamIsDefault(nograph))</div><div class="line"><a name="l00996"></a><span class="lineno">  996</span>&#160;        nograph = 0</div><div class="line"><a name="l00997"></a><span class="lineno">  997</span>&#160;    endif</div><div class="line"><a name="l00998"></a><span class="lineno">  998</span>&#160;    if (ParamIsDefault(xpdplot))</div><div class="line"><a name="l00999"></a><span class="lineno">  999</span>&#160;        xpdplot = 0</div><div class="line"><a name="l01000"></a><span class="lineno"> 1000</span>&#160;    endif</div><div class="line"><a name="l01001"></a><span class="lineno"> 1001</span>&#160;    <span class="keywordtype">string</span> graphname = &quot;graph_&quot; + nickname</div><div class="line"><a name="l01002"></a><span class="lineno"> 1002</span>&#160;    <span class="keywordtype">string</span> outprefix = nickname</div><div class="line"><a name="l01003"></a><span class="lineno"> 1003</span>&#160;    </div><div class="line"><a name="l01004"></a><span class="lineno"> 1004</span>&#160;    <span class="comment">// sort out data folder structure</span></div><div class="line"><a name="l01005"></a><span class="lineno"> 1005</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l01006"></a><span class="lineno"> 1006</span>&#160;    dfref dataDF = saveDF</div><div class="line"><a name="l01007"></a><span class="lineno"> 1007</span>&#160;    if (xpdplot)</div><div class="line"><a name="l01008"></a><span class="lineno"> 1008</span>&#160;        setdatafolder root:</div><div class="line"><a name="l01009"></a><span class="lineno"> 1009</span>&#160;        outprefix = nickname</div><div class="line"><a name="l01010"></a><span class="lineno"> 1010</span>&#160;    else</div><div class="line"><a name="l01011"></a><span class="lineno"> 1011</span>&#160;        setdatafolder dataDF</div><div class="line"><a name="l01012"></a><span class="lineno"> 1012</span>&#160;        newdatafolder /s/o $nickname</div><div class="line"><a name="l01013"></a><span class="lineno"> 1013</span>&#160;        outprefix = &quot;&quot;</div><div class="line"><a name="l01014"></a><span class="lineno"> 1014</span>&#160;    endif</div><div class="line"><a name="l01015"></a><span class="lineno"> 1015</span>&#160;    dfref destDF = GetDataFolderDFR()</div><div class="line"><a name="l01016"></a><span class="lineno"> 1016</span>&#160;    </div><div class="line"><a name="l01017"></a><span class="lineno"> 1017</span>&#160;    make /n=1 /free m_theta</div><div class="line"><a name="l01018"></a><span class="lineno"> 1018</span>&#160;    make /n=1 /free m_tilt</div><div class="line"><a name="l01019"></a><span class="lineno"> 1019</span>&#160;    make /n=1 /free m_phi</div><div class="line"><a name="l01020"></a><span class="lineno"> 1020</span>&#160;    m_theta = theta - theta_offset</div><div class="line"><a name="l01021"></a><span class="lineno"> 1021</span>&#160;    m_tilt = tilt - tilt_offset</div><div class="line"><a name="l01022"></a><span class="lineno"> 1022</span>&#160;    m_tilt *= -1 <span class="comment">// checked 140702</span></div><div class="line"><a name="l01023"></a><span class="lineno"> 1023</span>&#160;    m_phi = phi - phi_offset</div><div class="line"><a name="l01024"></a><span class="lineno"> 1024</span>&#160;    <span class="comment">//m_phi *= -1 // checked 140702</span></div><div class="line"><a name="l01025"></a><span class="lineno"> 1025</span>&#160;    </div><div class="line"><a name="l01026"></a><span class="lineno"> 1026</span>&#160;    make /n=60 /free data</div><div class="line"><a name="l01027"></a><span class="lineno"> 1027</span>&#160;    setscale /i x -30, 30, data</div><div class="line"><a name="l01028"></a><span class="lineno"> 1028</span>&#160;    data = x</div><div class="line"><a name="l01029"></a><span class="lineno"> 1029</span>&#160;    make /n=1/d/free d_polar, d_azi</div><div class="line"><a name="l01030"></a><span class="lineno"> 1030</span>&#160;    </div><div class="line"><a name="l01031"></a><span class="lineno"> 1031</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a3cc7eddf5c6b0658260cfb32dd2c026d">convert_angles_ttpa2polar</a>(m_theta, m_tilt, m_phi, data, d_polar, d_azi)</div><div class="line"><a name="l01032"></a><span class="lineno"> 1032</span>&#160;    d_azi += 180    <span class="comment">// changed 151030 (v1.6)</span></div><div class="line"><a name="l01033"></a><span class="lineno"> 1033</span>&#160;    d_azi = d_azi &gt;= 360 ? d_azi - 360 : d_azi</div><div class="line"><a name="l01034"></a><span class="lineno"> 1034</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a902ac3a24e33f651e83ee03d31707da7">make_hemi_grid</a>(npolar, outprefix, xpdplot=xpdplot)</div><div class="line"><a name="l01035"></a><span class="lineno"> 1035</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a4952bc53e3d6d272d25b5e35e91696b5">hemi_add_anglescan</a>(outprefix, data, d_polar, d_azi)</div><div class="line"><a name="l01036"></a><span class="lineno"> 1036</span>&#160;    </div><div class="line"><a name="l01037"></a><span class="lineno"> 1037</span>&#160;    if (!nograph)</div><div class="line"><a name="l01038"></a><span class="lineno"> 1038</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#ae57302acfc822c4817f2b7eef55efea2">display_hemi_scan</a>(outprefix, graphname = graphname)</div><div class="line"><a name="l01039"></a><span class="lineno"> 1039</span>&#160;    endif</div><div class="line"><a name="l01040"></a><span class="lineno"> 1040</span>&#160;    </div><div class="line"><a name="l01041"></a><span class="lineno"> 1041</span>&#160;    setdatafolder saveDF</div><div class="line"><a name="l01042"></a><span class="lineno"> 1042</span>&#160;end</div><div class="line"><a name="l01043"></a><span class="lineno"> 1043</span>&#160;</div><div class="line"><a name="l01048"></a><span class="lineno"> 1048</span>&#160;</div><div class="line"><a name="l01049"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a2b38c6c9b6e60593ba69d3773b6bc779"> 1049</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a2b38c6c9b6e60593ba69d3773b6bc779">convert_angles_ttpd2polar</a>(theta, tilt, phi, data, polar, azi)</div><div class="line"><a name="l01050"></a><span class="lineno"> 1050</span>&#160;    wave theta, tilt, phi <span class="comment">// see convert_angles_ttpa2polar</span></div><div class="line"><a name="l01051"></a><span class="lineno"> 1051</span>&#160;    wave data <span class="comment">// in, 1D or 2D</span></div><div class="line"><a name="l01052"></a><span class="lineno"> 1052</span>&#160;        <span class="comment">// X-scale must be set to analyser angle scale</span></div><div class="line"><a name="l01053"></a><span class="lineno"> 1053</span>&#160;    wave polar, azi <span class="comment">// see convert_angles_ttpa2polar</span></div><div class="line"><a name="l01054"></a><span class="lineno"> 1054</span>&#160;    </div><div class="line"><a name="l01055"></a><span class="lineno"> 1055</span>&#160;    make /n=(dimsize(data, 0)) /d /free ana</div><div class="line"><a name="l01056"></a><span class="lineno"> 1056</span>&#160;    setscale /p x dimoffset(data, 0), dimdelta(data, 0), waveunits(data, 0), ana</div><div class="line"><a name="l01057"></a><span class="lineno"> 1057</span>&#160;    ana = x</div><div class="line"><a name="l01058"></a><span class="lineno"> 1058</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a3cc7eddf5c6b0658260cfb32dd2c026d">convert_angles_ttpa2polar</a>(theta, tilt, phi, ana, polar, azi)</div><div class="line"><a name="l01059"></a><span class="lineno"> 1059</span>&#160;end</div><div class="line"><a name="l01060"></a><span class="lineno"> 1060</span>&#160;</div><div class="line"><a name="l01088"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a3cc7eddf5c6b0658260cfb32dd2c026d"> 1088</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a3cc7eddf5c6b0658260cfb32dd2c026d">convert_angles_ttpa2polar</a>(theta, tilt, phi, analyser, polar, azi)</div><div class="line"><a name="l01089"></a><span class="lineno"> 1089</span>&#160;    wave theta</div><div class="line"><a name="l01090"></a><span class="lineno"> 1090</span>&#160;    wave tilt</div><div class="line"><a name="l01091"></a><span class="lineno"> 1091</span>&#160;    wave phi</div><div class="line"><a name="l01092"></a><span class="lineno"> 1092</span>&#160;    wave analyser</div><div class="line"><a name="l01093"></a><span class="lineno"> 1093</span>&#160;    wave polar, azi</div><div class="line"><a name="l01094"></a><span class="lineno"> 1094</span>&#160;        </div><div class="line"><a name="l01095"></a><span class="lineno"> 1095</span>&#160;    variable nn = numpnts(theta)</div><div class="line"><a name="l01096"></a><span class="lineno"> 1096</span>&#160;    variable na = numpnts(analyser)</div><div class="line"><a name="l01097"></a><span class="lineno"> 1097</span>&#160;    redimension /n=(na, nn) polar, azi</div><div class="line"><a name="l01098"></a><span class="lineno"> 1098</span>&#160;</div><div class="line"><a name="l01099"></a><span class="lineno"> 1099</span>&#160;    variable radius = 1 <span class="comment">// don&#39;t need to specify - everything is scalable</span></div><div class="line"><a name="l01100"></a><span class="lineno"> 1100</span>&#160;    </div><div class="line"><a name="l01101"></a><span class="lineno"> 1101</span>&#160;    <span class="comment">// step 1: calculate cartesian detection vectors at normal emission</span></div><div class="line"><a name="l01102"></a><span class="lineno"> 1102</span>&#160;    <span class="comment">// this is simply a polar-cartesian mapping, independent of the manipulator</span></div><div class="line"><a name="l01103"></a><span class="lineno"> 1103</span>&#160;    <span class="comment">// phi=0 is in the polar rotation plane</span></div><div class="line"><a name="l01104"></a><span class="lineno"> 1104</span>&#160;    make /n=(3,na) /d /free w_orig_polar, w_orig_cart, w_rot_cart, w_rot_polar</div><div class="line"><a name="l01105"></a><span class="lineno"> 1105</span>&#160;    w_orig_polar[0][] = radius</div><div class="line"><a name="l01106"></a><span class="lineno"> 1106</span>&#160;    w_orig_polar[1][] = analyser[q]</div><div class="line"><a name="l01107"></a><span class="lineno"> 1107</span>&#160;    w_orig_polar[2][] = 0</div><div class="line"><a name="l01108"></a><span class="lineno"> 1108</span>&#160;    <a class="code" href="pearl-polar-coordinates_8ipf.html#a6a0ffb6b9160413d9694b1fd8e10c858">polar2cart_wave</a>(w_orig_polar, w_orig_cart)</div><div class="line"><a name="l01109"></a><span class="lineno"> 1109</span>&#160;    <span class="comment">// if the angle-dispersive axis was horizontal, we&#39;d need to rotate the detector</span></div><div class="line"><a name="l01110"></a><span class="lineno"> 1110</span>&#160;    <span class="comment">//rotate_z_wave(w_orig_cart, 90)</span></div><div class="line"><a name="l01111"></a><span class="lineno"> 1111</span>&#160;</div><div class="line"><a name="l01112"></a><span class="lineno"> 1112</span>&#160;    variable ii</div><div class="line"><a name="l01113"></a><span class="lineno"> 1113</span>&#160;    for (ii = 0; ii &lt; nn; ii += 1)</div><div class="line"><a name="l01114"></a><span class="lineno"> 1114</span>&#160;        <span class="comment">// step 2: rotate the detection vectors according to the manipulator angles</span></div><div class="line"><a name="l01115"></a><span class="lineno"> 1115</span>&#160;        <span class="comment">// the order of rotations is important because we rotate about fixed axes</span></div><div class="line"><a name="l01116"></a><span class="lineno"> 1116</span>&#160;        <span class="comment">// y-axis = tilt rotation axis</span></div><div class="line"><a name="l01117"></a><span class="lineno"> 1117</span>&#160;        <span class="comment">// x-axis = polar rotation axis</span></div><div class="line"><a name="l01118"></a><span class="lineno"> 1118</span>&#160;        <span class="comment">// z-axis = normal emission = azimuthal rotation axis</span></div><div class="line"><a name="l01119"></a><span class="lineno"> 1119</span>&#160;        w_rot_cart = w_orig_cart</div><div class="line"><a name="l01120"></a><span class="lineno"> 1120</span>&#160;        <a class="code" href="pearl-vector-operations_8ipf.html#adfd1d68e739694982fbd00b76568c1c0">rotate_y_wave</a>(w_rot_cart, -tilt[ii])</div><div class="line"><a name="l01121"></a><span class="lineno"> 1121</span>&#160;        <a class="code" href="pearl-vector-operations_8ipf.html#ada80428496dc748b960bd9c65df7da8b">rotate_x_wave</a>(w_rot_cart, -theta[ii])</div><div class="line"><a name="l01122"></a><span class="lineno"> 1122</span>&#160;        <a class="code" href="pearl-vector-operations_8ipf.html#a0030e927980581d57781ad391f2d872a">rotate_z_wave</a>(w_rot_cart, -phi[ii] - 90)</div><div class="line"><a name="l01123"></a><span class="lineno"> 1123</span>&#160;        <span class="comment">// map the vectors back to the sample coordinate system</span></div><div class="line"><a name="l01124"></a><span class="lineno"> 1124</span>&#160;        <a class="code" href="pearl-polar-coordinates_8ipf.html#adfc1f0b3cddf672b0ccdb6a22b97ba9e">cart2polar_wave</a>(w_rot_cart, w_rot_polar)</div><div class="line"><a name="l01125"></a><span class="lineno"> 1125</span>&#160;        <span class="comment">// copy to output</span></div><div class="line"><a name="l01126"></a><span class="lineno"> 1126</span>&#160;        polar[][ii] = w_rot_polar[1][p]</div><div class="line"><a name="l01127"></a><span class="lineno"> 1127</span>&#160;        azi[][ii] = w_rot_polar[2][p]</div><div class="line"><a name="l01128"></a><span class="lineno"> 1128</span>&#160;    endfor</div><div class="line"><a name="l01129"></a><span class="lineno"> 1129</span>&#160;end</div><div class="line"><a name="l01130"></a><span class="lineno"> 1130</span>&#160;</div><div class="line"><a name="l01131"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#aa54a550eccad2c8ccd82d2b4167f7a92"> 1131</a></span>&#160;static function <a class="code" href="pearl-anglescan-process_8ipf.html#aa54a550eccad2c8ccd82d2b4167f7a92">line_average</a>(source, dest)</div><div class="line"><a name="l01132"></a><span class="lineno"> 1132</span>&#160;    <span class="comment">// is this function used?</span></div><div class="line"><a name="l01133"></a><span class="lineno"> 1133</span>&#160;    wave source</div><div class="line"><a name="l01134"></a><span class="lineno"> 1134</span>&#160;    wave dest</div><div class="line"><a name="l01135"></a><span class="lineno"> 1135</span>&#160;    </div><div class="line"><a name="l01136"></a><span class="lineno"> 1136</span>&#160;    variable ii</div><div class="line"><a name="l01137"></a><span class="lineno"> 1137</span>&#160;    variable nn = dimsize(source, 1)</div><div class="line"><a name="l01138"></a><span class="lineno"> 1138</span>&#160;    make /n=(dimsize(source, 0))/d/free line</div><div class="line"><a name="l01139"></a><span class="lineno"> 1139</span>&#160;    for (ii = 0; ii &lt; nn; ii += 1)</div><div class="line"><a name="l01140"></a><span class="lineno"> 1140</span>&#160;        line = source[p][ii]</div><div class="line"><a name="l01141"></a><span class="lineno"> 1141</span>&#160;        wavestats /q line</div><div class="line"><a name="l01142"></a><span class="lineno"> 1142</span>&#160;        dest[][ii] = line[p] / v_max</div><div class="line"><a name="l01143"></a><span class="lineno"> 1143</span>&#160;    endfor</div><div class="line"><a name="l01144"></a><span class="lineno"> 1144</span>&#160;end</div><div class="line"><a name="l01145"></a><span class="lineno"> 1145</span>&#160;</div><div class="line"><a name="l01149"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a9624070f3e938378631432430d47a389"> 1149</a></span>&#160;static function <a class="code" href="pearl-anglescan-process_8ipf.html#a9624070f3e938378631432430d47a389">calc_nth</a>(Theta_st, Theta_in, th, Phi_ran, Phi_ref, Holomode)</div><div class="line"><a name="l01150"></a><span class="lineno"> 1150</span>&#160;    Variable Theta_st, Theta_in, th, Phi_ran, Phi_ref</div><div class="line"><a name="l01151"></a><span class="lineno"> 1151</span>&#160;       String Holomode</div><div class="line"><a name="l01152"></a><span class="lineno"> 1152</span>&#160;    Variable The_step</div><div class="line"><a name="l01153"></a><span class="lineno"> 1153</span>&#160;    Variable deg2rad=0.01745329</div><div class="line"><a name="l01154"></a><span class="lineno"> 1154</span>&#160;        </div><div class="line"><a name="l01155"></a><span class="lineno"> 1155</span>&#160;    if ( cmpstr(Holomode, &quot;Stereographic&quot;) == 0)</div><div class="line"><a name="l01156"></a><span class="lineno"> 1156</span>&#160;       The_step =trunc( Phi_ran*sin(th*deg2rad)*Phi_ref/Theta_st )</div><div class="line"><a name="l01157"></a><span class="lineno"> 1157</span>&#160;       if(th==90)</div><div class="line"><a name="l01158"></a><span class="lineno"> 1158</span>&#160;        The_step =trunc( Phi_ran*sin(th*pi/180)*Phi_ref/Theta_st )</div><div class="line"><a name="l01159"></a><span class="lineno"> 1159</span>&#160;       endif</div><div class="line"><a name="l01160"></a><span class="lineno"> 1160</span>&#160;    else</div><div class="line"><a name="l01161"></a><span class="lineno"> 1161</span>&#160;        if (cmpstr(Holomode, &quot;Parallel&quot;) == 0)</div><div class="line"><a name="l01162"></a><span class="lineno"> 1162</span>&#160;            The_step=trunc( Phi_ran*tan(th*deg2rad)*Phi_ref/Theta_st )</div><div class="line"><a name="l01163"></a><span class="lineno"> 1163</span>&#160;        else</div><div class="line"><a name="l01164"></a><span class="lineno"> 1164</span>&#160;            if ( cmpstr(Holomode, &quot;h&quot;) == 0)</div><div class="line"><a name="l01165"></a><span class="lineno"> 1165</span>&#160;                    The_step=trunc( th/Theta_in*Phi_ran/Theta_st )</div><div class="line"><a name="l01166"></a><span class="lineno"> 1166</span>&#160;            else</div><div class="line"><a name="l01167"></a><span class="lineno"> 1167</span>&#160;                <span class="comment">//altro</span></div><div class="line"><a name="l01168"></a><span class="lineno"> 1168</span>&#160;            endif</div><div class="line"><a name="l01169"></a><span class="lineno"> 1169</span>&#160;        endif</div><div class="line"><a name="l01170"></a><span class="lineno"> 1170</span>&#160;    endif</div><div class="line"><a name="l01171"></a><span class="lineno"> 1171</span>&#160;    </div><div class="line"><a name="l01172"></a><span class="lineno"> 1172</span>&#160;    return(The_step)</div><div class="line"><a name="l01173"></a><span class="lineno"> 1173</span>&#160;end</div><div class="line"><a name="l01174"></a><span class="lineno"> 1174</span>&#160;</div><div class="line"><a name="l01178"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a999a9cd7d00d3e1ec8e768228a664ad1"> 1178</a></span>&#160;static function <a class="code" href="pearl-anglescan-process_8ipf.html#a999a9cd7d00d3e1ec8e768228a664ad1">calc_phi_step</a>(Theta_in, th, Theta_st, Phi_ran, Phi_ref, Holomode)</div><div class="line"><a name="l01179"></a><span class="lineno"> 1179</span>&#160;    Variable Theta_in, th, Theta_st, Phi_ran, Phi_ref</div><div class="line"><a name="l01180"></a><span class="lineno"> 1180</span>&#160;    String Holomode</div><div class="line"><a name="l01181"></a><span class="lineno"> 1181</span>&#160;    </div><div class="line"><a name="l01182"></a><span class="lineno"> 1182</span>&#160;    Variable Phi_st</div><div class="line"><a name="l01183"></a><span class="lineno"> 1183</span>&#160;    Variable deg2rad=0.01745329</div><div class="line"><a name="l01184"></a><span class="lineno"> 1184</span>&#160;</div><div class="line"><a name="l01185"></a><span class="lineno"> 1185</span>&#160;    if ( cmpstr(Holomode, &quot;Stereographic&quot;) == 0 )</div><div class="line"><a name="l01186"></a><span class="lineno"> 1186</span>&#160;        if ((th &lt; 0.5) || (trunc(Phi_ran*sin(th*deg2rad)*Phi_ref/Theta_st) == 0))</div><div class="line"><a name="l01187"></a><span class="lineno"> 1187</span>&#160;            Phi_st=0.0</div><div class="line"><a name="l01188"></a><span class="lineno"> 1188</span>&#160;        else</div><div class="line"><a name="l01189"></a><span class="lineno"> 1189</span>&#160;            Phi_st=Phi_ran/(trunc(Phi_ran*sin(th*deg2rad)*Phi_ref/Theta_st))</div><div class="line"><a name="l01190"></a><span class="lineno"> 1190</span>&#160;        endif</div><div class="line"><a name="l01191"></a><span class="lineno"> 1191</span>&#160;        if(th==90)</div><div class="line"><a name="l01192"></a><span class="lineno"> 1192</span>&#160;            Phi_st=2.0</div><div class="line"><a name="l01193"></a><span class="lineno"> 1193</span>&#160;        endif</div><div class="line"><a name="l01194"></a><span class="lineno"> 1194</span>&#160;    endif</div><div class="line"><a name="l01195"></a><span class="lineno"> 1195</span>&#160;</div><div class="line"><a name="l01196"></a><span class="lineno"> 1196</span>&#160;    if ( cmpstr(Holomode, &quot;Parallel&quot;) == 0 )</div><div class="line"><a name="l01197"></a><span class="lineno"> 1197</span>&#160;        if((th &lt; 0.5) || (trunc(Phi_ran*tan(th*deg2rad)*Phi_ref/Theta_st) == 0))</div><div class="line"><a name="l01198"></a><span class="lineno"> 1198</span>&#160;            Phi_st=0.0</div><div class="line"><a name="l01199"></a><span class="lineno"> 1199</span>&#160;        else</div><div class="line"><a name="l01200"></a><span class="lineno"> 1200</span>&#160;            Phi_st=Phi_ran/(trunc(Phi_ran*tan(th*deg2rad)*Phi_ref/Theta_st))</div><div class="line"><a name="l01201"></a><span class="lineno"> 1201</span>&#160;        endif</div><div class="line"><a name="l01202"></a><span class="lineno"> 1202</span>&#160;    endif</div><div class="line"><a name="l01203"></a><span class="lineno"> 1203</span>&#160;</div><div class="line"><a name="l01204"></a><span class="lineno"> 1204</span>&#160;    if ( cmpstr(Holomode, &quot;h&quot;) == 0 )</div><div class="line"><a name="l01205"></a><span class="lineno"> 1205</span>&#160;        if((th &lt; 0.5) || (trunc(Phi_ran*sin(th*deg2rad)*Phi_ref/Theta_st) == 0))</div><div class="line"><a name="l01206"></a><span class="lineno"> 1206</span>&#160;            Phi_st=0.0</div><div class="line"><a name="l01207"></a><span class="lineno"> 1207</span>&#160;        else</div><div class="line"><a name="l01208"></a><span class="lineno"> 1208</span>&#160;            Phi_st=Phi_ran/trunc(th/Theta_in*Phi_ran/Theta_st)</div><div class="line"><a name="l01209"></a><span class="lineno"> 1209</span>&#160;        endif</div><div class="line"><a name="l01210"></a><span class="lineno"> 1210</span>&#160;    endif</div><div class="line"><a name="l01211"></a><span class="lineno"> 1211</span>&#160;    </div><div class="line"><a name="l01212"></a><span class="lineno"> 1212</span>&#160;    if (Phi_st==0)</div><div class="line"><a name="l01213"></a><span class="lineno"> 1213</span>&#160;        Phi_st=360</div><div class="line"><a name="l01214"></a><span class="lineno"> 1214</span>&#160;    endif</div><div class="line"><a name="l01215"></a><span class="lineno"> 1215</span>&#160;    </div><div class="line"><a name="l01216"></a><span class="lineno"> 1216</span>&#160;    return(Phi_st)</div><div class="line"><a name="l01217"></a><span class="lineno"> 1217</span>&#160;end</div><div class="line"><a name="l01218"></a><span class="lineno"> 1218</span>&#160;</div><div class="line"><a name="l01222"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a1fb6aa7870dfbf0ed92660b7aae579e0"> 1222</a></span>&#160;static function <a class="code" href="pearl-anglescan-process_8ipf.html#a1fb6aa7870dfbf0ed92660b7aae579e0">Calc_The_step</a>(th, Theta_st, Holomode)</div><div class="line"><a name="l01223"></a><span class="lineno"> 1223</span>&#160;    String Holomode</div><div class="line"><a name="l01224"></a><span class="lineno"> 1224</span>&#160;    Variable th, Theta_st</div><div class="line"><a name="l01225"></a><span class="lineno"> 1225</span>&#160;    </div><div class="line"><a name="l01226"></a><span class="lineno"> 1226</span>&#160;    Variable deg2rad=0.01745329, dt_loc,The_step</div><div class="line"><a name="l01227"></a><span class="lineno"> 1227</span>&#160;</div><div class="line"><a name="l01228"></a><span class="lineno"> 1228</span>&#160;    if ( (cmpstr(Holomode, &quot;Stereographic&quot;)) ==0 )</div><div class="line"><a name="l01229"></a><span class="lineno"> 1229</span>&#160;        The_step=Theta_st </div><div class="line"><a name="l01230"></a><span class="lineno"> 1230</span>&#160;    endif</div><div class="line"><a name="l01231"></a><span class="lineno"> 1231</span>&#160;    </div><div class="line"><a name="l01232"></a><span class="lineno"> 1232</span>&#160;    if ( (cmpstr(Holomode, &quot;h&quot;)) ==0 )</div><div class="line"><a name="l01233"></a><span class="lineno"> 1233</span>&#160;        The_step=Theta_st </div><div class="line"><a name="l01234"></a><span class="lineno"> 1234</span>&#160;    endif</div><div class="line"><a name="l01235"></a><span class="lineno"> 1235</span>&#160; </div><div class="line"><a name="l01236"></a><span class="lineno"> 1236</span>&#160;    if ( cmpstr(Holomode, &quot;Parallel&quot;) == 0 )</div><div class="line"><a name="l01237"></a><span class="lineno"> 1237</span>&#160;        if(th &lt; 89.5)</div><div class="line"><a name="l01238"></a><span class="lineno"> 1238</span>&#160;            dt_loc = Theta_st/cos(th*deg2rad)</div><div class="line"><a name="l01239"></a><span class="lineno"> 1239</span>&#160;            if(dt_loc &gt; 10)</div><div class="line"><a name="l01240"></a><span class="lineno"> 1240</span>&#160;                dt_loc=10</div><div class="line"><a name="l01241"></a><span class="lineno"> 1241</span>&#160;            endif</div><div class="line"><a name="l01242"></a><span class="lineno"> 1242</span>&#160;            The_step=dt_loc</div><div class="line"><a name="l01243"></a><span class="lineno"> 1243</span>&#160;        else</div><div class="line"><a name="l01244"></a><span class="lineno"> 1244</span>&#160;            The_step=10</div><div class="line"><a name="l01245"></a><span class="lineno"> 1245</span>&#160;        endif</div><div class="line"><a name="l01246"></a><span class="lineno"> 1246</span>&#160;    endif</div><div class="line"><a name="l01247"></a><span class="lineno"> 1247</span>&#160;    return(The_step)</div><div class="line"><a name="l01248"></a><span class="lineno"> 1248</span>&#160;end</div><div class="line"><a name="l01249"></a><span class="lineno"> 1249</span>&#160;</div><div class="line"><a name="l01253"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ac0def1ded61f9cd758df0c99f4ff9470"> 1253</a></span>&#160;static function <a class="code" href="pearl-anglescan-process_8ipf.html#ac0def1ded61f9cd758df0c99f4ff9470">CalcN_Theta</a>(HoloMode,Theta_in,Theta_ran,Theta_st)</div><div class="line"><a name="l01254"></a><span class="lineno"> 1254</span>&#160;    String HoloMode</div><div class="line"><a name="l01255"></a><span class="lineno"> 1255</span>&#160;    Variable Theta_in,Theta_ran,Theta_st</div><div class="line"><a name="l01256"></a><span class="lineno"> 1256</span>&#160;    Variable n_theta, aux, aux1,ii</div><div class="line"><a name="l01257"></a><span class="lineno"> 1257</span>&#160;</div><div class="line"><a name="l01258"></a><span class="lineno"> 1258</span>&#160;    aux = Theta_in</div><div class="line"><a name="l01259"></a><span class="lineno"> 1259</span>&#160;    aux1= Theta_in - Theta_ran</div><div class="line"><a name="l01260"></a><span class="lineno"> 1260</span>&#160;    ii = 0</div><div class="line"><a name="l01261"></a><span class="lineno"> 1261</span>&#160;    do</div><div class="line"><a name="l01262"></a><span class="lineno"> 1262</span>&#160;        aux = aux - <a class="code" href="pearl-anglescan-process_8ipf.html#a1fb6aa7870dfbf0ed92660b7aae579e0">Calc_The_step</a>(aux, Theta_st, HoloMode)</div><div class="line"><a name="l01263"></a><span class="lineno"> 1263</span>&#160;        if(aux&lt;=Theta_in-Theta_ran)</div><div class="line"><a name="l01264"></a><span class="lineno"> 1264</span>&#160;            aux=Theta_in-Theta_ran</div><div class="line"><a name="l01265"></a><span class="lineno"> 1265</span>&#160;        endif</div><div class="line"><a name="l01266"></a><span class="lineno"> 1266</span>&#160;        ii = ii+1</div><div class="line"><a name="l01267"></a><span class="lineno"> 1267</span>&#160;    while((aux&gt;aux1)%&amp;(Theta_in-aux&lt;=Theta_ran))                                                                <span class="comment">//</span></div><div class="line"><a name="l01268"></a><span class="lineno"> 1268</span>&#160;    n_theta=ii+1</div><div class="line"><a name="l01269"></a><span class="lineno"> 1269</span>&#160;    Return(n_theta)</div><div class="line"><a name="l01270"></a><span class="lineno"> 1270</span>&#160;end</div><div class="line"><a name="l01271"></a><span class="lineno"> 1271</span>&#160;</div><div class="line"><a name="l01291"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a902ac3a24e33f651e83ee03d31707da7"> 1291</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a902ac3a24e33f651e83ee03d31707da7">make_hemi_grid</a>(npol, nickname, [xpdplot])</div><div class="line"><a name="l01292"></a><span class="lineno"> 1292</span>&#160;    variable npol</div><div class="line"><a name="l01293"></a><span class="lineno"> 1293</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l01294"></a><span class="lineno"> 1294</span>&#160;    variable xpdplot</div><div class="line"><a name="l01295"></a><span class="lineno"> 1295</span>&#160;    </div><div class="line"><a name="l01296"></a><span class="lineno"> 1296</span>&#160;    if (ParamIsDefault(xpdplot))</div><div class="line"><a name="l01297"></a><span class="lineno"> 1297</span>&#160;        xpdplot = 0</div><div class="line"><a name="l01298"></a><span class="lineno"> 1298</span>&#160;    endif</div><div class="line"><a name="l01299"></a><span class="lineno"> 1299</span>&#160;    </div><div class="line"><a name="l01300"></a><span class="lineno"> 1300</span>&#160;    <span class="keywordtype">string</span> HoloMode = &quot;h&quot;</div><div class="line"><a name="l01301"></a><span class="lineno"> 1301</span>&#160;    variable Theta_in = 90</div><div class="line"><a name="l01302"></a><span class="lineno"> 1302</span>&#160;    variable Theta_ran = 90</div><div class="line"><a name="l01303"></a><span class="lineno"> 1303</span>&#160;    variable Theta_st = 90 / (npol - 1)</div><div class="line"><a name="l01304"></a><span class="lineno"> 1304</span>&#160;    variable Phi_ran = 360</div><div class="line"><a name="l01305"></a><span class="lineno"> 1305</span>&#160;    variable Phi_ref = 1</div><div class="line"><a name="l01306"></a><span class="lineno"> 1306</span>&#160;    variable Phi_in = 0</div><div class="line"><a name="l01307"></a><span class="lineno"> 1307</span>&#160;    </div><div class="line"><a name="l01308"></a><span class="lineno"> 1308</span>&#160;    variable n_theta = <a class="code" href="pearl-anglescan-process_8ipf.html#ac0def1ded61f9cd758df0c99f4ff9470">CalcN_Theta</a>(HoloMode, Theta_in, Theta_ran, Theta_st)</div><div class="line"><a name="l01309"></a><span class="lineno"> 1309</span>&#160;</div><div class="line"><a name="l01310"></a><span class="lineno"> 1310</span>&#160;    <span class="comment">// wave names</span></div><div class="line"><a name="l01311"></a><span class="lineno"> 1311</span>&#160;    if (strlen(nickname))</div><div class="line"><a name="l01312"></a><span class="lineno"> 1312</span>&#160;        <span class="keywordtype">string</span> s_prefix = nickname + &quot;_&quot;</div><div class="line"><a name="l01313"></a><span class="lineno"> 1313</span>&#160;        <span class="keywordtype">string</span> s_int = s_prefix + &quot;i&quot;         <span class="comment">// Intensity wave (counts/sec)</span></div><div class="line"><a name="l01314"></a><span class="lineno"> 1314</span>&#160;    else</div><div class="line"><a name="l01315"></a><span class="lineno"> 1315</span>&#160;        s_prefix = &quot;&quot;</div><div class="line"><a name="l01316"></a><span class="lineno"> 1316</span>&#160;        s_int = &quot;values&quot;    <span class="comment">// &quot;i&quot; is not a valid wave name</span></div><div class="line"><a name="l01317"></a><span class="lineno"> 1317</span>&#160;    endif</div><div class="line"><a name="l01318"></a><span class="lineno"> 1318</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;       <span class="comment">// thetas for each int-point of the holo</span></div><div class="line"><a name="l01319"></a><span class="lineno"> 1319</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;        <span class="comment">// phis for each int-point of the holo</span></div><div class="line"><a name="l01320"></a><span class="lineno"> 1320</span>&#160;</div><div class="line"><a name="l01321"></a><span class="lineno"> 1321</span>&#160;    <span class="keywordtype">string</span> s_index = s_prefix + &quot;index&quot;       <span class="comment">// starting index for each theta</span></div><div class="line"><a name="l01322"></a><span class="lineno"> 1322</span>&#160;    <span class="keywordtype">string</span> s_theta = s_prefix + &quot;th&quot;        <span class="comment">// theta values</span></div><div class="line"><a name="l01323"></a><span class="lineno"> 1323</span>&#160;    <span class="keywordtype">string</span> s_dphi = s_prefix + &quot;dphi&quot;        <span class="comment">// delta phis at each theta</span></div><div class="line"><a name="l01324"></a><span class="lineno"> 1324</span>&#160;    <span class="keywordtype">string</span> s_nphis = s_prefix + &quot;nphis&quot;     <span class="comment">// number of phis at each theta</span></div><div class="line"><a name="l01325"></a><span class="lineno"> 1325</span>&#160;</div><div class="line"><a name="l01326"></a><span class="lineno"> 1326</span>&#160;    <span class="keywordtype">string</span> s_HoloData = s_prefix + &quot;data&quot;          <span class="comment">// All holo exp.- parameter information</span></div><div class="line"><a name="l01327"></a><span class="lineno"> 1327</span>&#160;    <span class="keywordtype">string</span> s_HoloInfo = s_prefix + &quot;info&quot;</div><div class="line"><a name="l01328"></a><span class="lineno"> 1328</span>&#160;    </div><div class="line"><a name="l01329"></a><span class="lineno"> 1329</span>&#160;    <span class="comment">// the following two waves are used by the pearl-anglescan procedures but not by XPDplot</span></div><div class="line"><a name="l01330"></a><span class="lineno"> 1330</span>&#160;    <span class="keywordtype">string</span> s_tot = s_prefix + &quot;tot&quot; <span class="comment">// accumulated counts at each point</span></div><div class="line"><a name="l01331"></a><span class="lineno"> 1331</span>&#160;    <span class="keywordtype">string</span> s_weight = s_prefix + &quot;wt&quot;   <span class="comment">// total accumulation time at each point (arb. units)</span></div><div class="line"><a name="l01332"></a><span class="lineno"> 1332</span>&#160;</div><div class="line"><a name="l01333"></a><span class="lineno"> 1333</span>&#160;    make /O/D/n=(n_theta) $s_index /wave=index</div><div class="line"><a name="l01334"></a><span class="lineno"> 1334</span>&#160;    make /O/D/n=(n_theta) $s_theta /wave=theta</div><div class="line"><a name="l01335"></a><span class="lineno"> 1335</span>&#160;    make /O/D/n=(n_theta) $s_dphi /wave=dphi</div><div class="line"><a name="l01336"></a><span class="lineno"> 1336</span>&#160;    make /O/D/n=(n_theta) $s_nphis /wave=nphis</div><div class="line"><a name="l01337"></a><span class="lineno"> 1337</span>&#160;    </div><div class="line"><a name="l01338"></a><span class="lineno"> 1338</span>&#160;    <span class="comment">//---------- calculate phi-step-size for this theta:</span></div><div class="line"><a name="l01339"></a><span class="lineno"> 1339</span>&#160;    variable aux = <a class="code" href="pearl-anglescan-process_8ipf.html#a1fb6aa7870dfbf0ed92660b7aae579e0">Calc_The_step</a>(Theta_in, Theta_st, HoloMode)</div><div class="line"><a name="l01340"></a><span class="lineno"> 1340</span>&#160;    dphi[0] =  <a class="code" href="pearl-anglescan-process_8ipf.html#a999a9cd7d00d3e1ec8e768228a664ad1">calc_phi_step</a>(Theta_in, Theta_in, aux, Phi_ran, Phi_ref, HoloMode)</div><div class="line"><a name="l01341"></a><span class="lineno"> 1341</span>&#160;    Theta[0] = Theta_in</div><div class="line"><a name="l01342"></a><span class="lineno"> 1342</span>&#160;    nphis[0] = <a class="code" href="pearl-anglescan-process_8ipf.html#a9624070f3e938378631432430d47a389">calc_nth</a>(aux, Theta_in, Theta_in, Phi_ran, Phi_ref, HoloMode) </div><div class="line"><a name="l01343"></a><span class="lineno"> 1343</span>&#160;    Index[0] = nphis[0]</div><div class="line"><a name="l01344"></a><span class="lineno"> 1344</span>&#160;    </div><div class="line"><a name="l01345"></a><span class="lineno"> 1345</span>&#160;    <span class="comment">//---------- calculate number of phis, phi-step, and starting-index for each theta:</span></div><div class="line"><a name="l01346"></a><span class="lineno"> 1346</span>&#160;    variable ii = 1</div><div class="line"><a name="l01347"></a><span class="lineno"> 1347</span>&#160;    do</div><div class="line"><a name="l01348"></a><span class="lineno"> 1348</span>&#160;        Theta[ii] = Theta[ii-1] - aux</div><div class="line"><a name="l01349"></a><span class="lineno"> 1349</span>&#160;        if(Theta[ii] &lt;= Theta_in-Theta_ran)</div><div class="line"><a name="l01350"></a><span class="lineno"> 1350</span>&#160;            Theta[ii] = Theta_in-Theta_ran</div><div class="line"><a name="l01351"></a><span class="lineno"> 1351</span>&#160;        endif</div><div class="line"><a name="l01352"></a><span class="lineno"> 1352</span>&#160;        aux =  <a class="code" href="pearl-anglescan-process_8ipf.html#a1fb6aa7870dfbf0ed92660b7aae579e0">Calc_The_step</a>(Theta[ii], Theta_st, HoloMode)</div><div class="line"><a name="l01353"></a><span class="lineno"> 1353</span>&#160;        dphi[ii] = <a class="code" href="pearl-anglescan-process_8ipf.html#a999a9cd7d00d3e1ec8e768228a664ad1">calc_phi_step</a>(Theta_in, Theta[ii],  aux, Phi_ran, Phi_ref, HoloMode)</div><div class="line"><a name="l01354"></a><span class="lineno"> 1354</span>&#160;        nphis[ii] = <a class="code" href="pearl-anglescan-process_8ipf.html#a9624070f3e938378631432430d47a389">calc_nth</a>(aux, Theta_in, Theta[ii], Phi_ran, Phi_ref, HoloMode)</div><div class="line"><a name="l01355"></a><span class="lineno"> 1355</span>&#160;        Index[ii] = Index[ii-1] + nphis[ii]</div><div class="line"><a name="l01356"></a><span class="lineno"> 1356</span>&#160;        ii=ii+1</div><div class="line"><a name="l01357"></a><span class="lineno"> 1357</span>&#160;    while(ii &lt; n_theta)</div><div class="line"><a name="l01358"></a><span class="lineno"> 1358</span>&#160;</div><div class="line"><a name="l01359"></a><span class="lineno"> 1359</span>&#160;    if (Index[n_theta-1]==Index[n_theta-2])</div><div class="line"><a name="l01360"></a><span class="lineno"> 1360</span>&#160;        Index[n_theta-1]=Index[n_theta-2]+1</div><div class="line"><a name="l01361"></a><span class="lineno"> 1361</span>&#160;        nphis[n_theta-1]=1</div><div class="line"><a name="l01362"></a><span class="lineno"> 1362</span>&#160;    endif</div><div class="line"><a name="l01363"></a><span class="lineno"> 1363</span>&#160;</div><div class="line"><a name="l01364"></a><span class="lineno"> 1364</span>&#160;    variable NumPoints = sum(nphis, 0, numpnts(nphis))</div><div class="line"><a name="l01365"></a><span class="lineno"> 1365</span>&#160;    </div><div class="line"><a name="l01366"></a><span class="lineno"> 1366</span>&#160;    <span class="comment">//---------- calculate theta and phi for each data point:</span></div><div class="line"><a name="l01367"></a><span class="lineno"> 1367</span>&#160;    make /O/D/N=(NumPoints) $s_polar /wave=polar, $s_azim /wave=azim</div><div class="line"><a name="l01368"></a><span class="lineno"> 1368</span>&#160;    note azim, &quot;<a class="code" href="pearl-anglescan-tracker_8ipf.html#a4c7a521b8f1a0769c09bfa4a1fca7dab">version</a>=1.6&quot;</div><div class="line"><a name="l01369"></a><span class="lineno"> 1369</span>&#160;    </div><div class="line"><a name="l01370"></a><span class="lineno"> 1370</span>&#160;    ii = 0</div><div class="line"><a name="l01371"></a><span class="lineno"> 1371</span>&#160;    variable StartIndex = 0</div><div class="line"><a name="l01372"></a><span class="lineno"> 1372</span>&#160;    variable EndIndex</div><div class="line"><a name="l01373"></a><span class="lineno"> 1373</span>&#160;    do</div><div class="line"><a name="l01374"></a><span class="lineno"> 1374</span>&#160;        EndIndex=Index[ii]</div><div class="line"><a name="l01375"></a><span class="lineno"> 1375</span>&#160;        Polar[StartIndex, EndIndex-1]=Theta[ii]</div><div class="line"><a name="l01376"></a><span class="lineno"> 1376</span>&#160;        Azim[StartIndex, EndIndex-1]= mod(Phi_ran+(x-StartIndex)*dphi[ii]+Phi_in,Phi_ran)</div><div class="line"><a name="l01377"></a><span class="lineno"> 1377</span>&#160;        ii = ii + 1 </div><div class="line"><a name="l01378"></a><span class="lineno"> 1378</span>&#160;        StartIndex = EndIndex   </div><div class="line"><a name="l01379"></a><span class="lineno"> 1379</span>&#160;    while(ii &lt; n_theta)</div><div class="line"><a name="l01380"></a><span class="lineno"> 1380</span>&#160;</div><div class="line"><a name="l01381"></a><span class="lineno"> 1381</span>&#160;    duplicate /o azim, $s_int /wave=values</div><div class="line"><a name="l01382"></a><span class="lineno"> 1382</span>&#160;    duplicate /o azim, $s_tot /wave=totals</div><div class="line"><a name="l01383"></a><span class="lineno"> 1383</span>&#160;    duplicate /o azim, $s_weight /wave=weights</div><div class="line"><a name="l01384"></a><span class="lineno"> 1384</span>&#160;    values = nan</div><div class="line"><a name="l01385"></a><span class="lineno"> 1385</span>&#160;    totals = 0</div><div class="line"><a name="l01386"></a><span class="lineno"> 1386</span>&#160;    weights = 0</div><div class="line"><a name="l01387"></a><span class="lineno"> 1387</span>&#160;</div><div class="line"><a name="l01388"></a><span class="lineno"> 1388</span>&#160;    <span class="comment">// XPDplot metadata</span></div><div class="line"><a name="l01389"></a><span class="lineno"> 1389</span>&#160;    if (xpdplot)</div><div class="line"><a name="l01390"></a><span class="lineno"> 1390</span>&#160;        <span class="keywordtype">string</span> s_FileName = &quot;&quot;</div><div class="line"><a name="l01391"></a><span class="lineno"> 1391</span>&#160;        <span class="keywordtype">string</span> s_Comment = &quot;created by pearl-anglescan-process.ipf&quot;</div><div class="line"><a name="l01392"></a><span class="lineno"> 1392</span>&#160;        <span class="keywordtype">string</span> s_HoloMode = &quot;Stereographic&quot;</div><div class="line"><a name="l01393"></a><span class="lineno"> 1393</span>&#160;        variable /g gb_SpectraFile = 0</div><div class="line"><a name="l01394"></a><span class="lineno"> 1394</span>&#160;    </div><div class="line"><a name="l01395"></a><span class="lineno"> 1395</span>&#160;        Make/O/D/n=22 $s_HoloData /wave=HoloData</div><div class="line"><a name="l01396"></a><span class="lineno"> 1396</span>&#160;        HoloData[0] = NaN     <span class="comment">// v_StartKE</span></div><div class="line"><a name="l01397"></a><span class="lineno"> 1397</span>&#160;        HoloData[1] = NaN     <span class="comment">// v_StoppKE</span></div><div class="line"><a name="l01398"></a><span class="lineno"> 1398</span>&#160;        HoloData[6] = NumPoints</div><div class="line"><a name="l01399"></a><span class="lineno"> 1399</span>&#160;        HoloData[7] = Theta_in</div><div class="line"><a name="l01400"></a><span class="lineno"> 1400</span>&#160;        HoloData[8] = Theta_ran</div><div class="line"><a name="l01401"></a><span class="lineno"> 1401</span>&#160;        HoloData[9] = Theta_st</div><div class="line"><a name="l01402"></a><span class="lineno"> 1402</span>&#160;        HoloData[11] = Phi_in</div><div class="line"><a name="l01403"></a><span class="lineno"> 1403</span>&#160;        HoloData[12] = Phi_ran</div><div class="line"><a name="l01404"></a><span class="lineno"> 1404</span>&#160;        HoloData[13] = Theta_st</div><div class="line"><a name="l01405"></a><span class="lineno"> 1405</span>&#160;        HoloData[15] = Phi_ref</div><div class="line"><a name="l01406"></a><span class="lineno"> 1406</span>&#160;        HoloData[16] = Phi_ran</div><div class="line"><a name="l01407"></a><span class="lineno"> 1407</span>&#160;        HoloData[17] = 0 <span class="comment">// v_HoloBit (stereographic)</span></div><div class="line"><a name="l01408"></a><span class="lineno"> 1408</span>&#160;</div><div class="line"><a name="l01409"></a><span class="lineno"> 1409</span>&#160;        Make/O/T/n=22 $s_HoloInfo /wave=HoloInfo</div><div class="line"><a name="l01410"></a><span class="lineno"> 1410</span>&#160;        HoloInfo[0] = s_FileName</div><div class="line"><a name="l01411"></a><span class="lineno"> 1411</span>&#160;        HoloInfo[1] = s_Comment</div><div class="line"><a name="l01412"></a><span class="lineno"> 1412</span>&#160;        HoloInfo[10] = s_HoloMode</div><div class="line"><a name="l01413"></a><span class="lineno"> 1413</span>&#160;        HoloInfo[11] = &quot;&quot; <span class="comment">// s_MeasuringMode</span></div><div class="line"><a name="l01414"></a><span class="lineno"> 1414</span>&#160;</div><div class="line"><a name="l01415"></a><span class="lineno"> 1415</span>&#160;        <span class="comment">// notebook for XPDplot</span></div><div class="line"><a name="l01416"></a><span class="lineno"> 1416</span>&#160;        if (WinType(NickName) == 5)</div><div class="line"><a name="l01417"></a><span class="lineno"> 1417</span>&#160;            Notebook $NickName selection={startOfFile, endOfFile}   </div><div class="line"><a name="l01418"></a><span class="lineno"> 1418</span>&#160;            Notebook $NickName text=<span class="stringliteral">&quot;&quot;</span></div><div class="line"><a name="l01419"></a><span class="lineno"> 1419</span>&#160;        <span class="keywordflow">else</span></div><div class="line"><a name="l01420"></a><span class="lineno"> 1420</span>&#160;            NewNotebook /F=0 /K=1 /N=$NickName /W=(5,40,341,260)</div><div class="line"><a name="l01421"></a><span class="lineno"> 1421</span>&#160;            Notebook $NickName defaultTab=140</div><div class="line"><a name="l01422"></a><span class="lineno"> 1422</span>&#160;            Notebook $NickName statusWidth=300</div><div class="line"><a name="l01423"></a><span class="lineno"> 1423</span>&#160;            Notebook $NickName backRGB=(56797,56797,56797)</div><div class="line"><a name="l01424"></a><span class="lineno"> 1424</span>&#160;            Notebook $NickName pageMargins={80,80,80,80}</div><div class="line"><a name="l01425"></a><span class="lineno"> 1425</span>&#160;            Notebook $NickName fSize=10</div><div class="line"><a name="l01426"></a><span class="lineno"> 1426</span>&#160;            Notebook $NickName fStyle=0,textRGB=(65535,0,26214) </div><div class="line"><a name="l01427"></a><span class="lineno"> 1427</span>&#160;            Notebook $NickName textRGB=(65535,0,26214) </div><div class="line"><a name="l01428"></a><span class="lineno"> 1428</span>&#160;        endif</div><div class="line"><a name="l01429"></a><span class="lineno"> 1429</span>&#160;        Notebook $NickName text = <span class="stringliteral">&quot;File:\t&quot;</span> + s_FileName + <span class="stringliteral">&quot;\r&quot;</span></div><div class="line"><a name="l01430"></a><span class="lineno"> 1430</span>&#160;        Notebook $NickName text = <span class="stringliteral">&quot;*** &quot;</span> + s_Comment + <span class="stringliteral">&quot; ***\r\r&quot;</span></div><div class="line"><a name="l01431"></a><span class="lineno"> 1431</span>&#160;        Notebook $NickName text = <span class="stringliteral">&quot;Angle-Mode:\t&quot;</span> + s_HoloMode + <span class="stringliteral">&quot;\r&quot;</span></div><div class="line"><a name="l01432"></a><span class="lineno"> 1432</span>&#160;        Notebook $NickName text = <span class="stringliteral">&quot;XPDplot Nickname:\t&quot;</span> + NickName + <span class="stringliteral">&quot;\r&quot;</span></div><div class="line"><a name="l01433"></a><span class="lineno"> 1433</span>&#160;    endif</div><div class="line"><a name="l01434"></a><span class="lineno"> 1434</span>&#160;end</div><div class="line"><a name="l01435"></a><span class="lineno"> 1435</span>&#160;</div><div class="line"><a name="l01442"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a987811346894d8d81fc590b2f5ccec49"> 1442</a></span>&#160;<span class="keyword">function</span> /s <a class="code" href="pearl-anglescan-process_8ipf.html#a987811346894d8d81fc590b2f5ccec49">get_hemi_nickname</a>(w)</div><div class="line"><a name="l01443"></a><span class="lineno"> 1443</span>&#160;    wave w</div><div class="line"><a name="l01444"></a><span class="lineno"> 1444</span>&#160;    </div><div class="line"><a name="l01445"></a><span class="lineno"> 1445</span>&#160;    <span class="keywordtype">string</span> prefix = <a class="code" href="pearl-anglescan-process_8ipf.html#a1442bc23122d52ba9c77e0f9baaad1da">get_hemi_prefix</a>(w)</div><div class="line"><a name="l01446"></a><span class="lineno"> 1446</span>&#160;    <span class="keywordtype">string</span> wname = nameofwave(w)</div><div class="line"><a name="l01447"></a><span class="lineno"> 1447</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l01448"></a><span class="lineno"> 1448</span>&#160;    </div><div class="line"><a name="l01449"></a><span class="lineno"> 1449</span>&#160;    <span class="keywordflow">if</span> (strlen(prefix))</div><div class="line"><a name="l01450"></a><span class="lineno"> 1450</span>&#160;        nickname = prefix</div><div class="line"><a name="l01451"></a><span class="lineno"> 1451</span>&#160;    <span class="keywordflow">else</span></div><div class="line"><a name="l01452"></a><span class="lineno"> 1452</span>&#160;        <span class="keywordtype">string</span> s_wave_df = GetWavesDataFolder(w, 1)</div><div class="line"><a name="l01453"></a><span class="lineno"> 1453</span>&#160;        dfref   parent_df = $(s_wave_df + &quot;::&quot;)</div><div class="line"><a name="l01454"></a><span class="lineno"> 1454</span>&#160;        nickname = GetDataFolder(0, parent_df)</div><div class="line"><a name="l01455"></a><span class="lineno"> 1455</span>&#160;    endif</div><div class="line"><a name="l01456"></a><span class="lineno"> 1456</span>&#160;    </div><div class="line"><a name="l01457"></a><span class="lineno"> 1457</span>&#160;    return nickname</div><div class="line"><a name="l01458"></a><span class="lineno"> 1458</span>&#160;end</div><div class="line"><a name="l01459"></a><span class="lineno"> 1459</span>&#160;</div><div class="line"><a name="l01467"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a1442bc23122d52ba9c77e0f9baaad1da"> 1467</a></span>&#160;function /s <a class="code" href="pearl-anglescan-process_8ipf.html#a1442bc23122d52ba9c77e0f9baaad1da">get_hemi_prefix</a>(w)</div><div class="line"><a name="l01468"></a><span class="lineno"> 1468</span>&#160;    wave w</div><div class="line"><a name="l01469"></a><span class="lineno"> 1469</span>&#160;</div><div class="line"><a name="l01470"></a><span class="lineno"> 1470</span>&#160;    <span class="keywordtype">string</span> wname = nameofwave(w)</div><div class="line"><a name="l01471"></a><span class="lineno"> 1471</span>&#160;    <span class="keywordtype">string</span> prefix</div><div class="line"><a name="l01472"></a><span class="lineno"> 1472</span>&#160;    if (ItemsInList(wname, &quot;_&quot;) &gt;= 2)</div><div class="line"><a name="l01473"></a><span class="lineno"> 1473</span>&#160;        prefix = StringFromList(0, wname, &quot;_&quot;)</div><div class="line"><a name="l01474"></a><span class="lineno"> 1474</span>&#160;    else</div><div class="line"><a name="l01475"></a><span class="lineno"> 1475</span>&#160;        prefix = &quot;&quot;</div><div class="line"><a name="l01476"></a><span class="lineno"> 1476</span>&#160;    endif</div><div class="line"><a name="l01477"></a><span class="lineno"> 1477</span>&#160;    </div><div class="line"><a name="l01478"></a><span class="lineno"> 1478</span>&#160;    return prefix</div><div class="line"><a name="l01479"></a><span class="lineno"> 1479</span>&#160;end</div><div class="line"><a name="l01480"></a><span class="lineno"> 1480</span>&#160;</div><div class="line"><a name="l01498"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d"> 1498</a></span>&#160;function /df <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, prefix, intwave)</div><div class="line"><a name="l01499"></a><span class="lineno"> 1499</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l01500"></a><span class="lineno"> 1500</span>&#160;    <span class="keywordtype">string</span> &amp;prefix</div><div class="line"><a name="l01501"></a><span class="lineno"> 1501</span>&#160;    <span class="keywordtype">string</span> &amp;intwave</div><div class="line"><a name="l01502"></a><span class="lineno"> 1502</span>&#160;</div><div class="line"><a name="l01503"></a><span class="lineno"> 1503</span>&#160;    dfref datadf</div><div class="line"><a name="l01504"></a><span class="lineno"> 1504</span>&#160;    prefix = &quot;&quot;</div><div class="line"><a name="l01505"></a><span class="lineno"> 1505</span>&#160;    intwave = &quot;values&quot;</div><div class="line"><a name="l01506"></a><span class="lineno"> 1506</span>&#160;    if (strlen(nickname))</div><div class="line"><a name="l01507"></a><span class="lineno"> 1507</span>&#160;        if (DataFolderExists(nickname))</div><div class="line"><a name="l01508"></a><span class="lineno"> 1508</span>&#160;            datadf = $nickname</div><div class="line"><a name="l01509"></a><span class="lineno"> 1509</span>&#160;        else</div><div class="line"><a name="l01510"></a><span class="lineno"> 1510</span>&#160;            datadf = getdatafolderdfr()</div><div class="line"><a name="l01511"></a><span class="lineno"> 1511</span>&#160;            prefix = nickname + &quot;_&quot;</div><div class="line"><a name="l01512"></a><span class="lineno"> 1512</span>&#160;            intwave = prefix + &quot;i&quot;</div><div class="line"><a name="l01513"></a><span class="lineno"> 1513</span>&#160;            if (exists(intwave) != 1)</div><div class="line"><a name="l01514"></a><span class="lineno"> 1514</span>&#160;                datadf = root:</div><div class="line"><a name="l01515"></a><span class="lineno"> 1515</span>&#160;            endif</div><div class="line"><a name="l01516"></a><span class="lineno"> 1516</span>&#160;        endif</div><div class="line"><a name="l01517"></a><span class="lineno"> 1517</span>&#160;    else</div><div class="line"><a name="l01518"></a><span class="lineno"> 1518</span>&#160;        datadf = getdatafolderdfr()</div><div class="line"><a name="l01519"></a><span class="lineno"> 1519</span>&#160;        prefix = &quot;&quot;</div><div class="line"><a name="l01520"></a><span class="lineno"> 1520</span>&#160;        intwave = &quot;values&quot;</div><div class="line"><a name="l01521"></a><span class="lineno"> 1521</span>&#160;    endif</div><div class="line"><a name="l01522"></a><span class="lineno"> 1522</span>&#160;    return datadf</div><div class="line"><a name="l01523"></a><span class="lineno"> 1523</span>&#160;end</div><div class="line"><a name="l01524"></a><span class="lineno"> 1524</span>&#160;</div><div class="line"><a name="l01532"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a3ec6935a5903d0974c93a2072d743013"> 1532</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a3ec6935a5903d0974c93a2072d743013">clear_hemi_grid</a>(nickname)</div><div class="line"><a name="l01533"></a><span class="lineno"> 1533</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l01534"></a><span class="lineno"> 1534</span>&#160;</div><div class="line"><a name="l01535"></a><span class="lineno"> 1535</span>&#160;    dfref datadf</div><div class="line"><a name="l01536"></a><span class="lineno"> 1536</span>&#160;    <span class="keywordtype">string</span> s_prefix</div><div class="line"><a name="l01537"></a><span class="lineno"> 1537</span>&#160;    <span class="keywordtype">string</span> s_int</div><div class="line"><a name="l01538"></a><span class="lineno"> 1538</span>&#160;    datadf = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l01539"></a><span class="lineno"> 1539</span>&#160;</div><div class="line"><a name="l01540"></a><span class="lineno"> 1540</span>&#160;    <span class="keywordtype">string</span> s_totals = s_prefix + &quot;tot&quot;</div><div class="line"><a name="l01541"></a><span class="lineno"> 1541</span>&#160;    <span class="keywordtype">string</span> s_weights = s_prefix + &quot;wt&quot;</div><div class="line"><a name="l01542"></a><span class="lineno"> 1542</span>&#160;    </div><div class="line"><a name="l01543"></a><span class="lineno"> 1543</span>&#160;    wave /sdfr=datadf /z w_values = $s_int</div><div class="line"><a name="l01544"></a><span class="lineno"> 1544</span>&#160;    wave /sdfr=datadf /z w_totals = $s_totals</div><div class="line"><a name="l01545"></a><span class="lineno"> 1545</span>&#160;    wave /sdfr=datadf /z w_weights = $s_weights</div><div class="line"><a name="l01546"></a><span class="lineno"> 1546</span>&#160;</div><div class="line"><a name="l01547"></a><span class="lineno"> 1547</span>&#160;    if (waveexists(w_totals))</div><div class="line"><a name="l01548"></a><span class="lineno"> 1548</span>&#160;        w_totals = 0</div><div class="line"><a name="l01549"></a><span class="lineno"> 1549</span>&#160;    endif</div><div class="line"><a name="l01550"></a><span class="lineno"> 1550</span>&#160;    if (waveexists(w_weights))</div><div class="line"><a name="l01551"></a><span class="lineno"> 1551</span>&#160;        w_weights = 0</div><div class="line"><a name="l01552"></a><span class="lineno"> 1552</span>&#160;    endif</div><div class="line"><a name="l01553"></a><span class="lineno"> 1553</span>&#160;    if (waveexists(w_values))</div><div class="line"><a name="l01554"></a><span class="lineno"> 1554</span>&#160;        w_values = nan  </div><div class="line"><a name="l01555"></a><span class="lineno"> 1555</span>&#160;    endif</div><div class="line"><a name="l01556"></a><span class="lineno"> 1556</span>&#160;end</div><div class="line"><a name="l01557"></a><span class="lineno"> 1557</span>&#160;</div><div class="line"><a name="l01579"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#aa5b1e2ab1dd43a73b7157406b803887e"> 1579</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#aa5b1e2ab1dd43a73b7157406b803887e">duplicate_hemi_scan</a>(source_nickname, dest_folder, dest_nickname, [xpdplot])</div><div class="line"><a name="l01580"></a><span class="lineno"> 1580</span>&#160;    <span class="keywordtype">string</span> source_nickname</div><div class="line"><a name="l01581"></a><span class="lineno"> 1581</span>&#160;    dfref dest_folder</div><div class="line"><a name="l01582"></a><span class="lineno"> 1582</span>&#160;    <span class="keywordtype">string</span> dest_nickname</div><div class="line"><a name="l01583"></a><span class="lineno"> 1583</span>&#160;    variable xpdplot</div><div class="line"><a name="l01584"></a><span class="lineno"> 1584</span>&#160;    </div><div class="line"><a name="l01585"></a><span class="lineno"> 1585</span>&#160;    if (ParamIsDefault(xpdplot))</div><div class="line"><a name="l01586"></a><span class="lineno"> 1586</span>&#160;        xpdplot = 0</div><div class="line"><a name="l01587"></a><span class="lineno"> 1587</span>&#160;    endif</div><div class="line"><a name="l01588"></a><span class="lineno"> 1588</span>&#160;    </div><div class="line"><a name="l01589"></a><span class="lineno"> 1589</span>&#160;    dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l01590"></a><span class="lineno"> 1590</span>&#160;</div><div class="line"><a name="l01591"></a><span class="lineno"> 1591</span>&#160;    <span class="comment">// source data</span></div><div class="line"><a name="l01592"></a><span class="lineno"> 1592</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l01593"></a><span class="lineno"> 1593</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l01594"></a><span class="lineno"> 1594</span>&#160;    dfref source_df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(source_nickname, s_prefix, s_int)</div><div class="line"><a name="l01595"></a><span class="lineno"> 1595</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l01596"></a><span class="lineno"> 1596</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l01597"></a><span class="lineno"> 1597</span>&#160;    <span class="keywordtype">string</span> s_theta = s_prefix + &quot;th&quot;</div><div class="line"><a name="l01598"></a><span class="lineno"> 1598</span>&#160;    <span class="keywordtype">string</span> s_tot = s_prefix + &quot;tot&quot;</div><div class="line"><a name="l01599"></a><span class="lineno"> 1599</span>&#160;    <span class="keywordtype">string</span> s_weight = s_prefix + &quot;wt&quot;</div><div class="line"><a name="l01600"></a><span class="lineno"> 1600</span>&#160;    <span class="keywordtype">string</span> s_matrix = s_prefix + &quot;matrix&quot;</div><div class="line"><a name="l01601"></a><span class="lineno"> 1601</span>&#160;</div><div class="line"><a name="l01602"></a><span class="lineno"> 1602</span>&#160;    wave /sdfr=source_df theta1 = $s_theta</div><div class="line"><a name="l01603"></a><span class="lineno"> 1603</span>&#160;    wave /sdfr=source_df polar1 = $s_polar</div><div class="line"><a name="l01604"></a><span class="lineno"> 1604</span>&#160;    wave /sdfr=source_df azim1 = $s_azim</div><div class="line"><a name="l01605"></a><span class="lineno"> 1605</span>&#160;    wave /sdfr=source_df tot1 = $s_tot</div><div class="line"><a name="l01606"></a><span class="lineno"> 1606</span>&#160;    wave /sdfr=source_df weight1 = $s_weight</div><div class="line"><a name="l01607"></a><span class="lineno"> 1607</span>&#160;    wave /sdfr=source_df values1 = $s_int</div><div class="line"><a name="l01608"></a><span class="lineno"> 1608</span>&#160;    wave /sdfr=source_df /z matrix1 = $s_matrix</div><div class="line"><a name="l01609"></a><span class="lineno"> 1609</span>&#160;    </div><div class="line"><a name="l01610"></a><span class="lineno"> 1610</span>&#160;    variable npol = numpnts(theta1)</div><div class="line"><a name="l01611"></a><span class="lineno"> 1611</span>&#160;    </div><div class="line"><a name="l01612"></a><span class="lineno"> 1612</span>&#160;    setdatafolder dest_folder</div><div class="line"><a name="l01613"></a><span class="lineno"> 1613</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a902ac3a24e33f651e83ee03d31707da7">make_hemi_grid</a>(npol, dest_nickname, xpdplot=xpdplot)</div><div class="line"><a name="l01614"></a><span class="lineno"> 1614</span>&#160;    </div><div class="line"><a name="l01615"></a><span class="lineno"> 1615</span>&#160;    <span class="comment">// dest data</span></div><div class="line"><a name="l01616"></a><span class="lineno"> 1616</span>&#160;    dfref dest_df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(dest_nickname, s_prefix, s_int)</div><div class="line"><a name="l01617"></a><span class="lineno"> 1617</span>&#160;    s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l01618"></a><span class="lineno"> 1618</span>&#160;    s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l01619"></a><span class="lineno"> 1619</span>&#160;    s_theta = s_prefix + &quot;th&quot;</div><div class="line"><a name="l01620"></a><span class="lineno"> 1620</span>&#160;    s_tot = s_prefix + &quot;tot&quot;</div><div class="line"><a name="l01621"></a><span class="lineno"> 1621</span>&#160;    s_weight = s_prefix + &quot;wt&quot;</div><div class="line"><a name="l01622"></a><span class="lineno"> 1622</span>&#160;    s_matrix = s_prefix + &quot;matrix&quot;</div><div class="line"><a name="l01623"></a><span class="lineno"> 1623</span>&#160;</div><div class="line"><a name="l01624"></a><span class="lineno"> 1624</span>&#160;    wave /sdfr=dest_df theta2 = $s_theta</div><div class="line"><a name="l01625"></a><span class="lineno"> 1625</span>&#160;    wave /sdfr=dest_df polar2 = $s_polar</div><div class="line"><a name="l01626"></a><span class="lineno"> 1626</span>&#160;    wave /sdfr=dest_df azim2 = $s_azim</div><div class="line"><a name="l01627"></a><span class="lineno"> 1627</span>&#160;    wave /sdfr=dest_df tot2 = $s_tot</div><div class="line"><a name="l01628"></a><span class="lineno"> 1628</span>&#160;    wave /sdfr=dest_df weight2 = $s_weight</div><div class="line"><a name="l01629"></a><span class="lineno"> 1629</span>&#160;    wave /sdfr=dest_df values2 = $s_int</div><div class="line"><a name="l01630"></a><span class="lineno"> 1630</span>&#160;</div><div class="line"><a name="l01631"></a><span class="lineno"> 1631</span>&#160;    tot2 = tot1</div><div class="line"><a name="l01632"></a><span class="lineno"> 1632</span>&#160;    weight2 = weight1</div><div class="line"><a name="l01633"></a><span class="lineno"> 1633</span>&#160;    values2 = values1</div><div class="line"><a name="l01634"></a><span class="lineno"> 1634</span>&#160;    if (waveexists(matrix1))</div><div class="line"><a name="l01635"></a><span class="lineno"> 1635</span>&#160;        setdatafolder dest_df</div><div class="line"><a name="l01636"></a><span class="lineno"> 1636</span>&#160;        duplicate /o matrix1, $s_matrix</div><div class="line"><a name="l01637"></a><span class="lineno"> 1637</span>&#160;    endif</div><div class="line"><a name="l01638"></a><span class="lineno"> 1638</span>&#160;    </div><div class="line"><a name="l01639"></a><span class="lineno"> 1639</span>&#160;    if (!(NumberByKey(&quot;<a class="code" href="pearl-anglescan-tracker_8ipf.html#a4c7a521b8f1a0769c09bfa4a1fca7dab">version</a>&quot;, note(azim1), &quot;=&quot;, &quot;\r&quot;) &gt;= 1.6))</div><div class="line"><a name="l01640"></a><span class="lineno"> 1640</span>&#160;        azim2 += 180    <span class="comment">// changed 151030 (v1.6)</span></div><div class="line"><a name="l01641"></a><span class="lineno"> 1641</span>&#160;        azim2 = azim2 &gt;= 360 ? azim2 - 360 : azim2</div><div class="line"><a name="l01642"></a><span class="lineno"> 1642</span>&#160;    endif</div><div class="line"><a name="l01643"></a><span class="lineno"> 1643</span>&#160;    </div><div class="line"><a name="l01644"></a><span class="lineno"> 1644</span>&#160;    setdatafolder saveDF</div><div class="line"><a name="l01645"></a><span class="lineno"> 1645</span>&#160;end</div><div class="line"><a name="l01646"></a><span class="lineno"> 1646</span>&#160;</div><div class="line"><a name="l01654"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a5162488b366e217195d8f8bd7cdde0ce"> 1654</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a5162488b366e217195d8f8bd7cdde0ce">rotate_hemi_scan</a>(nickname, angle)</div><div class="line"><a name="l01655"></a><span class="lineno"> 1655</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l01656"></a><span class="lineno"> 1656</span>&#160;    variable angle</div><div class="line"><a name="l01657"></a><span class="lineno"> 1657</span>&#160;    </div><div class="line"><a name="l01658"></a><span class="lineno"> 1658</span>&#160;    dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l01659"></a><span class="lineno"> 1659</span>&#160;</div><div class="line"><a name="l01660"></a><span class="lineno"> 1660</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l01661"></a><span class="lineno"> 1661</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l01662"></a><span class="lineno"> 1662</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l01663"></a><span class="lineno"> 1663</span>&#160;</div><div class="line"><a name="l01664"></a><span class="lineno"> 1664</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l01665"></a><span class="lineno"> 1665</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l01666"></a><span class="lineno"> 1666</span>&#160;    <span class="keywordtype">string</span> s_tot = s_prefix + &quot;tot&quot;</div><div class="line"><a name="l01667"></a><span class="lineno"> 1667</span>&#160;    <span class="keywordtype">string</span> s_weight = s_prefix + &quot;wt&quot;</div><div class="line"><a name="l01668"></a><span class="lineno"> 1668</span>&#160;    </div><div class="line"><a name="l01669"></a><span class="lineno"> 1669</span>&#160;    wave /sdfr=df polar = $s_polar</div><div class="line"><a name="l01670"></a><span class="lineno"> 1670</span>&#160;    wave /sdfr=df azim = $s_azim</div><div class="line"><a name="l01671"></a><span class="lineno"> 1671</span>&#160;    wave /sdfr=df tot = $s_tot</div><div class="line"><a name="l01672"></a><span class="lineno"> 1672</span>&#160;    wave /sdfr=df weight = $s_weight</div><div class="line"><a name="l01673"></a><span class="lineno"> 1673</span>&#160;    wave /sdfr=df values = $s_int</div><div class="line"><a name="l01674"></a><span class="lineno"> 1674</span>&#160;</div><div class="line"><a name="l01675"></a><span class="lineno"> 1675</span>&#160;    azim += angle</div><div class="line"><a name="l01676"></a><span class="lineno"> 1676</span>&#160;    azim = azim &lt; 0 ? azim + 360 : azim</div><div class="line"><a name="l01677"></a><span class="lineno"> 1677</span>&#160;    azim = azim &gt;= 360 ? azim - 360 : azim</div><div class="line"><a name="l01678"></a><span class="lineno"> 1678</span>&#160;</div><div class="line"><a name="l01679"></a><span class="lineno"> 1679</span>&#160;    duplicate /free polar, neg_polar</div><div class="line"><a name="l01680"></a><span class="lineno"> 1680</span>&#160;    neg_polar = -polar</div><div class="line"><a name="l01681"></a><span class="lineno"> 1681</span>&#160;    sort {neg_polar, azim}, polar, azim, tot, weight, values</div><div class="line"><a name="l01682"></a><span class="lineno"> 1682</span>&#160;    </div><div class="line"><a name="l01683"></a><span class="lineno"> 1683</span>&#160;    setdatafolder saveDF</div><div class="line"><a name="l01684"></a><span class="lineno"> 1684</span>&#160;end</div><div class="line"><a name="l01685"></a><span class="lineno"> 1685</span>&#160;</div><div class="line"><a name="l01702"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ac15ebd5a19c558dde666ab36aeb9906f"> 1702</a></span>&#160;<span class="keyword">function</span> /s <a class="code" href="pearl-anglescan-process_8ipf.html#ac15ebd5a19c558dde666ab36aeb9906f">prepare_hemi_scan_display</a>(nickname, [projection])</div><div class="line"><a name="l01703"></a><span class="lineno"> 1703</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l01704"></a><span class="lineno"> 1704</span>&#160;    variable projection</div><div class="line"><a name="l01705"></a><span class="lineno"> 1705</span>&#160;    </div><div class="line"><a name="l01706"></a><span class="lineno"> 1706</span>&#160;    dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l01707"></a><span class="lineno"> 1707</span>&#160;</div><div class="line"><a name="l01708"></a><span class="lineno"> 1708</span>&#160;    if (ParamIsDefault(projection))</div><div class="line"><a name="l01709"></a><span class="lineno"> 1709</span>&#160;        projection = 1</div><div class="line"><a name="l01710"></a><span class="lineno"> 1710</span>&#160;    endif</div><div class="line"><a name="l01711"></a><span class="lineno"> 1711</span>&#160;    </div><div class="line"><a name="l01712"></a><span class="lineno"> 1712</span>&#160;    <span class="comment">// hemi grid waves</span></div><div class="line"><a name="l01713"></a><span class="lineno"> 1713</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l01714"></a><span class="lineno"> 1714</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l01715"></a><span class="lineno"> 1715</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l01716"></a><span class="lineno"> 1716</span>&#160;</div><div class="line"><a name="l01717"></a><span class="lineno"> 1717</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l01718"></a><span class="lineno"> 1718</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l01719"></a><span class="lineno"> 1719</span>&#160;    </div><div class="line"><a name="l01720"></a><span class="lineno"> 1720</span>&#160;    wave /sdfr=df /z values = $s_int</div><div class="line"><a name="l01721"></a><span class="lineno"> 1721</span>&#160;    wave /sdfr=df /z azim = $s_azim</div><div class="line"><a name="l01722"></a><span class="lineno"> 1722</span>&#160;    wave /sdfr=df /z polar = $s_polar</div><div class="line"><a name="l01723"></a><span class="lineno"> 1723</span>&#160;</div><div class="line"><a name="l01724"></a><span class="lineno"> 1724</span>&#160;    setdatafolder df</div><div class="line"><a name="l01725"></a><span class="lineno"> 1725</span>&#160;    <span class="keywordtype">string</span> s_ster_rad = s_prefix + &quot;ster_rad&quot;</div><div class="line"><a name="l01726"></a><span class="lineno"> 1726</span>&#160;    duplicate /o polar, $s_ster_rad /wave=ster_rad</div><div class="line"><a name="l01727"></a><span class="lineno"> 1727</span>&#160;    ster_rad = <a class="code" href="pearl-anglescan-process_8ipf.html#a75219b38ea58012abcffc848d536faa4">calc_graph_radius</a>(polar, projection=projection)</div><div class="line"><a name="l01728"></a><span class="lineno"> 1728</span>&#160;    </div><div class="line"><a name="l01729"></a><span class="lineno"> 1729</span>&#160;    <span class="keywordtype">string</span> s_ster_x = s_prefix + &quot;ster_x&quot;</div><div class="line"><a name="l01730"></a><span class="lineno"> 1730</span>&#160;    <span class="keywordtype">string</span> s_ster_y = s_prefix + &quot;ster_y&quot;</div><div class="line"><a name="l01731"></a><span class="lineno"> 1731</span>&#160;    duplicate /o azim, $s_ster_x /wave=ster_x, $s_ster_y /wave=ster_y</div><div class="line"><a name="l01732"></a><span class="lineno"> 1732</span>&#160;    ster_x = ster_rad * cos(azim * pi / 180)</div><div class="line"><a name="l01733"></a><span class="lineno"> 1733</span>&#160;    ster_y = ster_rad * sin(azim * pi / 180)</div><div class="line"><a name="l01734"></a><span class="lineno"> 1734</span>&#160;</div><div class="line"><a name="l01735"></a><span class="lineno"> 1735</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l01736"></a><span class="lineno"> 1736</span>&#160;end</div><div class="line"><a name="l01737"></a><span class="lineno"> 1737</span>&#160;</div><div class="line"><a name="l01784"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ae57302acfc822c4817f2b7eef55efea2"> 1784</a></span>&#160;function /s <a class="code" href="pearl-anglescan-process_8ipf.html#ae57302acfc822c4817f2b7eef55efea2">display_hemi_scan</a>(nickname, [projection, graphtype, do_ticks, do_grids, graphname])</div><div class="line"><a name="l01785"></a><span class="lineno"> 1785</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l01786"></a><span class="lineno"> 1786</span>&#160;    variable projection</div><div class="line"><a name="l01787"></a><span class="lineno"> 1787</span>&#160;    variable graphtype</div><div class="line"><a name="l01788"></a><span class="lineno"> 1788</span>&#160;    variable do_ticks</div><div class="line"><a name="l01789"></a><span class="lineno"> 1789</span>&#160;    variable do_grids</div><div class="line"><a name="l01790"></a><span class="lineno"> 1790</span>&#160;    <span class="keywordtype">string</span> graphname</div><div class="line"><a name="l01791"></a><span class="lineno"> 1791</span>&#160;    </div><div class="line"><a name="l01792"></a><span class="lineno"> 1792</span>&#160;    dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l01793"></a><span class="lineno"> 1793</span>&#160;</div><div class="line"><a name="l01794"></a><span class="lineno"> 1794</span>&#160;    if (ParamIsDefault(projection))</div><div class="line"><a name="l01795"></a><span class="lineno"> 1795</span>&#160;        projection = 1</div><div class="line"><a name="l01796"></a><span class="lineno"> 1796</span>&#160;    endif</div><div class="line"><a name="l01797"></a><span class="lineno"> 1797</span>&#160;    if (ParamIsDefault(graphtype))</div><div class="line"><a name="l01798"></a><span class="lineno"> 1798</span>&#160;        graphtype = 1</div><div class="line"><a name="l01799"></a><span class="lineno"> 1799</span>&#160;    endif</div><div class="line"><a name="l01800"></a><span class="lineno"> 1800</span>&#160;    if (ParamIsDefault(do_ticks))</div><div class="line"><a name="l01801"></a><span class="lineno"> 1801</span>&#160;        do_ticks = 3</div><div class="line"><a name="l01802"></a><span class="lineno"> 1802</span>&#160;    endif</div><div class="line"><a name="l01803"></a><span class="lineno"> 1803</span>&#160;    if (ParamIsDefault(do_grids))</div><div class="line"><a name="l01804"></a><span class="lineno"> 1804</span>&#160;        do_grids = 3</div><div class="line"><a name="l01805"></a><span class="lineno"> 1805</span>&#160;    endif</div><div class="line"><a name="l01806"></a><span class="lineno"> 1806</span>&#160;    if (ParamIsDefault(graphname))</div><div class="line"><a name="l01807"></a><span class="lineno"> 1807</span>&#160;        if (strlen(nickname) &gt; 0)</div><div class="line"><a name="l01808"></a><span class="lineno"> 1808</span>&#160;            graphname = nickname</div><div class="line"><a name="l01809"></a><span class="lineno"> 1809</span>&#160;        else</div><div class="line"><a name="l01810"></a><span class="lineno"> 1810</span>&#160;            graphname = GetDataFolder(0)</div><div class="line"><a name="l01811"></a><span class="lineno"> 1811</span>&#160;        endif</div><div class="line"><a name="l01812"></a><span class="lineno"> 1812</span>&#160;    endif</div><div class="line"><a name="l01813"></a><span class="lineno"> 1813</span>&#160;    </div><div class="line"><a name="l01814"></a><span class="lineno"> 1814</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#ac15ebd5a19c558dde666ab36aeb9906f">prepare_hemi_scan_display</a>(nickname, projection=projection)</div><div class="line"><a name="l01815"></a><span class="lineno"> 1815</span>&#160;    </div><div class="line"><a name="l01816"></a><span class="lineno"> 1816</span>&#160;    <span class="comment">// hemi grid waves</span></div><div class="line"><a name="l01817"></a><span class="lineno"> 1817</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l01818"></a><span class="lineno"> 1818</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l01819"></a><span class="lineno"> 1819</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l01820"></a><span class="lineno"> 1820</span>&#160;</div><div class="line"><a name="l01821"></a><span class="lineno"> 1821</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l01822"></a><span class="lineno"> 1822</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l01823"></a><span class="lineno"> 1823</span>&#160;    <span class="keywordtype">string</span> s_matrix = s_prefix + &quot;matrix&quot;</div><div class="line"><a name="l01824"></a><span class="lineno"> 1824</span>&#160;    <span class="keywordtype">string</span> s_ster_rad = s_prefix + &quot;ster_rad&quot;</div><div class="line"><a name="l01825"></a><span class="lineno"> 1825</span>&#160;    </div><div class="line"><a name="l01826"></a><span class="lineno"> 1826</span>&#160;    wave /sdfr=df /z values = $s_int</div><div class="line"><a name="l01827"></a><span class="lineno"> 1827</span>&#160;    wave /sdfr=df /z azim = $s_azim</div><div class="line"><a name="l01828"></a><span class="lineno"> 1828</span>&#160;    wave /sdfr=df /z polar = $s_polar</div><div class="line"><a name="l01829"></a><span class="lineno"> 1829</span>&#160;    wave /sdfr=df /z ster_rad = $s_ster_rad</div><div class="line"><a name="l01830"></a><span class="lineno"> 1830</span>&#160;    wave /sdfr=df /z matrix = $s_matrix</div><div class="line"><a name="l01831"></a><span class="lineno"> 1831</span>&#160;</div><div class="line"><a name="l01832"></a><span class="lineno"> 1832</span>&#160;    setdatafolder df</div><div class="line"><a name="l01833"></a><span class="lineno"> 1833</span>&#160;    variable azim_offset = 0</div><div class="line"><a name="l01834"></a><span class="lineno"> 1834</span>&#160;    if (!(NumberByKey(&quot;<a class="code" href="pearl-anglescan-tracker_8ipf.html#a4c7a521b8f1a0769c09bfa4a1fca7dab">version</a>&quot;, note(azim), &quot;=&quot;, &quot;\r&quot;) &gt;= 1.6))</div><div class="line"><a name="l01835"></a><span class="lineno"> 1835</span>&#160;        DoAlert /T=&quot;display hemi scan&quot; 0, &quot;your dataset doesn&#39;t include the version 1.6 flag. if it was created with an earlier version that might be okay. please check that the orientation is correct!&quot;</div><div class="line"><a name="l01836"></a><span class="lineno"> 1836</span>&#160;        azim_offset = 180   <span class="comment">// changed 151030 (v1.6)</span></div><div class="line"><a name="l01837"></a><span class="lineno"> 1837</span>&#160;    endif</div><div class="line"><a name="l01838"></a><span class="lineno"> 1838</span>&#160;</div><div class="line"><a name="l01839"></a><span class="lineno"> 1839</span>&#160;    <span class="keywordtype">string</span> s_trace</div><div class="line"><a name="l01840"></a><span class="lineno"> 1840</span>&#160;    DoWindow $graphname</div><div class="line"><a name="l01841"></a><span class="lineno"> 1841</span>&#160;    if (v_flag)</div><div class="line"><a name="l01842"></a><span class="lineno"> 1842</span>&#160;        if (str2num(GetUserData(graphname, &quot;&quot;, &quot;graphtype&quot;)) == graphtype)</div><div class="line"><a name="l01843"></a><span class="lineno"> 1843</span>&#160;            <span class="comment">// graph exists and will update automatically - do not recreate</span></div><div class="line"><a name="l01844"></a><span class="lineno"> 1844</span>&#160;            graphtype = 0</div><div class="line"><a name="l01845"></a><span class="lineno"> 1845</span>&#160;        else</div><div class="line"><a name="l01846"></a><span class="lineno"> 1846</span>&#160;            <span class="comment">// graph exists - but needs recreating</span></div><div class="line"><a name="l01847"></a><span class="lineno"> 1847</span>&#160;            killwindow $graphname</div><div class="line"><a name="l01848"></a><span class="lineno"> 1848</span>&#160;        endif</div><div class="line"><a name="l01849"></a><span class="lineno"> 1849</span>&#160;    endif</div><div class="line"><a name="l01850"></a><span class="lineno"> 1850</span>&#160;    </div><div class="line"><a name="l01851"></a><span class="lineno"> 1851</span>&#160;    switch(graphtype)</div><div class="line"><a name="l01852"></a><span class="lineno"> 1852</span>&#160;        case 1:</div><div class="line"><a name="l01853"></a><span class="lineno"> 1853</span>&#160;            graphname = <a class="code" href="pearl-anglescan-process_8ipf.html#a46fd99d35a43601c39af6096d4e4f770">display_polar_graph</a>(graphname, angle_offset=azim_offset, do_ticks=do_ticks)</div><div class="line"><a name="l01854"></a><span class="lineno"> 1854</span>&#160;</div><div class="line"><a name="l01855"></a><span class="lineno"> 1855</span>&#160;            s_trace = WMPolarAppendTrace(graphname, ster_rad, azim, 360)</div><div class="line"><a name="l01856"></a><span class="lineno"> 1856</span>&#160;            ModifyGraph /W=$graphname mode($s_trace)=2, lsize($s_trace)=2</div><div class="line"><a name="l01857"></a><span class="lineno"> 1857</span>&#160;            ModifyGraph /W=$graphname zColor($s_trace)={values,*,*,BlueGreenOrange,0}</div><div class="line"><a name="l01858"></a><span class="lineno"> 1858</span>&#160;            </div><div class="line"><a name="l01859"></a><span class="lineno"> 1859</span>&#160;            ColorScale /W=$graphname /C /N=text0 /E=2 /F=0 /B=1 /A=RB /X=0.00 /Y=0.00 trace=polarY0</div><div class="line"><a name="l01860"></a><span class="lineno"> 1860</span>&#160;            ColorScale /W=$graphname /C /N=text0 side=2, width=5, heightPct=40, frame=0.50, lblMargin=0</div><div class="line"><a name="l01861"></a><span class="lineno"> 1861</span>&#160;            ColorScale /W=$graphname /C /N=text0 nticks=2, minor=1, tickLen=4.00, tickThick=0.50</div><div class="line"><a name="l01862"></a><span class="lineno"> 1862</span>&#160;</div><div class="line"><a name="l01863"></a><span class="lineno"> 1863</span>&#160;            SetWindow $graphname, userdata(projection)=num2str(projection)</div><div class="line"><a name="l01864"></a><span class="lineno"> 1864</span>&#160;            SetWindow $graphname, userdata(graphtype)=num2str(graphtype)</div><div class="line"><a name="l01865"></a><span class="lineno"> 1865</span>&#160;            <a class="code" href="pearl-anglescan-process_8ipf.html#af00d9061e410ad033a9fd1f0ca561e0d">draw_hemi_axes</a>(graphname, do_grids=do_grids)</div><div class="line"><a name="l01866"></a><span class="lineno"> 1866</span>&#160;            <span class="keywordflow">break</span></div><div class="line"><a name="l01867"></a><span class="lineno"> 1867</span>&#160;        <span class="keywordflow">case</span> 3:</div><div class="line"><a name="l01868"></a><span class="lineno"> 1868</span>&#160;            graphname = <a class="code" href="pearl-anglescan-process_8ipf.html#a46fd99d35a43601c39af6096d4e4f770">display_polar_graph</a>(graphname, angle_offset=azim_offset, do_ticks=do_ticks)</div><div class="line"><a name="l01869"></a><span class="lineno"> 1869</span>&#160;</div><div class="line"><a name="l01870"></a><span class="lineno"> 1870</span>&#160;            s_trace = WMPolarAppendTrace(graphname, ster_rad, azim, 360)</div><div class="line"><a name="l01871"></a><span class="lineno"> 1871</span>&#160;            ModifyGraph /W=$graphname mode($s_trace)=0, lsize($s_trace)=0</div><div class="line"><a name="l01872"></a><span class="lineno"> 1872</span>&#160;            AppendImage /L=VertCrossing /B=HorizCrossing matrix</div><div class="line"><a name="l01873"></a><span class="lineno"> 1873</span>&#160;</div><div class="line"><a name="l01874"></a><span class="lineno"> 1874</span>&#160;            ColorScale /W=$graphname /C /N=text0 /E=2 /F=0 /B=1 /A=RB /X=0.00 /Y=0.00 image=$s_matrix</div><div class="line"><a name="l01875"></a><span class="lineno"> 1875</span>&#160;            ColorScale /W=$graphname /C /N=text0 side=2, width=5, heightPct=40, frame=0.50, lblMargin=0</div><div class="line"><a name="l01876"></a><span class="lineno"> 1876</span>&#160;            ColorScale /W=$graphname /C /N=text0 nticks=2, minor=1, tickLen=4.00, tickThick=0.50</div><div class="line"><a name="l01877"></a><span class="lineno"> 1877</span>&#160;        </div><div class="line"><a name="l01878"></a><span class="lineno"> 1878</span>&#160;            SetWindow $graphname, userdata(projection)=num2str(projection)</div><div class="line"><a name="l01879"></a><span class="lineno"> 1879</span>&#160;            SetWindow $graphname, userdata(graphtype)=num2str(graphtype)</div><div class="line"><a name="l01880"></a><span class="lineno"> 1880</span>&#160;            <a class="code" href="pearl-anglescan-process_8ipf.html#af00d9061e410ad033a9fd1f0ca561e0d">draw_hemi_axes</a>(graphname, do_grids=do_grids)</div><div class="line"><a name="l01881"></a><span class="lineno"> 1881</span>&#160;            <span class="keywordflow">break</span></div><div class="line"><a name="l01882"></a><span class="lineno"> 1882</span>&#160;    endswitch</div><div class="line"><a name="l01883"></a><span class="lineno"> 1883</span>&#160;    </div><div class="line"><a name="l01884"></a><span class="lineno"> 1884</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l01885"></a><span class="lineno"> 1885</span>&#160;    <span class="keywordflow">return</span> graphname</div><div class="line"><a name="l01886"></a><span class="lineno"> 1886</span>&#160;end</div><div class="line"><a name="l01887"></a><span class="lineno"> 1887</span>&#160;</div><div class="line"><a name="l01929"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a46fd99d35a43601c39af6096d4e4f770"> 1929</a></span>&#160;<span class="keyword">static</span> <span class="keyword">function</span> /s <a class="code" href="pearl-anglescan-process_8ipf.html#a46fd99d35a43601c39af6096d4e4f770">display_polar_graph</a>(graphname, [angle_offset, do_ticks])</div><div class="line"><a name="l01930"></a><span class="lineno"> 1930</span>&#160;    </div><div class="line"><a name="l01931"></a><span class="lineno"> 1931</span>&#160;    <span class="keywordtype">string</span> graphname</div><div class="line"><a name="l01932"></a><span class="lineno"> 1932</span>&#160;    variable angle_offset</div><div class="line"><a name="l01933"></a><span class="lineno"> 1933</span>&#160;    variable do_ticks</div><div class="line"><a name="l01934"></a><span class="lineno"> 1934</span>&#160;    </div><div class="line"><a name="l01935"></a><span class="lineno"> 1935</span>&#160;    dfref savedf = GetDataFolderDFR()</div><div class="line"><a name="l01936"></a><span class="lineno"> 1936</span>&#160;    </div><div class="line"><a name="l01937"></a><span class="lineno"> 1937</span>&#160;    if (ParamIsDefault(angle_offset))</div><div class="line"><a name="l01938"></a><span class="lineno"> 1938</span>&#160;        angle_offset = 0</div><div class="line"><a name="l01939"></a><span class="lineno"> 1939</span>&#160;    endif</div><div class="line"><a name="l01940"></a><span class="lineno"> 1940</span>&#160;    if (ParamIsDefault(do_ticks))</div><div class="line"><a name="l01941"></a><span class="lineno"> 1941</span>&#160;        do_ticks = 3</div><div class="line"><a name="l01942"></a><span class="lineno"> 1942</span>&#160;    endif</div><div class="line"><a name="l01943"></a><span class="lineno"> 1943</span>&#160;    </div><div class="line"><a name="l01944"></a><span class="lineno"> 1944</span>&#160;    if ((strlen(graphname) == 0) || (wintype(graphname) == 0))</div><div class="line"><a name="l01945"></a><span class="lineno"> 1945</span>&#160;        Display /k=1 /W=(10,45,360,345)</div><div class="line"><a name="l01946"></a><span class="lineno"> 1946</span>&#160;        DoWindow /C $graphname</div><div class="line"><a name="l01947"></a><span class="lineno"> 1947</span>&#160;        graphname = WMNewPolarGraph(&quot;&quot;, graphname)</div><div class="line"><a name="l01948"></a><span class="lineno"> 1948</span>&#160;        WMPolarGraphSetVar(graphname, &quot;zeroAngleWhere&quot;, angle_offset)</div><div class="line"><a name="l01949"></a><span class="lineno"> 1949</span>&#160;        </div><div class="line"><a name="l01950"></a><span class="lineno"> 1950</span>&#160;        WMPolarGraphSetVar(graphname, &quot;angleAxisThick&quot;, 0.5)</div><div class="line"><a name="l01951"></a><span class="lineno"> 1951</span>&#160;        WMPolarGraphSetStr(graphname, &quot;doMajorAngleTicks&quot;, &quot;manual&quot;)</div><div class="line"><a name="l01952"></a><span class="lineno"> 1952</span>&#160;        WMPolarGraphSetVar(graphname, &quot;majorAngleInc&quot;, 30) <span class="comment">// major ticks in 30 deg steps</span></div><div class="line"><a name="l01953"></a><span class="lineno"> 1953</span>&#160;        WMPolarGraphSetVar(graphname, &quot;minorAngleTicks&quot;, 2) <span class="comment">// minor ticks in 10 deg steps</span></div><div class="line"><a name="l01954"></a><span class="lineno"> 1954</span>&#160;        WMPolarGraphSetStr(graphname, &quot;angleTicksLocation&quot;, &quot;Outside&quot;)</div><div class="line"><a name="l01955"></a><span class="lineno"> 1955</span>&#160;        WMPolarGraphSetVar(graphname, &quot;doAngleTickLabelSubRange&quot;, 1)</div><div class="line"><a name="l01956"></a><span class="lineno"> 1956</span>&#160;        WMPolarGraphSetVar(graphname, &quot;angleTickLabelRangeStart&quot;, 0)</div><div class="line"><a name="l01957"></a><span class="lineno"> 1957</span>&#160;        WMPolarGraphSetVar(graphname, &quot;angleTickLabelRangeExtent&quot;, 90)</div><div class="line"><a name="l01958"></a><span class="lineno"> 1958</span>&#160;        WMPolarGraphSetStr(graphname, &quot;angleTickLabelNotation&quot;, &quot;%g°&quot;)</div><div class="line"><a name="l01959"></a><span class="lineno"> 1959</span>&#160;  </div><div class="line"><a name="l01960"></a><span class="lineno"> 1960</span>&#160;        WMPolarGraphSetVar(graphname, &quot;doPolarGrids&quot;, 0)</div><div class="line"><a name="l01961"></a><span class="lineno"> 1961</span>&#160;        WMPolarGraphSetVar(graphname, &quot;doRadiusTickLabels&quot;, 0)</div><div class="line"><a name="l01962"></a><span class="lineno"> 1962</span>&#160;        WMPolarGraphSetStr(graphname, &quot;radiusAxesWhere&quot;, &quot;  Off&quot;)   <span class="comment">// note the leading spaces, cf. WMPolarAnglesForRadiusAxes</span></div><div class="line"><a name="l01963"></a><span class="lineno"> 1963</span>&#160;        WMPolarGraphSetStr(graphname, &quot;radiusTicksLocation&quot;, &quot;Off&quot;)</div><div class="line"><a name="l01964"></a><span class="lineno"> 1964</span>&#160;</div><div class="line"><a name="l01965"></a><span class="lineno"> 1965</span>&#160;        WMPolarGraphSetVar(graphname, &quot;majorTickLength&quot;, 2)</div><div class="line"><a name="l01966"></a><span class="lineno"> 1966</span>&#160;        WMPolarGraphSetVar(graphname, &quot;majorTickThick&quot;, 0.5)</div><div class="line"><a name="l01967"></a><span class="lineno"> 1967</span>&#160;        WMPolarGraphSetVar(graphname, &quot;minorTickLength&quot;, 1)</div><div class="line"><a name="l01968"></a><span class="lineno"> 1968</span>&#160;        WMPolarGraphSetVar(graphname, &quot;minorTickThick&quot;, 0.5)</div><div class="line"><a name="l01969"></a><span class="lineno"> 1969</span>&#160;        WMPolarGraphSetVar(graphname, &quot;tickLabelOpaque&quot;, 0)</div><div class="line"><a name="l01970"></a><span class="lineno"> 1970</span>&#160;        WMPolarGraphSetVar(graphname, &quot;tickLabelFontSize&quot;, 7)</div><div class="line"><a name="l01971"></a><span class="lineno"> 1971</span>&#160;</div><div class="line"><a name="l01972"></a><span class="lineno"> 1972</span>&#160;        <span class="comment">// changes</span></div><div class="line"><a name="l01973"></a><span class="lineno"> 1973</span>&#160;        if (do_ticks &amp; 1)</div><div class="line"><a name="l01974"></a><span class="lineno"> 1974</span>&#160;            WMPolarGraphSetStr(graphname, &quot;angleTicksLocation&quot;, &quot;Outside&quot;)</div><div class="line"><a name="l01975"></a><span class="lineno"> 1975</span>&#160;        else</div><div class="line"><a name="l01976"></a><span class="lineno"> 1976</span>&#160;            WMPolarGraphSetStr(graphname, &quot;angleTicksLocation&quot;, &quot;Off&quot;)</div><div class="line"><a name="l01977"></a><span class="lineno"> 1977</span>&#160;        endif</div><div class="line"><a name="l01978"></a><span class="lineno"> 1978</span>&#160;        if (do_ticks &amp; 2)</div><div class="line"><a name="l01979"></a><span class="lineno"> 1979</span>&#160;            WMPolarGraphSetVar(graphname, &quot;doMinorAngleTicks&quot;, 1)</div><div class="line"><a name="l01980"></a><span class="lineno"> 1980</span>&#160;        else</div><div class="line"><a name="l01981"></a><span class="lineno"> 1981</span>&#160;            WMPolarGraphSetVar(graphname, &quot;doMinorAngleTicks&quot;, 0)</div><div class="line"><a name="l01982"></a><span class="lineno"> 1982</span>&#160;        endif</div><div class="line"><a name="l01983"></a><span class="lineno"> 1983</span>&#160;        </div><div class="line"><a name="l01984"></a><span class="lineno"> 1984</span>&#160;        DoWindow /T $graphname, graphname</div><div class="line"><a name="l01985"></a><span class="lineno"> 1985</span>&#160;</div><div class="line"><a name="l01986"></a><span class="lineno"> 1986</span>&#160;        <span class="comment">// cursor info in angles</span></div><div class="line"><a name="l01987"></a><span class="lineno"> 1987</span>&#160;        <span class="keywordtype">string</span> graphdf = &quot;root:packages:WMPolarGraphs:&quot; + graphname</div><div class="line"><a name="l01988"></a><span class="lineno"> 1988</span>&#160;        setdatafolder graphdf</div><div class="line"><a name="l01989"></a><span class="lineno"> 1989</span>&#160;        <span class="comment">// current theta, phi coordinates are stored in global variables in the package folder of the graph</span></div><div class="line"><a name="l01990"></a><span class="lineno"> 1990</span>&#160;        variable /g csrA_theta</div><div class="line"><a name="l01991"></a><span class="lineno"> 1991</span>&#160;        variable /g csrA_phi</div><div class="line"><a name="l01992"></a><span class="lineno"> 1992</span>&#160;        variable /g csrB_theta</div><div class="line"><a name="l01993"></a><span class="lineno"> 1993</span>&#160;        variable /g csrB_phi</div><div class="line"><a name="l01994"></a><span class="lineno"> 1994</span>&#160;        <span class="comment">// the text box is hidden initially. it shows up and hides with the cursor info box.</span></div><div class="line"><a name="l01995"></a><span class="lineno"> 1995</span>&#160;        <span class="keywordtype">string</span> tb </div><div class="line"><a name="l01996"></a><span class="lineno"> 1996</span>&#160;        tb = &quot;\\{<span class="stringliteral">&quot;</span></div><div class="line"><a name="l01997"></a><span class="lineno"> 1997</span>&#160;<span class="stringliteral">        tb = tb + &quot;</span>\<span class="stringliteral">&quot;A = (%.1f, %.1f)\&quot;,&quot;</span></div><div class="line"><a name="l01998"></a><span class="lineno"> 1998</span>&#160;        tb = tb + graphdf + <span class="stringliteral">&quot;:csrA_theta,&quot;</span></div><div class="line"><a name="l01999"></a><span class="lineno"> 1999</span>&#160;        tb = tb + graphdf + <span class="stringliteral">&quot;:csrA_phi&quot;</span></div><div class="line"><a name="l02000"></a><span class="lineno"> 2000</span>&#160;        tb = tb + <span class="stringliteral">&quot;}&quot;</span></div><div class="line"><a name="l02001"></a><span class="lineno"> 2001</span>&#160;        TextBox /W=$graphname /A=LT /B=1 /E=2 /F=0 /N=tb_angles /X=1 /Y=1 /V=0 tb</div><div class="line"><a name="l02002"></a><span class="lineno"> 2002</span>&#160;        tb = <span class="stringliteral">&quot;\\{&quot;</span></div><div class="line"><a name="l02003"></a><span class="lineno"> 2003</span>&#160;        tb = tb + <span class="stringliteral">&quot;\&quot;B = (%.1f, %.1f)\&quot;,&quot;</span></div><div class="line"><a name="l02004"></a><span class="lineno"> 2004</span>&#160;        tb = tb + graphdf + <span class="stringliteral">&quot;:csrB_theta,&quot;</span></div><div class="line"><a name="l02005"></a><span class="lineno"> 2005</span>&#160;        tb = tb + graphdf + <span class="stringliteral">&quot;:csrB_phi&quot;</span></div><div class="line"><a name="l02006"></a><span class="lineno"> 2006</span>&#160;        tb = tb + <span class="stringliteral">&quot;}&quot;</span></div><div class="line"><a name="l02007"></a><span class="lineno"> 2007</span>&#160;        AppendText /W=$graphname /N=tb_angles tb</div><div class="line"><a name="l02008"></a><span class="lineno"> 2008</span>&#160;        <span class="comment">// updates are triggered by a window hook</span></div><div class="line"><a name="l02009"></a><span class="lineno"> 2009</span>&#160;        SetWindow $graphname, hook(<a class="code" href="pearl-anglescan-process_8ipf.html#ac4dbd1ece37b2cf22fa976a153977288">polar_graph_hook</a>)=<a class="code" href="namespace_pearl_anglescan_process.html">PearlAnglescanProcess</a>#<a class="code" href="pearl-anglescan-process_8ipf.html#ac4dbd1ece37b2cf22fa976a153977288">polar_graph_hook</a></div><div class="line"><a name="l02010"></a><span class="lineno"> 2010</span>&#160;    <span class="keywordflow">else</span></div><div class="line"><a name="l02011"></a><span class="lineno"> 2011</span>&#160;        <span class="comment">// graph window exists</span></div><div class="line"><a name="l02012"></a><span class="lineno"> 2012</span>&#160;        DoWindow /F $graphname</div><div class="line"><a name="l02013"></a><span class="lineno"> 2013</span>&#160;    endif</div><div class="line"><a name="l02014"></a><span class="lineno"> 2014</span>&#160;</div><div class="line"><a name="l02015"></a><span class="lineno"> 2015</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l02016"></a><span class="lineno"> 2016</span>&#160;    <span class="keywordflow">return</span> graphname</div><div class="line"><a name="l02017"></a><span class="lineno"> 2017</span>&#160;end</div><div class="line"><a name="l02018"></a><span class="lineno"> 2018</span>&#160;</div><div class="line"><a name="l02044"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#af00d9061e410ad033a9fd1f0ca561e0d"> 2044</a></span>&#160;<span class="keyword">static</span> <span class="keyword">function</span> /s <a class="code" href="pearl-anglescan-process_8ipf.html#af00d9061e410ad033a9fd1f0ca561e0d">draw_hemi_axes</a>(graphname, [do_grids])</div><div class="line"><a name="l02045"></a><span class="lineno"> 2045</span>&#160;    <span class="keywordtype">string</span> graphname</div><div class="line"><a name="l02046"></a><span class="lineno"> 2046</span>&#160;    variable do_grids</div><div class="line"><a name="l02047"></a><span class="lineno"> 2047</span>&#160;    </div><div class="line"><a name="l02048"></a><span class="lineno"> 2048</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(do_grids))</div><div class="line"><a name="l02049"></a><span class="lineno"> 2049</span>&#160;        do_grids = 3</div><div class="line"><a name="l02050"></a><span class="lineno"> 2050</span>&#160;    endif</div><div class="line"><a name="l02051"></a><span class="lineno"> 2051</span>&#160;</div><div class="line"><a name="l02052"></a><span class="lineno"> 2052</span>&#160;    dfref savedf = GetDataFolderDFR()</div><div class="line"><a name="l02053"></a><span class="lineno"> 2053</span>&#160;</div><div class="line"><a name="l02054"></a><span class="lineno"> 2054</span>&#160;    string sproj = GetUserData(graphname, &quot;&quot;, &quot;projection&quot;)</div><div class="line"><a name="l02055"></a><span class="lineno"> 2055</span>&#160;    variable projection = str2num(&quot;0&quot; + sproj)</div><div class="line"><a name="l02056"></a><span class="lineno"> 2056</span>&#160;</div><div class="line"><a name="l02057"></a><span class="lineno"> 2057</span>&#160;    SetDrawLayer /W=$graphname ProgFront</div><div class="line"><a name="l02058"></a><span class="lineno"> 2058</span>&#160;</div><div class="line"><a name="l02059"></a><span class="lineno"> 2059</span>&#160;    <span class="comment">// polar axis</span></div><div class="line"><a name="l02060"></a><span class="lineno"> 2060</span>&#160;    SetDrawEnv /W=$graphname xcoord=HorizCrossing, ycoord=VertCrossing</div><div class="line"><a name="l02061"></a><span class="lineno"> 2061</span>&#160;    SetDrawEnv /W=$graphname linethick= 0.5</div><div class="line"><a name="l02062"></a><span class="lineno"> 2062</span>&#160;    SetDrawEnv /W=$graphname dash=2</div><div class="line"><a name="l02063"></a><span class="lineno"> 2063</span>&#160;    SetDrawEnv /W=$graphname fillpat=0</div><div class="line"><a name="l02064"></a><span class="lineno"> 2064</span>&#160;    SetDrawEnv /W=$graphname fname=&quot;default&quot;, fsize=7</div><div class="line"><a name="l02065"></a><span class="lineno"> 2065</span>&#160;    SetDrawEnv /W=$graphname textxjust=1, textyjust=1</div><div class="line"><a name="l02066"></a><span class="lineno"> 2066</span>&#160;    <span class="comment">//SetDrawEnv /W=$graphname linefgc=(65535,65535,65535)</span></div><div class="line"><a name="l02067"></a><span class="lineno"> 2067</span>&#160;    SetDrawEnv /W=$graphname save</div><div class="line"><a name="l02068"></a><span class="lineno"> 2068</span>&#160;</div><div class="line"><a name="l02069"></a><span class="lineno"> 2069</span>&#160;    if (do_grids &amp; 1)</div><div class="line"><a name="l02070"></a><span class="lineno"> 2070</span>&#160;        DrawLine /W=$graphname 0, -2, 0, 2</div><div class="line"><a name="l02071"></a><span class="lineno"> 2071</span>&#160;        DrawLine /W=$graphname -2, 0, 2, 0</div><div class="line"><a name="l02072"></a><span class="lineno"> 2072</span>&#160;    endif</div><div class="line"><a name="l02073"></a><span class="lineno"> 2073</span>&#160;</div><div class="line"><a name="l02074"></a><span class="lineno"> 2074</span>&#160;    variable radi</div><div class="line"><a name="l02075"></a><span class="lineno"> 2075</span>&#160;    if (do_grids &amp; 2)</div><div class="line"><a name="l02076"></a><span class="lineno"> 2076</span>&#160;        radi = <a class="code" href="pearl-anglescan-process_8ipf.html#a75219b38ea58012abcffc848d536faa4">calc_graph_radius</a>(0.5, projection=projection)</div><div class="line"><a name="l02077"></a><span class="lineno"> 2077</span>&#160;        DrawOval /W=$graphname -radi, radi, radi, -radi</div><div class="line"><a name="l02078"></a><span class="lineno"> 2078</span>&#160;        radi = calc_graph_radius(30, projection=projection)</div><div class="line"><a name="l02079"></a><span class="lineno"> 2079</span>&#160;        DrawOval /W=$graphname -radi, radi, radi, -radi</div><div class="line"><a name="l02080"></a><span class="lineno"> 2080</span>&#160;        radi = calc_graph_radius(60, projection=projection)</div><div class="line"><a name="l02081"></a><span class="lineno"> 2081</span>&#160;        DrawOval /W=$graphname -radi, radi, radi, -radi</div><div class="line"><a name="l02082"></a><span class="lineno"> 2082</span>&#160;</div><div class="line"><a name="l02083"></a><span class="lineno"> 2083</span>&#160;        SetDrawEnv /W=$graphname textxjust= 1,textyjust= 2</div><div class="line"><a name="l02084"></a><span class="lineno"> 2084</span>&#160;        SetDrawEnv /W=$graphname save</div><div class="line"><a name="l02085"></a><span class="lineno"> 2085</span>&#160;        radi = calc_graph_radius(30, projection=projection)</div><div class="line"><a name="l02086"></a><span class="lineno"> 2086</span>&#160;        DrawText /W=$graphname radi, -0.1, &quot;30°&quot;</div><div class="line"><a name="l02087"></a><span class="lineno"> 2087</span>&#160;        radi = calc_graph_radius(60, projection=projection)</div><div class="line"><a name="l02088"></a><span class="lineno"> 2088</span>&#160;        DrawText /W=$graphname radi, -0.1, &quot;60°&quot;</div><div class="line"><a name="l02089"></a><span class="lineno"> 2089</span>&#160;    endif</div><div class="line"><a name="l02090"></a><span class="lineno"> 2090</span>&#160;    </div><div class="line"><a name="l02091"></a><span class="lineno"> 2091</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l02092"></a><span class="lineno"> 2092</span>&#160;end</div><div class="line"><a name="l02093"></a><span class="lineno"> 2093</span>&#160;</div><div class="line"><a name="l02116"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#afedad38a418cee5d1fb9e08aae2160a0"> 2116</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#afedad38a418cee5d1fb9e08aae2160a0">draw_diffraction_cone</a>(graphname, groupname, theta_axis, theta_inner, phi)</div><div class="line"><a name="l02117"></a><span class="lineno"> 2117</span>&#160;    <span class="keywordtype">string</span> graphname</div><div class="line"><a name="l02118"></a><span class="lineno"> 2118</span>&#160;    <span class="keywordtype">string</span> groupname</div><div class="line"><a name="l02119"></a><span class="lineno"> 2119</span>&#160;    </div><div class="line"><a name="l02120"></a><span class="lineno"> 2120</span>&#160;    variable theta_axis</div><div class="line"><a name="l02121"></a><span class="lineno"> 2121</span>&#160;    variable theta_inner</div><div class="line"><a name="l02122"></a><span class="lineno"> 2122</span>&#160;    variable phi</div><div class="line"><a name="l02123"></a><span class="lineno"> 2123</span>&#160;    </div><div class="line"><a name="l02124"></a><span class="lineno"> 2124</span>&#160;    variable r_axis = calc_graph_radius(theta_axis)</div><div class="line"><a name="l02125"></a><span class="lineno"> 2125</span>&#160;    variable r_inner = calc_graph_radius(theta_inner)</div><div class="line"><a name="l02126"></a><span class="lineno"> 2126</span>&#160;    variable r_outer = calc_graph_radius(2 * theta_axis - theta_inner)</div><div class="line"><a name="l02127"></a><span class="lineno"> 2127</span>&#160;    </div><div class="line"><a name="l02128"></a><span class="lineno"> 2128</span>&#160;    SetDrawEnv push</div><div class="line"><a name="l02129"></a><span class="lineno"> 2129</span>&#160;    SetDrawLayer UserFront</div><div class="line"><a name="l02130"></a><span class="lineno"> 2130</span>&#160;    DrawAction getgroup=$groupname, delete</div><div class="line"><a name="l02131"></a><span class="lineno"> 2131</span>&#160;    SetDrawEnv gstart, gname=$groupname</div><div class="line"><a name="l02132"></a><span class="lineno"> 2132</span>&#160;    variable xc, yc, xr, yr</div><div class="line"><a name="l02133"></a><span class="lineno"> 2133</span>&#160;</div><div class="line"><a name="l02134"></a><span class="lineno"> 2134</span>&#160;    <span class="comment">// cone periphery</span></div><div class="line"><a name="l02135"></a><span class="lineno"> 2135</span>&#160;    variable r_center = (r_outer + r_inner) / 2</div><div class="line"><a name="l02136"></a><span class="lineno"> 2136</span>&#160;    variable r_radius = (r_outer - r_inner) / 2</div><div class="line"><a name="l02137"></a><span class="lineno"> 2137</span>&#160;    xc = r_center * cos(phi * pi / 180)</div><div class="line"><a name="l02138"></a><span class="lineno"> 2138</span>&#160;    yc = r_center * sin(phi * pi / 180)</div><div class="line"><a name="l02139"></a><span class="lineno"> 2139</span>&#160;    xr = r_radius</div><div class="line"><a name="l02140"></a><span class="lineno"> 2140</span>&#160;    yr = r_radius</div><div class="line"><a name="l02141"></a><span class="lineno"> 2141</span>&#160;    SetDrawEnv xcoord=HorizCrossing, ycoord=VertCrossing</div><div class="line"><a name="l02142"></a><span class="lineno"> 2142</span>&#160;    SetDrawEnv dash=11, fillpat=0</div><div class="line"><a name="l02143"></a><span class="lineno"> 2143</span>&#160;    DrawOval xc - xr, yc - yr, xc + xr, yc + yr</div><div class="line"><a name="l02144"></a><span class="lineno"> 2144</span>&#160;</div><div class="line"><a name="l02145"></a><span class="lineno"> 2145</span>&#160;    <span class="comment">// cone axis    </span></div><div class="line"><a name="l02146"></a><span class="lineno"> 2146</span>&#160;    xc = r_axis * cos(phi * pi / 180)</div><div class="line"><a name="l02147"></a><span class="lineno"> 2147</span>&#160;    yc = r_axis * sin(phi * pi / 180)</div><div class="line"><a name="l02148"></a><span class="lineno"> 2148</span>&#160;    r_radius = calc_graph_radius(2)</div><div class="line"><a name="l02149"></a><span class="lineno"> 2149</span>&#160;    xr = r_radius</div><div class="line"><a name="l02150"></a><span class="lineno"> 2150</span>&#160;    yr = r_radius</div><div class="line"><a name="l02151"></a><span class="lineno"> 2151</span>&#160;    SetDrawEnv xcoord=HorizCrossing, ycoord=VertCrossing</div><div class="line"><a name="l02152"></a><span class="lineno"> 2152</span>&#160;    SetDrawEnv fillfgc=(0,0,0)</div><div class="line"><a name="l02153"></a><span class="lineno"> 2153</span>&#160;    DrawOval xc - xr, yc - yr, xc + xr, yc + yr</div><div class="line"><a name="l02154"></a><span class="lineno"> 2154</span>&#160;    </div><div class="line"><a name="l02155"></a><span class="lineno"> 2155</span>&#160;    SetDrawEnv gstop</div><div class="line"><a name="l02156"></a><span class="lineno"> 2156</span>&#160;    SetDrawEnv pop</div><div class="line"><a name="l02157"></a><span class="lineno"> 2157</span>&#160;end</div><div class="line"><a name="l02158"></a><span class="lineno"> 2158</span>&#160;</div><div class="line"><a name="l02180"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a1f4f74a8ae557c56e1e3aacd0b45f3f1"> 2180</a></span>&#160;function /s <a class="code" href="pearl-anglescan-process_8ipf.html#a1f4f74a8ae557c56e1e3aacd0b45f3f1">display_scanlines</a>(nickname, alpha_lo, alpha_hi, m_theta, m_tilt, m_phi, [folding, projection])</div><div class="line"><a name="l02181"></a><span class="lineno"> 2181</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l02182"></a><span class="lineno"> 2182</span>&#160;    variable alpha_lo</div><div class="line"><a name="l02183"></a><span class="lineno"> 2183</span>&#160;    variable alpha_hi</div><div class="line"><a name="l02184"></a><span class="lineno"> 2184</span>&#160;    wave m_theta</div><div class="line"><a name="l02185"></a><span class="lineno"> 2185</span>&#160;    wave m_tilt</div><div class="line"><a name="l02186"></a><span class="lineno"> 2186</span>&#160;    wave m_phi</div><div class="line"><a name="l02187"></a><span class="lineno"> 2187</span>&#160;    variable folding</div><div class="line"><a name="l02188"></a><span class="lineno"> 2188</span>&#160;    variable projection</div><div class="line"><a name="l02189"></a><span class="lineno"> 2189</span>&#160;    </div><div class="line"><a name="l02190"></a><span class="lineno"> 2190</span>&#160;    if (ParamIsDefault(folding))</div><div class="line"><a name="l02191"></a><span class="lineno"> 2191</span>&#160;        folding = 1</div><div class="line"><a name="l02192"></a><span class="lineno"> 2192</span>&#160;    endif</div><div class="line"><a name="l02193"></a><span class="lineno"> 2193</span>&#160;    if (ParamIsDefault(projection))</div><div class="line"><a name="l02194"></a><span class="lineno"> 2194</span>&#160;        projection = 1</div><div class="line"><a name="l02195"></a><span class="lineno"> 2195</span>&#160;    endif</div><div class="line"><a name="l02196"></a><span class="lineno"> 2196</span>&#160;    </div><div class="line"><a name="l02197"></a><span class="lineno"> 2197</span>&#160;    <span class="comment">// sort out data folder structure</span></div><div class="line"><a name="l02198"></a><span class="lineno"> 2198</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l02199"></a><span class="lineno"> 2199</span>&#160;    newdatafolder /s/o $nickname</div><div class="line"><a name="l02200"></a><span class="lineno"> 2200</span>&#160;    <span class="keywordtype">string</span> graphname = &quot;graph_&quot; + nickname</div><div class="line"><a name="l02201"></a><span class="lineno"> 2201</span>&#160;    </div><div class="line"><a name="l02202"></a><span class="lineno"> 2202</span>&#160;    duplicate /free m_tilt, loc_m_tilt</div><div class="line"><a name="l02203"></a><span class="lineno"> 2203</span>&#160;    loc_m_tilt = -m_tilt</div><div class="line"><a name="l02204"></a><span class="lineno"> 2204</span>&#160;    </div><div class="line"><a name="l02205"></a><span class="lineno"> 2205</span>&#160;    make /n=1 /d /free d_polar, d_azi</div><div class="line"><a name="l02206"></a><span class="lineno"> 2206</span>&#160;    variable n_alpha = round(alpha_hi - alpha_lo) + 1</div><div class="line"><a name="l02207"></a><span class="lineno"> 2207</span>&#160;    make /n=(n_alpha) /d /free analyser</div><div class="line"><a name="l02208"></a><span class="lineno"> 2208</span>&#160;    setscale /i x alpha_lo, alpha_hi, &quot;°&quot;, analyser</div><div class="line"><a name="l02209"></a><span class="lineno"> 2209</span>&#160;    analyser = x</div><div class="line"><a name="l02210"></a><span class="lineno"> 2210</span>&#160;    </div><div class="line"><a name="l02211"></a><span class="lineno"> 2211</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a3cc7eddf5c6b0658260cfb32dd2c026d">convert_angles_ttpa2polar</a>(m_theta, loc_m_tilt, m_phi, analyser, d_polar, d_azi)</div><div class="line"><a name="l02212"></a><span class="lineno"> 2212</span>&#160;    duplicate /free d_polar, d_radius</div><div class="line"><a name="l02213"></a><span class="lineno"> 2213</span>&#160;    d_radius = calc_graph_radius(d_polar, projection=projection)</div><div class="line"><a name="l02214"></a><span class="lineno"> 2214</span>&#160;    d_azi += 180    <span class="comment">// changed 151030 (v1.6)</span></div><div class="line"><a name="l02215"></a><span class="lineno"> 2215</span>&#160;    </div><div class="line"><a name="l02216"></a><span class="lineno"> 2216</span>&#160;    graphname = <a class="code" href="pearl-anglescan-process_8ipf.html#a46fd99d35a43601c39af6096d4e4f770">display_polar_graph</a>(graphname)</div><div class="line"><a name="l02217"></a><span class="lineno"> 2217</span>&#160;    SetWindow $graphname, userdata(projection)=num2str(projection)</div><div class="line"><a name="l02218"></a><span class="lineno"> 2218</span>&#160;    </div><div class="line"><a name="l02219"></a><span class="lineno"> 2219</span>&#160;    variable ifold</div><div class="line"><a name="l02220"></a><span class="lineno"> 2220</span>&#160;    variable iang</div><div class="line"><a name="l02221"></a><span class="lineno"> 2221</span>&#160;    variable nang = numpnts(m_theta)</div><div class="line"><a name="l02222"></a><span class="lineno"> 2222</span>&#160;    <span class="keywordtype">string</span> s_rad</div><div class="line"><a name="l02223"></a><span class="lineno"> 2223</span>&#160;    <span class="keywordtype">string</span> s_azi</div><div class="line"><a name="l02224"></a><span class="lineno"> 2224</span>&#160;    <span class="keywordtype">string</span> s_trace</div><div class="line"><a name="l02225"></a><span class="lineno"> 2225</span>&#160;    for (ifold = 0; ifold &lt; folding; ifold += 1)</div><div class="line"><a name="l02226"></a><span class="lineno"> 2226</span>&#160;        d_azi = d_azi &gt;= 360 ? d_azi - 360 : d_azi</div><div class="line"><a name="l02227"></a><span class="lineno"> 2227</span>&#160;        for (iang = 0; iang &lt; nang; iang += 1)</div><div class="line"><a name="l02228"></a><span class="lineno"> 2228</span>&#160;            sprintf s_rad, &quot;rad_%d_%d&quot;, ifold, iang</div><div class="line"><a name="l02229"></a><span class="lineno"> 2229</span>&#160;            duplicate /o analyser, $s_rad</div><div class="line"><a name="l02230"></a><span class="lineno"> 2230</span>&#160;            wave w_rad = $s_rad</div><div class="line"><a name="l02231"></a><span class="lineno"> 2231</span>&#160;            w_rad = d_radius[p][iang]</div><div class="line"><a name="l02232"></a><span class="lineno"> 2232</span>&#160;            </div><div class="line"><a name="l02233"></a><span class="lineno"> 2233</span>&#160;            sprintf s_azi, &quot;azi_%d_%d&quot;, ifold, iang</div><div class="line"><a name="l02234"></a><span class="lineno"> 2234</span>&#160;            duplicate /o analyser, $s_azi</div><div class="line"><a name="l02235"></a><span class="lineno"> 2235</span>&#160;            wave w_azi = $s_azi</div><div class="line"><a name="l02236"></a><span class="lineno"> 2236</span>&#160;            w_azi = d_azi[p][iang]</div><div class="line"><a name="l02237"></a><span class="lineno"> 2237</span>&#160;            </div><div class="line"><a name="l02238"></a><span class="lineno"> 2238</span>&#160;            if (numtype(sum(w_rad)) == 0)</div><div class="line"><a name="l02239"></a><span class="lineno"> 2239</span>&#160;                s_trace = WMPolarAppendTrace(graphname, w_rad, w_azi, 360)</div><div class="line"><a name="l02240"></a><span class="lineno"> 2240</span>&#160;                ModifyGraph /w=$graphname mode($s_trace)=0, lsize($s_trace)=0.5</div><div class="line"><a name="l02241"></a><span class="lineno"> 2241</span>&#160;            endif</div><div class="line"><a name="l02242"></a><span class="lineno"> 2242</span>&#160;        endfor</div><div class="line"><a name="l02243"></a><span class="lineno"> 2243</span>&#160;        d_azi += 360 / folding</div><div class="line"><a name="l02244"></a><span class="lineno"> 2244</span>&#160;    endfor</div><div class="line"><a name="l02245"></a><span class="lineno"> 2245</span>&#160;</div><div class="line"><a name="l02246"></a><span class="lineno"> 2246</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#af00d9061e410ad033a9fd1f0ca561e0d">draw_hemi_axes</a>(graphname)</div><div class="line"><a name="l02247"></a><span class="lineno"> 2247</span>&#160;</div><div class="line"><a name="l02248"></a><span class="lineno"> 2248</span>&#160;    setdatafolder saveDF</div><div class="line"><a name="l02249"></a><span class="lineno"> 2249</span>&#160;    return graphname</div><div class="line"><a name="l02250"></a><span class="lineno"> 2250</span>&#160;end</div><div class="line"><a name="l02251"></a><span class="lineno"> 2251</span>&#160;</div><div class="line"><a name="l02268"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#aae45cc49d67f79dcedc4420f82acea4c"> 2268</a></span>&#160;constant <a class="code" href="pearl-anglescan-process_8ipf.html#aae45cc49d67f79dcedc4420f82acea4c">kProjDist</a> = 0</div><div class="line"><a name="l02269"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ac151c6f989d6a568fdef0acb791f84db"> 2269</a></span>&#160;constant <a class="code" href="pearl-anglescan-process_8ipf.html#ac151c6f989d6a568fdef0acb791f84db">kProjStereo</a> = 1</div><div class="line"><a name="l02270"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a207c56ac03cc18bf1bfde88dbfe2666f"> 2270</a></span>&#160;constant <a class="code" href="pearl-anglescan-process_8ipf.html#a207c56ac03cc18bf1bfde88dbfe2666f">kProjArea</a> = 2</div><div class="line"><a name="l02271"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a4a40c73c0e03545e0050ea370e9c57d3"> 2271</a></span>&#160;constant <a class="code" href="pearl-anglescan-process_8ipf.html#a4a40c73c0e03545e0050ea370e9c57d3">kProjGnom</a> = 3</div><div class="line"><a name="l02272"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a3b3bd11c35d5f850b34937ab6c45f659"> 2272</a></span>&#160;constant <a class="code" href="pearl-anglescan-process_8ipf.html#a3b3bd11c35d5f850b34937ab6c45f659">kProjOrtho</a> = 4</div><div class="line"><a name="l02273"></a><span class="lineno"> 2273</span>&#160;</div><div class="line"><a name="l02274"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a04e75675884236b6ed8244d7575d3a13"> 2274</a></span>&#160;static constant <a class="code" href="pearl-anglescan-process_8ipf.html#a04e75675884236b6ed8244d7575d3a13">kProjScaleDist</a> = 2</div><div class="line"><a name="l02275"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#aed66bda9701d8a69b2174fac974aa665"> 2275</a></span>&#160;static constant <a class="code" href="pearl-anglescan-process_8ipf.html#aed66bda9701d8a69b2174fac974aa665">kProjScaleStereo</a> = 2</div><div class="line"><a name="l02276"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#afa14187803f5b428a96c8234e04ab217"> 2276</a></span>&#160;static constant <a class="code" href="pearl-anglescan-process_8ipf.html#afa14187803f5b428a96c8234e04ab217">kProjScaleArea</a> = 2</div><div class="line"><a name="l02277"></a><span class="lineno"> 2277</span>&#160;<span class="comment">// scaled so that radius(gnom) = radius(stereo) for polar = 88</span></div><div class="line"><a name="l02278"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ab6670abb621d01994c0b9974f58be843"> 2278</a></span>&#160;static constant <a class="code" href="pearl-anglescan-process_8ipf.html#ab6670abb621d01994c0b9974f58be843">kProjScaleGnom</a> = 0.06744519021</div><div class="line"><a name="l02279"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#aa5487fdee22e0da61a511c14239262f5"> 2279</a></span>&#160;static constant <a class="code" href="pearl-anglescan-process_8ipf.html#aa5487fdee22e0da61a511c14239262f5">kProjScaleOrtho</a> = 2</div><div class="line"><a name="l02280"></a><span class="lineno"> 2280</span>&#160;</div><div class="line"><a name="l02295"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a75219b38ea58012abcffc848d536faa4"> 2295</a></span>&#160;threadsafe function calc_graph_radius(polar, [projection])</div><div class="line"><a name="l02296"></a><span class="lineno"> 2296</span>&#160;    variable polar</div><div class="line"><a name="l02297"></a><span class="lineno"> 2297</span>&#160;    variable projection</div><div class="line"><a name="l02298"></a><span class="lineno"> 2298</span>&#160;    </div><div class="line"><a name="l02299"></a><span class="lineno"> 2299</span>&#160;    if (ParamIsDefault(projection))</div><div class="line"><a name="l02300"></a><span class="lineno"> 2300</span>&#160;        projection = 1</div><div class="line"><a name="l02301"></a><span class="lineno"> 2301</span>&#160;    endif</div><div class="line"><a name="l02302"></a><span class="lineno"> 2302</span>&#160;</div><div class="line"><a name="l02303"></a><span class="lineno"> 2303</span>&#160;    variable radius</div><div class="line"><a name="l02304"></a><span class="lineno"> 2304</span>&#160;    switch(projection)</div><div class="line"><a name="l02305"></a><span class="lineno"> 2305</span>&#160;        case <a class="code" href="pearl-anglescan-process_8ipf.html#ac151c6f989d6a568fdef0acb791f84db">kProjStereo</a>: <span class="comment">// stereographic</span></div><div class="line"><a name="l02306"></a><span class="lineno"> 2306</span>&#160;            radius = <a class="code" href="pearl-anglescan-process_8ipf.html#aed66bda9701d8a69b2174fac974aa665">kProjScaleStereo</a> * tan(polar / 2 * pi / 180)</div><div class="line"><a name="l02307"></a><span class="lineno"> 2307</span>&#160;            break</div><div class="line"><a name="l02308"></a><span class="lineno"> 2308</span>&#160;        case <a class="code" href="pearl-anglescan-process_8ipf.html#a207c56ac03cc18bf1bfde88dbfe2666f">kProjArea</a>: <span class="comment">// equal area</span></div><div class="line"><a name="l02309"></a><span class="lineno"> 2309</span>&#160;            radius = <a class="code" href="pearl-anglescan-process_8ipf.html#afa14187803f5b428a96c8234e04ab217">kProjScaleArea</a> * sin(polar / 2 * pi / 180)</div><div class="line"><a name="l02310"></a><span class="lineno"> 2310</span>&#160;            break</div><div class="line"><a name="l02311"></a><span class="lineno"> 2311</span>&#160;        case <a class="code" href="pearl-anglescan-process_8ipf.html#a4a40c73c0e03545e0050ea370e9c57d3">kProjGnom</a>: <span class="comment">// gnomonic</span></div><div class="line"><a name="l02312"></a><span class="lineno"> 2312</span>&#160;            radius = polar &lt; 90 ? <a class="code" href="pearl-anglescan-process_8ipf.html#ab6670abb621d01994c0b9974f58be843">kProjScaleGnom</a> * tan(polar * pi / 180) : inf</div><div class="line"><a name="l02313"></a><span class="lineno"> 2313</span>&#160;            break</div><div class="line"><a name="l02314"></a><span class="lineno"> 2314</span>&#160;        case <a class="code" href="pearl-anglescan-process_8ipf.html#a3b3bd11c35d5f850b34937ab6c45f659">kProjOrtho</a>: <span class="comment">// orthographic</span></div><div class="line"><a name="l02315"></a><span class="lineno"> 2315</span>&#160;            radius = <a class="code" href="pearl-anglescan-process_8ipf.html#aa5487fdee22e0da61a511c14239262f5">kProjScaleOrtho</a> * sin(polar * pi / 180)</div><div class="line"><a name="l02316"></a><span class="lineno"> 2316</span>&#160;            break</div><div class="line"><a name="l02317"></a><span class="lineno"> 2317</span>&#160;        default: <span class="comment">// equidistant</span></div><div class="line"><a name="l02318"></a><span class="lineno"> 2318</span>&#160;            radius = <a class="code" href="pearl-anglescan-process_8ipf.html#a04e75675884236b6ed8244d7575d3a13">kProjScaleDist</a> * polar / 90</div><div class="line"><a name="l02319"></a><span class="lineno"> 2319</span>&#160;    endswitch</div><div class="line"><a name="l02320"></a><span class="lineno"> 2320</span>&#160;    </div><div class="line"><a name="l02321"></a><span class="lineno"> 2321</span>&#160;    return radius</div><div class="line"><a name="l02322"></a><span class="lineno"> 2322</span>&#160;end</div><div class="line"><a name="l02323"></a><span class="lineno"> 2323</span>&#160;</div><div class="line"><a name="l02340"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ae2b036a06ffac8d2bb292a65401f8a9a"> 2340</a></span>&#160;threadsafe function <a class="code" href="pearl-anglescan-process_8ipf.html#ae2b036a06ffac8d2bb292a65401f8a9a">calc_graph_polar</a>(x, y, [projection])</div><div class="line"><a name="l02341"></a><span class="lineno"> 2341</span>&#160;    variable x</div><div class="line"><a name="l02342"></a><span class="lineno"> 2342</span>&#160;    variable y</div><div class="line"><a name="l02343"></a><span class="lineno"> 2343</span>&#160;    variable projection </div><div class="line"><a name="l02344"></a><span class="lineno"> 2344</span>&#160;    </div><div class="line"><a name="l02345"></a><span class="lineno"> 2345</span>&#160;    if (ParamIsDefault(projection))</div><div class="line"><a name="l02346"></a><span class="lineno"> 2346</span>&#160;        projection = 1</div><div class="line"><a name="l02347"></a><span class="lineno"> 2347</span>&#160;    endif</div><div class="line"><a name="l02348"></a><span class="lineno"> 2348</span>&#160;</div><div class="line"><a name="l02349"></a><span class="lineno"> 2349</span>&#160;    variable radius</div><div class="line"><a name="l02350"></a><span class="lineno"> 2350</span>&#160;    variable polar</div><div class="line"><a name="l02351"></a><span class="lineno"> 2351</span>&#160;    </div><div class="line"><a name="l02352"></a><span class="lineno"> 2352</span>&#160;    radius = sqrt(x^2 + y^2)</div><div class="line"><a name="l02353"></a><span class="lineno"> 2353</span>&#160;    switch(projection)</div><div class="line"><a name="l02354"></a><span class="lineno"> 2354</span>&#160;        case <a class="code" href="pearl-anglescan-process_8ipf.html#ac151c6f989d6a568fdef0acb791f84db">kProjStereo</a>: <span class="comment">// stereographic</span></div><div class="line"><a name="l02355"></a><span class="lineno"> 2355</span>&#160;            polar = 2 * atan(radius / <a class="code" href="pearl-anglescan-process_8ipf.html#aed66bda9701d8a69b2174fac974aa665">kProjScaleStereo</a>) * 180 / pi</div><div class="line"><a name="l02356"></a><span class="lineno"> 2356</span>&#160;            break</div><div class="line"><a name="l02357"></a><span class="lineno"> 2357</span>&#160;        case <a class="code" href="pearl-anglescan-process_8ipf.html#a207c56ac03cc18bf1bfde88dbfe2666f">kProjArea</a>: <span class="comment">// equal area</span></div><div class="line"><a name="l02358"></a><span class="lineno"> 2358</span>&#160;            polar = 2 * asin(radius / <a class="code" href="pearl-anglescan-process_8ipf.html#afa14187803f5b428a96c8234e04ab217">kProjScaleArea</a>) * 180 / pi</div><div class="line"><a name="l02359"></a><span class="lineno"> 2359</span>&#160;            break</div><div class="line"><a name="l02360"></a><span class="lineno"> 2360</span>&#160;        case <a class="code" href="pearl-anglescan-process_8ipf.html#a4a40c73c0e03545e0050ea370e9c57d3">kProjGnom</a>: <span class="comment">// gnomonic</span></div><div class="line"><a name="l02361"></a><span class="lineno"> 2361</span>&#160;            polar = atan(radius / <a class="code" href="pearl-anglescan-process_8ipf.html#ab6670abb621d01994c0b9974f58be843">kProjScaleGnom</a>) * 180 / pi</div><div class="line"><a name="l02362"></a><span class="lineno"> 2362</span>&#160;            break</div><div class="line"><a name="l02363"></a><span class="lineno"> 2363</span>&#160;        case <a class="code" href="pearl-anglescan-process_8ipf.html#a3b3bd11c35d5f850b34937ab6c45f659">kProjOrtho</a>: <span class="comment">// orthographic</span></div><div class="line"><a name="l02364"></a><span class="lineno"> 2364</span>&#160;            polar = asin(radius / <a class="code" href="pearl-anglescan-process_8ipf.html#aa5487fdee22e0da61a511c14239262f5">kProjScaleOrtho</a>) * 180 / pi</div><div class="line"><a name="l02365"></a><span class="lineno"> 2365</span>&#160;            break</div><div class="line"><a name="l02366"></a><span class="lineno"> 2366</span>&#160;        default: <span class="comment">// equidistant</span></div><div class="line"><a name="l02367"></a><span class="lineno"> 2367</span>&#160;            polar = 90 * radius / <a class="code" href="pearl-anglescan-process_8ipf.html#a04e75675884236b6ed8244d7575d3a13">kProjScaleDist</a></div><div class="line"><a name="l02368"></a><span class="lineno"> 2368</span>&#160;    endswitch</div><div class="line"><a name="l02369"></a><span class="lineno"> 2369</span>&#160;</div><div class="line"><a name="l02370"></a><span class="lineno"> 2370</span>&#160;    return polar</div><div class="line"><a name="l02371"></a><span class="lineno"> 2371</span>&#160;end</div><div class="line"><a name="l02372"></a><span class="lineno"> 2372</span>&#160;</div><div class="line"><a name="l02393"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a4fc744e24e3e9c5efb17f14ab622bcae"> 2393</a></span>&#160;threadsafe function <a class="code" href="pearl-anglescan-process_8ipf.html#a4fc744e24e3e9c5efb17f14ab622bcae">calc_graph_azi</a>(x, y, [projection,zeroAngle])</div><div class="line"><a name="l02394"></a><span class="lineno"> 2394</span>&#160;    variable x</div><div class="line"><a name="l02395"></a><span class="lineno"> 2395</span>&#160;    variable y</div><div class="line"><a name="l02396"></a><span class="lineno"> 2396</span>&#160;    variable projection </div><div class="line"><a name="l02397"></a><span class="lineno"> 2397</span>&#160;    variable zeroAngle</div><div class="line"><a name="l02398"></a><span class="lineno"> 2398</span>&#160;    </div><div class="line"><a name="l02399"></a><span class="lineno"> 2399</span>&#160;    if (ParamIsDefault(projection))</div><div class="line"><a name="l02400"></a><span class="lineno"> 2400</span>&#160;        projection = 1</div><div class="line"><a name="l02401"></a><span class="lineno"> 2401</span>&#160;    endif</div><div class="line"><a name="l02402"></a><span class="lineno"> 2402</span>&#160;    if (ParamIsDefault(zeroAngle))</div><div class="line"><a name="l02403"></a><span class="lineno"> 2403</span>&#160;        zeroAngle = 0</div><div class="line"><a name="l02404"></a><span class="lineno"> 2404</span>&#160;    endif</div><div class="line"><a name="l02405"></a><span class="lineno"> 2405</span>&#160;</div><div class="line"><a name="l02406"></a><span class="lineno"> 2406</span>&#160;    variable azi</div><div class="line"><a name="l02407"></a><span class="lineno"> 2407</span>&#160;    if (x &gt; 0)</div><div class="line"><a name="l02408"></a><span class="lineno"> 2408</span>&#160;        azi = atan(y / x) * 180 / pi</div><div class="line"><a name="l02409"></a><span class="lineno"> 2409</span>&#160;    else</div><div class="line"><a name="l02410"></a><span class="lineno"> 2410</span>&#160;        azi = atan(y / x) * 180 / pi + 180</div><div class="line"><a name="l02411"></a><span class="lineno"> 2411</span>&#160;    endif</div><div class="line"><a name="l02412"></a><span class="lineno"> 2412</span>&#160;    </div><div class="line"><a name="l02413"></a><span class="lineno"> 2413</span>&#160;    azi += zeroAngle</div><div class="line"><a name="l02414"></a><span class="lineno"> 2414</span>&#160;    if (azi &lt; 0)</div><div class="line"><a name="l02415"></a><span class="lineno"> 2415</span>&#160;        azi += 360</div><div class="line"><a name="l02416"></a><span class="lineno"> 2416</span>&#160;    endif</div><div class="line"><a name="l02417"></a><span class="lineno"> 2417</span>&#160;    if (azi &gt;= 360)</div><div class="line"><a name="l02418"></a><span class="lineno"> 2418</span>&#160;        azi -= 360</div><div class="line"><a name="l02419"></a><span class="lineno"> 2419</span>&#160;    endif</div><div class="line"><a name="l02420"></a><span class="lineno"> 2420</span>&#160;    if (numtype(azi) != 0)</div><div class="line"><a name="l02421"></a><span class="lineno"> 2421</span>&#160;        azi = 0</div><div class="line"><a name="l02422"></a><span class="lineno"> 2422</span>&#160;    endif</div><div class="line"><a name="l02423"></a><span class="lineno"> 2423</span>&#160;    </div><div class="line"><a name="l02424"></a><span class="lineno"> 2424</span>&#160;    return azi</div><div class="line"><a name="l02425"></a><span class="lineno"> 2425</span>&#160;end</div><div class="line"><a name="l02426"></a><span class="lineno"> 2426</span>&#160;</div><div class="line"><a name="l02438"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a1baaa3ffd9495ed427b43cbfe6e1edf8"> 2438</a></span>&#160;static function <a class="code" href="pearl-anglescan-process_8ipf.html#a1baaa3ffd9495ed427b43cbfe6e1edf8">update_polar_info</a>(graphname)</div><div class="line"><a name="l02439"></a><span class="lineno"> 2439</span>&#160;    <span class="keywordtype">string</span> graphname</div><div class="line"><a name="l02440"></a><span class="lineno"> 2440</span>&#160;    </div><div class="line"><a name="l02441"></a><span class="lineno"> 2441</span>&#160;    dfref savedf = GetDataFolderDFR()</div><div class="line"><a name="l02442"></a><span class="lineno"> 2442</span>&#160;</div><div class="line"><a name="l02443"></a><span class="lineno"> 2443</span>&#160;    <span class="keywordtype">string</span> graphdf = &quot;root:packages:WMPolarGraphs:&quot; + graphname</div><div class="line"><a name="l02444"></a><span class="lineno"> 2444</span>&#160;    setdatafolder graphdf</div><div class="line"><a name="l02445"></a><span class="lineno"> 2445</span>&#160;    </div><div class="line"><a name="l02446"></a><span class="lineno"> 2446</span>&#160;    nvar csrA_theta</div><div class="line"><a name="l02447"></a><span class="lineno"> 2447</span>&#160;    nvar csrA_phi</div><div class="line"><a name="l02448"></a><span class="lineno"> 2448</span>&#160;    nvar csrB_theta</div><div class="line"><a name="l02449"></a><span class="lineno"> 2449</span>&#160;    nvar csrB_phi</div><div class="line"><a name="l02450"></a><span class="lineno"> 2450</span>&#160;</div><div class="line"><a name="l02451"></a><span class="lineno"> 2451</span>&#160;    <span class="keywordtype">string</span> sproj = GetUserData(graphname, &quot;&quot;, &quot;projection&quot;)</div><div class="line"><a name="l02452"></a><span class="lineno"> 2452</span>&#160;    variable projection = str2num(&quot;0&quot; + sproj)</div><div class="line"><a name="l02453"></a><span class="lineno"> 2453</span>&#160;    nvar zeroAngleWhere</div><div class="line"><a name="l02454"></a><span class="lineno"> 2454</span>&#160;    </div><div class="line"><a name="l02455"></a><span class="lineno"> 2455</span>&#160;    variable x = hcsr(A, graphname)</div><div class="line"><a name="l02456"></a><span class="lineno"> 2456</span>&#160;    variable y = vcsr(A, graphname)</div><div class="line"><a name="l02457"></a><span class="lineno"> 2457</span>&#160;    csrA_theta = <a class="code" href="pearl-anglescan-process_8ipf.html#ae2b036a06ffac8d2bb292a65401f8a9a">calc_graph_polar</a>(x, y, projection=projection)</div><div class="line"><a name="l02458"></a><span class="lineno"> 2458</span>&#160;    csrA_phi = <a class="code" href="pearl-anglescan-process_8ipf.html#a4fc744e24e3e9c5efb17f14ab622bcae">calc_graph_azi</a>(x, y, projection=projection, zeroAngle=zeroAngleWhere)</div><div class="line"><a name="l02459"></a><span class="lineno"> 2459</span>&#160;</div><div class="line"><a name="l02460"></a><span class="lineno"> 2460</span>&#160;    x = hcsr(B, graphname)</div><div class="line"><a name="l02461"></a><span class="lineno"> 2461</span>&#160;    y = vcsr(B, graphname)</div><div class="line"><a name="l02462"></a><span class="lineno"> 2462</span>&#160;    csrB_theta = <a class="code" href="pearl-anglescan-process_8ipf.html#ae2b036a06ffac8d2bb292a65401f8a9a">calc_graph_polar</a>(x, y, projection=projection)</div><div class="line"><a name="l02463"></a><span class="lineno"> 2463</span>&#160;    csrB_phi = <a class="code" href="pearl-anglescan-process_8ipf.html#a4fc744e24e3e9c5efb17f14ab622bcae">calc_graph_azi</a>(x, y, projection=projection, zeroAngle=zeroAngleWhere)</div><div class="line"><a name="l02464"></a><span class="lineno"> 2464</span>&#160;    </div><div class="line"><a name="l02465"></a><span class="lineno"> 2465</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l02466"></a><span class="lineno"> 2466</span>&#160;end</div><div class="line"><a name="l02467"></a><span class="lineno"> 2467</span>&#160;</div><div class="line"><a name="l02473"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ac4dbd1ece37b2cf22fa976a153977288"> 2473</a></span>&#160;static function <a class="code" href="pearl-anglescan-process_8ipf.html#ac4dbd1ece37b2cf22fa976a153977288">polar_graph_hook</a>(s)</div><div class="line"><a name="l02474"></a><span class="lineno"> 2474</span>&#160;    STRUCT WMWinHookStruct &amp;s</div><div class="line"><a name="l02475"></a><span class="lineno"> 2475</span>&#160;</div><div class="line"><a name="l02476"></a><span class="lineno"> 2476</span>&#160;    Variable hookResult = 0</div><div class="line"><a name="l02477"></a><span class="lineno"> 2477</span>&#160;</div><div class="line"><a name="l02478"></a><span class="lineno"> 2478</span>&#160;    switch(s.eventCode)</div><div class="line"><a name="l02479"></a><span class="lineno"> 2479</span>&#160;        case 7: <span class="comment">// cursor moved</span></div><div class="line"><a name="l02480"></a><span class="lineno"> 2480</span>&#160;            <a class="code" href="pearl-anglescan-process_8ipf.html#a1baaa3ffd9495ed427b43cbfe6e1edf8">update_polar_info</a>(s.winname)</div><div class="line"><a name="l02481"></a><span class="lineno"> 2481</span>&#160;            break</div><div class="line"><a name="l02482"></a><span class="lineno"> 2482</span>&#160;        case 20: <span class="comment">// show info</span></div><div class="line"><a name="l02483"></a><span class="lineno"> 2483</span>&#160;            TextBox /W=$s.winname /N=tb_angles /C /V=1</div><div class="line"><a name="l02484"></a><span class="lineno"> 2484</span>&#160;            break</div><div class="line"><a name="l02485"></a><span class="lineno"> 2485</span>&#160;        case 21: <span class="comment">// hide info</span></div><div class="line"><a name="l02486"></a><span class="lineno"> 2486</span>&#160;            TextBox /W=$s.winname /N=tb_angles /C /V=0</div><div class="line"><a name="l02487"></a><span class="lineno"> 2487</span>&#160;            break</div><div class="line"><a name="l02488"></a><span class="lineno"> 2488</span>&#160;    endswitch</div><div class="line"><a name="l02489"></a><span class="lineno"> 2489</span>&#160;</div><div class="line"><a name="l02490"></a><span class="lineno"> 2490</span>&#160;    return hookResult       <span class="comment">// 0 if nothing done, else 1</span></div><div class="line"><a name="l02491"></a><span class="lineno"> 2491</span>&#160;end</div><div class="line"><a name="l02492"></a><span class="lineno"> 2492</span>&#160;</div><div class="line"><a name="l02493"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a70b0e243bcbd549e2b1da74aab605629"> 2493</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a70b0e243bcbd549e2b1da74aab605629">set_polar_graph_cursor</a>(nickname, cursorname, polar_angle, azim_angle, [graphname])</div><div class="line"><a name="l02494"></a><span class="lineno"> 2494</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l02495"></a><span class="lineno"> 2495</span>&#160;    <span class="keywordtype">string</span> cursorname</div><div class="line"><a name="l02496"></a><span class="lineno"> 2496</span>&#160;    variable polar_angle</div><div class="line"><a name="l02497"></a><span class="lineno"> 2497</span>&#160;    variable azim_angle</div><div class="line"><a name="l02498"></a><span class="lineno"> 2498</span>&#160;    <span class="keywordtype">string</span> graphname</div><div class="line"><a name="l02499"></a><span class="lineno"> 2499</span>&#160;    </div><div class="line"><a name="l02500"></a><span class="lineno"> 2500</span>&#160;    if (ParamIsDefault(graphname))</div><div class="line"><a name="l02501"></a><span class="lineno"> 2501</span>&#160;        if (strlen(nickname) &gt; 0)</div><div class="line"><a name="l02502"></a><span class="lineno"> 2502</span>&#160;            graphname = nickname</div><div class="line"><a name="l02503"></a><span class="lineno"> 2503</span>&#160;        else</div><div class="line"><a name="l02504"></a><span class="lineno"> 2504</span>&#160;            graphname = GetDataFolder(0)</div><div class="line"><a name="l02505"></a><span class="lineno"> 2505</span>&#160;        endif</div><div class="line"><a name="l02506"></a><span class="lineno"> 2506</span>&#160;    endif</div><div class="line"><a name="l02507"></a><span class="lineno"> 2507</span>&#160;    </div><div class="line"><a name="l02508"></a><span class="lineno"> 2508</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l02509"></a><span class="lineno"> 2509</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l02510"></a><span class="lineno"> 2510</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l02511"></a><span class="lineno"> 2511</span>&#160;</div><div class="line"><a name="l02512"></a><span class="lineno"> 2512</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l02513"></a><span class="lineno"> 2513</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l02514"></a><span class="lineno"> 2514</span>&#160;    wave /sdfr=df /z azim = $s_azim</div><div class="line"><a name="l02515"></a><span class="lineno"> 2515</span>&#160;    wave /sdfr=df /z polar = $s_polar</div><div class="line"><a name="l02516"></a><span class="lineno"> 2516</span>&#160;</div><div class="line"><a name="l02517"></a><span class="lineno"> 2517</span>&#160;    FindLevel /P /Q polar, polar_angle</div><div class="line"><a name="l02518"></a><span class="lineno"> 2518</span>&#160;    if (v_flag == 0)</div><div class="line"><a name="l02519"></a><span class="lineno"> 2519</span>&#160;        variable polar_level = floor(v_levelx)</div><div class="line"><a name="l02520"></a><span class="lineno"> 2520</span>&#160;        FindLevel /P /Q /R=[polar_level] azim, azim_angle</div><div class="line"><a name="l02521"></a><span class="lineno"> 2521</span>&#160;        if (v_flag == 0)</div><div class="line"><a name="l02522"></a><span class="lineno"> 2522</span>&#160;            variable azim_level = round(v_levelx)</div><div class="line"><a name="l02523"></a><span class="lineno"> 2523</span>&#160;            <span class="keywordtype">string</span> tracename = &quot;polarY0&quot;</div><div class="line"><a name="l02524"></a><span class="lineno"> 2524</span>&#160;            Cursor /W=$graphname /P $cursorname $traceName azim_level</div><div class="line"><a name="l02525"></a><span class="lineno"> 2525</span>&#160;        endif</div><div class="line"><a name="l02526"></a><span class="lineno"> 2526</span>&#160;    endif</div><div class="line"><a name="l02527"></a><span class="lineno"> 2527</span>&#160;end</div><div class="line"><a name="l02528"></a><span class="lineno"> 2528</span>&#160;</div><div class="line"><a name="l02538"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a4952bc53e3d6d272d25b5e35e91696b5"> 2538</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a4952bc53e3d6d272d25b5e35e91696b5">hemi_add_anglescan</a>(nickname, values, polar, azi, [weights])</div><div class="line"><a name="l02539"></a><span class="lineno"> 2539</span>&#160;    <span class="keywordtype">string</span> nickname <span class="comment">// name prefix of holo waves.</span></div><div class="line"><a name="l02540"></a><span class="lineno"> 2540</span>&#160;        <span class="comment">// may be empty.</span></div><div class="line"><a name="l02541"></a><span class="lineno"> 2541</span>&#160;    wave values <span class="comment">// intensity values</span></div><div class="line"><a name="l02542"></a><span class="lineno"> 2542</span>&#160;        <span class="comment">// the wave can be one- or two-dimensional.</span></div><div class="line"><a name="l02543"></a><span class="lineno"> 2543</span>&#160;        <span class="comment">// no specific order required, the function sorts the arrays internally</span></div><div class="line"><a name="l02544"></a><span class="lineno"> 2544</span>&#160;    wave polar  <span class="comment">// polar coordinates. allowed range 0 &lt;= theta &lt;= 90</span></div><div class="line"><a name="l02545"></a><span class="lineno"> 2545</span>&#160;        <span class="comment">// dimensions corresponding to value.</span></div><div class="line"><a name="l02546"></a><span class="lineno"> 2546</span>&#160;    wave azi    <span class="comment">// azimuthal coordinates. allowed range -360 &lt;= phi &lt; +360</span></div><div class="line"><a name="l02547"></a><span class="lineno"> 2547</span>&#160;        <span class="comment">// dimensions corresponding to value.</span></div><div class="line"><a name="l02548"></a><span class="lineno"> 2548</span>&#160;    wave weights    <span class="comment">// total accumulation time of each point of values. default = 1</span></div><div class="line"><a name="l02549"></a><span class="lineno"> 2549</span>&#160;</div><div class="line"><a name="l02550"></a><span class="lineno"> 2550</span>&#160;    if (ParamIsDefault(weights))</div><div class="line"><a name="l02551"></a><span class="lineno"> 2551</span>&#160;        duplicate /free values, weights</div><div class="line"><a name="l02552"></a><span class="lineno"> 2552</span>&#160;        weights = 1</div><div class="line"><a name="l02553"></a><span class="lineno"> 2553</span>&#160;    endif</div><div class="line"><a name="l02554"></a><span class="lineno"> 2554</span>&#160;    </div><div class="line"><a name="l02555"></a><span class="lineno"> 2555</span>&#160;    <span class="comment">// quick check whether hemi grid is existing</span></div><div class="line"><a name="l02556"></a><span class="lineno"> 2556</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l02557"></a><span class="lineno"> 2557</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l02558"></a><span class="lineno"> 2558</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l02559"></a><span class="lineno"> 2559</span>&#160;</div><div class="line"><a name="l02560"></a><span class="lineno"> 2560</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l02561"></a><span class="lineno"> 2561</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l02562"></a><span class="lineno"> 2562</span>&#160;    <span class="keywordtype">string</span> s_theta = s_prefix + &quot;th&quot;</div><div class="line"><a name="l02563"></a><span class="lineno"> 2563</span>&#160;</div><div class="line"><a name="l02564"></a><span class="lineno"> 2564</span>&#160;    wave /sdfr=df /z w_values = $s_int</div><div class="line"><a name="l02565"></a><span class="lineno"> 2565</span>&#160;    wave /sdfr=df /z w_azim = $s_azim</div><div class="line"><a name="l02566"></a><span class="lineno"> 2566</span>&#160;    wave /sdfr=df /z w_polar = $s_polar</div><div class="line"><a name="l02567"></a><span class="lineno"> 2567</span>&#160;    wave /sdfr=df /z w_theta = $s_theta</div><div class="line"><a name="l02568"></a><span class="lineno"> 2568</span>&#160;    if (!waveexists(w_values) || !waveexists(w_azim) || !waveexists(w_polar))</div><div class="line"><a name="l02569"></a><span class="lineno"> 2569</span>&#160;        abort &quot;Missing hemispherical scan grid. Please call <a class="code" href="pearl-anglescan-process_8ipf.html#a902ac3a24e33f651e83ee03d31707da7">make_hemi_grid</a>() first.&quot;</div><div class="line"><a name="l02570"></a><span class="lineno"> 2570</span>&#160;    endif</div><div class="line"><a name="l02571"></a><span class="lineno"> 2571</span>&#160;    </div><div class="line"><a name="l02572"></a><span class="lineno"> 2572</span>&#160;    <span class="comment">// make internal copies, one-dimensional, ordered in theta</span></div><div class="line"><a name="l02573"></a><span class="lineno"> 2573</span>&#160;    duplicate /free values, values_copy</div><div class="line"><a name="l02574"></a><span class="lineno"> 2574</span>&#160;    duplicate /free polar, polar_copy</div><div class="line"><a name="l02575"></a><span class="lineno"> 2575</span>&#160;    duplicate /free azi, azi_copy</div><div class="line"><a name="l02576"></a><span class="lineno"> 2576</span>&#160;    duplicate /free weights, weights_copy</div><div class="line"><a name="l02577"></a><span class="lineno"> 2577</span>&#160;    variable nn = dimsize(values, 0) * max(dimsize(values, 1), 1)</div><div class="line"><a name="l02578"></a><span class="lineno"> 2578</span>&#160;    redimension /n=(nn) values_copy, polar_copy, azi_copy, weights_copy</div><div class="line"><a name="l02579"></a><span class="lineno"> 2579</span>&#160;    sort /r polar_copy, polar_copy, azi_copy, values_copy, weights_copy</div><div class="line"><a name="l02580"></a><span class="lineno"> 2580</span>&#160;    </div><div class="line"><a name="l02581"></a><span class="lineno"> 2581</span>&#160;    variable pol</div><div class="line"><a name="l02582"></a><span class="lineno"> 2582</span>&#160;    variable pol_st = abs(w_theta[1] - w_theta[0])</div><div class="line"><a name="l02583"></a><span class="lineno"> 2583</span>&#160;    variable pol1, pol2</div><div class="line"><a name="l02584"></a><span class="lineno"> 2584</span>&#160;    </div><div class="line"><a name="l02585"></a><span class="lineno"> 2585</span>&#160;    duplicate /free azi_copy, azi_slice</div><div class="line"><a name="l02586"></a><span class="lineno"> 2586</span>&#160;    duplicate /free values_copy, values_slice</div><div class="line"><a name="l02587"></a><span class="lineno"> 2587</span>&#160;    duplicate /free weights_copy, weights_slice</div><div class="line"><a name="l02588"></a><span class="lineno"> 2588</span>&#160;    for (pol = 90; pol &gt;= 0; pol -= pol_st)</div><div class="line"><a name="l02589"></a><span class="lineno"> 2589</span>&#160;        pol1 = pol - pol_st / 2</div><div class="line"><a name="l02590"></a><span class="lineno"> 2590</span>&#160;        pol2 = pol + pol_st / 2</div><div class="line"><a name="l02591"></a><span class="lineno"> 2591</span>&#160;        extract /free /indx polar_copy, sel, (pol1 &lt; polar_copy) &amp;&amp; (polar_copy &lt;= pol2)</div><div class="line"><a name="l02592"></a><span class="lineno"> 2592</span>&#160;        if (numpnts(sel) &gt; 0)</div><div class="line"><a name="l02593"></a><span class="lineno"> 2593</span>&#160;            redimension /n=(numpnts(sel)) azi_slice, values_slice, weights_slice</div><div class="line"><a name="l02594"></a><span class="lineno"> 2594</span>&#160;            azi_slice = azi_copy[sel]</div><div class="line"><a name="l02595"></a><span class="lineno"> 2595</span>&#160;            values_slice = values_copy[sel]</div><div class="line"><a name="l02596"></a><span class="lineno"> 2596</span>&#160;            weights_slice = weights_copy[sel]</div><div class="line"><a name="l02597"></a><span class="lineno"> 2597</span>&#160;            <a class="code" href="pearl-anglescan-process_8ipf.html#a4641c716180d737700c6df87f5f8974e">hemi_add_aziscan</a>(nickname, values_slice, pol, azi_slice, weights=weights_slice)</div><div class="line"><a name="l02598"></a><span class="lineno"> 2598</span>&#160;        endif</div><div class="line"><a name="l02599"></a><span class="lineno"> 2599</span>&#160;    endfor</div><div class="line"><a name="l02600"></a><span class="lineno"> 2600</span>&#160;end</div><div class="line"><a name="l02601"></a><span class="lineno"> 2601</span>&#160;</div><div class="line"><a name="l02608"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a4641c716180d737700c6df87f5f8974e"> 2608</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a4641c716180d737700c6df87f5f8974e">hemi_add_aziscan</a>(nickname, values, polar, azi, [weights])</div><div class="line"><a name="l02609"></a><span class="lineno"> 2609</span>&#160;    <span class="keywordtype">string</span> nickname <span class="comment">// name prefix of holo waves.</span></div><div class="line"><a name="l02610"></a><span class="lineno"> 2610</span>&#160;        <span class="comment">// may be empty.</span></div><div class="line"><a name="l02611"></a><span class="lineno"> 2611</span>&#160;    wave values <span class="comment">// intensity values of the azimuthal scan at the positions given in the azi parameter</span></div><div class="line"><a name="l02612"></a><span class="lineno"> 2612</span>&#160;    variable polar <span class="comment">// polar angle where to add the azi scan</span></div><div class="line"><a name="l02613"></a><span class="lineno"> 2613</span>&#160;    wave azi <span class="comment">// angle positions of the azimuthal scan</span></div><div class="line"><a name="l02614"></a><span class="lineno"> 2614</span>&#160;        <span class="comment">// acceptable range: &gt;= -360 and &lt; +360</span></div><div class="line"><a name="l02615"></a><span class="lineno"> 2615</span>&#160;        <span class="comment">// no specific order required, the function sorts the array internally</span></div><div class="line"><a name="l02616"></a><span class="lineno"> 2616</span>&#160;    wave weights    <span class="comment">// total accumulation time of each point of values. default = 1</span></div><div class="line"><a name="l02617"></a><span class="lineno"> 2617</span>&#160;</div><div class="line"><a name="l02618"></a><span class="lineno"> 2618</span>&#160;    if (ParamIsDefault(weights))</div><div class="line"><a name="l02619"></a><span class="lineno"> 2619</span>&#160;        duplicate /free values, weights</div><div class="line"><a name="l02620"></a><span class="lineno"> 2620</span>&#160;        weights = 1</div><div class="line"><a name="l02621"></a><span class="lineno"> 2621</span>&#160;    endif</div><div class="line"><a name="l02622"></a><span class="lineno"> 2622</span>&#160;        </div><div class="line"><a name="l02623"></a><span class="lineno"> 2623</span>&#160;    <span class="comment">// hemi grid waves</span></div><div class="line"><a name="l02624"></a><span class="lineno"> 2624</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l02625"></a><span class="lineno"> 2625</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l02626"></a><span class="lineno"> 2626</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l02627"></a><span class="lineno"> 2627</span>&#160;</div><div class="line"><a name="l02628"></a><span class="lineno"> 2628</span>&#160;    <span class="keywordtype">string</span> s_totals = s_prefix + &quot;tot&quot;</div><div class="line"><a name="l02629"></a><span class="lineno"> 2629</span>&#160;    <span class="keywordtype">string</span> s_weights = s_prefix + &quot;wt&quot;</div><div class="line"><a name="l02630"></a><span class="lineno"> 2630</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l02631"></a><span class="lineno"> 2631</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l02632"></a><span class="lineno"> 2632</span>&#160;    <span class="keywordtype">string</span> s_index = s_prefix + &quot;index&quot;</div><div class="line"><a name="l02633"></a><span class="lineno"> 2633</span>&#160;    <span class="keywordtype">string</span> s_theta = s_prefix + &quot;th&quot;</div><div class="line"><a name="l02634"></a><span class="lineno"> 2634</span>&#160;    <span class="keywordtype">string</span> s_dphi = s_prefix + &quot;dphi&quot;</div><div class="line"><a name="l02635"></a><span class="lineno"> 2635</span>&#160;    <span class="keywordtype">string</span> s_nphis = s_prefix + &quot;nphis&quot;</div><div class="line"><a name="l02636"></a><span class="lineno"> 2636</span>&#160;    </div><div class="line"><a name="l02637"></a><span class="lineno"> 2637</span>&#160;    wave /sdfr=df w_polar = $s_polar</div><div class="line"><a name="l02638"></a><span class="lineno"> 2638</span>&#160;    wave /sdfr=df w_azim = $s_azim</div><div class="line"><a name="l02639"></a><span class="lineno"> 2639</span>&#160;    wave /sdfr=df w_values = $s_int</div><div class="line"><a name="l02640"></a><span class="lineno"> 2640</span>&#160;    wave /sdfr=df w_totals = $s_totals</div><div class="line"><a name="l02641"></a><span class="lineno"> 2641</span>&#160;    wave /sdfr=df w_weights = $s_weights</div><div class="line"><a name="l02642"></a><span class="lineno"> 2642</span>&#160;    wave /sdfr=df w_index = $s_index</div><div class="line"><a name="l02643"></a><span class="lineno"> 2643</span>&#160;    wave /sdfr=df w_theta = $s_theta</div><div class="line"><a name="l02644"></a><span class="lineno"> 2644</span>&#160;    wave /sdfr=df w_dphi = $s_dphi</div><div class="line"><a name="l02645"></a><span class="lineno"> 2645</span>&#160;    wave /sdfr=df w_nphis = $s_nphis</div><div class="line"><a name="l02646"></a><span class="lineno"> 2646</span>&#160;    </div><div class="line"><a name="l02647"></a><span class="lineno"> 2647</span>&#160;    <span class="comment">// destination slice coordinates</span></div><div class="line"><a name="l02648"></a><span class="lineno"> 2648</span>&#160;    <span class="comment">//polar = round(polar)</span></div><div class="line"><a name="l02649"></a><span class="lineno"> 2649</span>&#160;    <span class="comment">//variable ipol = 90 - polar</span></div><div class="line"><a name="l02650"></a><span class="lineno"> 2650</span>&#160;    variable ipol = BinarySearch(w_theta, polar)</div><div class="line"><a name="l02651"></a><span class="lineno"> 2651</span>&#160;    if (ipol &lt; 0)</div><div class="line"><a name="l02652"></a><span class="lineno"> 2652</span>&#160;        abort &quot;assertion failed in <a class="code" href="pearl-anglescan-process_8ipf.html#a4641c716180d737700c6df87f5f8974e">hemi_add_aziscan</a>(): polar angle not found in grid.&quot;</div><div class="line"><a name="l02653"></a><span class="lineno"> 2653</span>&#160;    endif</div><div class="line"><a name="l02654"></a><span class="lineno"> 2654</span>&#160;    </div><div class="line"><a name="l02655"></a><span class="lineno"> 2655</span>&#160;    variable d1, d2</div><div class="line"><a name="l02656"></a><span class="lineno"> 2656</span>&#160;    if (ipol &gt;= 1)</div><div class="line"><a name="l02657"></a><span class="lineno"> 2657</span>&#160;        d1 = w_index[ipol - 1]</div><div class="line"><a name="l02658"></a><span class="lineno"> 2658</span>&#160;    else</div><div class="line"><a name="l02659"></a><span class="lineno"> 2659</span>&#160;        d1 = 0</div><div class="line"><a name="l02660"></a><span class="lineno"> 2660</span>&#160;    endif</div><div class="line"><a name="l02661"></a><span class="lineno"> 2661</span>&#160;    d2 = w_index[ipol] - 1</div><div class="line"><a name="l02662"></a><span class="lineno"> 2662</span>&#160;    variable nd = d2 - d1 + 1</div><div class="line"><a name="l02663"></a><span class="lineno"> 2663</span>&#160;    variable dphi = w_dphi[ipol]</div><div class="line"><a name="l02664"></a><span class="lineno"> 2664</span>&#160;    variable az1, az2</div><div class="line"><a name="l02665"></a><span class="lineno"> 2665</span>&#160;    </div><div class="line"><a name="l02666"></a><span class="lineno"> 2666</span>&#160;    <span class="comment">// source slice coordinates </span></div><div class="line"><a name="l02667"></a><span class="lineno"> 2667</span>&#160;    <span class="comment">// order the slice from -dphi/2 to 360-dphi/2</span></div><div class="line"><a name="l02668"></a><span class="lineno"> 2668</span>&#160;    azi = azi &lt; 0 ? azi + 360 : azi</div><div class="line"><a name="l02669"></a><span class="lineno"> 2669</span>&#160;    azi = azi &gt;= 360 - dphi/2 ? azi - 360 : azi</div><div class="line"><a name="l02670"></a><span class="lineno"> 2670</span>&#160;    duplicate /free values, sel_values</div><div class="line"><a name="l02671"></a><span class="lineno"> 2671</span>&#160;    duplicate /free weights, sel_weights</div><div class="line"><a name="l02672"></a><span class="lineno"> 2672</span>&#160;    </div><div class="line"><a name="l02673"></a><span class="lineno"> 2673</span>&#160;    <span class="comment">// loop over destination</span></div><div class="line"><a name="l02674"></a><span class="lineno"> 2674</span>&#160;    variable <span class="keywordtype">id</span></div><div class="line"><a name="l02675"></a><span class="lineno"> 2675</span>&#160;    variable v1, v2, w1, w2</div><div class="line"><a name="l02676"></a><span class="lineno"> 2676</span>&#160;    for (<span class="keywordtype">id</span> = 0; <span class="keywordtype">id</span> &lt; nd; <span class="keywordtype">id</span> += 1)</div><div class="line"><a name="l02677"></a><span class="lineno"> 2677</span>&#160;        az1 = (<span class="keywordtype">id</span> - 0.5) * dphi</div><div class="line"><a name="l02678"></a><span class="lineno"> 2678</span>&#160;        az2 = (<span class="keywordtype">id</span> + 0.5) * dphi</div><div class="line"><a name="l02679"></a><span class="lineno"> 2679</span>&#160;        extract /free /indx azi, sel, (az1 &lt;= azi) &amp;&amp; (azi &lt; az2)</div><div class="line"><a name="l02680"></a><span class="lineno"> 2680</span>&#160;        if (numpnts(sel) &gt; 0)</div><div class="line"><a name="l02681"></a><span class="lineno"> 2681</span>&#160;            redimension /n=(numpnts(sel)) sel_values, sel_weights</div><div class="line"><a name="l02682"></a><span class="lineno"> 2682</span>&#160;            sel_values = values[sel]</div><div class="line"><a name="l02683"></a><span class="lineno"> 2683</span>&#160;            sel_weights = weights[sel]</div><div class="line"><a name="l02684"></a><span class="lineno"> 2684</span>&#160;            v1 = w_totals[d1 + <span class="keywordtype">id</span>]</div><div class="line"><a name="l02685"></a><span class="lineno"> 2685</span>&#160;            w1 = w_weights[d1 + <span class="keywordtype">id</span>]</div><div class="line"><a name="l02686"></a><span class="lineno"> 2686</span>&#160;            if ((numtype(v1) == 2) || (w1 &lt;= 0))</div><div class="line"><a name="l02687"></a><span class="lineno"> 2687</span>&#160;                v1 = 0</div><div class="line"><a name="l02688"></a><span class="lineno"> 2688</span>&#160;                w1 = 0</div><div class="line"><a name="l02689"></a><span class="lineno"> 2689</span>&#160;            endif</div><div class="line"><a name="l02690"></a><span class="lineno"> 2690</span>&#160;            v2 = sum(sel_values)</div><div class="line"><a name="l02691"></a><span class="lineno"> 2691</span>&#160;            w2 = sum(sel_weights)</div><div class="line"><a name="l02692"></a><span class="lineno"> 2692</span>&#160;            w_totals[d1 + <span class="keywordtype">id</span>] = v1 + v2</div><div class="line"><a name="l02693"></a><span class="lineno"> 2693</span>&#160;            w_weights[d1 + <span class="keywordtype">id</span>] = w1 + w2</div><div class="line"><a name="l02694"></a><span class="lineno"> 2694</span>&#160;        endif</div><div class="line"><a name="l02695"></a><span class="lineno"> 2695</span>&#160;    endfor</div><div class="line"><a name="l02696"></a><span class="lineno"> 2696</span>&#160;    w_values[d1, d1 + nd - 1] = w_totals[p] / w_weights[p]</div><div class="line"><a name="l02697"></a><span class="lineno"> 2697</span>&#160;end</div><div class="line"><a name="l02698"></a><span class="lineno"> 2698</span>&#160;</div><div class="line"><a name="l02726"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#acca0130cccf2286863bbf5b7f91c5b3b"> 2726</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#acca0130cccf2286863bbf5b7f91c5b3b">interpolate_hemi_scan</a>(nickname, [projection])</div><div class="line"><a name="l02727"></a><span class="lineno"> 2727</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l02728"></a><span class="lineno"> 2728</span>&#160;    variable projection</div><div class="line"><a name="l02729"></a><span class="lineno"> 2729</span>&#160;</div><div class="line"><a name="l02730"></a><span class="lineno"> 2730</span>&#160;    dfref savedf = GetDataFolderDFR()</div><div class="line"><a name="l02731"></a><span class="lineno"> 2731</span>&#160;</div><div class="line"><a name="l02732"></a><span class="lineno"> 2732</span>&#160;    if (ParamIsDefault(projection))</div><div class="line"><a name="l02733"></a><span class="lineno"> 2733</span>&#160;        projection = 1</div><div class="line"><a name="l02734"></a><span class="lineno"> 2734</span>&#160;    endif</div><div class="line"><a name="l02735"></a><span class="lineno"> 2735</span>&#160;    </div><div class="line"><a name="l02736"></a><span class="lineno"> 2736</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l02737"></a><span class="lineno"> 2737</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l02738"></a><span class="lineno"> 2738</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l02739"></a><span class="lineno"> 2739</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#ac15ebd5a19c558dde666ab36aeb9906f">prepare_hemi_scan_display</a>(nickname, projection=projection)</div><div class="line"><a name="l02740"></a><span class="lineno"> 2740</span>&#160;    </div><div class="line"><a name="l02741"></a><span class="lineno"> 2741</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l02742"></a><span class="lineno"> 2742</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l02743"></a><span class="lineno"> 2743</span>&#160;    <span class="keywordtype">string</span> s_matrix = s_prefix + &quot;matrix&quot;</div><div class="line"><a name="l02744"></a><span class="lineno"> 2744</span>&#160;    <span class="keywordtype">string</span> s_ster_rad = s_prefix + &quot;ster_rad&quot;</div><div class="line"><a name="l02745"></a><span class="lineno"> 2745</span>&#160;    <span class="keywordtype">string</span> s_ster_x = s_prefix + &quot;ster_x&quot;</div><div class="line"><a name="l02746"></a><span class="lineno"> 2746</span>&#160;    <span class="keywordtype">string</span> s_ster_y = s_prefix + &quot;ster_y&quot;</div><div class="line"><a name="l02747"></a><span class="lineno"> 2747</span>&#160;    </div><div class="line"><a name="l02748"></a><span class="lineno"> 2748</span>&#160;    wave /sdfr=df /z values = $s_int</div><div class="line"><a name="l02749"></a><span class="lineno"> 2749</span>&#160;    wave /sdfr=df /z azim = $s_azim</div><div class="line"><a name="l02750"></a><span class="lineno"> 2750</span>&#160;    wave /sdfr=df /z polar = $s_polar</div><div class="line"><a name="l02751"></a><span class="lineno"> 2751</span>&#160;    wave /sdfr=df /z ster_rad = $s_ster_rad</div><div class="line"><a name="l02752"></a><span class="lineno"> 2752</span>&#160;    wave /sdfr=df /z ster_x = $s_ster_x</div><div class="line"><a name="l02753"></a><span class="lineno"> 2753</span>&#160;    wave /sdfr=df /z ster_y = $s_ster_y</div><div class="line"><a name="l02754"></a><span class="lineno"> 2754</span>&#160;</div><div class="line"><a name="l02755"></a><span class="lineno"> 2755</span>&#160;    variable min_ster_x = wavemin(ster_x)</div><div class="line"><a name="l02756"></a><span class="lineno"> 2756</span>&#160;    variable max_ster_x = wavemax(ster_x)</div><div class="line"><a name="l02757"></a><span class="lineno"> 2757</span>&#160;    variable x0 = min_ster_x</div><div class="line"><a name="l02758"></a><span class="lineno"> 2758</span>&#160;    variable xn = 181</div><div class="line"><a name="l02759"></a><span class="lineno"> 2759</span>&#160;    variable dx = (max_ster_x - min_ster_x) / (xn - 1)</div><div class="line"><a name="l02760"></a><span class="lineno"> 2760</span>&#160;    make /n=(numpnts(ster_x), 3) /free triplet</div><div class="line"><a name="l02761"></a><span class="lineno"> 2761</span>&#160;    triplet[][0] = ster_x[p]</div><div class="line"><a name="l02762"></a><span class="lineno"> 2762</span>&#160;    triplet[][1] = ster_y[p]</div><div class="line"><a name="l02763"></a><span class="lineno"> 2763</span>&#160;    triplet[][2] = values[p]</div><div class="line"><a name="l02764"></a><span class="lineno"> 2764</span>&#160;</div><div class="line"><a name="l02765"></a><span class="lineno"> 2765</span>&#160;    variable size = 181</div><div class="line"><a name="l02766"></a><span class="lineno"> 2766</span>&#160;    setdatafolder df</div><div class="line"><a name="l02767"></a><span class="lineno"> 2767</span>&#160;    make /n=(size, size) /d /o $(s_prefix + &quot;matrix&quot;) /wave=matrix</div><div class="line"><a name="l02768"></a><span class="lineno"> 2768</span>&#160;    make /n=(size, size) /free mnorm</div><div class="line"><a name="l02769"></a><span class="lineno"> 2769</span>&#160;    ImageFromXYZ /as {ster_x, ster_y, values}, matrix, mnorm</div><div class="line"><a name="l02770"></a><span class="lineno"> 2770</span>&#160;    matrix /= mnorm</div><div class="line"><a name="l02771"></a><span class="lineno"> 2771</span>&#160;    matrixfilter NanZapMedian, matrix</div><div class="line"><a name="l02772"></a><span class="lineno"> 2772</span>&#160;    matrixfilter gauss, matrix</div><div class="line"><a name="l02773"></a><span class="lineno"> 2773</span>&#160;    </div><div class="line"><a name="l02774"></a><span class="lineno"> 2774</span>&#160;    duplicate /free values, ster_finite</div><div class="line"><a name="l02775"></a><span class="lineno"> 2775</span>&#160;    ster_finite = (numtype(values) == 0) * (ster_x^2 + ster_y^2)</div><div class="line"><a name="l02776"></a><span class="lineno"> 2776</span>&#160;    variable ster_max = wavemax(ster_finite)</div><div class="line"><a name="l02777"></a><span class="lineno"> 2777</span>&#160;    matrix = (x^2 + y^2) &lt;= ster_max ? matrix : nan</div><div class="line"><a name="l02778"></a><span class="lineno"> 2778</span>&#160;    </div><div class="line"><a name="l02779"></a><span class="lineno"> 2779</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l02780"></a><span class="lineno"> 2780</span>&#160;end</div><div class="line"><a name="l02781"></a><span class="lineno"> 2781</span>&#160;</div><div class="line"><a name="l02792"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a0b9e2b025e1d55d2a064edccf6c1c3e3"> 2792</a></span>&#160;<span class="keyword">function</span> <a class="code" href="pearl-anglescan-process_8ipf.html#a0b9e2b025e1d55d2a064edccf6c1c3e3">quick_pizza_image</a>(data, nickname, theta_offset, tilt_offset, phi_offset, [npolar, nograph, folding])</div><div class="line"><a name="l02793"></a><span class="lineno"> 2793</span>&#160;    wave data <span class="comment">// 2D intensity wave, see requirements above</span></div><div class="line"><a name="l02794"></a><span class="lineno"> 2794</span>&#160;    <span class="keywordtype">string</span> nickname <span class="comment">// nick name for output data</span></div><div class="line"><a name="l02795"></a><span class="lineno"> 2795</span>&#160;        <span class="comment">// in default mode, this will be the name of a child folder containing the output</span></div><div class="line"><a name="l02796"></a><span class="lineno"> 2796</span>&#160;        <span class="comment">// in XPDplot mode, this will be a prefix of the generated data in the root folder</span></div><div class="line"><a name="l02797"></a><span class="lineno"> 2797</span>&#160;    variable theta_offset <span class="comment">// manipulator theta angle corresponding to normal emission</span></div><div class="line"><a name="l02798"></a><span class="lineno"> 2798</span>&#160;    variable tilt_offset <span class="comment">// manipulator tilt angle corresponding to normal emission</span></div><div class="line"><a name="l02799"></a><span class="lineno"> 2799</span>&#160;    variable phi_offset <span class="comment">// manipulator phi angle corresponding to phi_result = 0</span></div><div class="line"><a name="l02800"></a><span class="lineno"> 2800</span>&#160;    variable npolar <span class="comment">// number of polar angles, determines polar and azimuthal step size</span></div><div class="line"><a name="l02801"></a><span class="lineno"> 2801</span>&#160;        <span class="comment">// default = 91 (1 degree steps)</span></div><div class="line"><a name="l02802"></a><span class="lineno"> 2802</span>&#160;    variable nograph <span class="comment">// 0 (default) = display a new polar graph</span></div><div class="line"><a name="l02803"></a><span class="lineno"> 2803</span>&#160;        <span class="comment">// 1 = don&#39;t display a new graph (if a graph is existing from a previous call, it will update)</span></div><div class="line"><a name="l02804"></a><span class="lineno"> 2804</span>&#160;    variable folding <span class="comment">// rotational averaging, default = 1</span></div><div class="line"><a name="l02805"></a><span class="lineno"> 2805</span>&#160;        </div><div class="line"><a name="l02806"></a><span class="lineno"> 2806</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(npolar))</div><div class="line"><a name="l02807"></a><span class="lineno"> 2807</span>&#160;        npolar = 91</div><div class="line"><a name="l02808"></a><span class="lineno"> 2808</span>&#160;    endif</div><div class="line"><a name="l02809"></a><span class="lineno"> 2809</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(nograph))</div><div class="line"><a name="l02810"></a><span class="lineno"> 2810</span>&#160;        nograph = 0</div><div class="line"><a name="l02811"></a><span class="lineno"> 2811</span>&#160;    endif</div><div class="line"><a name="l02812"></a><span class="lineno"> 2812</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(folding))</div><div class="line"><a name="l02813"></a><span class="lineno"> 2813</span>&#160;        folding = 1</div><div class="line"><a name="l02814"></a><span class="lineno"> 2814</span>&#160;    endif</div><div class="line"><a name="l02815"></a><span class="lineno"> 2815</span>&#160;    <span class="keywordtype">string</span> graphname = <span class="stringliteral">&quot;graph_&quot;</span> + nickname</div><div class="line"><a name="l02816"></a><span class="lineno"> 2816</span>&#160;    <span class="keywordtype">string</span> s_prefix = <span class="stringliteral">&quot;&quot;</span></div><div class="line"><a name="l02817"></a><span class="lineno"> 2817</span>&#160;    </div><div class="line"><a name="l02818"></a><span class="lineno"> 2818</span>&#160;    <span class="comment">// sort out data folder structure</span></div><div class="line"><a name="l02819"></a><span class="lineno"> 2819</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l02820"></a><span class="lineno"> 2820</span>&#160;    dfref dataDF = GetWavesDataFolderDFR(data)</div><div class="line"><a name="l02821"></a><span class="lineno"> 2821</span>&#160;    setdatafolder dataDF</div><div class="line"><a name="l02822"></a><span class="lineno"> 2822</span>&#160;    <span class="keywordflow">if</span> (DataFolderExists(<span class="stringliteral">&quot;:attr&quot;</span>))</div><div class="line"><a name="l02823"></a><span class="lineno"> 2823</span>&#160;        setdatafolder :attr</div><div class="line"><a name="l02824"></a><span class="lineno"> 2824</span>&#160;    endif</div><div class="line"><a name="l02825"></a><span class="lineno"> 2825</span>&#160;    dfref attrDF = GetDataFolderDFR()</div><div class="line"><a name="l02826"></a><span class="lineno"> 2826</span>&#160;    setdatafolder dataDF</div><div class="line"><a name="l02827"></a><span class="lineno"> 2827</span>&#160;    newdatafolder /s/o $nickname</div><div class="line"><a name="l02828"></a><span class="lineno"> 2828</span>&#160;    dfref destDF = GetDataFolderDFR()</div><div class="line"><a name="l02829"></a><span class="lineno"> 2829</span>&#160;    </div><div class="line"><a name="l02830"></a><span class="lineno"> 2830</span>&#160;    <span class="comment">// performance monitoring</span></div><div class="line"><a name="l02831"></a><span class="lineno"> 2831</span>&#160;    variable timerRefNum</div><div class="line"><a name="l02832"></a><span class="lineno"> 2832</span>&#160;    variable /g xyz_perf_secs</div><div class="line"><a name="l02833"></a><span class="lineno"> 2833</span>&#160;    timerRefNum = startMSTimer</div><div class="line"><a name="l02834"></a><span class="lineno"> 2834</span>&#160;</div><div class="line"><a name="l02835"></a><span class="lineno"> 2835</span>&#160;    wave /sdfr=attrDF ManipulatorTheta</div><div class="line"><a name="l02836"></a><span class="lineno"> 2836</span>&#160;    wave /sdfr=attrDF ManipulatorTilt</div><div class="line"><a name="l02837"></a><span class="lineno"> 2837</span>&#160;    wave /sdfr=attrDF ManipulatorPhi</div><div class="line"><a name="l02838"></a><span class="lineno"> 2838</span>&#160;    duplicate /free ManipulatorTheta, m_theta</div><div class="line"><a name="l02839"></a><span class="lineno"> 2839</span>&#160;    duplicate /free ManipulatorTilt, m_tilt</div><div class="line"><a name="l02840"></a><span class="lineno"> 2840</span>&#160;    duplicate /free ManipulatorPhi, m_phi</div><div class="line"><a name="l02841"></a><span class="lineno"> 2841</span>&#160;    m_theta -= theta_offset</div><div class="line"><a name="l02842"></a><span class="lineno"> 2842</span>&#160;    m_tilt -= tilt_offset</div><div class="line"><a name="l02843"></a><span class="lineno"> 2843</span>&#160;    m_tilt *= -1 <span class="comment">// checked 140702</span></div><div class="line"><a name="l02844"></a><span class="lineno"> 2844</span>&#160;    m_phi -= phi_offset</div><div class="line"><a name="l02845"></a><span class="lineno"> 2845</span>&#160;    <span class="comment">//m_phi *= -1 // checked 140702</span></div><div class="line"><a name="l02846"></a><span class="lineno"> 2846</span>&#160;    </div><div class="line"><a name="l02847"></a><span class="lineno"> 2847</span>&#160;    make /n=1/d/free d_polar, d_azi</div><div class="line"><a name="l02848"></a><span class="lineno"> 2848</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a2b38c6c9b6e60593ba69d3773b6bc779">convert_angles_ttpd2polar</a>(m_theta, m_tilt, m_phi, data, d_polar, d_azi)</div><div class="line"><a name="l02849"></a><span class="lineno"> 2849</span>&#160;    d_azi += 180    <span class="comment">// changed 151030 (v1.6)</span></div><div class="line"><a name="l02850"></a><span class="lineno"> 2850</span>&#160;    d_azi = d_azi &gt;= 360 ? d_azi - 360 : d_azi</div><div class="line"><a name="l02851"></a><span class="lineno"> 2851</span>&#160;</div><div class="line"><a name="l02852"></a><span class="lineno"> 2852</span>&#160;    duplicate /free data, values</div><div class="line"><a name="l02853"></a><span class="lineno"> 2853</span>&#160;    variable nn = dimsize(values, 0) * max(dimsize(values, 1), 1)</div><div class="line"><a name="l02854"></a><span class="lineno"> 2854</span>&#160;    redimension /n=(nn) values, d_polar, d_azi</div><div class="line"><a name="l02855"></a><span class="lineno"> 2855</span>&#160;    duplicate /o d_polar, ster_rad, ster_x, ster_y</div><div class="line"><a name="l02856"></a><span class="lineno"> 2856</span>&#160;</div><div class="line"><a name="l02857"></a><span class="lineno"> 2857</span>&#160;    variable projection = 1</div><div class="line"><a name="l02858"></a><span class="lineno"> 2858</span>&#160;    switch(projection)</div><div class="line"><a name="l02859"></a><span class="lineno"> 2859</span>&#160;        case 1: <span class="comment">// stereographic</span></div><div class="line"><a name="l02860"></a><span class="lineno"> 2860</span>&#160;            ster_rad =  2 * tan(d_polar / 2 * pi / 180)</div><div class="line"><a name="l02861"></a><span class="lineno"> 2861</span>&#160;            break</div><div class="line"><a name="l02862"></a><span class="lineno"> 2862</span>&#160;        case 2: <span class="comment">// azimuthal</span></div><div class="line"><a name="l02863"></a><span class="lineno"> 2863</span>&#160;            ster_rad = 2 * cos((180 - d_polar) / 2 * pi / 180)</div><div class="line"><a name="l02864"></a><span class="lineno"> 2864</span>&#160;            break</div><div class="line"><a name="l02865"></a><span class="lineno"> 2865</span>&#160;    endswitch</div><div class="line"><a name="l02866"></a><span class="lineno"> 2866</span>&#160;    <span class="keywordtype">string</span> s_ster_x = s_prefix + &quot;ster_x&quot;</div><div class="line"><a name="l02867"></a><span class="lineno"> 2867</span>&#160;    <span class="keywordtype">string</span> s_ster_y = s_prefix + &quot;ster_y&quot;</div><div class="line"><a name="l02868"></a><span class="lineno"> 2868</span>&#160;    </div><div class="line"><a name="l02869"></a><span class="lineno"> 2869</span>&#160;    nn = 401</div><div class="line"><a name="l02870"></a><span class="lineno"> 2870</span>&#160;    make /n=(nn, nn) /d /o matrix</div><div class="line"><a name="l02871"></a><span class="lineno"> 2871</span>&#160;    make /n=(nn, nn) /free mnorm</div><div class="line"><a name="l02872"></a><span class="lineno"> 2872</span>&#160;    setscale /i x -2, +2, matrix, mnorm</div><div class="line"><a name="l02873"></a><span class="lineno"> 2873</span>&#160;    setscale /i y -2, +2, matrix, mnorm</div><div class="line"><a name="l02874"></a><span class="lineno"> 2874</span>&#160;    matrix = 0</div><div class="line"><a name="l02875"></a><span class="lineno"> 2875</span>&#160;    mnorm = 0</div><div class="line"><a name="l02876"></a><span class="lineno"> 2876</span>&#160;    </div><div class="line"><a name="l02877"></a><span class="lineno"> 2877</span>&#160;    variable ifold</div><div class="line"><a name="l02878"></a><span class="lineno"> 2878</span>&#160;    for (ifold = 0; ifold &lt; folding; ifold += 1)</div><div class="line"><a name="l02879"></a><span class="lineno"> 2879</span>&#160;        ster_x = ster_rad * cos(d_azi * pi / 180)</div><div class="line"><a name="l02880"></a><span class="lineno"> 2880</span>&#160;        ster_y = ster_rad * sin(d_azi * pi / 180)</div><div class="line"><a name="l02881"></a><span class="lineno"> 2881</span>&#160;        ImageFromXYZ {ster_x, ster_y, values}, matrix, mnorm</div><div class="line"><a name="l02882"></a><span class="lineno"> 2882</span>&#160;        d_azi = d_azi &gt;= 180 ? d_azi + 360 / folding - 180 : d_azi + 360 / folding</div><div class="line"><a name="l02883"></a><span class="lineno"> 2883</span>&#160;    endfor</div><div class="line"><a name="l02884"></a><span class="lineno"> 2884</span>&#160;    </div><div class="line"><a name="l02885"></a><span class="lineno"> 2885</span>&#160;    matrix /= mnorm</div><div class="line"><a name="l02886"></a><span class="lineno"> 2886</span>&#160;    matrixfilter /n=5 NanZapMedian matrix</div><div class="line"><a name="l02887"></a><span class="lineno"> 2887</span>&#160;    matrixfilter /n=3 gauss matrix</div><div class="line"><a name="l02888"></a><span class="lineno"> 2888</span>&#160;</div><div class="line"><a name="l02889"></a><span class="lineno"> 2889</span>&#160;    <span class="keywordflow">if</span> (!nograph)</div><div class="line"><a name="l02890"></a><span class="lineno"> 2890</span>&#160;        display /k=1</div><div class="line"><a name="l02891"></a><span class="lineno"> 2891</span>&#160;        appendimage matrix</div><div class="line"><a name="l02892"></a><span class="lineno"> 2892</span>&#160;        modifygraph width={Plan,1,bottom,left}</div><div class="line"><a name="l02893"></a><span class="lineno"> 2893</span>&#160;    endif</div><div class="line"><a name="l02894"></a><span class="lineno"> 2894</span>&#160;    </div><div class="line"><a name="l02895"></a><span class="lineno"> 2895</span>&#160;    <span class="keywordflow">if</span> (timerRefNum &gt;= 0)</div><div class="line"><a name="l02896"></a><span class="lineno"> 2896</span>&#160;        xyz_perf_secs = stopMSTimer(timerRefNum) / 1e6</div><div class="line"><a name="l02897"></a><span class="lineno"> 2897</span>&#160;    endif</div><div class="line"><a name="l02898"></a><span class="lineno"> 2898</span>&#160;</div><div class="line"><a name="l02899"></a><span class="lineno"> 2899</span>&#160;    setdatafolder saveDF</div><div class="line"><a name="l02900"></a><span class="lineno"> 2900</span>&#160;end</div><div class="line"><a name="l02901"></a><span class="lineno"> 2901</span>&#160;</div><div class="line"><a name="l02903"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a48cbd596656bc6d849c53afb4c58b90d"> 2903</a></span>&#160;<span class="keyword">function</span> <a class="code" href="pearl-anglescan-process_8ipf.html#a48cbd596656bc6d849c53afb4c58b90d">save_hemi_scan</a>(nickname, pathname, filename)</div><div class="line"><a name="l02904"></a><span class="lineno"> 2904</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l02905"></a><span class="lineno"> 2905</span>&#160;    <span class="keywordtype">string</span> pathname</div><div class="line"><a name="l02906"></a><span class="lineno"> 2906</span>&#160;    <span class="keywordtype">string</span> filename</div><div class="line"><a name="l02907"></a><span class="lineno"> 2907</span>&#160;    </div><div class="line"><a name="l02908"></a><span class="lineno"> 2908</span>&#160;    dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l02909"></a><span class="lineno"> 2909</span>&#160;</div><div class="line"><a name="l02910"></a><span class="lineno"> 2910</span>&#160;    <span class="comment">// source data</span></div><div class="line"><a name="l02911"></a><span class="lineno"> 2911</span>&#160;    string s_prefix = &quot;&quot;</div><div class="line"><a name="l02912"></a><span class="lineno"> 2912</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l02913"></a><span class="lineno"> 2913</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l02914"></a><span class="lineno"> 2914</span>&#160;</div><div class="line"><a name="l02915"></a><span class="lineno"> 2915</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l02916"></a><span class="lineno"> 2916</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l02917"></a><span class="lineno"> 2917</span>&#160;    <span class="keywordtype">string</span> s_theta = s_prefix + &quot;th&quot;</div><div class="line"><a name="l02918"></a><span class="lineno"> 2918</span>&#160;    <span class="keywordtype">string</span> s_tot = s_prefix + &quot;tot&quot;</div><div class="line"><a name="l02919"></a><span class="lineno"> 2919</span>&#160;    <span class="keywordtype">string</span> s_weight = s_prefix + &quot;wt&quot;</div><div class="line"><a name="l02920"></a><span class="lineno"> 2920</span>&#160;</div><div class="line"><a name="l02921"></a><span class="lineno"> 2921</span>&#160;    wave /sdfr=df theta1 = $s_theta</div><div class="line"><a name="l02922"></a><span class="lineno"> 2922</span>&#160;    wave /sdfr=df polar1 = $s_polar</div><div class="line"><a name="l02923"></a><span class="lineno"> 2923</span>&#160;    wave /sdfr=df azim1 = $s_azim</div><div class="line"><a name="l02924"></a><span class="lineno"> 2924</span>&#160;    wave /sdfr=df tot1 = $s_tot</div><div class="line"><a name="l02925"></a><span class="lineno"> 2925</span>&#160;    wave /sdfr=df weight1 = $s_weight</div><div class="line"><a name="l02926"></a><span class="lineno"> 2926</span>&#160;    wave /sdfr=df values1 = $s_int</div><div class="line"><a name="l02927"></a><span class="lineno"> 2927</span>&#160;    </div><div class="line"><a name="l02928"></a><span class="lineno"> 2928</span>&#160;    save /m=&quot;\r\n&quot; /o /p=$pathname /t theta1, polar1, azim1, tot1, weight1, values1 as filename</div><div class="line"><a name="l02929"></a><span class="lineno"> 2929</span>&#160;    </div><div class="line"><a name="l02930"></a><span class="lineno"> 2930</span>&#160;    setdatafolder saveDF</div><div class="line"><a name="l02931"></a><span class="lineno"> 2931</span>&#160;end</div><div class="line"><a name="l02932"></a><span class="lineno"> 2932</span>&#160;</div><div class="line"><a name="l02936"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a89f73edcd51a675f4c3933cd0242484e"> 2936</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a89f73edcd51a675f4c3933cd0242484e">load_hemi_scan</a>(nickname, pathname, filename)</div><div class="line"><a name="l02937"></a><span class="lineno"> 2937</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l02938"></a><span class="lineno"> 2938</span>&#160;    <span class="keywordtype">string</span> pathname</div><div class="line"><a name="l02939"></a><span class="lineno"> 2939</span>&#160;    <span class="keywordtype">string</span> filename</div><div class="line"><a name="l02940"></a><span class="lineno"> 2940</span>&#160;    </div><div class="line"><a name="l02941"></a><span class="lineno"> 2941</span>&#160;    dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l02942"></a><span class="lineno"> 2942</span>&#160;</div><div class="line"><a name="l02943"></a><span class="lineno"> 2943</span>&#160;    <span class="comment">//loadwave /p=$pathname /t theta1, polar1, azim1, tot1, weight1, values1 as filename</span></div><div class="line"><a name="l02944"></a><span class="lineno"> 2944</span>&#160;    <span class="comment">//LoadWave /t/p=pearl_explorer_filepath/q filename</span></div><div class="line"><a name="l02945"></a><span class="lineno"> 2945</span>&#160;    <span class="comment">//svar waves = s_wavenames</span></div><div class="line"><a name="l02946"></a><span class="lineno"> 2946</span>&#160;    <span class="comment">//if (v_flag &gt; 0)</span></div><div class="line"><a name="l02947"></a><span class="lineno"> 2947</span>&#160;    <span class="comment">//  string /g pearl_explorer_import = &quot;load_itx_file&quot;</span></div><div class="line"><a name="l02948"></a><span class="lineno"> 2948</span>&#160;    <span class="comment">//endif</span></div><div class="line"><a name="l02949"></a><span class="lineno"> 2949</span>&#160;    </div><div class="line"><a name="l02950"></a><span class="lineno"> 2950</span>&#160;    setdatafolder saveDF</div><div class="line"><a name="l02951"></a><span class="lineno"> 2951</span>&#160;end</div><div class="line"><a name="l02952"></a><span class="lineno"> 2952</span>&#160;</div><div class="line"><a name="l02985"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a5265fd61f86eb72dd877e4190bfb4adf"> 2985</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a5265fd61f86eb72dd877e4190bfb4adf">import_tpi_scan</a>(nickname, theta, phi, intensity, [folding, npolar, nograph, xpdplot])</div><div class="line"><a name="l02986"></a><span class="lineno"> 2986</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l02987"></a><span class="lineno"> 2987</span>&#160;    wave theta</div><div class="line"><a name="l02988"></a><span class="lineno"> 2988</span>&#160;    wave phi</div><div class="line"><a name="l02989"></a><span class="lineno"> 2989</span>&#160;    wave intensity</div><div class="line"><a name="l02990"></a><span class="lineno"> 2990</span>&#160;    </div><div class="line"><a name="l02991"></a><span class="lineno"> 2991</span>&#160;    variable folding</div><div class="line"><a name="l02992"></a><span class="lineno"> 2992</span>&#160;    variable npolar</div><div class="line"><a name="l02993"></a><span class="lineno"> 2993</span>&#160;    variable nograph</div><div class="line"><a name="l02994"></a><span class="lineno"> 2994</span>&#160;    variable xpdplot</div><div class="line"><a name="l02995"></a><span class="lineno"> 2995</span>&#160;    </div><div class="line"><a name="l02996"></a><span class="lineno"> 2996</span>&#160;    if (ParamIsDefault(npolar))</div><div class="line"><a name="l02997"></a><span class="lineno"> 2997</span>&#160;        npolar = 91</div><div class="line"><a name="l02998"></a><span class="lineno"> 2998</span>&#160;    endif</div><div class="line"><a name="l02999"></a><span class="lineno"> 2999</span>&#160;    if (ParamIsDefault(nograph))</div><div class="line"><a name="l03000"></a><span class="lineno"> 3000</span>&#160;        nograph = 0</div><div class="line"><a name="l03001"></a><span class="lineno"> 3001</span>&#160;    endif</div><div class="line"><a name="l03002"></a><span class="lineno"> 3002</span>&#160;    if (ParamIsDefault(folding))</div><div class="line"><a name="l03003"></a><span class="lineno"> 3003</span>&#160;        folding = 1</div><div class="line"><a name="l03004"></a><span class="lineno"> 3004</span>&#160;    endif</div><div class="line"><a name="l03005"></a><span class="lineno"> 3005</span>&#160;    if (ParamIsDefault(xpdplot))</div><div class="line"><a name="l03006"></a><span class="lineno"> 3006</span>&#160;        xpdplot = 0</div><div class="line"><a name="l03007"></a><span class="lineno"> 3007</span>&#160;    endif</div><div class="line"><a name="l03008"></a><span class="lineno"> 3008</span>&#160;    </div><div class="line"><a name="l03009"></a><span class="lineno"> 3009</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a902ac3a24e33f651e83ee03d31707da7">make_hemi_grid</a>(npolar, nickname, xpdplot=xpdplot)</div><div class="line"><a name="l03010"></a><span class="lineno"> 3010</span>&#160;</div><div class="line"><a name="l03011"></a><span class="lineno"> 3011</span>&#160;    variable ifold</div><div class="line"><a name="l03012"></a><span class="lineno"> 3012</span>&#160;    duplicate /free phi, fold_phi</div><div class="line"><a name="l03013"></a><span class="lineno"> 3013</span>&#160;    for (ifold = 0; ifold &lt; folding; ifold += 1)</div><div class="line"><a name="l03014"></a><span class="lineno"> 3014</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#a4952bc53e3d6d272d25b5e35e91696b5">hemi_add_anglescan</a>(nickname, intensity, theta, fold_phi)</div><div class="line"><a name="l03015"></a><span class="lineno"> 3015</span>&#160;        fold_phi = fold_phi &gt;= 180 ? fold_phi + 360 / folding - fold_phi : fold_phi + 360 / folding</div><div class="line"><a name="l03016"></a><span class="lineno"> 3016</span>&#160;    endfor</div><div class="line"><a name="l03017"></a><span class="lineno"> 3017</span>&#160;</div><div class="line"><a name="l03018"></a><span class="lineno"> 3018</span>&#160;    if (nograph==0)</div><div class="line"><a name="l03019"></a><span class="lineno"> 3019</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#ae57302acfc822c4817f2b7eef55efea2">display_hemi_scan</a>(nickname)</div><div class="line"><a name="l03020"></a><span class="lineno"> 3020</span>&#160;    endif</div><div class="line"><a name="l03021"></a><span class="lineno"> 3021</span>&#160;end</div><div class="line"><a name="l03022"></a><span class="lineno"> 3022</span>&#160;</div><div class="line"><a name="l03034"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a5dc0cc7db9d3d7a6b3fa3f1b04d84a5e"> 3034</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a5dc0cc7db9d3d7a6b3fa3f1b04d84a5e">trim_hemi_scan</a>(nickname, theta_max)</div><div class="line"><a name="l03035"></a><span class="lineno"> 3035</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l03036"></a><span class="lineno"> 3036</span>&#160;    variable theta_max</div><div class="line"><a name="l03037"></a><span class="lineno"> 3037</span>&#160;</div><div class="line"><a name="l03038"></a><span class="lineno"> 3038</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l03039"></a><span class="lineno"> 3039</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l03040"></a><span class="lineno"> 3040</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l03041"></a><span class="lineno"> 3041</span>&#160;</div><div class="line"><a name="l03042"></a><span class="lineno"> 3042</span>&#160;    <span class="keywordtype">string</span> s_totals = s_prefix + &quot;tot&quot;</div><div class="line"><a name="l03043"></a><span class="lineno"> 3043</span>&#160;    <span class="keywordtype">string</span> s_weights = s_prefix + &quot;wt&quot;</div><div class="line"><a name="l03044"></a><span class="lineno"> 3044</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l03045"></a><span class="lineno"> 3045</span>&#160;</div><div class="line"><a name="l03046"></a><span class="lineno"> 3046</span>&#160;    wave /sdfr=df w_polar = $s_polar</div><div class="line"><a name="l03047"></a><span class="lineno"> 3047</span>&#160;    wave /sdfr=df w_values = $s_int</div><div class="line"><a name="l03048"></a><span class="lineno"> 3048</span>&#160;    wave /sdfr=df w_totals = $s_totals</div><div class="line"><a name="l03049"></a><span class="lineno"> 3049</span>&#160;    wave /sdfr=df w_weights = $s_weights</div><div class="line"><a name="l03050"></a><span class="lineno"> 3050</span>&#160;</div><div class="line"><a name="l03051"></a><span class="lineno"> 3051</span>&#160;    w_values = w_polar &lt;= theta_max ? w_totals / w_weights : nan</div><div class="line"><a name="l03052"></a><span class="lineno"> 3052</span>&#160;end</div><div class="line"><a name="l03053"></a><span class="lineno"> 3053</span>&#160;</div><div class="line"><a name="l03073"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#aa486e16909d01e2251eeb4d635b972b1"> 3073</a></span>&#160;function /wave <a class="code" href="pearl-anglescan-process_8ipf.html#aa486e16909d01e2251eeb4d635b972b1">hemi_polar_cut</a>(nickname, azim)</div><div class="line"><a name="l03074"></a><span class="lineno"> 3074</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l03075"></a><span class="lineno"> 3075</span>&#160;    variable azim</div><div class="line"><a name="l03076"></a><span class="lineno"> 3076</span>&#160;</div><div class="line"><a name="l03077"></a><span class="lineno"> 3077</span>&#160;    dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l03078"></a><span class="lineno"> 3078</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l03079"></a><span class="lineno"> 3079</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l03080"></a><span class="lineno"> 3080</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l03081"></a><span class="lineno"> 3081</span>&#160;</div><div class="line"><a name="l03082"></a><span class="lineno"> 3082</span>&#160;    <span class="keywordtype">string</span> s_totals = s_prefix + &quot;tot&quot;</div><div class="line"><a name="l03083"></a><span class="lineno"> 3083</span>&#160;    <span class="keywordtype">string</span> s_weights = s_prefix + &quot;wt&quot;</div><div class="line"><a name="l03084"></a><span class="lineno"> 3084</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l03085"></a><span class="lineno"> 3085</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l03086"></a><span class="lineno"> 3086</span>&#160;    <span class="keywordtype">string</span> s_index = s_prefix + &quot;index&quot;</div><div class="line"><a name="l03087"></a><span class="lineno"> 3087</span>&#160;    <span class="keywordtype">string</span> s_theta = s_prefix + &quot;th&quot;</div><div class="line"><a name="l03088"></a><span class="lineno"> 3088</span>&#160;    <span class="keywordtype">string</span> s_dphi = s_prefix + &quot;dphi&quot;</div><div class="line"><a name="l03089"></a><span class="lineno"> 3089</span>&#160;    <span class="keywordtype">string</span> s_nphis = s_prefix + &quot;nphis&quot;</div><div class="line"><a name="l03090"></a><span class="lineno"> 3090</span>&#160;    <span class="keywordtype">string</span> s_cut</div><div class="line"><a name="l03091"></a><span class="lineno"> 3091</span>&#160;    sprintf s_cut, &quot;%s_azi%03u&quot;, s_int, round(azim)</div><div class="line"><a name="l03092"></a><span class="lineno"> 3092</span>&#160;</div><div class="line"><a name="l03093"></a><span class="lineno"> 3093</span>&#160;    wave /sdfr=df w_polar = $s_polar</div><div class="line"><a name="l03094"></a><span class="lineno"> 3094</span>&#160;    wave /sdfr=df w_azim = $s_azim</div><div class="line"><a name="l03095"></a><span class="lineno"> 3095</span>&#160;    wave /sdfr=df w_values = $s_int</div><div class="line"><a name="l03096"></a><span class="lineno"> 3096</span>&#160;    wave /sdfr=df w_totals = $s_totals</div><div class="line"><a name="l03097"></a><span class="lineno"> 3097</span>&#160;    wave /sdfr=df w_weights = $s_weights</div><div class="line"><a name="l03098"></a><span class="lineno"> 3098</span>&#160;    wave /sdfr=df w_index = $s_index</div><div class="line"><a name="l03099"></a><span class="lineno"> 3099</span>&#160;    wave /sdfr=df w_theta = $s_theta</div><div class="line"><a name="l03100"></a><span class="lineno"> 3100</span>&#160;    wave /sdfr=df w_dphi = $s_dphi</div><div class="line"><a name="l03101"></a><span class="lineno"> 3101</span>&#160;    wave /sdfr=df w_nphis = $s_nphis</div><div class="line"><a name="l03102"></a><span class="lineno"> 3102</span>&#160;</div><div class="line"><a name="l03103"></a><span class="lineno"> 3103</span>&#160;    variable npol = numpnts(w_theta)</div><div class="line"><a name="l03104"></a><span class="lineno"> 3104</span>&#160;    variable ipol</div><div class="line"><a name="l03105"></a><span class="lineno"> 3105</span>&#160;    variable pol_st = abs(w_theta[1] - w_theta[0])</div><div class="line"><a name="l03106"></a><span class="lineno"> 3106</span>&#160;    variable pol</div><div class="line"><a name="l03107"></a><span class="lineno"> 3107</span>&#160;    variable pol1, pol2</div><div class="line"><a name="l03108"></a><span class="lineno"> 3108</span>&#160;    variable nsel</div><div class="line"><a name="l03109"></a><span class="lineno"> 3109</span>&#160;    </div><div class="line"><a name="l03110"></a><span class="lineno"> 3110</span>&#160;    setdatafolder df</div><div class="line"><a name="l03111"></a><span class="lineno"> 3111</span>&#160;    make /n=(npol) /o $s_cut</div><div class="line"><a name="l03112"></a><span class="lineno"> 3112</span>&#160;    wave w_cut = $s_cut</div><div class="line"><a name="l03113"></a><span class="lineno"> 3113</span>&#160;    setscale /i x w_theta[0], w_theta[numpnts(w_theta)-1], &quot;deg&quot;, w_cut</div><div class="line"><a name="l03114"></a><span class="lineno"> 3114</span>&#160;    make /n=1 /free azi_slice</div><div class="line"><a name="l03115"></a><span class="lineno"> 3115</span>&#160;    make /n=1 /free values_slice</div><div class="line"><a name="l03116"></a><span class="lineno"> 3116</span>&#160;    </div><div class="line"><a name="l03117"></a><span class="lineno"> 3117</span>&#160;    for (ipol = 0; ipol &lt; npol; ipol += 1)</div><div class="line"><a name="l03118"></a><span class="lineno"> 3118</span>&#160;        pol = w_theta[ipol]</div><div class="line"><a name="l03119"></a><span class="lineno"> 3119</span>&#160;        pol1 = pol - pol_st / 2</div><div class="line"><a name="l03120"></a><span class="lineno"> 3120</span>&#160;        pol2 = pol + pol_st / 2</div><div class="line"><a name="l03121"></a><span class="lineno"> 3121</span>&#160;        extract /free /indx w_polar, sel, (pol1 &lt; w_polar) &amp;&amp; (w_polar &lt;= pol2)</div><div class="line"><a name="l03122"></a><span class="lineno"> 3122</span>&#160;        nsel = numpnts(sel)</div><div class="line"><a name="l03123"></a><span class="lineno"> 3123</span>&#160;        if (nsel &gt; 0)</div><div class="line"><a name="l03124"></a><span class="lineno"> 3124</span>&#160;            redimension /n=(nsel+2) azi_slice, values_slice</div><div class="line"><a name="l03125"></a><span class="lineno"> 3125</span>&#160;            azi_slice[1, nsel] = w_azim[sel[p-1]]</div><div class="line"><a name="l03126"></a><span class="lineno"> 3126</span>&#160;            azi_slice[0] = azi_slice[nsel] - 360</div><div class="line"><a name="l03127"></a><span class="lineno"> 3127</span>&#160;            azi_slice[nsel+1] = azi_slice[1] + 360</div><div class="line"><a name="l03128"></a><span class="lineno"> 3128</span>&#160;            values_slice[1, nsel] = w_values[sel[p-1]]</div><div class="line"><a name="l03129"></a><span class="lineno"> 3129</span>&#160;            values_slice[0] = values_slice[nsel]</div><div class="line"><a name="l03130"></a><span class="lineno"> 3130</span>&#160;            values_slice[nsel+1] = values_slice[1]</div><div class="line"><a name="l03131"></a><span class="lineno"> 3131</span>&#160;            w_cut[ipol] = interp(azim, azi_slice, values_slice)</div><div class="line"><a name="l03132"></a><span class="lineno"> 3132</span>&#160;        else</div><div class="line"><a name="l03133"></a><span class="lineno"> 3133</span>&#160;            w_cut[ipol] = nan</div><div class="line"><a name="l03134"></a><span class="lineno"> 3134</span>&#160;        endif</div><div class="line"><a name="l03135"></a><span class="lineno"> 3135</span>&#160;    endfor</div><div class="line"><a name="l03136"></a><span class="lineno"> 3136</span>&#160;    </div><div class="line"><a name="l03137"></a><span class="lineno"> 3137</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l03138"></a><span class="lineno"> 3138</span>&#160;    return w_cut</div><div class="line"><a name="l03139"></a><span class="lineno"> 3139</span>&#160;end</div><div class="line"><a name="l03140"></a><span class="lineno"> 3140</span>&#160;</div><div class="line"><a name="l03159"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ab6ac1268de338040028dca8d0ddc967c"> 3159</a></span>&#160;function /wave <a class="code" href="pearl-anglescan-process_8ipf.html#ab6ac1268de338040028dca8d0ddc967c">hemi_azi_cut</a>(nickname, pol)</div><div class="line"><a name="l03160"></a><span class="lineno"> 3160</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l03161"></a><span class="lineno"> 3161</span>&#160;    variable pol</div><div class="line"><a name="l03162"></a><span class="lineno"> 3162</span>&#160;</div><div class="line"><a name="l03163"></a><span class="lineno"> 3163</span>&#160;    dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l03164"></a><span class="lineno"> 3164</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l03165"></a><span class="lineno"> 3165</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l03166"></a><span class="lineno"> 3166</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l03167"></a><span class="lineno"> 3167</span>&#160;</div><div class="line"><a name="l03168"></a><span class="lineno"> 3168</span>&#160;    <span class="keywordtype">string</span> s_totals = s_prefix + &quot;tot&quot;</div><div class="line"><a name="l03169"></a><span class="lineno"> 3169</span>&#160;    <span class="keywordtype">string</span> s_weights = s_prefix + &quot;wt&quot;</div><div class="line"><a name="l03170"></a><span class="lineno"> 3170</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l03171"></a><span class="lineno"> 3171</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l03172"></a><span class="lineno"> 3172</span>&#160;    <span class="keywordtype">string</span> s_index = s_prefix + &quot;index&quot;</div><div class="line"><a name="l03173"></a><span class="lineno"> 3173</span>&#160;    <span class="keywordtype">string</span> s_theta = s_prefix + &quot;th&quot;</div><div class="line"><a name="l03174"></a><span class="lineno"> 3174</span>&#160;    <span class="keywordtype">string</span> s_dphi = s_prefix + &quot;dphi&quot;</div><div class="line"><a name="l03175"></a><span class="lineno"> 3175</span>&#160;    <span class="keywordtype">string</span> s_nphis = s_prefix + &quot;nphis&quot;</div><div class="line"><a name="l03176"></a><span class="lineno"> 3176</span>&#160;    <span class="keywordtype">string</span> s_cut</div><div class="line"><a name="l03177"></a><span class="lineno"> 3177</span>&#160;    sprintf s_cut, &quot;%s_pol%03u&quot;, s_int, round(pol)</div><div class="line"><a name="l03178"></a><span class="lineno"> 3178</span>&#160;</div><div class="line"><a name="l03179"></a><span class="lineno"> 3179</span>&#160;    wave /sdfr=df w_polar = $s_polar</div><div class="line"><a name="l03180"></a><span class="lineno"> 3180</span>&#160;    wave /sdfr=df w_azim = $s_azim</div><div class="line"><a name="l03181"></a><span class="lineno"> 3181</span>&#160;    wave /sdfr=df w_values = $s_int</div><div class="line"><a name="l03182"></a><span class="lineno"> 3182</span>&#160;    wave /sdfr=df w_totals = $s_totals</div><div class="line"><a name="l03183"></a><span class="lineno"> 3183</span>&#160;    wave /sdfr=df w_weights = $s_weights</div><div class="line"><a name="l03184"></a><span class="lineno"> 3184</span>&#160;    wave /sdfr=df w_index = $s_index</div><div class="line"><a name="l03185"></a><span class="lineno"> 3185</span>&#160;    wave /sdfr=df w_theta = $s_theta</div><div class="line"><a name="l03186"></a><span class="lineno"> 3186</span>&#160;    wave /sdfr=df w_dphi = $s_dphi</div><div class="line"><a name="l03187"></a><span class="lineno"> 3187</span>&#160;    wave /sdfr=df w_nphis = $s_nphis</div><div class="line"><a name="l03188"></a><span class="lineno"> 3188</span>&#160;</div><div class="line"><a name="l03189"></a><span class="lineno"> 3189</span>&#160;    variable pol_st = abs(w_theta[1] - w_theta[0])</div><div class="line"><a name="l03190"></a><span class="lineno"> 3190</span>&#160;    variable pol1, pol2</div><div class="line"><a name="l03191"></a><span class="lineno"> 3191</span>&#160;    variable nsel</div><div class="line"><a name="l03192"></a><span class="lineno"> 3192</span>&#160;</div><div class="line"><a name="l03193"></a><span class="lineno"> 3193</span>&#160;    pol1 = pol - pol_st / 2</div><div class="line"><a name="l03194"></a><span class="lineno"> 3194</span>&#160;    pol2 = pol + pol_st / 2</div><div class="line"><a name="l03195"></a><span class="lineno"> 3195</span>&#160;    extract /free /indx w_polar, sel, (pol1 &lt; w_polar) &amp;&amp; (w_polar &lt;= pol2)</div><div class="line"><a name="l03196"></a><span class="lineno"> 3196</span>&#160;    nsel = numpnts(sel)</div><div class="line"><a name="l03197"></a><span class="lineno"> 3197</span>&#160;    if (nsel &gt; 0)</div><div class="line"><a name="l03198"></a><span class="lineno"> 3198</span>&#160;        setdatafolder df</div><div class="line"><a name="l03199"></a><span class="lineno"> 3199</span>&#160;        make /n=(nsel) /o $s_cut</div><div class="line"><a name="l03200"></a><span class="lineno"> 3200</span>&#160;        wave w_cut = $s_cut</div><div class="line"><a name="l03201"></a><span class="lineno"> 3201</span>&#160;        w_cut = w_values[sel]</div><div class="line"><a name="l03202"></a><span class="lineno"> 3202</span>&#160;        setscale /i x w_azim[sel[0]], w_azim[sel[nsel-1]], &quot;°&quot;, w_cut</div><div class="line"><a name="l03203"></a><span class="lineno"> 3203</span>&#160;        setdatafolder savedf</div><div class="line"><a name="l03204"></a><span class="lineno"> 3204</span>&#160;        return w_cut</div><div class="line"><a name="l03205"></a><span class="lineno"> 3205</span>&#160;    else</div><div class="line"><a name="l03206"></a><span class="lineno"> 3206</span>&#160;        setdatafolder savedf</div><div class="line"><a name="l03207"></a><span class="lineno"> 3207</span>&#160;        return $&quot;&quot;</div><div class="line"><a name="l03208"></a><span class="lineno"> 3208</span>&#160;    endif</div><div class="line"><a name="l03209"></a><span class="lineno"> 3209</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l03210"></a><span class="lineno"> 3210</span>&#160;end</div><div class="line"><a name="l03211"></a><span class="lineno"> 3211</span>&#160;</div><div class="line"><a name="l03212"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a2e1ed05781f9eb4be5e77695ef049962"> 3212</a></span>&#160;static function <a class="code" href="pearl-anglescan-process_8ipf.html#a2e1ed05781f9eb4be5e77695ef049962">check_contrast</a>(values, pcmin, pcmax, vmin, vmax)</div><div class="line"><a name="l03213"></a><span class="lineno"> 3213</span>&#160;    wave values</div><div class="line"><a name="l03214"></a><span class="lineno"> 3214</span>&#160;    variable pcmin</div><div class="line"><a name="l03215"></a><span class="lineno"> 3215</span>&#160;    variable pcmax</div><div class="line"><a name="l03216"></a><span class="lineno"> 3216</span>&#160;    variable &amp;vmin</div><div class="line"><a name="l03217"></a><span class="lineno"> 3217</span>&#160;    variable &amp;vmax</div><div class="line"><a name="l03218"></a><span class="lineno"> 3218</span>&#160;    </div><div class="line"><a name="l03219"></a><span class="lineno"> 3219</span>&#160;    dfref save_df = GetDataFolderDFR()</div><div class="line"><a name="l03220"></a><span class="lineno"> 3220</span>&#160;    dfref dfr = NewFreeDataFolder()</div><div class="line"><a name="l03221"></a><span class="lineno"> 3221</span>&#160;    setdatafolder dfr</div><div class="line"><a name="l03222"></a><span class="lineno"> 3222</span>&#160;    StatsQuantiles /inan /iw /q /z values</div><div class="line"><a name="l03223"></a><span class="lineno"> 3223</span>&#160;    wave index = w_quantilesindex</div><div class="line"><a name="l03224"></a><span class="lineno"> 3224</span>&#160;    variable imin = round(numpnts(index) * pcmin / 100)</div><div class="line"><a name="l03225"></a><span class="lineno"> 3225</span>&#160;    variable imax = round(numpnts(index) * (100 - pcmax) / 100)</div><div class="line"><a name="l03226"></a><span class="lineno"> 3226</span>&#160;    vmin = values[index[imin]]</div><div class="line"><a name="l03227"></a><span class="lineno"> 3227</span>&#160;    vmax = values[index[imax]]</div><div class="line"><a name="l03228"></a><span class="lineno"> 3228</span>&#160;    setdatafolder save_df</div><div class="line"><a name="l03229"></a><span class="lineno"> 3229</span>&#160;end</div><div class="line"><a name="l03230"></a><span class="lineno"> 3230</span>&#160;</div><div class="line"><a name="l03247"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a666dab03bb2e97ffef81cea450184d42"> 3247</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a666dab03bb2e97ffef81cea450184d42">set_contrast</a>(pcmin, pcmax, [graphname, colortable])</div><div class="line"><a name="l03248"></a><span class="lineno"> 3248</span>&#160;    variable pcmin</div><div class="line"><a name="l03249"></a><span class="lineno"> 3249</span>&#160;    variable pcmax</div><div class="line"><a name="l03250"></a><span class="lineno"> 3250</span>&#160;    <span class="keywordtype">string</span> graphname</div><div class="line"><a name="l03251"></a><span class="lineno"> 3251</span>&#160;    <span class="keywordtype">string</span> colortable</div><div class="line"><a name="l03252"></a><span class="lineno"> 3252</span>&#160;    </div><div class="line"><a name="l03253"></a><span class="lineno"> 3253</span>&#160;    if (ParamIsDefault(graphname))</div><div class="line"><a name="l03254"></a><span class="lineno"> 3254</span>&#160;        graphname = &quot;&quot;</div><div class="line"><a name="l03255"></a><span class="lineno"> 3255</span>&#160;    endif</div><div class="line"><a name="l03256"></a><span class="lineno"> 3256</span>&#160;    if (ParamIsDefault(colortable))</div><div class="line"><a name="l03257"></a><span class="lineno"> 3257</span>&#160;        colortable = &quot;&quot;</div><div class="line"><a name="l03258"></a><span class="lineno"> 3258</span>&#160;    endif</div><div class="line"><a name="l03259"></a><span class="lineno"> 3259</span>&#160;    </div><div class="line"><a name="l03260"></a><span class="lineno"> 3260</span>&#160;    dfref save_df = GetDataFolderDFR()</div><div class="line"><a name="l03261"></a><span class="lineno"> 3261</span>&#160;    </div><div class="line"><a name="l03262"></a><span class="lineno"> 3262</span>&#160;    <span class="keywordtype">string</span> objname</div><div class="line"><a name="l03263"></a><span class="lineno"> 3263</span>&#160;    <span class="keywordtype">string</span> info</div><div class="line"><a name="l03264"></a><span class="lineno"> 3264</span>&#160;    <span class="keywordtype">string</span> wname</div><div class="line"><a name="l03265"></a><span class="lineno"> 3265</span>&#160;    <span class="keywordtype">string</span> ctab</div><div class="line"><a name="l03266"></a><span class="lineno"> 3266</span>&#160;    variable rev</div><div class="line"><a name="l03267"></a><span class="lineno"> 3267</span>&#160;    variable n</div><div class="line"><a name="l03268"></a><span class="lineno"> 3268</span>&#160;    variable i</div><div class="line"><a name="l03269"></a><span class="lineno"> 3269</span>&#160;    variable vmin</div><div class="line"><a name="l03270"></a><span class="lineno"> 3270</span>&#160;    variable vmax</div><div class="line"><a name="l03271"></a><span class="lineno"> 3271</span>&#160;</div><div class="line"><a name="l03272"></a><span class="lineno"> 3272</span>&#160;    <span class="keywordtype">string</span> traces = TraceNameList(graphname, &quot;;&quot;, 1+4)</div><div class="line"><a name="l03273"></a><span class="lineno"> 3273</span>&#160;    n = ItemsInList(traces, &quot;;&quot;)</div><div class="line"><a name="l03274"></a><span class="lineno"> 3274</span>&#160;    for (i = 0; i &lt; n; i += 1)</div><div class="line"><a name="l03275"></a><span class="lineno"> 3275</span>&#160;        objname = StringFromList(i, traces, &quot;;&quot;)</div><div class="line"><a name="l03276"></a><span class="lineno"> 3276</span>&#160;        info = TraceInfo(graphname, objname, 0)</div><div class="line"><a name="l03277"></a><span class="lineno"> 3277</span>&#160;        if (strlen(info) &gt; 0)</div><div class="line"><a name="l03278"></a><span class="lineno"> 3278</span>&#160;            info = StringByKey(&quot;RECREATION&quot;, info, &quot;:&quot;, &quot;;&quot;)</div><div class="line"><a name="l03279"></a><span class="lineno"> 3279</span>&#160;            info = StringByKey(&quot;zColor(x)&quot;, info, &quot;=&quot;, &quot;;&quot;)</div><div class="line"><a name="l03280"></a><span class="lineno"> 3280</span>&#160;            if (strlen(info) &gt; 2)</div><div class="line"><a name="l03281"></a><span class="lineno"> 3281</span>&#160;                info = info[1,strlen(info)-2]</div><div class="line"><a name="l03282"></a><span class="lineno"> 3282</span>&#160;                wname = StringFromList(0, info, &quot;,&quot;)</div><div class="line"><a name="l03283"></a><span class="lineno"> 3283</span>&#160;                wave w = $wname</div><div class="line"><a name="l03284"></a><span class="lineno"> 3284</span>&#160;                ctab = StringFromList(3, info, &quot;,&quot;)</div><div class="line"><a name="l03285"></a><span class="lineno"> 3285</span>&#160;                rev = str2num(&quot;0&quot; + StringFromList(4, info, &quot;,&quot;))</div><div class="line"><a name="l03286"></a><span class="lineno"> 3286</span>&#160;                if (strlen(colortable) &gt; 0)</div><div class="line"><a name="l03287"></a><span class="lineno"> 3287</span>&#160;                    ctab = colortable</div><div class="line"><a name="l03288"></a><span class="lineno"> 3288</span>&#160;                endif</div><div class="line"><a name="l03289"></a><span class="lineno"> 3289</span>&#160;                <a class="code" href="pearl-anglescan-process_8ipf.html#a2e1ed05781f9eb4be5e77695ef049962">check_contrast</a>(w, pcmin, pcmax, vmin, vmax)</div><div class="line"><a name="l03290"></a><span class="lineno"> 3290</span>&#160;                ModifyGraph /w=$graphname zColor($objname)={w, vmin, vmax, $ctab, rev}</div><div class="line"><a name="l03291"></a><span class="lineno"> 3291</span>&#160;            endif</div><div class="line"><a name="l03292"></a><span class="lineno"> 3292</span>&#160;        endif</div><div class="line"><a name="l03293"></a><span class="lineno"> 3293</span>&#160;    endfor</div><div class="line"><a name="l03294"></a><span class="lineno"> 3294</span>&#160;    </div><div class="line"><a name="l03295"></a><span class="lineno"> 3295</span>&#160;    <span class="keywordtype">string</span> images = ImageNameList(graphname, <span class="stringliteral">&quot;;&quot;</span>)</div><div class="line"><a name="l03296"></a><span class="lineno"> 3296</span>&#160;    n = ItemsInList(images, <span class="stringliteral">&quot;;&quot;</span>)</div><div class="line"><a name="l03297"></a><span class="lineno"> 3297</span>&#160;    <span class="keywordflow">for</span> (i = 0; i &lt; n; i += 1)</div><div class="line"><a name="l03298"></a><span class="lineno"> 3298</span>&#160;        objname = StringFromList(i, images, <span class="stringliteral">&quot;;&quot;</span>)</div><div class="line"><a name="l03299"></a><span class="lineno"> 3299</span>&#160;        wave w = ImageNameToWaveRef(graphname, objname)</div><div class="line"><a name="l03300"></a><span class="lineno"> 3300</span>&#160;        info = ImageInfo(graphname, objname, 0)</div><div class="line"><a name="l03301"></a><span class="lineno"> 3301</span>&#160;        <span class="keywordflow">if</span> (strlen(info) &gt; 0)</div><div class="line"><a name="l03302"></a><span class="lineno"> 3302</span>&#160;            info = StringByKey(<span class="stringliteral">&quot;RECREATION&quot;</span>, info, <span class="stringliteral">&quot;:&quot;</span>, <span class="stringliteral">&quot;;&quot;</span>)</div><div class="line"><a name="l03303"></a><span class="lineno"> 3303</span>&#160;            info = StringByKey(<span class="stringliteral">&quot;ctab&quot;</span>, info, <span class="stringliteral">&quot;=&quot;</span>, <span class="stringliteral">&quot;;&quot;</span>)</div><div class="line"><a name="l03304"></a><span class="lineno"> 3304</span>&#160;            <span class="keywordflow">if</span> (strlen(info) &gt; 2)</div><div class="line"><a name="l03305"></a><span class="lineno"> 3305</span>&#160;                info = info[1,strlen(info)-2]</div><div class="line"><a name="l03306"></a><span class="lineno"> 3306</span>&#160;                ctab = StringFromList(2, info, <span class="stringliteral">&quot;,&quot;</span>)</div><div class="line"><a name="l03307"></a><span class="lineno"> 3307</span>&#160;                rev = str2num(<span class="stringliteral">&quot;0&quot;</span> + StringFromList(3, info, <span class="stringliteral">&quot;,&quot;</span>))</div><div class="line"><a name="l03308"></a><span class="lineno"> 3308</span>&#160;                <span class="keywordflow">if</span> (strlen(colortable) &gt; 0)</div><div class="line"><a name="l03309"></a><span class="lineno"> 3309</span>&#160;                    ctab = colortable</div><div class="line"><a name="l03310"></a><span class="lineno"> 3310</span>&#160;                endif</div><div class="line"><a name="l03311"></a><span class="lineno"> 3311</span>&#160;                <a class="code" href="pearl-anglescan-process_8ipf.html#a2e1ed05781f9eb4be5e77695ef049962">check_contrast</a>(w, pcmin, pcmax, vmin, vmax)</div><div class="line"><a name="l03312"></a><span class="lineno"> 3312</span>&#160;                ModifyImage /w=$graphname $objname ctab={vmin, vmax, $ctab, rev}</div><div class="line"><a name="l03313"></a><span class="lineno"> 3313</span>&#160;            endif</div><div class="line"><a name="l03314"></a><span class="lineno"> 3314</span>&#160;        endif</div><div class="line"><a name="l03315"></a><span class="lineno"> 3315</span>&#160;    endfor</div><div class="line"><a name="l03316"></a><span class="lineno"> 3316</span>&#160;</div><div class="line"><a name="l03317"></a><span class="lineno"> 3317</span>&#160;    setdatafolder save_df</div><div class="line"><a name="l03318"></a><span class="lineno"> 3318</span>&#160;end</div><div class="line"><a name="l03319"></a><span class="lineno"> 3319</span>&#160;</div><div class="line"><a name="l03332"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#acf6fddb73624fe2d21429e38c4994088"> 3332</a></span>&#160;Function <a class="code" href="pearl-anglescan-process_8ipf.html#acf6fddb73624fe2d21429e38c4994088">AngleToK</a>(inwave)</div><div class="line"><a name="l03333"></a><span class="lineno"> 3333</span>&#160;    Wave inwave</div><div class="line"><a name="l03334"></a><span class="lineno"> 3334</span>&#160;    String newname = NameofWave(inwave)+<span class="stringliteral">&quot;_k&quot;</span></div><div class="line"><a name="l03335"></a><span class="lineno"> 3335</span>&#160;    Duplicate/O inwave, $newname</div><div class="line"><a name="l03336"></a><span class="lineno"> 3336</span>&#160;    Wave outwave = $newname</div><div class="line"><a name="l03337"></a><span class="lineno"> 3337</span>&#160;    Variable rows,columns,xdelta,xoffset,ydelta,yoffset,kmin,kmax,Emax</div><div class="line"><a name="l03338"></a><span class="lineno"> 3338</span>&#160;    <span class="comment">// inwave parameters</span></div><div class="line"><a name="l03339"></a><span class="lineno"> 3339</span>&#160;    rows = DimSize(inwave,0)</div><div class="line"><a name="l03340"></a><span class="lineno"> 3340</span>&#160;    columns = DimSize(inwave,1)</div><div class="line"><a name="l03341"></a><span class="lineno"> 3341</span>&#160;    xdelta = DimDelta(inwave,0)</div><div class="line"><a name="l03342"></a><span class="lineno"> 3342</span>&#160;    xoffset = DimOffset(inwave,0)</div><div class="line"><a name="l03343"></a><span class="lineno"> 3343</span>&#160;    ydelta = DimDelta(inwave,1)</div><div class="line"><a name="l03344"></a><span class="lineno"> 3344</span>&#160;    yoffset = DimOffset(inwave,1)</div><div class="line"><a name="l03345"></a><span class="lineno"> 3345</span>&#160;    Emax= xoffset + xdelta*(rows-1)</div><div class="line"><a name="l03346"></a><span class="lineno"> 3346</span>&#160;    kmin = 0.5123*sqrt(Emax)*sin(pi/180*(yoffset)) <span class="comment">// calculate the k boundaries</span></div><div class="line"><a name="l03347"></a><span class="lineno"> 3347</span>&#160;    kmax = 0.5123*sqrt(Emax)*sin(pi/180*(yoffset+(columns-1)*ydelta))</div><div class="line"><a name="l03348"></a><span class="lineno"> 3348</span>&#160;    SetScale/I y kmin,kmax,&quot;Ang^-1&quot;, outwave</div><div class="line"><a name="l03349"></a><span class="lineno"> 3349</span>&#160;    <span class="comment">// scale the y axis</span></div><div class="line"><a name="l03350"></a><span class="lineno"> 3350</span>&#160;    outwave = interp2D(inwave, x, 180/pi*asin(y/ (0.5123*sqrt(x)))) <span class="comment">// recalculate to k</span></div><div class="line"><a name="l03351"></a><span class="lineno"> 3351</span>&#160;    outwave = (NumType(outwave)==2) ? 0 : outwave <span class="comment">// replace NaNs (optional)</span></div><div class="line"><a name="l03352"></a><span class="lineno"> 3352</span>&#160;End</div><div class="ttc" id="pearl-anglescan-process_8ipf_html_aa486e16909d01e2251eeb4d635b972b1"><div class="ttname"><a href="pearl-anglescan-process_8ipf.html#aa486e16909d01e2251eeb4d635b972b1">hemi_polar_cut</a></div><div class="ttdeci">wave hemi_polar_cut(string nickname, variable azim)</div><div class="ttdoc">extract a polar cut from a hemispherical scan. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-anglescan-process_8ipf_source.html#l03073">pearl-anglescan-process.ipf:3073</a></div></div>
+<a href="pearl-anglescan-process_8ipf.html">Go to the documentation of this file.</a><div class="fragment"><div class="line"><a name="l00001"></a><span class="lineno">    1</span>&#160;<span class="preprocessor">#pragma rtGlobals=3     // Use modern global access method and strict wave access.</span></div><div class="line"><a name="l00002"></a><span class="lineno">    2</span>&#160;<span class="preprocessor">#pragma version = 1.8</span></div><div class="line"><a name="l00003"></a><span class="lineno">    3</span>&#160;<span class="preprocessor">#pragma IgorVersion = 6.2</span></div><div class="line"><a name="l00004"></a><span class="lineno">    4</span>&#160;<span class="preprocessor">#pragma ModuleName = PearlAnglescanProcess</span></div><div class="line"><a name="l00005"></a><span class="lineno">    5</span>&#160;<span class="preprocessor">#include &quot;pearl-vector-operations&quot;</span></div><div class="line"><a name="l00006"></a><span class="lineno">    6</span>&#160;<span class="preprocessor">#include &quot;pearl-polar-coordinates&quot;</span></div><div class="line"><a name="l00007"></a><span class="lineno">    7</span>&#160;<span class="preprocessor">#include &lt;New Polar Graphs&gt;</span></div><div class="line"><a name="l00008"></a><span class="lineno">    8</span>&#160;</div><div class="line"><a name="l00009"></a><span class="lineno">    9</span>&#160;<span class="comment">// copyright (c) 2013-17 Paul Scherrer Institut</span></div><div class="line"><a name="l00010"></a><span class="lineno">   10</span>&#160;<span class="comment">//</span></div><div class="line"><a name="l00011"></a><span class="lineno">   11</span>&#160;<span class="comment">// Licensed under the Apache License, Version 2.0 (the &quot;License&quot;);</span></div><div class="line"><a name="l00012"></a><span class="lineno">   12</span>&#160;<span class="comment">//   you may not use this file except in compliance with the License.</span></div><div class="line"><a name="l00013"></a><span class="lineno">   13</span>&#160;<span class="comment">//   You may obtain a copy of the License at</span></div><div class="line"><a name="l00014"></a><span class="lineno">   14</span>&#160;<span class="comment">//   http:///www.apache.org/licenses/LICENSE-2.0</span></div><div class="line"><a name="l00015"></a><span class="lineno">   15</span>&#160;<span class="comment">//</span></div><div class="line"><a name="l00016"></a><span class="lineno">   16</span>&#160;<span class="comment">// Please acknowledge the use of this code.</span></div><div class="line"><a name="l00017"></a><span class="lineno">   17</span>&#160;</div><div class="line"><a name="l00076"></a><span class="lineno">   76</span>&#160;</div><div class="line"><a name="l00081"></a><span class="lineno">   81</span>&#160;</div><div class="line"><a name="l00082"></a><span class="lineno">   82</span>&#160;</div><div class="line"><a name="l00105"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a13e0d37ae23f68cdc5da3d84cb4beed8">  105</a></span>&#160;<span class="keyword">function</span> <a class="code" href="pearl-anglescan-process_8ipf.html#a13e0d37ae23f68cdc5da3d84cb4beed8">strip_delete_frames</a>(strip, qlo, qhi, theta, tilt, phi)</div><div class="line"><a name="l00106"></a><span class="lineno">  106</span>&#160;    wave strip <span class="comment">// 2D data, X-axis = analyser angle, Y-axis = arbitrary manipulator scan</span></div><div class="line"><a name="l00107"></a><span class="lineno">  107</span>&#160;    variable qlo</div><div class="line"><a name="l00108"></a><span class="lineno">  108</span>&#160;    variable qhi</div><div class="line"><a name="l00109"></a><span class="lineno">  109</span>&#160;    wave theta</div><div class="line"><a name="l00110"></a><span class="lineno">  110</span>&#160;    wave tilt</div><div class="line"><a name="l00111"></a><span class="lineno">  111</span>&#160;    wave phi</div><div class="line"><a name="l00112"></a><span class="lineno">  112</span>&#160;    </div><div class="line"><a name="l00113"></a><span class="lineno">  113</span>&#160;    <span class="keywordflow">if</span> (qlo &gt; qhi)</div><div class="line"><a name="l00114"></a><span class="lineno">  114</span>&#160;        <span class="keywordflow">return</span> -1</div><div class="line"><a name="l00115"></a><span class="lineno">  115</span>&#160;    endif</div><div class="line"><a name="l00116"></a><span class="lineno">  116</span>&#160;    </div><div class="line"><a name="l00117"></a><span class="lineno">  117</span>&#160;    <span class="comment">// source indices</span></div><div class="line"><a name="l00118"></a><span class="lineno">  118</span>&#160;    variable snx = dimsize(strip, 0)</div><div class="line"><a name="l00119"></a><span class="lineno">  119</span>&#160;    variable sny = dimsize(strip, 1)</div><div class="line"><a name="l00120"></a><span class="lineno">  120</span>&#160;    variable sq1lo = 0</div><div class="line"><a name="l00121"></a><span class="lineno">  121</span>&#160;    variable sq1hi = max(qlo-1, 0)</div><div class="line"><a name="l00122"></a><span class="lineno">  122</span>&#160;    variable sq2lo = min(qhi+1, sny - 1)</div><div class="line"><a name="l00123"></a><span class="lineno">  123</span>&#160;    variable sq2hi = dimsize(strip, 1) - 1</div><div class="line"><a name="l00124"></a><span class="lineno">  124</span>&#160;    </div><div class="line"><a name="l00125"></a><span class="lineno">  125</span>&#160;    <span class="comment">// dest indices</span></div><div class="line"><a name="l00126"></a><span class="lineno">  126</span>&#160;    variable dnx = snx</div><div class="line"><a name="l00127"></a><span class="lineno">  127</span>&#160;    variable dny = sny - (sq2lo - sq1hi + 1)</div><div class="line"><a name="l00128"></a><span class="lineno">  128</span>&#160;    variable dq1lo = 0</div><div class="line"><a name="l00129"></a><span class="lineno">  129</span>&#160;    variable dq1hi = sq1hi</div><div class="line"><a name="l00130"></a><span class="lineno">  130</span>&#160;    variable dq2lo = dq1hi + 1</div><div class="line"><a name="l00131"></a><span class="lineno">  131</span>&#160;    variable dq2hi = dny - 1</div><div class="line"><a name="l00132"></a><span class="lineno">  132</span>&#160;    variable q1ofs = sq1lo - dq1lo</div><div class="line"><a name="l00133"></a><span class="lineno">  133</span>&#160;    variable q2ofs = sq2lo - dq2lo</div><div class="line"><a name="l00134"></a><span class="lineno">  134</span>&#160;    </div><div class="line"><a name="l00135"></a><span class="lineno">  135</span>&#160;    duplicate /free strip, strip_copy</div><div class="line"><a name="l00136"></a><span class="lineno">  136</span>&#160;    redimension /n=(dnx,dny) strip</div><div class="line"><a name="l00137"></a><span class="lineno">  137</span>&#160;    strip[][dq1lo,dq1hi] = strip_copy[p][q + q1ofs]</div><div class="line"><a name="l00138"></a><span class="lineno">  138</span>&#160;    strip[][dq2lo,dq2hi] = strip_copy[p][q + q2ofs]</div><div class="line"><a name="l00139"></a><span class="lineno">  139</span>&#160;    </div><div class="line"><a name="l00140"></a><span class="lineno">  140</span>&#160;    duplicate /free theta, theta_copy</div><div class="line"><a name="l00141"></a><span class="lineno">  141</span>&#160;    redimension /n=(dny) theta</div><div class="line"><a name="l00142"></a><span class="lineno">  142</span>&#160;    theta[dq1lo,dq1hi] = theta_copy[p + q1ofs]</div><div class="line"><a name="l00143"></a><span class="lineno">  143</span>&#160;    theta[dq2lo,dq2hi] = theta_copy[p + q2ofs]</div><div class="line"><a name="l00144"></a><span class="lineno">  144</span>&#160;    </div><div class="line"><a name="l00145"></a><span class="lineno">  145</span>&#160;    duplicate /free tilt, tilt_copy</div><div class="line"><a name="l00146"></a><span class="lineno">  146</span>&#160;    redimension /n=(dny) tilt</div><div class="line"><a name="l00147"></a><span class="lineno">  147</span>&#160;    tilt[dq1lo,dq1hi] = tilt_copy[p + q1ofs]</div><div class="line"><a name="l00148"></a><span class="lineno">  148</span>&#160;    tilt[dq2lo,dq2hi] = tilt_copy[p + q2ofs]</div><div class="line"><a name="l00149"></a><span class="lineno">  149</span>&#160;    </div><div class="line"><a name="l00150"></a><span class="lineno">  150</span>&#160;    duplicate /free phi, phi_copy</div><div class="line"><a name="l00151"></a><span class="lineno">  151</span>&#160;    redimension /n=(dny) phi</div><div class="line"><a name="l00152"></a><span class="lineno">  152</span>&#160;    phi[dq1lo,dq1hi] = phi_copy[p + q1ofs]</div><div class="line"><a name="l00153"></a><span class="lineno">  153</span>&#160;    phi[dq2lo,dq2hi] = phi_copy[p + q2ofs]</div><div class="line"><a name="l00154"></a><span class="lineno">  154</span>&#160;    </div><div class="line"><a name="l00155"></a><span class="lineno">  155</span>&#160;    return 0</div><div class="line"><a name="l00156"></a><span class="lineno">  156</span>&#160;end</div><div class="line"><a name="l00157"></a><span class="lineno">  157</span>&#160;</div><div class="line"><a name="l00187"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a48b7d774ed8d3f4329e9923e18e580e8">  187</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a48b7d774ed8d3f4329e9923e18e580e8">normalize_strip_x</a>(strip, [smooth_method, smooth_factor, check])</div><div class="line"><a name="l00188"></a><span class="lineno">  188</span>&#160;    wave strip</div><div class="line"><a name="l00189"></a><span class="lineno">  189</span>&#160;    variable smooth_method</div><div class="line"><a name="l00190"></a><span class="lineno">  190</span>&#160;    variable smooth_factor</div><div class="line"><a name="l00191"></a><span class="lineno">  191</span>&#160;    variable check</div><div class="line"><a name="l00192"></a><span class="lineno">  192</span>&#160;    </div><div class="line"><a name="l00193"></a><span class="lineno">  193</span>&#160;    if (ParamIsDefault(smooth_method))</div><div class="line"><a name="l00194"></a><span class="lineno">  194</span>&#160;        smooth_method = 4</div><div class="line"><a name="l00195"></a><span class="lineno">  195</span>&#160;    endif</div><div class="line"><a name="l00196"></a><span class="lineno">  196</span>&#160;    if (ParamIsDefault(smooth_factor))</div><div class="line"><a name="l00197"></a><span class="lineno">  197</span>&#160;        switch(smooth_method)</div><div class="line"><a name="l00198"></a><span class="lineno">  198</span>&#160;            case 4:</div><div class="line"><a name="l00199"></a><span class="lineno">  199</span>&#160;                smooth_factor = 0.5</div><div class="line"><a name="l00200"></a><span class="lineno">  200</span>&#160;                break</div><div class="line"><a name="l00201"></a><span class="lineno">  201</span>&#160;            default:</div><div class="line"><a name="l00202"></a><span class="lineno">  202</span>&#160;                smooth_factor = 2</div><div class="line"><a name="l00203"></a><span class="lineno">  203</span>&#160;        endswitch</div><div class="line"><a name="l00204"></a><span class="lineno">  204</span>&#160;    endif</div><div class="line"><a name="l00205"></a><span class="lineno">  205</span>&#160;    if (ParamIsDefault(check))</div><div class="line"><a name="l00206"></a><span class="lineno">  206</span>&#160;        check = 0</div><div class="line"><a name="l00207"></a><span class="lineno">  207</span>&#160;    endif</div><div class="line"><a name="l00208"></a><span class="lineno">  208</span>&#160;    </div><div class="line"><a name="l00209"></a><span class="lineno">  209</span>&#160;    <span class="comment">// average over all scan positions</span></div><div class="line"><a name="l00210"></a><span class="lineno">  210</span>&#160;    wave raw_dist = <a class="code" href="pearl-area-profiles_8ipf.html#ab1a65cf82f6933db3dd7b564582e8ed1">ad_profile_x</a>(strip, -inf, inf, &quot;&quot;)</div><div class="line"><a name="l00211"></a><span class="lineno">  211</span>&#160;    </div><div class="line"><a name="l00212"></a><span class="lineno">  212</span>&#160;    <span class="comment">// remove nans</span></div><div class="line"><a name="l00213"></a><span class="lineno">  213</span>&#160;    extract /free /indx raw_dist, clean_index, numtype(raw_dist) == 0</div><div class="line"><a name="l00214"></a><span class="lineno">  214</span>&#160;    duplicate /free raw_dist, dist, dist_x</div><div class="line"><a name="l00215"></a><span class="lineno">  215</span>&#160;    redimension /n=(numpnts(clean_index)) dist, dist_x</div><div class="line"><a name="l00216"></a><span class="lineno">  216</span>&#160;    dist = raw_dist[clean_index[p]]</div><div class="line"><a name="l00217"></a><span class="lineno">  217</span>&#160;    dist_x = pnt2x(raw_dist, clean_index[p])</div><div class="line"><a name="l00218"></a><span class="lineno">  218</span>&#160;    variable div = mean(dist)</div><div class="line"><a name="l00219"></a><span class="lineno">  219</span>&#160;    dist /= div</div><div class="line"><a name="l00220"></a><span class="lineno">  220</span>&#160;</div><div class="line"><a name="l00221"></a><span class="lineno">  221</span>&#160;    if (check)</div><div class="line"><a name="l00222"></a><span class="lineno">  222</span>&#160;        duplicate /o raw_dist, check_dist</div><div class="line"><a name="l00223"></a><span class="lineno">  223</span>&#160;        check_dist = numtype(raw_dist) == 0 ? interp(x, dist_x, dist) : nan</div><div class="line"><a name="l00224"></a><span class="lineno">  224</span>&#160;    endif</div><div class="line"><a name="l00225"></a><span class="lineno">  225</span>&#160;    </div><div class="line"><a name="l00226"></a><span class="lineno">  226</span>&#160;    <span class="comment">// smooth distribution function</span></div><div class="line"><a name="l00227"></a><span class="lineno">  227</span>&#160;    switch(smooth_method)</div><div class="line"><a name="l00228"></a><span class="lineno">  228</span>&#160;        case 1:</div><div class="line"><a name="l00229"></a><span class="lineno">  229</span>&#160;            Smooth /B /E=3 smooth_factor, dist</div><div class="line"><a name="l00230"></a><span class="lineno">  230</span>&#160;            break</div><div class="line"><a name="l00231"></a><span class="lineno">  231</span>&#160;        case 2:</div><div class="line"><a name="l00232"></a><span class="lineno">  232</span>&#160;            Smooth /E=3 smooth_factor, dist</div><div class="line"><a name="l00233"></a><span class="lineno">  233</span>&#160;            break</div><div class="line"><a name="l00234"></a><span class="lineno">  234</span>&#160;        case 3:</div><div class="line"><a name="l00235"></a><span class="lineno">  235</span>&#160;            make /n=1 /d /free fit_params</div><div class="line"><a name="l00236"></a><span class="lineno">  236</span>&#160;            fit_scienta_ang_transm(raw_dist, fit_params)</div><div class="line"><a name="l00237"></a><span class="lineno">  237</span>&#160;            duplicate /free raw_dist, dist, dist_x</div><div class="line"><a name="l00238"></a><span class="lineno">  238</span>&#160;            dist_x = x</div><div class="line"><a name="l00239"></a><span class="lineno">  239</span>&#160;            dist = scienta_ang_transm(fit_params, x)</div><div class="line"><a name="l00240"></a><span class="lineno">  240</span>&#160;            break</div><div class="line"><a name="l00241"></a><span class="lineno">  241</span>&#160;        case 4:</div><div class="line"><a name="l00242"></a><span class="lineno">  242</span>&#160;            loess /smth=(smooth_factor) srcWave=dist, factors={dist_x}</div><div class="line"><a name="l00243"></a><span class="lineno">  243</span>&#160;            <span class="keywordflow">break</span></div><div class="line"><a name="l00244"></a><span class="lineno">  244</span>&#160;    endswitch</div><div class="line"><a name="l00245"></a><span class="lineno">  245</span>&#160;    </div><div class="line"><a name="l00246"></a><span class="lineno">  246</span>&#160;    <span class="keywordflow">if</span> (check)</div><div class="line"><a name="l00247"></a><span class="lineno">  247</span>&#160;        duplicate /o raw_dist, check_smoo</div><div class="line"><a name="l00248"></a><span class="lineno">  248</span>&#160;        check_smoo = interp(x, dist_x, dist)</div><div class="line"><a name="l00249"></a><span class="lineno">  249</span>&#160;    endif</div><div class="line"><a name="l00250"></a><span class="lineno">  250</span>&#160;</div><div class="line"><a name="l00251"></a><span class="lineno">  251</span>&#160;    <span class="comment">// divide</span></div><div class="line"><a name="l00252"></a><span class="lineno">  252</span>&#160;    <span class="keywordflow">if</span> (check != 2)</div><div class="line"><a name="l00253"></a><span class="lineno">  253</span>&#160;        strip /= interp(x, dist_x, dist)</div><div class="line"><a name="l00254"></a><span class="lineno">  254</span>&#160;    endif</div><div class="line"><a name="l00255"></a><span class="lineno">  255</span>&#160;end</div><div class="line"><a name="l00256"></a><span class="lineno">  256</span>&#160;</div><div class="line"><a name="l00283"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#aaa734fddecdd75c7cabe20ba777b41b9">  283</a></span>&#160;<span class="keyword">function</span> <a class="code" href="pearl-anglescan-process_8ipf.html#aaa734fddecdd75c7cabe20ba777b41b9">normalize_strip_phi</a>(strip, theta, phi, [theta_offset, theta_range, check])</div><div class="line"><a name="l00284"></a><span class="lineno">  284</span>&#160;    wave strip</div><div class="line"><a name="l00285"></a><span class="lineno">  285</span>&#160;    wave theta</div><div class="line"><a name="l00286"></a><span class="lineno">  286</span>&#160;    wave phi</div><div class="line"><a name="l00287"></a><span class="lineno">  287</span>&#160;    variable theta_offset</div><div class="line"><a name="l00288"></a><span class="lineno">  288</span>&#160;    variable theta_range</div><div class="line"><a name="l00289"></a><span class="lineno">  289</span>&#160;    variable check</div><div class="line"><a name="l00290"></a><span class="lineno">  290</span>&#160;    </div><div class="line"><a name="l00291"></a><span class="lineno">  291</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(check))</div><div class="line"><a name="l00292"></a><span class="lineno">  292</span>&#160;        check = 0</div><div class="line"><a name="l00293"></a><span class="lineno">  293</span>&#160;    endif</div><div class="line"><a name="l00294"></a><span class="lineno">  294</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(theta_offset))</div><div class="line"><a name="l00295"></a><span class="lineno">  295</span>&#160;        theta_offset = 0</div><div class="line"><a name="l00296"></a><span class="lineno">  296</span>&#160;    endif</div><div class="line"><a name="l00297"></a><span class="lineno">  297</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(theta_range))</div><div class="line"><a name="l00298"></a><span class="lineno">  298</span>&#160;        theta_offset = 10</div><div class="line"><a name="l00299"></a><span class="lineno">  299</span>&#160;    endif</div><div class="line"><a name="l00300"></a><span class="lineno">  300</span>&#160;</div><div class="line"><a name="l00301"></a><span class="lineno">  301</span>&#160;    <span class="comment">// average over analyser angles</span></div><div class="line"><a name="l00302"></a><span class="lineno">  302</span>&#160;    wave dist = <a class="code" href="pearl-area-profiles_8ipf.html#abb1eed32a982037ebab00f5c3ea95e62">ad_profile_y</a>(strip, -inf, inf, <span class="stringliteral">&quot;&quot;</span>)</div><div class="line"><a name="l00303"></a><span class="lineno">  303</span>&#160;    </div><div class="line"><a name="l00304"></a><span class="lineno">  304</span>&#160;    <span class="comment">// smooth distribution function</span></div><div class="line"><a name="l00305"></a><span class="lineno">  305</span>&#160;    duplicate /free dist, dist_smoo</div><div class="line"><a name="l00306"></a><span class="lineno">  306</span>&#160;    duplicate /free theta, theta_int</div><div class="line"><a name="l00307"></a><span class="lineno">  307</span>&#160;    theta_int = theta - theta_offset</div><div class="line"><a name="l00308"></a><span class="lineno">  308</span>&#160;    duplicate /free phi, phi_int</div><div class="line"><a name="l00309"></a><span class="lineno">  309</span>&#160;    setscale /p x phi_int[0], phi_int[1] - phi_int[0], waveunits(phi, -1), dist, dist_smoo</div><div class="line"><a name="l00310"></a><span class="lineno">  310</span>&#160;</div><div class="line"><a name="l00311"></a><span class="lineno">  311</span>&#160;    extract /free /indx dist, red_idx, theta_int &lt; theta_range</div><div class="line"><a name="l00312"></a><span class="lineno">  312</span>&#160;    duplicate /free red_idx, red_dist, red_phi</div><div class="line"><a name="l00313"></a><span class="lineno">  313</span>&#160;    red_dist = dist[red_idx]</div><div class="line"><a name="l00314"></a><span class="lineno">  314</span>&#160;    red_phi = phi_int[red_idx]</div><div class="line"><a name="l00315"></a><span class="lineno">  315</span>&#160;    </div><div class="line"><a name="l00316"></a><span class="lineno">  316</span>&#160;    variable wavg = mean(red_dist)</div><div class="line"><a name="l00317"></a><span class="lineno">  317</span>&#160;    make /n=4 /d /free coef</div><div class="line"><a name="l00318"></a><span class="lineno">  318</span>&#160;    coef[0] = {wavg, wavg/100, pi/180, 0}</div><div class="line"><a name="l00319"></a><span class="lineno">  319</span>&#160;    CurveFit /q /h=<span class="stringliteral">&quot;0010&quot;</span> /g /w=2 sin, kwcWave=coef, red_dist /x=red_phi</div><div class="line"><a name="l00320"></a><span class="lineno">  320</span>&#160;    dist_smoo = coef[0] + coef[1] * sin(coef[2] * phi_int[p] + coef[3])</div><div class="line"><a name="l00321"></a><span class="lineno">  321</span>&#160;    </div><div class="line"><a name="l00322"></a><span class="lineno">  322</span>&#160;    <span class="comment">// divide</span></div><div class="line"><a name="l00323"></a><span class="lineno">  323</span>&#160;    <span class="keywordflow">if</span> (check != 2)</div><div class="line"><a name="l00324"></a><span class="lineno">  324</span>&#160;        strip = strip / dist_smoo[q] * coef[0]</div><div class="line"><a name="l00325"></a><span class="lineno">  325</span>&#160;    endif</div><div class="line"><a name="l00326"></a><span class="lineno">  326</span>&#160;    </div><div class="line"><a name="l00327"></a><span class="lineno">  327</span>&#160;    <span class="comment">// check</span></div><div class="line"><a name="l00328"></a><span class="lineno">  328</span>&#160;    <span class="keywordflow">if</span> (check)</div><div class="line"><a name="l00329"></a><span class="lineno">  329</span>&#160;        duplicate /o dist, check_dist</div><div class="line"><a name="l00330"></a><span class="lineno">  330</span>&#160;        duplicate /o dist_smoo, check_smoo</div><div class="line"><a name="l00331"></a><span class="lineno">  331</span>&#160;        setscale /p x dimoffset(dist,0), dimdelta(dist,0), waveunits(dist,0), check_dist, check_smoo</div><div class="line"><a name="l00332"></a><span class="lineno">  332</span>&#160;    endif</div><div class="line"><a name="l00333"></a><span class="lineno">  333</span>&#160;end</div><div class="line"><a name="l00334"></a><span class="lineno">  334</span>&#160;</div><div class="line"><a name="l00366"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a9b56897bd92d926d65f4c67bef1d41bb">  366</a></span>&#160;<span class="keyword">function</span> <a class="code" href="pearl-anglescan-process_8ipf.html#a9b56897bd92d926d65f4c67bef1d41bb">normalize_strip_theta</a>(strip, theta, [theta_offset, smooth_method, smooth_factor, check])</div><div class="line"><a name="l00367"></a><span class="lineno">  367</span>&#160;    wave strip</div><div class="line"><a name="l00368"></a><span class="lineno">  368</span>&#160;    wave theta</div><div class="line"><a name="l00369"></a><span class="lineno">  369</span>&#160;    variable theta_offset</div><div class="line"><a name="l00370"></a><span class="lineno">  370</span>&#160;    variable smooth_method</div><div class="line"><a name="l00371"></a><span class="lineno">  371</span>&#160;    variable smooth_factor</div><div class="line"><a name="l00372"></a><span class="lineno">  372</span>&#160;    variable check</div><div class="line"><a name="l00373"></a><span class="lineno">  373</span>&#160;    </div><div class="line"><a name="l00374"></a><span class="lineno">  374</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(check))</div><div class="line"><a name="l00375"></a><span class="lineno">  375</span>&#160;        check = 0</div><div class="line"><a name="l00376"></a><span class="lineno">  376</span>&#160;    endif</div><div class="line"><a name="l00377"></a><span class="lineno">  377</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(theta_offset))</div><div class="line"><a name="l00378"></a><span class="lineno">  378</span>&#160;        theta_offset = 0</div><div class="line"><a name="l00379"></a><span class="lineno">  379</span>&#160;    endif</div><div class="line"><a name="l00380"></a><span class="lineno">  380</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(smooth_method))</div><div class="line"><a name="l00381"></a><span class="lineno">  381</span>&#160;        smooth_method = 4</div><div class="line"><a name="l00382"></a><span class="lineno">  382</span>&#160;    endif</div><div class="line"><a name="l00383"></a><span class="lineno">  383</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(smooth_factor))</div><div class="line"><a name="l00384"></a><span class="lineno">  384</span>&#160;        smooth_factor = 0.5</div><div class="line"><a name="l00385"></a><span class="lineno">  385</span>&#160;    endif</div><div class="line"><a name="l00386"></a><span class="lineno">  386</span>&#160;</div><div class="line"><a name="l00387"></a><span class="lineno">  387</span>&#160;    <span class="comment">// average over analyser angles</span></div><div class="line"><a name="l00388"></a><span class="lineno">  388</span>&#160;    wave dist = <a class="code" href="pearl-area-profiles_8ipf.html#abb1eed32a982037ebab00f5c3ea95e62">ad_profile_y</a>(strip, -inf, inf, <span class="stringliteral">&quot;&quot;</span>)</div><div class="line"><a name="l00389"></a><span class="lineno">  389</span>&#160;    </div><div class="line"><a name="l00390"></a><span class="lineno">  390</span>&#160;    <span class="comment">// smooth distribution function</span></div><div class="line"><a name="l00391"></a><span class="lineno">  391</span>&#160;    duplicate /free dist, dist_smoo</div><div class="line"><a name="l00392"></a><span class="lineno">  392</span>&#160;    duplicate /free theta, theta_int</div><div class="line"><a name="l00393"></a><span class="lineno">  393</span>&#160;    theta_int = theta - theta_offset</div><div class="line"><a name="l00394"></a><span class="lineno">  394</span>&#160;    setscale /p x theta_int[0], theta_int[1] - theta_int[0], waveunits(theta,-1), dist, dist_smoo</div><div class="line"><a name="l00395"></a><span class="lineno">  395</span>&#160;    variable nx = dimsize(strip, 0)</div><div class="line"><a name="l00396"></a><span class="lineno">  396</span>&#160;    variable ix</div><div class="line"><a name="l00397"></a><span class="lineno">  397</span>&#160;    </div><div class="line"><a name="l00398"></a><span class="lineno">  398</span>&#160;    switch(smooth_method)</div><div class="line"><a name="l00399"></a><span class="lineno">  399</span>&#160;        case 1:</div><div class="line"><a name="l00400"></a><span class="lineno">  400</span>&#160;            Smooth /B /E=3 smooth_factor, dist_smoo</div><div class="line"><a name="l00401"></a><span class="lineno">  401</span>&#160;            break</div><div class="line"><a name="l00402"></a><span class="lineno">  402</span>&#160;        case 2:</div><div class="line"><a name="l00403"></a><span class="lineno">  403</span>&#160;            Smooth /E=3 smooth_factor, dist_smoo</div><div class="line"><a name="l00404"></a><span class="lineno">  404</span>&#160;            break</div><div class="line"><a name="l00405"></a><span class="lineno">  405</span>&#160;        case 4:</div><div class="line"><a name="l00406"></a><span class="lineno">  406</span>&#160;            loess /dest=dist_smoo /smth=(smooth_factor) srcWave=dist, factors={theta_int}</div><div class="line"><a name="l00407"></a><span class="lineno">  407</span>&#160;            <span class="keywordflow">break</span></div><div class="line"><a name="l00408"></a><span class="lineno">  408</span>&#160;        <span class="keywordflow">case</span> 3:</div><div class="line"><a name="l00409"></a><span class="lineno">  409</span>&#160;            <span class="keywordflow">for</span> (ix = 0; ix &lt; nx; ix += 1)</div><div class="line"><a name="l00410"></a><span class="lineno">  410</span>&#160;                dist = strip[ix][p]</div><div class="line"><a name="l00411"></a><span class="lineno">  411</span>&#160;                <span class="keywordflow">if</span> (smooth_factor &gt; 1)</div><div class="line"><a name="l00412"></a><span class="lineno">  412</span>&#160;                    CurveFit /nthr=0 /q /w=2 poly smooth_factor+1, dist /x=theta_int /d=dist_smoo</div><div class="line"><a name="l00413"></a><span class="lineno">  413</span>&#160;                <span class="keywordflow">else</span></div><div class="line"><a name="l00414"></a><span class="lineno">  414</span>&#160;                    CurveFit /nthr=0 /q /w=2 line, dist /x=theta_int /d=dist_smoo</div><div class="line"><a name="l00415"></a><span class="lineno">  415</span>&#160;                endif</div><div class="line"><a name="l00416"></a><span class="lineno">  416</span>&#160;                strip[ix,ix][] /= dist_smoo[q]</div><div class="line"><a name="l00417"></a><span class="lineno">  417</span>&#160;            endfor</div><div class="line"><a name="l00418"></a><span class="lineno">  418</span>&#160;            dist_smoo = 1</div><div class="line"><a name="l00419"></a><span class="lineno">  419</span>&#160;            <span class="keywordflow">break</span></div><div class="line"><a name="l00420"></a><span class="lineno">  420</span>&#160;    endswitch</div><div class="line"><a name="l00421"></a><span class="lineno">  421</span>&#160;    </div><div class="line"><a name="l00422"></a><span class="lineno">  422</span>&#160;    <span class="comment">// divide</span></div><div class="line"><a name="l00423"></a><span class="lineno">  423</span>&#160;    <span class="keywordflow">if</span> (check != 2)</div><div class="line"><a name="l00424"></a><span class="lineno">  424</span>&#160;        strip /= dist_smoo[q]</div><div class="line"><a name="l00425"></a><span class="lineno">  425</span>&#160;    endif</div><div class="line"><a name="l00426"></a><span class="lineno">  426</span>&#160;    </div><div class="line"><a name="l00427"></a><span class="lineno">  427</span>&#160;    <span class="comment">// check</span></div><div class="line"><a name="l00428"></a><span class="lineno">  428</span>&#160;    <span class="keywordflow">if</span> (check)</div><div class="line"><a name="l00429"></a><span class="lineno">  429</span>&#160;        duplicate /o dist, check_dist</div><div class="line"><a name="l00430"></a><span class="lineno">  430</span>&#160;        duplicate /o dist_smoo, check_smoo</div><div class="line"><a name="l00431"></a><span class="lineno">  431</span>&#160;        setscale /p x dimoffset(dist,0), dimdelta(dist,0), waveunits(dist,0), check_dist, check_smoo</div><div class="line"><a name="l00432"></a><span class="lineno">  432</span>&#160;    endif</div><div class="line"><a name="l00433"></a><span class="lineno">  433</span>&#160;end</div><div class="line"><a name="l00434"></a><span class="lineno">  434</span>&#160;</div><div class="line"><a name="l00464"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ad0a93367d2e9b66bb7b81697e87adfaf">  464</a></span>&#160;<span class="keyword">function</span> <a class="code" href="pearl-anglescan-process_8ipf.html#ad0a93367d2e9b66bb7b81697e87adfaf">normalize_strip_thetaphi</a>(strip, theta, phi, [theta_offset, smooth_method, smooth_factor, check])</div><div class="line"><a name="l00465"></a><span class="lineno">  465</span>&#160;    wave strip</div><div class="line"><a name="l00466"></a><span class="lineno">  466</span>&#160;    wave theta</div><div class="line"><a name="l00467"></a><span class="lineno">  467</span>&#160;    wave phi</div><div class="line"><a name="l00468"></a><span class="lineno">  468</span>&#160;    variable theta_offset</div><div class="line"><a name="l00469"></a><span class="lineno">  469</span>&#160;    variable smooth_method</div><div class="line"><a name="l00470"></a><span class="lineno">  470</span>&#160;    variable smooth_factor</div><div class="line"><a name="l00471"></a><span class="lineno">  471</span>&#160;    variable check</div><div class="line"><a name="l00472"></a><span class="lineno">  472</span>&#160;    </div><div class="line"><a name="l00473"></a><span class="lineno">  473</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(check))</div><div class="line"><a name="l00474"></a><span class="lineno">  474</span>&#160;        check = 0</div><div class="line"><a name="l00475"></a><span class="lineno">  475</span>&#160;    endif</div><div class="line"><a name="l00476"></a><span class="lineno">  476</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(theta_offset))</div><div class="line"><a name="l00477"></a><span class="lineno">  477</span>&#160;        theta_offset = 0</div><div class="line"><a name="l00478"></a><span class="lineno">  478</span>&#160;    endif</div><div class="line"><a name="l00479"></a><span class="lineno">  479</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(smooth_method))</div><div class="line"><a name="l00480"></a><span class="lineno">  480</span>&#160;        smooth_method = 4</div><div class="line"><a name="l00481"></a><span class="lineno">  481</span>&#160;    endif</div><div class="line"><a name="l00482"></a><span class="lineno">  482</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(smooth_factor))</div><div class="line"><a name="l00483"></a><span class="lineno">  483</span>&#160;        smooth_factor = 0.5</div><div class="line"><a name="l00484"></a><span class="lineno">  484</span>&#160;    endif</div><div class="line"><a name="l00485"></a><span class="lineno">  485</span>&#160;</div><div class="line"><a name="l00486"></a><span class="lineno">  486</span>&#160;    <span class="comment">// average over analyser angles</span></div><div class="line"><a name="l00487"></a><span class="lineno">  487</span>&#160;    wave dist = <a class="code" href="pearl-area-profiles_8ipf.html#abb1eed32a982037ebab00f5c3ea95e62">ad_profile_y</a>(strip, -inf, inf, <span class="stringliteral">&quot;&quot;</span>)</div><div class="line"><a name="l00488"></a><span class="lineno">  488</span>&#160;    </div><div class="line"><a name="l00489"></a><span class="lineno">  489</span>&#160;    <span class="comment">// smooth distribution function</span></div><div class="line"><a name="l00490"></a><span class="lineno">  490</span>&#160;    duplicate /free dist, dist_smoo</div><div class="line"><a name="l00491"></a><span class="lineno">  491</span>&#160;    duplicate /free theta, theta_int</div><div class="line"><a name="l00492"></a><span class="lineno">  492</span>&#160;    theta_int = theta - theta_offset</div><div class="line"><a name="l00493"></a><span class="lineno">  493</span>&#160;    setscale /p x theta_int[0], theta_int[1] - theta_int[0], waveunits(theta,-1), dist, dist_smoo</div><div class="line"><a name="l00494"></a><span class="lineno">  494</span>&#160;    variable nx = dimsize(strip, 0)</div><div class="line"><a name="l00495"></a><span class="lineno">  495</span>&#160;    variable ix</div><div class="line"><a name="l00496"></a><span class="lineno">  496</span>&#160;    </div><div class="line"><a name="l00497"></a><span class="lineno">  497</span>&#160;    switch(smooth_method)</div><div class="line"><a name="l00498"></a><span class="lineno">  498</span>&#160;        case 4:</div><div class="line"><a name="l00499"></a><span class="lineno">  499</span>&#160;            loess /dest=dist_smoo /smth=(smooth_factor) srcWave=dist, factors={theta_int, phi}</div><div class="line"><a name="l00500"></a><span class="lineno">  500</span>&#160;            <span class="keywordflow">break</span></div><div class="line"><a name="l00501"></a><span class="lineno">  501</span>&#160;        <span class="keywordflow">default</span>:</div><div class="line"><a name="l00502"></a><span class="lineno">  502</span>&#160;            abort <span class="stringliteral">&quot;smooth method not supported&quot;</span></div><div class="line"><a name="l00503"></a><span class="lineno">  503</span>&#160;    endswitch</div><div class="line"><a name="l00504"></a><span class="lineno">  504</span>&#160;    </div><div class="line"><a name="l00505"></a><span class="lineno">  505</span>&#160;    <span class="comment">// divide</span></div><div class="line"><a name="l00506"></a><span class="lineno">  506</span>&#160;    <span class="keywordflow">if</span> (check != 2)</div><div class="line"><a name="l00507"></a><span class="lineno">  507</span>&#160;        strip /= dist_smoo[q]</div><div class="line"><a name="l00508"></a><span class="lineno">  508</span>&#160;    endif</div><div class="line"><a name="l00509"></a><span class="lineno">  509</span>&#160;    </div><div class="line"><a name="l00510"></a><span class="lineno">  510</span>&#160;    <span class="comment">// check</span></div><div class="line"><a name="l00511"></a><span class="lineno">  511</span>&#160;    <span class="keywordflow">if</span> (check)</div><div class="line"><a name="l00512"></a><span class="lineno">  512</span>&#160;        duplicate /o dist, check_dist</div><div class="line"><a name="l00513"></a><span class="lineno">  513</span>&#160;        duplicate /o dist_smoo, check_smoo</div><div class="line"><a name="l00514"></a><span class="lineno">  514</span>&#160;        setscale /p x dimoffset(dist,0), dimdelta(dist,0), waveunits(dist,0), check_dist, check_smoo</div><div class="line"><a name="l00515"></a><span class="lineno">  515</span>&#160;    endif</div><div class="line"><a name="l00516"></a><span class="lineno">  516</span>&#160;end</div><div class="line"><a name="l00517"></a><span class="lineno">  517</span>&#160;</div><div class="line"><a name="l00523"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a992920d621023e6b483ff51eee68b508">  523</a></span>&#160;<span class="keyword">function</span> <a class="code" href="pearl-anglescan-process_8ipf.html#a992920d621023e6b483ff51eee68b508">normalize_strip_theta_scans</a>(strip, theta, [theta_offset, smooth_method, smooth_factor, check])</div><div class="line"><a name="l00524"></a><span class="lineno">  524</span>&#160;    wave strip</div><div class="line"><a name="l00525"></a><span class="lineno">  525</span>&#160;    wave theta</div><div class="line"><a name="l00526"></a><span class="lineno">  526</span>&#160;    variable theta_offset</div><div class="line"><a name="l00527"></a><span class="lineno">  527</span>&#160;    variable smooth_method</div><div class="line"><a name="l00528"></a><span class="lineno">  528</span>&#160;    variable smooth_factor</div><div class="line"><a name="l00529"></a><span class="lineno">  529</span>&#160;    variable check</div><div class="line"><a name="l00530"></a><span class="lineno">  530</span>&#160;    </div><div class="line"><a name="l00531"></a><span class="lineno">  531</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(check))</div><div class="line"><a name="l00532"></a><span class="lineno">  532</span>&#160;        check = 0</div><div class="line"><a name="l00533"></a><span class="lineno">  533</span>&#160;    endif</div><div class="line"><a name="l00534"></a><span class="lineno">  534</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(theta_offset))</div><div class="line"><a name="l00535"></a><span class="lineno">  535</span>&#160;        theta_offset = 0</div><div class="line"><a name="l00536"></a><span class="lineno">  536</span>&#160;    endif</div><div class="line"><a name="l00537"></a><span class="lineno">  537</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(smooth_method))</div><div class="line"><a name="l00538"></a><span class="lineno">  538</span>&#160;        smooth_method = 4</div><div class="line"><a name="l00539"></a><span class="lineno">  539</span>&#160;    endif</div><div class="line"><a name="l00540"></a><span class="lineno">  540</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(smooth_factor))</div><div class="line"><a name="l00541"></a><span class="lineno">  541</span>&#160;        smooth_factor = 0.5</div><div class="line"><a name="l00542"></a><span class="lineno">  542</span>&#160;    endif</div><div class="line"><a name="l00543"></a><span class="lineno">  543</span>&#160;</div><div class="line"><a name="l00544"></a><span class="lineno">  544</span>&#160;    <span class="comment">// average over analyser angles</span></div><div class="line"><a name="l00545"></a><span class="lineno">  545</span>&#160;    wave dist = <a class="code" href="pearl-area-profiles_8ipf.html#abb1eed32a982037ebab00f5c3ea95e62">ad_profile_y</a>(strip, -inf, inf, <span class="stringliteral">&quot;&quot;</span>)</div><div class="line"><a name="l00546"></a><span class="lineno">  546</span>&#160;    </div><div class="line"><a name="l00547"></a><span class="lineno">  547</span>&#160;    <span class="comment">// smooth distribution function</span></div><div class="line"><a name="l00548"></a><span class="lineno">  548</span>&#160;    duplicate /free dist, dist_smoo</div><div class="line"><a name="l00549"></a><span class="lineno">  549</span>&#160;    duplicate /free theta, theta_int</div><div class="line"><a name="l00550"></a><span class="lineno">  550</span>&#160;    theta_int = theta - theta_offset</div><div class="line"><a name="l00551"></a><span class="lineno">  551</span>&#160;    setscale /p x theta_int[0], theta_int[1] - theta_int[0], waveunits(theta,-1), dist, dist_smoo</div><div class="line"><a name="l00552"></a><span class="lineno">  552</span>&#160;</div><div class="line"><a name="l00553"></a><span class="lineno">  553</span>&#160;    <span class="comment">// analyse scanning scheme</span></div><div class="line"><a name="l00554"></a><span class="lineno">  554</span>&#160;    duplicate /free theta_int, d1_theta, d2_theta</div><div class="line"><a name="l00555"></a><span class="lineno">  555</span>&#160;    Differentiate /METH=2 theta_int /D=d1_theta</div><div class="line"><a name="l00556"></a><span class="lineno">  556</span>&#160;    Differentiate /METH=2 d1_theta /D=d2_theta</div><div class="line"><a name="l00557"></a><span class="lineno">  557</span>&#160;    d2_theta =  abs(d2_theta)</div><div class="line"><a name="l00558"></a><span class="lineno">  558</span>&#160;    make /free w_levels</div><div class="line"><a name="l00559"></a><span class="lineno">  559</span>&#160;    FindLevels /edge=1 /p /q /d=w_levels d2_theta, 0.1</div><div class="line"><a name="l00560"></a><span class="lineno">  560</span>&#160;    if (v_flag != 1)</div><div class="line"><a name="l00561"></a><span class="lineno">  561</span>&#160;        abort &quot;unrecognized scanning scheme&quot;</div><div class="line"><a name="l00562"></a><span class="lineno">  562</span>&#160;    endif</div><div class="line"><a name="l00563"></a><span class="lineno">  563</span>&#160;    w_levels = ceil(w_levels)</div><div class="line"><a name="l00564"></a><span class="lineno">  564</span>&#160;    InsertPoints 0, 1, w_levels</div><div class="line"><a name="l00565"></a><span class="lineno">  565</span>&#160;    w_levels[0] = 0</div><div class="line"><a name="l00566"></a><span class="lineno">  566</span>&#160;    InsertPoints numpnts(w_levels), 1, w_levels</div><div class="line"><a name="l00567"></a><span class="lineno">  567</span>&#160;    w_levels[numpnts(w_levels)-1] = numpnts(theta_int)</div><div class="line"><a name="l00568"></a><span class="lineno">  568</span>&#160;    </div><div class="line"><a name="l00569"></a><span class="lineno">  569</span>&#160;    variable n_scans = numpnts(w_levels) - 1</div><div class="line"><a name="l00570"></a><span class="lineno">  570</span>&#160;    variable i_scan</div><div class="line"><a name="l00571"></a><span class="lineno">  571</span>&#160;    variable p1, p2</div><div class="line"><a name="l00572"></a><span class="lineno">  572</span>&#160;    for (i_scan = 0; i_scan &lt; n_scans; i_scan += 1)</div><div class="line"><a name="l00573"></a><span class="lineno">  573</span>&#160;        p1 = w_levels[i_scan]</div><div class="line"><a name="l00574"></a><span class="lineno">  574</span>&#160;        p2 = w_levels[i_scan+1] - 1</div><div class="line"><a name="l00575"></a><span class="lineno">  575</span>&#160;        duplicate /free /r=[p1, p2] dist, dist_piece, smooth_piece</div><div class="line"><a name="l00576"></a><span class="lineno">  576</span>&#160;        duplicate /free /r=[p1, p2] theta_int, theta_piece</div><div class="line"><a name="l00577"></a><span class="lineno">  577</span>&#160;        switch(smooth_method)</div><div class="line"><a name="l00578"></a><span class="lineno">  578</span>&#160;            case 4:</div><div class="line"><a name="l00579"></a><span class="lineno">  579</span>&#160;                loess /dest=smooth_piece /smth=(smooth_factor) srcWave=dist_piece, factors={theta_piece}</div><div class="line"><a name="l00580"></a><span class="lineno">  580</span>&#160;                <span class="keywordflow">break</span></div><div class="line"><a name="l00581"></a><span class="lineno">  581</span>&#160;            <span class="keywordflow">default</span>:</div><div class="line"><a name="l00582"></a><span class="lineno">  582</span>&#160;                abort <span class="stringliteral">&quot;smooth method not supported&quot;</span></div><div class="line"><a name="l00583"></a><span class="lineno">  583</span>&#160;        endswitch</div><div class="line"><a name="l00584"></a><span class="lineno">  584</span>&#160;        dist_smoo[p1, p2] = smooth_piece[p - p1]</div><div class="line"><a name="l00585"></a><span class="lineno">  585</span>&#160;    endfor</div><div class="line"><a name="l00586"></a><span class="lineno">  586</span>&#160;    </div><div class="line"><a name="l00587"></a><span class="lineno">  587</span>&#160;    <span class="comment">// divide</span></div><div class="line"><a name="l00588"></a><span class="lineno">  588</span>&#160;    <span class="keywordflow">if</span> (check != 2)</div><div class="line"><a name="l00589"></a><span class="lineno">  589</span>&#160;        strip /= dist_smoo[q]</div><div class="line"><a name="l00590"></a><span class="lineno">  590</span>&#160;    endif</div><div class="line"><a name="l00591"></a><span class="lineno">  591</span>&#160;</div><div class="line"><a name="l00592"></a><span class="lineno">  592</span>&#160;    <span class="comment">// check</span></div><div class="line"><a name="l00593"></a><span class="lineno">  593</span>&#160;    <span class="keywordflow">if</span> (check)</div><div class="line"><a name="l00594"></a><span class="lineno">  594</span>&#160;        duplicate /o dist, check_dist</div><div class="line"><a name="l00595"></a><span class="lineno">  595</span>&#160;        duplicate /o dist_smoo, check_smoo</div><div class="line"><a name="l00596"></a><span class="lineno">  596</span>&#160;        setscale /p x dimoffset(dist,0), dimdelta(dist,0), waveunits(dist,0), check_dist, check_smoo</div><div class="line"><a name="l00597"></a><span class="lineno">  597</span>&#160;    endif</div><div class="line"><a name="l00598"></a><span class="lineno">  598</span>&#160;end</div><div class="line"><a name="l00599"></a><span class="lineno">  599</span>&#160;</div><div class="line"><a name="l00613"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ac617c3b400488b656493af8ca08f1791">  613</a></span>&#160;<span class="keyword">function</span> <a class="code" href="pearl-anglescan-process_8ipf.html#ac617c3b400488b656493af8ca08f1791">normalize_strip_2d</a>(strip, theta, [theta_offset, smooth_method, smooth_factor, check])</div><div class="line"><a name="l00614"></a><span class="lineno">  614</span>&#160;    wave strip</div><div class="line"><a name="l00615"></a><span class="lineno">  615</span>&#160;    wave theta</div><div class="line"><a name="l00616"></a><span class="lineno">  616</span>&#160;    variable theta_offset</div><div class="line"><a name="l00617"></a><span class="lineno">  617</span>&#160;    variable smooth_method</div><div class="line"><a name="l00618"></a><span class="lineno">  618</span>&#160;    variable smooth_factor</div><div class="line"><a name="l00619"></a><span class="lineno">  619</span>&#160;    variable check</div><div class="line"><a name="l00620"></a><span class="lineno">  620</span>&#160;    </div><div class="line"><a name="l00621"></a><span class="lineno">  621</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(check))</div><div class="line"><a name="l00622"></a><span class="lineno">  622</span>&#160;        check = 0</div><div class="line"><a name="l00623"></a><span class="lineno">  623</span>&#160;    endif</div><div class="line"><a name="l00624"></a><span class="lineno">  624</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(theta_offset))</div><div class="line"><a name="l00625"></a><span class="lineno">  625</span>&#160;        theta_offset = 0</div><div class="line"><a name="l00626"></a><span class="lineno">  626</span>&#160;    endif</div><div class="line"><a name="l00627"></a><span class="lineno">  627</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(smooth_method))</div><div class="line"><a name="l00628"></a><span class="lineno">  628</span>&#160;        smooth_method = 4</div><div class="line"><a name="l00629"></a><span class="lineno">  629</span>&#160;    endif</div><div class="line"><a name="l00630"></a><span class="lineno">  630</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(smooth_factor))</div><div class="line"><a name="l00631"></a><span class="lineno">  631</span>&#160;        smooth_factor = 0.5</div><div class="line"><a name="l00632"></a><span class="lineno">  632</span>&#160;    endif</div><div class="line"><a name="l00633"></a><span class="lineno">  633</span>&#160;</div><div class="line"><a name="l00634"></a><span class="lineno">  634</span>&#160;    variable nx = dimsize(strip, 0)</div><div class="line"><a name="l00635"></a><span class="lineno">  635</span>&#160;    variable ny = dimsize(strip, 1)</div><div class="line"><a name="l00636"></a><span class="lineno">  636</span>&#160;    </div><div class="line"><a name="l00637"></a><span class="lineno">  637</span>&#160;    duplicate /free strip, dist, alpha_int, theta_int</div><div class="line"><a name="l00638"></a><span class="lineno">  638</span>&#160;    theta_int = theta[q] - theta_offset</div><div class="line"><a name="l00639"></a><span class="lineno">  639</span>&#160;    alpha_int = dimoffset(strip, 0) + p * dimdelta(strip, 0)</div><div class="line"><a name="l00640"></a><span class="lineno">  640</span>&#160;    redimension /n=(nx * ny) dist, alpha_int, theta_int</div><div class="line"><a name="l00641"></a><span class="lineno">  641</span>&#160;    </div><div class="line"><a name="l00642"></a><span class="lineno">  642</span>&#160;    switch(smooth_method)</div><div class="line"><a name="l00643"></a><span class="lineno">  643</span>&#160;        case 4:</div><div class="line"><a name="l00644"></a><span class="lineno">  644</span>&#160;            loess /dest=dist_smoo /smth=(smooth_factor) srcWave=dist, factors={alpha_int, theta_int}</div><div class="line"><a name="l00645"></a><span class="lineno">  645</span>&#160;            redimension /n=(nx, ny) dist_smoo</div><div class="line"><a name="l00646"></a><span class="lineno">  646</span>&#160;            <span class="keywordflow">break</span></div><div class="line"><a name="l00647"></a><span class="lineno">  647</span>&#160;        <span class="keywordflow">default</span>:</div><div class="line"><a name="l00648"></a><span class="lineno">  648</span>&#160;            Abort <span class="stringliteral">&quot;undefined smooth method&quot;</span></div><div class="line"><a name="l00649"></a><span class="lineno">  649</span>&#160;            <span class="keywordflow">break</span></div><div class="line"><a name="l00650"></a><span class="lineno">  650</span>&#160;    endswitch</div><div class="line"><a name="l00651"></a><span class="lineno">  651</span>&#160;    </div><div class="line"><a name="l00652"></a><span class="lineno">  652</span>&#160;    <span class="comment">// divide</span></div><div class="line"><a name="l00653"></a><span class="lineno">  653</span>&#160;    <span class="keywordflow">if</span> (check != 2)</div><div class="line"><a name="l00654"></a><span class="lineno">  654</span>&#160;        strip /= dist_smoo</div><div class="line"><a name="l00655"></a><span class="lineno">  655</span>&#160;    endif</div><div class="line"><a name="l00656"></a><span class="lineno">  656</span>&#160;    </div><div class="line"><a name="l00657"></a><span class="lineno">  657</span>&#160;    <span class="comment">// check</span></div><div class="line"><a name="l00658"></a><span class="lineno">  658</span>&#160;    <span class="keywordflow">if</span> (check)</div><div class="line"><a name="l00659"></a><span class="lineno">  659</span>&#160;        <span class="comment">//duplicate /o dist, check_dist</span></div><div class="line"><a name="l00660"></a><span class="lineno">  660</span>&#160;        duplicate /o dist_smoo, check_smoo</div><div class="line"><a name="l00661"></a><span class="lineno">  661</span>&#160;    endif</div><div class="line"><a name="l00662"></a><span class="lineno">  662</span>&#160;end</div><div class="line"><a name="l00663"></a><span class="lineno">  663</span>&#160;</div><div class="line"><a name="l00673"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ab65d25af7476ed18f7bf7359614a912b">  673</a></span>&#160;<span class="keyword">function</span> <a class="code" href="pearl-anglescan-process_8ipf.html#ab65d25af7476ed18f7bf7359614a912b">crop_strip</a>(strip, xlo, xhi)</div><div class="line"><a name="l00674"></a><span class="lineno">  674</span>&#160;    wave strip</div><div class="line"><a name="l00675"></a><span class="lineno">  675</span>&#160;    variable xlo</div><div class="line"><a name="l00676"></a><span class="lineno">  676</span>&#160;    variable xhi</div><div class="line"><a name="l00677"></a><span class="lineno">  677</span>&#160;    </div><div class="line"><a name="l00678"></a><span class="lineno">  678</span>&#160;    variable plo = round((xlo - dimoffset(strip, 0)) / dimdelta(strip, 0))</div><div class="line"><a name="l00679"></a><span class="lineno">  679</span>&#160;    variable phi = round((xhi - dimoffset(strip, 0)) / dimdelta(strip, 0))</div><div class="line"><a name="l00680"></a><span class="lineno">  680</span>&#160;    xlo = plo * dimdelta(strip, 0) + dimoffset(strip, 0)</div><div class="line"><a name="l00681"></a><span class="lineno">  681</span>&#160;    xhi = phi * dimdelta(strip, 0) + dimoffset(strip, 0)</div><div class="line"><a name="l00682"></a><span class="lineno">  682</span>&#160;    variable nx = phi - plo + 1</div><div class="line"><a name="l00683"></a><span class="lineno">  683</span>&#160;    variable ny = dimsize(strip, 1)</div><div class="line"><a name="l00684"></a><span class="lineno">  684</span>&#160;    </div><div class="line"><a name="l00685"></a><span class="lineno">  685</span>&#160;    duplicate /free strip, strip_copy</div><div class="line"><a name="l00686"></a><span class="lineno">  686</span>&#160;    redimension /n=(nx,ny) strip</div><div class="line"><a name="l00687"></a><span class="lineno">  687</span>&#160;    strip = strip_copy[p + plo][q]</div><div class="line"><a name="l00688"></a><span class="lineno">  688</span>&#160;    setscale /i x xlo, xhi, waveunits(strip, 0), strip</div><div class="line"><a name="l00689"></a><span class="lineno">  689</span>&#160;end</div><div class="line"><a name="l00690"></a><span class="lineno">  690</span>&#160;</div><div class="line"><a name="l00705"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#aa79c0ff6073bd42e202b9fa3f8c00b9f">  705</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#aa79c0ff6073bd42e202b9fa3f8c00b9f">crop_strip_theta</a>(strip, theta_lo, theta_hi, theta, tilt, phi)</div><div class="line"><a name="l00706"></a><span class="lineno">  706</span>&#160;    wave strip</div><div class="line"><a name="l00707"></a><span class="lineno">  707</span>&#160;    variable theta_lo</div><div class="line"><a name="l00708"></a><span class="lineno">  708</span>&#160;    variable theta_hi</div><div class="line"><a name="l00709"></a><span class="lineno">  709</span>&#160;    wave theta</div><div class="line"><a name="l00710"></a><span class="lineno">  710</span>&#160;    wave tilt</div><div class="line"><a name="l00711"></a><span class="lineno">  711</span>&#160;    wave phi</div><div class="line"><a name="l00712"></a><span class="lineno">  712</span>&#160;    </div><div class="line"><a name="l00713"></a><span class="lineno">  713</span>&#160;    extract /indx /free theta, idx, (theta &gt;= theta_lo) &amp;&amp; (theta &lt;= theta_hi)</div><div class="line"><a name="l00714"></a><span class="lineno">  714</span>&#160;    variable nx = dimsize(strip, 0)</div><div class="line"><a name="l00715"></a><span class="lineno">  715</span>&#160;    variable ny = numpnts(idx)</div><div class="line"><a name="l00716"></a><span class="lineno">  716</span>&#160;    </div><div class="line"><a name="l00717"></a><span class="lineno">  717</span>&#160;    theta[0, ny-1] = theta[idx]</div><div class="line"><a name="l00718"></a><span class="lineno">  718</span>&#160;    tilt[0, ny-1] = tilt[idx]</div><div class="line"><a name="l00719"></a><span class="lineno">  719</span>&#160;    phi[0, ny-1] = phi[idx]</div><div class="line"><a name="l00720"></a><span class="lineno">  720</span>&#160;    redimension /n=(ny) theta, tilt, phi</div><div class="line"><a name="l00721"></a><span class="lineno">  721</span>&#160;    </div><div class="line"><a name="l00722"></a><span class="lineno">  722</span>&#160;    duplicate /free strip, strip_copy</div><div class="line"><a name="l00723"></a><span class="lineno">  723</span>&#160;    redimension /n=(nx,ny) strip</div><div class="line"><a name="l00724"></a><span class="lineno">  724</span>&#160;    strip = strip_copy[p][idx[q]]</div><div class="line"><a name="l00725"></a><span class="lineno">  725</span>&#160;end</div><div class="line"><a name="l00726"></a><span class="lineno">  726</span>&#160;</div><div class="line"><a name="l00769"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#afed227ae79873fd32c96afbf606d1965">  769</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#afed227ae79873fd32c96afbf606d1965">pizza_service</a>(data, nickname, theta_offset, tilt_offset, phi_offset, [npolar, nograph, folding, xpdplot])</div><div class="line"><a name="l00770"></a><span class="lineno">  770</span>&#160;    wave data</div><div class="line"><a name="l00771"></a><span class="lineno">  771</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l00772"></a><span class="lineno">  772</span>&#160;    variable theta_offset</div><div class="line"><a name="l00773"></a><span class="lineno">  773</span>&#160;    variable tilt_offset</div><div class="line"><a name="l00774"></a><span class="lineno">  774</span>&#160;    variable phi_offset</div><div class="line"><a name="l00775"></a><span class="lineno">  775</span>&#160;    variable npolar</div><div class="line"><a name="l00776"></a><span class="lineno">  776</span>&#160;    variable nograph</div><div class="line"><a name="l00777"></a><span class="lineno">  777</span>&#160;    variable folding</div><div class="line"><a name="l00778"></a><span class="lineno">  778</span>&#160;    variable xpdplot</div><div class="line"><a name="l00779"></a><span class="lineno">  779</span>&#160;        </div><div class="line"><a name="l00780"></a><span class="lineno">  780</span>&#160;    if (ParamIsDefault(npolar))</div><div class="line"><a name="l00781"></a><span class="lineno">  781</span>&#160;        npolar = 91</div><div class="line"><a name="l00782"></a><span class="lineno">  782</span>&#160;    endif</div><div class="line"><a name="l00783"></a><span class="lineno">  783</span>&#160;    if (ParamIsDefault(nograph))</div><div class="line"><a name="l00784"></a><span class="lineno">  784</span>&#160;        nograph = 0</div><div class="line"><a name="l00785"></a><span class="lineno">  785</span>&#160;    endif</div><div class="line"><a name="l00786"></a><span class="lineno">  786</span>&#160;    if (ParamIsDefault(folding))</div><div class="line"><a name="l00787"></a><span class="lineno">  787</span>&#160;        folding = 1</div><div class="line"><a name="l00788"></a><span class="lineno">  788</span>&#160;    endif</div><div class="line"><a name="l00789"></a><span class="lineno">  789</span>&#160;    if (ParamIsDefault(xpdplot))</div><div class="line"><a name="l00790"></a><span class="lineno">  790</span>&#160;        xpdplot = 0</div><div class="line"><a name="l00791"></a><span class="lineno">  791</span>&#160;    endif</div><div class="line"><a name="l00792"></a><span class="lineno">  792</span>&#160;    </div><div class="line"><a name="l00793"></a><span class="lineno">  793</span>&#160;    <span class="comment">// sort out data folder structure</span></div><div class="line"><a name="l00794"></a><span class="lineno">  794</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00795"></a><span class="lineno">  795</span>&#160;    dfref dataDF = GetWavesDataFolderDFR(data)</div><div class="line"><a name="l00796"></a><span class="lineno">  796</span>&#160;    setdatafolder dataDF</div><div class="line"><a name="l00797"></a><span class="lineno">  797</span>&#160;    if (DataFolderExists(&quot;:attr&quot;))</div><div class="line"><a name="l00798"></a><span class="lineno">  798</span>&#160;        setdatafolder :attr</div><div class="line"><a name="l00799"></a><span class="lineno">  799</span>&#160;    endif</div><div class="line"><a name="l00800"></a><span class="lineno">  800</span>&#160;    dfref attrDF = GetDataFolderDFR()</div><div class="line"><a name="l00801"></a><span class="lineno">  801</span>&#160;    </div><div class="line"><a name="l00802"></a><span class="lineno">  802</span>&#160;    wave /sdfr=attrDF ManipulatorTheta</div><div class="line"><a name="l00803"></a><span class="lineno">  803</span>&#160;    wave /sdfr=attrDF ManipulatorTilt</div><div class="line"><a name="l00804"></a><span class="lineno">  804</span>&#160;    wave /sdfr=attrDF ManipulatorPhi</div><div class="line"><a name="l00805"></a><span class="lineno">  805</span>&#160;</div><div class="line"><a name="l00806"></a><span class="lineno">  806</span>&#160;    if ((dimsize(ManipulatorTheta, 0) != dimsize(data, 1)) || (dimsize(ManipulatorTilt, 0) != dimsize(data, 1)) || (dimsize(ManipulatorPhi, 0) != dimsize(data, 1)))</div><div class="line"><a name="l00807"></a><span class="lineno">  807</span>&#160;        Abort &quot;Warning: The dimension size of the manipulator waves does not match the Y dimension of the data wave!\rIf you restructured the data wave, please use <a class="code" href="pearl-anglescan-process_8ipf.html#a229770447193d4fd12032b235aab4d28">pizza_service_2</a> with properly scaled manipulator waves.&quot;</div><div class="line"><a name="l00808"></a><span class="lineno">  808</span>&#160;    endif</div><div class="line"><a name="l00809"></a><span class="lineno">  809</span>&#160;</div><div class="line"><a name="l00810"></a><span class="lineno">  810</span>&#160;    duplicate /free ManipulatorTheta, m_theta</div><div class="line"><a name="l00811"></a><span class="lineno">  811</span>&#160;    duplicate /free ManipulatorTilt, m_tilt</div><div class="line"><a name="l00812"></a><span class="lineno">  812</span>&#160;    duplicate /free ManipulatorPhi, m_phi</div><div class="line"><a name="l00813"></a><span class="lineno">  813</span>&#160;</div><div class="line"><a name="l00814"></a><span class="lineno">  814</span>&#160;    m_theta -= theta_offset</div><div class="line"><a name="l00815"></a><span class="lineno">  815</span>&#160;    m_tilt -= tilt_offset</div><div class="line"><a name="l00816"></a><span class="lineno">  816</span>&#160;    m_phi -= phi_offset</div><div class="line"><a name="l00817"></a><span class="lineno">  817</span>&#160;    </div><div class="line"><a name="l00818"></a><span class="lineno">  818</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a229770447193d4fd12032b235aab4d28">pizza_service_2</a>(data, nickname, m_theta, m_tilt, m_phi, npolar=npolar, nograph=nograph, folding=folding, xpdplot=xpdplot)</div><div class="line"><a name="l00819"></a><span class="lineno">  819</span>&#160;    </div><div class="line"><a name="l00820"></a><span class="lineno">  820</span>&#160;    setdatafolder saveDF</div><div class="line"><a name="l00821"></a><span class="lineno">  821</span>&#160;end</div><div class="line"><a name="l00822"></a><span class="lineno">  822</span>&#160;</div><div class="line"><a name="l00862"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a229770447193d4fd12032b235aab4d28">  862</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a229770447193d4fd12032b235aab4d28">pizza_service_2</a>(data, nickname, m_theta, m_tilt, m_phi, [npolar, nograph, folding, xpdplot])</div><div class="line"><a name="l00863"></a><span class="lineno">  863</span>&#160;    wave data</div><div class="line"><a name="l00864"></a><span class="lineno">  864</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l00865"></a><span class="lineno">  865</span>&#160;    wave m_theta</div><div class="line"><a name="l00866"></a><span class="lineno">  866</span>&#160;    wave m_tilt</div><div class="line"><a name="l00867"></a><span class="lineno">  867</span>&#160;    wave m_phi</div><div class="line"><a name="l00868"></a><span class="lineno">  868</span>&#160;    variable npolar</div><div class="line"><a name="l00869"></a><span class="lineno">  869</span>&#160;    variable nograph</div><div class="line"><a name="l00870"></a><span class="lineno">  870</span>&#160;    variable folding</div><div class="line"><a name="l00871"></a><span class="lineno">  871</span>&#160;    variable xpdplot</div><div class="line"><a name="l00872"></a><span class="lineno">  872</span>&#160;        </div><div class="line"><a name="l00873"></a><span class="lineno">  873</span>&#160;    if (ParamIsDefault(npolar))</div><div class="line"><a name="l00874"></a><span class="lineno">  874</span>&#160;        npolar = 91</div><div class="line"><a name="l00875"></a><span class="lineno">  875</span>&#160;    endif</div><div class="line"><a name="l00876"></a><span class="lineno">  876</span>&#160;    if (ParamIsDefault(nograph))</div><div class="line"><a name="l00877"></a><span class="lineno">  877</span>&#160;        nograph = 0</div><div class="line"><a name="l00878"></a><span class="lineno">  878</span>&#160;    endif</div><div class="line"><a name="l00879"></a><span class="lineno">  879</span>&#160;    if (ParamIsDefault(folding))</div><div class="line"><a name="l00880"></a><span class="lineno">  880</span>&#160;        folding = 1</div><div class="line"><a name="l00881"></a><span class="lineno">  881</span>&#160;    endif</div><div class="line"><a name="l00882"></a><span class="lineno">  882</span>&#160;    if (ParamIsDefault(xpdplot))</div><div class="line"><a name="l00883"></a><span class="lineno">  883</span>&#160;        xpdplot = 0</div><div class="line"><a name="l00884"></a><span class="lineno">  884</span>&#160;    endif</div><div class="line"><a name="l00885"></a><span class="lineno">  885</span>&#160;    </div><div class="line"><a name="l00886"></a><span class="lineno">  886</span>&#160;    if ((dimsize(m_theta, 0) != dimsize(data, 1)) || (dimsize(m_tilt, 0) != dimsize(data, 1)) || (dimsize(m_phi, 0) != dimsize(data, 1)))</div><div class="line"><a name="l00887"></a><span class="lineno">  887</span>&#160;        Abort &quot;Warning: The dimension size of the manipulator waves does not match the Y dimension of the data wave!&quot;</div><div class="line"><a name="l00888"></a><span class="lineno">  888</span>&#160;    endif</div><div class="line"><a name="l00889"></a><span class="lineno">  889</span>&#160;    </div><div class="line"><a name="l00890"></a><span class="lineno">  890</span>&#160;    <span class="keywordtype">string</span> graphname = &quot;graph_&quot; + nickname</div><div class="line"><a name="l00891"></a><span class="lineno">  891</span>&#160;    <span class="keywordtype">string</span> outprefix = nickname</div><div class="line"><a name="l00892"></a><span class="lineno">  892</span>&#160;    </div><div class="line"><a name="l00893"></a><span class="lineno">  893</span>&#160;    <span class="comment">// sort out data folder structure</span></div><div class="line"><a name="l00894"></a><span class="lineno">  894</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l00895"></a><span class="lineno">  895</span>&#160;    dfref dataDF = GetWavesDataFolderDFR(data)</div><div class="line"><a name="l00896"></a><span class="lineno">  896</span>&#160;    setdatafolder dataDF</div><div class="line"><a name="l00897"></a><span class="lineno">  897</span>&#160;</div><div class="line"><a name="l00898"></a><span class="lineno">  898</span>&#160;    if (xpdplot)</div><div class="line"><a name="l00899"></a><span class="lineno">  899</span>&#160;        setdatafolder root:</div><div class="line"><a name="l00900"></a><span class="lineno">  900</span>&#160;        outprefix = nickname</div><div class="line"><a name="l00901"></a><span class="lineno">  901</span>&#160;    else</div><div class="line"><a name="l00902"></a><span class="lineno">  902</span>&#160;        setdatafolder dataDF</div><div class="line"><a name="l00903"></a><span class="lineno">  903</span>&#160;        newdatafolder /s/o $nickname</div><div class="line"><a name="l00904"></a><span class="lineno">  904</span>&#160;        outprefix = &quot;&quot;</div><div class="line"><a name="l00905"></a><span class="lineno">  905</span>&#160;    endif</div><div class="line"><a name="l00906"></a><span class="lineno">  906</span>&#160;    dfref destDF = GetDataFolderDFR()</div><div class="line"><a name="l00907"></a><span class="lineno">  907</span>&#160;    </div><div class="line"><a name="l00908"></a><span class="lineno">  908</span>&#160;    <span class="comment">// performance monitoring</span></div><div class="line"><a name="l00909"></a><span class="lineno">  909</span>&#160;    variable timerRefNum</div><div class="line"><a name="l00910"></a><span class="lineno">  910</span>&#160;    variable /g pol_perf_secs</div><div class="line"><a name="l00911"></a><span class="lineno">  911</span>&#160;    timerRefNum = startMSTimer</div><div class="line"><a name="l00912"></a><span class="lineno">  912</span>&#160;    </div><div class="line"><a name="l00913"></a><span class="lineno">  913</span>&#160;    duplicate /free m_tilt, corr_tilt</div><div class="line"><a name="l00914"></a><span class="lineno">  914</span>&#160;    duplicate /free m_phi, corr_phi</div><div class="line"><a name="l00915"></a><span class="lineno">  915</span>&#160;    corr_tilt = -m_tilt <span class="comment">// checked 140702</span></div><div class="line"><a name="l00916"></a><span class="lineno">  916</span>&#160;    corr_phi = m_phi    <span class="comment">// checked 140702</span></div><div class="line"><a name="l00917"></a><span class="lineno">  917</span>&#160;    </div><div class="line"><a name="l00918"></a><span class="lineno">  918</span>&#160;    make /n=1/d/free d_polar, d_azi</div><div class="line"><a name="l00919"></a><span class="lineno">  919</span>&#160;    </div><div class="line"><a name="l00920"></a><span class="lineno">  920</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a2b38c6c9b6e60593ba69d3773b6bc779">convert_angles_ttpd2polar</a>(m_theta, corr_tilt, corr_phi, data, d_polar, d_azi)</div><div class="line"><a name="l00921"></a><span class="lineno">  921</span>&#160;    d_azi += 180    <span class="comment">// changed 151030 (v1.6)</span></div><div class="line"><a name="l00922"></a><span class="lineno">  922</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a902ac3a24e33f651e83ee03d31707da7">make_hemi_grid</a>(npolar, outprefix, xpdplot=xpdplot)</div><div class="line"><a name="l00923"></a><span class="lineno">  923</span>&#160;    variable ifold</div><div class="line"><a name="l00924"></a><span class="lineno">  924</span>&#160;    for (ifold = 0; ifold &lt; folding; ifold += 1)</div><div class="line"><a name="l00925"></a><span class="lineno">  925</span>&#160;        d_azi = d_azi &gt;= 360 ? d_azi - 360 : d_azi</div><div class="line"><a name="l00926"></a><span class="lineno">  926</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#a4952bc53e3d6d272d25b5e35e91696b5">hemi_add_anglescan</a>(outprefix, data, d_polar, d_azi)</div><div class="line"><a name="l00927"></a><span class="lineno">  927</span>&#160;        d_azi += 360 / folding</div><div class="line"><a name="l00928"></a><span class="lineno">  928</span>&#160;    endfor</div><div class="line"><a name="l00929"></a><span class="lineno">  929</span>&#160;    </div><div class="line"><a name="l00930"></a><span class="lineno">  930</span>&#160;    <span class="comment">// normalize folding</span></div><div class="line"><a name="l00931"></a><span class="lineno">  931</span>&#160;    if (strlen(outprefix))</div><div class="line"><a name="l00932"></a><span class="lineno">  932</span>&#160;        <span class="keywordtype">string</span> s_prefix = outprefix + &quot;_&quot;</div><div class="line"><a name="l00933"></a><span class="lineno">  933</span>&#160;        <span class="keywordtype">string</span> s_int = s_prefix + &quot;i&quot;</div><div class="line"><a name="l00934"></a><span class="lineno">  934</span>&#160;    else</div><div class="line"><a name="l00935"></a><span class="lineno">  935</span>&#160;        s_prefix = &quot;&quot;</div><div class="line"><a name="l00936"></a><span class="lineno">  936</span>&#160;        s_int = &quot;values&quot;</div><div class="line"><a name="l00937"></a><span class="lineno">  937</span>&#160;    endif</div><div class="line"><a name="l00938"></a><span class="lineno">  938</span>&#160;    if (folding &gt; 1)</div><div class="line"><a name="l00939"></a><span class="lineno">  939</span>&#160;        wave values = $s_int</div><div class="line"><a name="l00940"></a><span class="lineno">  940</span>&#160;        values /= folding</div><div class="line"><a name="l00941"></a><span class="lineno">  941</span>&#160;    endif</div><div class="line"><a name="l00942"></a><span class="lineno">  942</span>&#160;    </div><div class="line"><a name="l00943"></a><span class="lineno">  943</span>&#160;    if (!nograph)</div><div class="line"><a name="l00944"></a><span class="lineno">  944</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#ae57302acfc822c4817f2b7eef55efea2">display_hemi_scan</a>(outprefix, graphname = graphname)</div><div class="line"><a name="l00945"></a><span class="lineno">  945</span>&#160;    endif</div><div class="line"><a name="l00946"></a><span class="lineno">  946</span>&#160;    </div><div class="line"><a name="l00947"></a><span class="lineno">  947</span>&#160;    if (timerRefNum &gt;= 0)</div><div class="line"><a name="l00948"></a><span class="lineno">  948</span>&#160;        pol_perf_secs = stopMSTimer(timerRefNum) / 1e6</div><div class="line"><a name="l00949"></a><span class="lineno">  949</span>&#160;    endif</div><div class="line"><a name="l00950"></a><span class="lineno">  950</span>&#160;</div><div class="line"><a name="l00951"></a><span class="lineno">  951</span>&#160;    setdatafolder saveDF</div><div class="line"><a name="l00952"></a><span class="lineno">  952</span>&#160;end</div><div class="line"><a name="l00953"></a><span class="lineno">  953</span>&#160;</div><div class="line"><a name="l00979"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a01bac9e7d4ba743c3c34177a05070466">  979</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a01bac9e7d4ba743c3c34177a05070466">show_analyser_line</a>(theta, tilt, phi, theta_offset, tilt_offset, phi_offset, [npolar, nograph, xpdplot])</div><div class="line"><a name="l00980"></a><span class="lineno">  980</span>&#160;    variable theta</div><div class="line"><a name="l00981"></a><span class="lineno">  981</span>&#160;    variable tilt</div><div class="line"><a name="l00982"></a><span class="lineno">  982</span>&#160;    variable phi</div><div class="line"><a name="l00983"></a><span class="lineno">  983</span>&#160;    variable theta_offset</div><div class="line"><a name="l00984"></a><span class="lineno">  984</span>&#160;    variable tilt_offset</div><div class="line"><a name="l00985"></a><span class="lineno">  985</span>&#160;    variable phi_offset</div><div class="line"><a name="l00986"></a><span class="lineno">  986</span>&#160;    variable npolar</div><div class="line"><a name="l00987"></a><span class="lineno">  987</span>&#160;    variable nograph</div><div class="line"><a name="l00988"></a><span class="lineno">  988</span>&#160;    variable xpdplot</div><div class="line"><a name="l00989"></a><span class="lineno">  989</span>&#160;        </div><div class="line"><a name="l00990"></a><span class="lineno">  990</span>&#160;    <span class="keywordtype">string</span> nickname = &quot;analyser&quot;</div><div class="line"><a name="l00991"></a><span class="lineno">  991</span>&#160;</div><div class="line"><a name="l00992"></a><span class="lineno">  992</span>&#160;    if (ParamIsDefault(npolar))</div><div class="line"><a name="l00993"></a><span class="lineno">  993</span>&#160;        npolar = 91</div><div class="line"><a name="l00994"></a><span class="lineno">  994</span>&#160;    endif</div><div class="line"><a name="l00995"></a><span class="lineno">  995</span>&#160;    if (ParamIsDefault(nograph))</div><div class="line"><a name="l00996"></a><span class="lineno">  996</span>&#160;        nograph = 0</div><div class="line"><a name="l00997"></a><span class="lineno">  997</span>&#160;    endif</div><div class="line"><a name="l00998"></a><span class="lineno">  998</span>&#160;    if (ParamIsDefault(xpdplot))</div><div class="line"><a name="l00999"></a><span class="lineno">  999</span>&#160;        xpdplot = 0</div><div class="line"><a name="l01000"></a><span class="lineno"> 1000</span>&#160;    endif</div><div class="line"><a name="l01001"></a><span class="lineno"> 1001</span>&#160;    <span class="keywordtype">string</span> graphname = &quot;graph_&quot; + nickname</div><div class="line"><a name="l01002"></a><span class="lineno"> 1002</span>&#160;    <span class="keywordtype">string</span> outprefix = nickname</div><div class="line"><a name="l01003"></a><span class="lineno"> 1003</span>&#160;    </div><div class="line"><a name="l01004"></a><span class="lineno"> 1004</span>&#160;    <span class="comment">// sort out data folder structure</span></div><div class="line"><a name="l01005"></a><span class="lineno"> 1005</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l01006"></a><span class="lineno"> 1006</span>&#160;    dfref dataDF = saveDF</div><div class="line"><a name="l01007"></a><span class="lineno"> 1007</span>&#160;    if (xpdplot)</div><div class="line"><a name="l01008"></a><span class="lineno"> 1008</span>&#160;        setdatafolder root:</div><div class="line"><a name="l01009"></a><span class="lineno"> 1009</span>&#160;        outprefix = nickname</div><div class="line"><a name="l01010"></a><span class="lineno"> 1010</span>&#160;    else</div><div class="line"><a name="l01011"></a><span class="lineno"> 1011</span>&#160;        setdatafolder dataDF</div><div class="line"><a name="l01012"></a><span class="lineno"> 1012</span>&#160;        newdatafolder /s/o $nickname</div><div class="line"><a name="l01013"></a><span class="lineno"> 1013</span>&#160;        outprefix = &quot;&quot;</div><div class="line"><a name="l01014"></a><span class="lineno"> 1014</span>&#160;    endif</div><div class="line"><a name="l01015"></a><span class="lineno"> 1015</span>&#160;    dfref destDF = GetDataFolderDFR()</div><div class="line"><a name="l01016"></a><span class="lineno"> 1016</span>&#160;    </div><div class="line"><a name="l01017"></a><span class="lineno"> 1017</span>&#160;    make /n=1 /free m_theta</div><div class="line"><a name="l01018"></a><span class="lineno"> 1018</span>&#160;    make /n=1 /free m_tilt</div><div class="line"><a name="l01019"></a><span class="lineno"> 1019</span>&#160;    make /n=1 /free m_phi</div><div class="line"><a name="l01020"></a><span class="lineno"> 1020</span>&#160;    m_theta = theta - theta_offset</div><div class="line"><a name="l01021"></a><span class="lineno"> 1021</span>&#160;    m_tilt = tilt - tilt_offset</div><div class="line"><a name="l01022"></a><span class="lineno"> 1022</span>&#160;    m_tilt *= -1 <span class="comment">// checked 140702</span></div><div class="line"><a name="l01023"></a><span class="lineno"> 1023</span>&#160;    m_phi = phi - phi_offset</div><div class="line"><a name="l01024"></a><span class="lineno"> 1024</span>&#160;    <span class="comment">//m_phi *= -1 // checked 140702</span></div><div class="line"><a name="l01025"></a><span class="lineno"> 1025</span>&#160;    </div><div class="line"><a name="l01026"></a><span class="lineno"> 1026</span>&#160;    make /n=60 /free data</div><div class="line"><a name="l01027"></a><span class="lineno"> 1027</span>&#160;    setscale /i x -30, 30, data</div><div class="line"><a name="l01028"></a><span class="lineno"> 1028</span>&#160;    data = x</div><div class="line"><a name="l01029"></a><span class="lineno"> 1029</span>&#160;    make /n=1/d/free d_polar, d_azi</div><div class="line"><a name="l01030"></a><span class="lineno"> 1030</span>&#160;    </div><div class="line"><a name="l01031"></a><span class="lineno"> 1031</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a3cc7eddf5c6b0658260cfb32dd2c026d">convert_angles_ttpa2polar</a>(m_theta, m_tilt, m_phi, data, d_polar, d_azi)</div><div class="line"><a name="l01032"></a><span class="lineno"> 1032</span>&#160;    d_azi += 180    <span class="comment">// changed 151030 (v1.6)</span></div><div class="line"><a name="l01033"></a><span class="lineno"> 1033</span>&#160;    d_azi = d_azi &gt;= 360 ? d_azi - 360 : d_azi</div><div class="line"><a name="l01034"></a><span class="lineno"> 1034</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a902ac3a24e33f651e83ee03d31707da7">make_hemi_grid</a>(npolar, outprefix, xpdplot=xpdplot)</div><div class="line"><a name="l01035"></a><span class="lineno"> 1035</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a4952bc53e3d6d272d25b5e35e91696b5">hemi_add_anglescan</a>(outprefix, data, d_polar, d_azi)</div><div class="line"><a name="l01036"></a><span class="lineno"> 1036</span>&#160;    </div><div class="line"><a name="l01037"></a><span class="lineno"> 1037</span>&#160;    if (!nograph)</div><div class="line"><a name="l01038"></a><span class="lineno"> 1038</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#ae57302acfc822c4817f2b7eef55efea2">display_hemi_scan</a>(outprefix, graphname = graphname)</div><div class="line"><a name="l01039"></a><span class="lineno"> 1039</span>&#160;    endif</div><div class="line"><a name="l01040"></a><span class="lineno"> 1040</span>&#160;    </div><div class="line"><a name="l01041"></a><span class="lineno"> 1041</span>&#160;    setdatafolder saveDF</div><div class="line"><a name="l01042"></a><span class="lineno"> 1042</span>&#160;end</div><div class="line"><a name="l01043"></a><span class="lineno"> 1043</span>&#160;</div><div class="line"><a name="l01048"></a><span class="lineno"> 1048</span>&#160;</div><div class="line"><a name="l01049"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a2b38c6c9b6e60593ba69d3773b6bc779"> 1049</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a2b38c6c9b6e60593ba69d3773b6bc779">convert_angles_ttpd2polar</a>(theta, tilt, phi, data, polar, azi)</div><div class="line"><a name="l01050"></a><span class="lineno"> 1050</span>&#160;    wave theta, tilt, phi <span class="comment">// see convert_angles_ttpa2polar</span></div><div class="line"><a name="l01051"></a><span class="lineno"> 1051</span>&#160;    wave data <span class="comment">// in, 1D or 2D</span></div><div class="line"><a name="l01052"></a><span class="lineno"> 1052</span>&#160;        <span class="comment">// X-scale must be set to analyser angle scale</span></div><div class="line"><a name="l01053"></a><span class="lineno"> 1053</span>&#160;    wave polar, azi <span class="comment">// see convert_angles_ttpa2polar</span></div><div class="line"><a name="l01054"></a><span class="lineno"> 1054</span>&#160;    </div><div class="line"><a name="l01055"></a><span class="lineno"> 1055</span>&#160;    make /n=(dimsize(data, 0)) /d /free ana</div><div class="line"><a name="l01056"></a><span class="lineno"> 1056</span>&#160;    setscale /p x dimoffset(data, 0), dimdelta(data, 0), waveunits(data, 0), ana</div><div class="line"><a name="l01057"></a><span class="lineno"> 1057</span>&#160;    ana = x</div><div class="line"><a name="l01058"></a><span class="lineno"> 1058</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a3cc7eddf5c6b0658260cfb32dd2c026d">convert_angles_ttpa2polar</a>(theta, tilt, phi, ana, polar, azi)</div><div class="line"><a name="l01059"></a><span class="lineno"> 1059</span>&#160;end</div><div class="line"><a name="l01060"></a><span class="lineno"> 1060</span>&#160;</div><div class="line"><a name="l01088"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a3cc7eddf5c6b0658260cfb32dd2c026d"> 1088</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a3cc7eddf5c6b0658260cfb32dd2c026d">convert_angles_ttpa2polar</a>(theta, tilt, phi, analyser, polar, azi)</div><div class="line"><a name="l01089"></a><span class="lineno"> 1089</span>&#160;    wave theta</div><div class="line"><a name="l01090"></a><span class="lineno"> 1090</span>&#160;    wave tilt</div><div class="line"><a name="l01091"></a><span class="lineno"> 1091</span>&#160;    wave phi</div><div class="line"><a name="l01092"></a><span class="lineno"> 1092</span>&#160;    wave analyser</div><div class="line"><a name="l01093"></a><span class="lineno"> 1093</span>&#160;    wave polar, azi</div><div class="line"><a name="l01094"></a><span class="lineno"> 1094</span>&#160;        </div><div class="line"><a name="l01095"></a><span class="lineno"> 1095</span>&#160;    variable nn = numpnts(theta)</div><div class="line"><a name="l01096"></a><span class="lineno"> 1096</span>&#160;    variable na = numpnts(analyser)</div><div class="line"><a name="l01097"></a><span class="lineno"> 1097</span>&#160;    redimension /n=(na, nn) polar, azi</div><div class="line"><a name="l01098"></a><span class="lineno"> 1098</span>&#160;</div><div class="line"><a name="l01099"></a><span class="lineno"> 1099</span>&#160;    variable radius = 1 <span class="comment">// don&#39;t need to specify - everything is scalable</span></div><div class="line"><a name="l01100"></a><span class="lineno"> 1100</span>&#160;    </div><div class="line"><a name="l01101"></a><span class="lineno"> 1101</span>&#160;    <span class="comment">// step 1: calculate cartesian detection vectors at normal emission</span></div><div class="line"><a name="l01102"></a><span class="lineno"> 1102</span>&#160;    <span class="comment">// this is simply a polar-cartesian mapping, independent of the manipulator</span></div><div class="line"><a name="l01103"></a><span class="lineno"> 1103</span>&#160;    <span class="comment">// phi=0 is in the polar rotation plane</span></div><div class="line"><a name="l01104"></a><span class="lineno"> 1104</span>&#160;    make /n=(3,na) /d /free w_orig_polar, w_orig_cart, w_rot_cart, w_rot_polar</div><div class="line"><a name="l01105"></a><span class="lineno"> 1105</span>&#160;    w_orig_polar[0][] = radius</div><div class="line"><a name="l01106"></a><span class="lineno"> 1106</span>&#160;    w_orig_polar[1][] = analyser[q]</div><div class="line"><a name="l01107"></a><span class="lineno"> 1107</span>&#160;    w_orig_polar[2][] = 0</div><div class="line"><a name="l01108"></a><span class="lineno"> 1108</span>&#160;    <a class="code" href="pearl-polar-coordinates_8ipf.html#a6a0ffb6b9160413d9694b1fd8e10c858">polar2cart_wave</a>(w_orig_polar, w_orig_cart)</div><div class="line"><a name="l01109"></a><span class="lineno"> 1109</span>&#160;    <span class="comment">// if the angle-dispersive axis was horizontal, we&#39;d need to rotate the detector</span></div><div class="line"><a name="l01110"></a><span class="lineno"> 1110</span>&#160;    <span class="comment">//rotate_z_wave(w_orig_cart, 90)</span></div><div class="line"><a name="l01111"></a><span class="lineno"> 1111</span>&#160;</div><div class="line"><a name="l01112"></a><span class="lineno"> 1112</span>&#160;    variable ii</div><div class="line"><a name="l01113"></a><span class="lineno"> 1113</span>&#160;    for (ii = 0; ii &lt; nn; ii += 1)</div><div class="line"><a name="l01114"></a><span class="lineno"> 1114</span>&#160;        <span class="comment">// step 2: rotate the detection vectors according to the manipulator angles</span></div><div class="line"><a name="l01115"></a><span class="lineno"> 1115</span>&#160;        <span class="comment">// the order of rotations is important because we rotate about fixed axes</span></div><div class="line"><a name="l01116"></a><span class="lineno"> 1116</span>&#160;        <span class="comment">// y-axis = tilt rotation axis</span></div><div class="line"><a name="l01117"></a><span class="lineno"> 1117</span>&#160;        <span class="comment">// x-axis = polar rotation axis</span></div><div class="line"><a name="l01118"></a><span class="lineno"> 1118</span>&#160;        <span class="comment">// z-axis = normal emission = azimuthal rotation axis</span></div><div class="line"><a name="l01119"></a><span class="lineno"> 1119</span>&#160;        w_rot_cart = w_orig_cart</div><div class="line"><a name="l01120"></a><span class="lineno"> 1120</span>&#160;        <a class="code" href="pearl-vector-operations_8ipf.html#adfd1d68e739694982fbd00b76568c1c0">rotate_y_wave</a>(w_rot_cart, -tilt[ii])</div><div class="line"><a name="l01121"></a><span class="lineno"> 1121</span>&#160;        <a class="code" href="pearl-vector-operations_8ipf.html#ada80428496dc748b960bd9c65df7da8b">rotate_x_wave</a>(w_rot_cart, -theta[ii])</div><div class="line"><a name="l01122"></a><span class="lineno"> 1122</span>&#160;        <a class="code" href="pearl-vector-operations_8ipf.html#a0030e927980581d57781ad391f2d872a">rotate_z_wave</a>(w_rot_cart, -phi[ii] - 90)</div><div class="line"><a name="l01123"></a><span class="lineno"> 1123</span>&#160;        <span class="comment">// map the vectors back to the sample coordinate system</span></div><div class="line"><a name="l01124"></a><span class="lineno"> 1124</span>&#160;        <a class="code" href="pearl-polar-coordinates_8ipf.html#adfc1f0b3cddf672b0ccdb6a22b97ba9e">cart2polar_wave</a>(w_rot_cart, w_rot_polar)</div><div class="line"><a name="l01125"></a><span class="lineno"> 1125</span>&#160;        <span class="comment">// copy to output</span></div><div class="line"><a name="l01126"></a><span class="lineno"> 1126</span>&#160;        polar[][ii] = w_rot_polar[1][p]</div><div class="line"><a name="l01127"></a><span class="lineno"> 1127</span>&#160;        azi[][ii] = w_rot_polar[2][p]</div><div class="line"><a name="l01128"></a><span class="lineno"> 1128</span>&#160;    endfor</div><div class="line"><a name="l01129"></a><span class="lineno"> 1129</span>&#160;end</div><div class="line"><a name="l01130"></a><span class="lineno"> 1130</span>&#160;</div><div class="line"><a name="l01131"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#aa54a550eccad2c8ccd82d2b4167f7a92"> 1131</a></span>&#160;static function <a class="code" href="pearl-anglescan-process_8ipf.html#aa54a550eccad2c8ccd82d2b4167f7a92">line_average</a>(source, dest)</div><div class="line"><a name="l01132"></a><span class="lineno"> 1132</span>&#160;    <span class="comment">// is this function used?</span></div><div class="line"><a name="l01133"></a><span class="lineno"> 1133</span>&#160;    wave source</div><div class="line"><a name="l01134"></a><span class="lineno"> 1134</span>&#160;    wave dest</div><div class="line"><a name="l01135"></a><span class="lineno"> 1135</span>&#160;    </div><div class="line"><a name="l01136"></a><span class="lineno"> 1136</span>&#160;    variable ii</div><div class="line"><a name="l01137"></a><span class="lineno"> 1137</span>&#160;    variable nn = dimsize(source, 1)</div><div class="line"><a name="l01138"></a><span class="lineno"> 1138</span>&#160;    make /n=(dimsize(source, 0))/d/free line</div><div class="line"><a name="l01139"></a><span class="lineno"> 1139</span>&#160;    for (ii = 0; ii &lt; nn; ii += 1)</div><div class="line"><a name="l01140"></a><span class="lineno"> 1140</span>&#160;        line = source[p][ii]</div><div class="line"><a name="l01141"></a><span class="lineno"> 1141</span>&#160;        wavestats /q line</div><div class="line"><a name="l01142"></a><span class="lineno"> 1142</span>&#160;        dest[][ii] = line[p] / v_max</div><div class="line"><a name="l01143"></a><span class="lineno"> 1143</span>&#160;    endfor</div><div class="line"><a name="l01144"></a><span class="lineno"> 1144</span>&#160;end</div><div class="line"><a name="l01145"></a><span class="lineno"> 1145</span>&#160;</div><div class="line"><a name="l01149"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a9624070f3e938378631432430d47a389"> 1149</a></span>&#160;static function <a class="code" href="pearl-anglescan-process_8ipf.html#a9624070f3e938378631432430d47a389">calc_nth</a>(Theta_st, Theta_in, th, Phi_ran, Phi_ref, Holomode)</div><div class="line"><a name="l01150"></a><span class="lineno"> 1150</span>&#160;    Variable Theta_st, Theta_in, th, Phi_ran, Phi_ref</div><div class="line"><a name="l01151"></a><span class="lineno"> 1151</span>&#160;       String Holomode</div><div class="line"><a name="l01152"></a><span class="lineno"> 1152</span>&#160;    Variable The_step</div><div class="line"><a name="l01153"></a><span class="lineno"> 1153</span>&#160;    Variable deg2rad=0.01745329</div><div class="line"><a name="l01154"></a><span class="lineno"> 1154</span>&#160;        </div><div class="line"><a name="l01155"></a><span class="lineno"> 1155</span>&#160;    if ( cmpstr(Holomode, &quot;Stereographic&quot;) == 0)</div><div class="line"><a name="l01156"></a><span class="lineno"> 1156</span>&#160;       The_step =trunc( Phi_ran*sin(th*deg2rad)*Phi_ref/Theta_st )</div><div class="line"><a name="l01157"></a><span class="lineno"> 1157</span>&#160;       if(th==90)</div><div class="line"><a name="l01158"></a><span class="lineno"> 1158</span>&#160;        The_step =trunc( Phi_ran*sin(th*pi/180)*Phi_ref/Theta_st )</div><div class="line"><a name="l01159"></a><span class="lineno"> 1159</span>&#160;       endif</div><div class="line"><a name="l01160"></a><span class="lineno"> 1160</span>&#160;    else</div><div class="line"><a name="l01161"></a><span class="lineno"> 1161</span>&#160;        if (cmpstr(Holomode, &quot;Parallel&quot;) == 0)</div><div class="line"><a name="l01162"></a><span class="lineno"> 1162</span>&#160;            The_step=trunc( Phi_ran*tan(th*deg2rad)*Phi_ref/Theta_st )</div><div class="line"><a name="l01163"></a><span class="lineno"> 1163</span>&#160;        else</div><div class="line"><a name="l01164"></a><span class="lineno"> 1164</span>&#160;            if ( cmpstr(Holomode, &quot;h&quot;) == 0)</div><div class="line"><a name="l01165"></a><span class="lineno"> 1165</span>&#160;                    The_step=trunc( th/Theta_in*Phi_ran/Theta_st )</div><div class="line"><a name="l01166"></a><span class="lineno"> 1166</span>&#160;            else</div><div class="line"><a name="l01167"></a><span class="lineno"> 1167</span>&#160;                <span class="comment">//altro</span></div><div class="line"><a name="l01168"></a><span class="lineno"> 1168</span>&#160;            endif</div><div class="line"><a name="l01169"></a><span class="lineno"> 1169</span>&#160;        endif</div><div class="line"><a name="l01170"></a><span class="lineno"> 1170</span>&#160;    endif</div><div class="line"><a name="l01171"></a><span class="lineno"> 1171</span>&#160;    </div><div class="line"><a name="l01172"></a><span class="lineno"> 1172</span>&#160;    return(The_step)</div><div class="line"><a name="l01173"></a><span class="lineno"> 1173</span>&#160;end</div><div class="line"><a name="l01174"></a><span class="lineno"> 1174</span>&#160;</div><div class="line"><a name="l01178"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a999a9cd7d00d3e1ec8e768228a664ad1"> 1178</a></span>&#160;static function <a class="code" href="pearl-anglescan-process_8ipf.html#a999a9cd7d00d3e1ec8e768228a664ad1">calc_phi_step</a>(Theta_in, th, Theta_st, Phi_ran, Phi_ref, Holomode)</div><div class="line"><a name="l01179"></a><span class="lineno"> 1179</span>&#160;    Variable Theta_in, th, Theta_st, Phi_ran, Phi_ref</div><div class="line"><a name="l01180"></a><span class="lineno"> 1180</span>&#160;    String Holomode</div><div class="line"><a name="l01181"></a><span class="lineno"> 1181</span>&#160;    </div><div class="line"><a name="l01182"></a><span class="lineno"> 1182</span>&#160;    Variable Phi_st</div><div class="line"><a name="l01183"></a><span class="lineno"> 1183</span>&#160;    Variable deg2rad=0.01745329</div><div class="line"><a name="l01184"></a><span class="lineno"> 1184</span>&#160;</div><div class="line"><a name="l01185"></a><span class="lineno"> 1185</span>&#160;    if ( cmpstr(Holomode, &quot;Stereographic&quot;) == 0 )</div><div class="line"><a name="l01186"></a><span class="lineno"> 1186</span>&#160;        if ((th &lt; 0.5) || (trunc(Phi_ran*sin(th*deg2rad)*Phi_ref/Theta_st) == 0))</div><div class="line"><a name="l01187"></a><span class="lineno"> 1187</span>&#160;            Phi_st=0.0</div><div class="line"><a name="l01188"></a><span class="lineno"> 1188</span>&#160;        else</div><div class="line"><a name="l01189"></a><span class="lineno"> 1189</span>&#160;            Phi_st=Phi_ran/(trunc(Phi_ran*sin(th*deg2rad)*Phi_ref/Theta_st))</div><div class="line"><a name="l01190"></a><span class="lineno"> 1190</span>&#160;        endif</div><div class="line"><a name="l01191"></a><span class="lineno"> 1191</span>&#160;        if(th==90)</div><div class="line"><a name="l01192"></a><span class="lineno"> 1192</span>&#160;            Phi_st=2.0</div><div class="line"><a name="l01193"></a><span class="lineno"> 1193</span>&#160;        endif</div><div class="line"><a name="l01194"></a><span class="lineno"> 1194</span>&#160;    endif</div><div class="line"><a name="l01195"></a><span class="lineno"> 1195</span>&#160;</div><div class="line"><a name="l01196"></a><span class="lineno"> 1196</span>&#160;    if ( cmpstr(Holomode, &quot;Parallel&quot;) == 0 )</div><div class="line"><a name="l01197"></a><span class="lineno"> 1197</span>&#160;        if((th &lt; 0.5) || (trunc(Phi_ran*tan(th*deg2rad)*Phi_ref/Theta_st) == 0))</div><div class="line"><a name="l01198"></a><span class="lineno"> 1198</span>&#160;            Phi_st=0.0</div><div class="line"><a name="l01199"></a><span class="lineno"> 1199</span>&#160;        else</div><div class="line"><a name="l01200"></a><span class="lineno"> 1200</span>&#160;            Phi_st=Phi_ran/(trunc(Phi_ran*tan(th*deg2rad)*Phi_ref/Theta_st))</div><div class="line"><a name="l01201"></a><span class="lineno"> 1201</span>&#160;        endif</div><div class="line"><a name="l01202"></a><span class="lineno"> 1202</span>&#160;    endif</div><div class="line"><a name="l01203"></a><span class="lineno"> 1203</span>&#160;</div><div class="line"><a name="l01204"></a><span class="lineno"> 1204</span>&#160;    if ( cmpstr(Holomode, &quot;h&quot;) == 0 )</div><div class="line"><a name="l01205"></a><span class="lineno"> 1205</span>&#160;        if((th &lt; 0.5) || (trunc(Phi_ran*sin(th*deg2rad)*Phi_ref/Theta_st) == 0))</div><div class="line"><a name="l01206"></a><span class="lineno"> 1206</span>&#160;            Phi_st=0.0</div><div class="line"><a name="l01207"></a><span class="lineno"> 1207</span>&#160;        else</div><div class="line"><a name="l01208"></a><span class="lineno"> 1208</span>&#160;            Phi_st=Phi_ran/trunc(th/Theta_in*Phi_ran/Theta_st)</div><div class="line"><a name="l01209"></a><span class="lineno"> 1209</span>&#160;        endif</div><div class="line"><a name="l01210"></a><span class="lineno"> 1210</span>&#160;    endif</div><div class="line"><a name="l01211"></a><span class="lineno"> 1211</span>&#160;    </div><div class="line"><a name="l01212"></a><span class="lineno"> 1212</span>&#160;    if (Phi_st==0)</div><div class="line"><a name="l01213"></a><span class="lineno"> 1213</span>&#160;        Phi_st=360</div><div class="line"><a name="l01214"></a><span class="lineno"> 1214</span>&#160;    endif</div><div class="line"><a name="l01215"></a><span class="lineno"> 1215</span>&#160;    </div><div class="line"><a name="l01216"></a><span class="lineno"> 1216</span>&#160;    return(Phi_st)</div><div class="line"><a name="l01217"></a><span class="lineno"> 1217</span>&#160;end</div><div class="line"><a name="l01218"></a><span class="lineno"> 1218</span>&#160;</div><div class="line"><a name="l01222"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a1fb6aa7870dfbf0ed92660b7aae579e0"> 1222</a></span>&#160;static function <a class="code" href="pearl-anglescan-process_8ipf.html#a1fb6aa7870dfbf0ed92660b7aae579e0">Calc_The_step</a>(th, Theta_st, Holomode)</div><div class="line"><a name="l01223"></a><span class="lineno"> 1223</span>&#160;    String Holomode</div><div class="line"><a name="l01224"></a><span class="lineno"> 1224</span>&#160;    Variable th, Theta_st</div><div class="line"><a name="l01225"></a><span class="lineno"> 1225</span>&#160;    </div><div class="line"><a name="l01226"></a><span class="lineno"> 1226</span>&#160;    Variable deg2rad=0.01745329, dt_loc,The_step</div><div class="line"><a name="l01227"></a><span class="lineno"> 1227</span>&#160;</div><div class="line"><a name="l01228"></a><span class="lineno"> 1228</span>&#160;    if ( (cmpstr(Holomode, &quot;Stereographic&quot;)) ==0 )</div><div class="line"><a name="l01229"></a><span class="lineno"> 1229</span>&#160;        The_step=Theta_st </div><div class="line"><a name="l01230"></a><span class="lineno"> 1230</span>&#160;    endif</div><div class="line"><a name="l01231"></a><span class="lineno"> 1231</span>&#160;    </div><div class="line"><a name="l01232"></a><span class="lineno"> 1232</span>&#160;    if ( (cmpstr(Holomode, &quot;h&quot;)) ==0 )</div><div class="line"><a name="l01233"></a><span class="lineno"> 1233</span>&#160;        The_step=Theta_st </div><div class="line"><a name="l01234"></a><span class="lineno"> 1234</span>&#160;    endif</div><div class="line"><a name="l01235"></a><span class="lineno"> 1235</span>&#160; </div><div class="line"><a name="l01236"></a><span class="lineno"> 1236</span>&#160;    if ( cmpstr(Holomode, &quot;Parallel&quot;) == 0 )</div><div class="line"><a name="l01237"></a><span class="lineno"> 1237</span>&#160;        if(th &lt; 89.5)</div><div class="line"><a name="l01238"></a><span class="lineno"> 1238</span>&#160;            dt_loc = Theta_st/cos(th*deg2rad)</div><div class="line"><a name="l01239"></a><span class="lineno"> 1239</span>&#160;            if(dt_loc &gt; 10)</div><div class="line"><a name="l01240"></a><span class="lineno"> 1240</span>&#160;                dt_loc=10</div><div class="line"><a name="l01241"></a><span class="lineno"> 1241</span>&#160;            endif</div><div class="line"><a name="l01242"></a><span class="lineno"> 1242</span>&#160;            The_step=dt_loc</div><div class="line"><a name="l01243"></a><span class="lineno"> 1243</span>&#160;        else</div><div class="line"><a name="l01244"></a><span class="lineno"> 1244</span>&#160;            The_step=10</div><div class="line"><a name="l01245"></a><span class="lineno"> 1245</span>&#160;        endif</div><div class="line"><a name="l01246"></a><span class="lineno"> 1246</span>&#160;    endif</div><div class="line"><a name="l01247"></a><span class="lineno"> 1247</span>&#160;    return(The_step)</div><div class="line"><a name="l01248"></a><span class="lineno"> 1248</span>&#160;end</div><div class="line"><a name="l01249"></a><span class="lineno"> 1249</span>&#160;</div><div class="line"><a name="l01253"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ac0def1ded61f9cd758df0c99f4ff9470"> 1253</a></span>&#160;static function <a class="code" href="pearl-anglescan-process_8ipf.html#ac0def1ded61f9cd758df0c99f4ff9470">CalcN_Theta</a>(HoloMode,Theta_in,Theta_ran,Theta_st)</div><div class="line"><a name="l01254"></a><span class="lineno"> 1254</span>&#160;    String HoloMode</div><div class="line"><a name="l01255"></a><span class="lineno"> 1255</span>&#160;    Variable Theta_in,Theta_ran,Theta_st</div><div class="line"><a name="l01256"></a><span class="lineno"> 1256</span>&#160;    Variable n_theta, aux, aux1,ii</div><div class="line"><a name="l01257"></a><span class="lineno"> 1257</span>&#160;</div><div class="line"><a name="l01258"></a><span class="lineno"> 1258</span>&#160;    aux = Theta_in</div><div class="line"><a name="l01259"></a><span class="lineno"> 1259</span>&#160;    aux1= Theta_in - Theta_ran</div><div class="line"><a name="l01260"></a><span class="lineno"> 1260</span>&#160;    ii = 0</div><div class="line"><a name="l01261"></a><span class="lineno"> 1261</span>&#160;    do</div><div class="line"><a name="l01262"></a><span class="lineno"> 1262</span>&#160;        aux = aux - <a class="code" href="pearl-anglescan-process_8ipf.html#a1fb6aa7870dfbf0ed92660b7aae579e0">Calc_The_step</a>(aux, Theta_st, HoloMode)</div><div class="line"><a name="l01263"></a><span class="lineno"> 1263</span>&#160;        if(aux&lt;=Theta_in-Theta_ran)</div><div class="line"><a name="l01264"></a><span class="lineno"> 1264</span>&#160;            aux=Theta_in-Theta_ran</div><div class="line"><a name="l01265"></a><span class="lineno"> 1265</span>&#160;        endif</div><div class="line"><a name="l01266"></a><span class="lineno"> 1266</span>&#160;        ii = ii+1</div><div class="line"><a name="l01267"></a><span class="lineno"> 1267</span>&#160;    while((aux&gt;aux1)%&amp;(Theta_in-aux&lt;=Theta_ran))                                                                <span class="comment">//</span></div><div class="line"><a name="l01268"></a><span class="lineno"> 1268</span>&#160;    n_theta=ii+1</div><div class="line"><a name="l01269"></a><span class="lineno"> 1269</span>&#160;    Return(n_theta)</div><div class="line"><a name="l01270"></a><span class="lineno"> 1270</span>&#160;end</div><div class="line"><a name="l01271"></a><span class="lineno"> 1271</span>&#160;</div><div class="line"><a name="l01291"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a902ac3a24e33f651e83ee03d31707da7"> 1291</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a902ac3a24e33f651e83ee03d31707da7">make_hemi_grid</a>(npol, nickname, [xpdplot])</div><div class="line"><a name="l01292"></a><span class="lineno"> 1292</span>&#160;    variable npol</div><div class="line"><a name="l01293"></a><span class="lineno"> 1293</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l01294"></a><span class="lineno"> 1294</span>&#160;    variable xpdplot</div><div class="line"><a name="l01295"></a><span class="lineno"> 1295</span>&#160;    </div><div class="line"><a name="l01296"></a><span class="lineno"> 1296</span>&#160;    if (ParamIsDefault(xpdplot))</div><div class="line"><a name="l01297"></a><span class="lineno"> 1297</span>&#160;        xpdplot = 0</div><div class="line"><a name="l01298"></a><span class="lineno"> 1298</span>&#160;    endif</div><div class="line"><a name="l01299"></a><span class="lineno"> 1299</span>&#160;    </div><div class="line"><a name="l01300"></a><span class="lineno"> 1300</span>&#160;    <span class="keywordtype">string</span> HoloMode = &quot;h&quot;</div><div class="line"><a name="l01301"></a><span class="lineno"> 1301</span>&#160;    variable Theta_in = 90</div><div class="line"><a name="l01302"></a><span class="lineno"> 1302</span>&#160;    variable Theta_ran = 90</div><div class="line"><a name="l01303"></a><span class="lineno"> 1303</span>&#160;    variable Theta_st = 90 / (npol - 1)</div><div class="line"><a name="l01304"></a><span class="lineno"> 1304</span>&#160;    variable Phi_ran = 360</div><div class="line"><a name="l01305"></a><span class="lineno"> 1305</span>&#160;    variable Phi_ref = 1</div><div class="line"><a name="l01306"></a><span class="lineno"> 1306</span>&#160;    variable Phi_in = 0</div><div class="line"><a name="l01307"></a><span class="lineno"> 1307</span>&#160;    </div><div class="line"><a name="l01308"></a><span class="lineno"> 1308</span>&#160;    variable n_theta = <a class="code" href="pearl-anglescan-process_8ipf.html#ac0def1ded61f9cd758df0c99f4ff9470">CalcN_Theta</a>(HoloMode, Theta_in, Theta_ran, Theta_st)</div><div class="line"><a name="l01309"></a><span class="lineno"> 1309</span>&#160;</div><div class="line"><a name="l01310"></a><span class="lineno"> 1310</span>&#160;    <span class="comment">// wave names</span></div><div class="line"><a name="l01311"></a><span class="lineno"> 1311</span>&#160;    if (strlen(nickname))</div><div class="line"><a name="l01312"></a><span class="lineno"> 1312</span>&#160;        <span class="keywordtype">string</span> s_prefix = nickname + &quot;_&quot;</div><div class="line"><a name="l01313"></a><span class="lineno"> 1313</span>&#160;        <span class="keywordtype">string</span> s_int = s_prefix + &quot;i&quot;         <span class="comment">// Intensity wave (counts/sec)</span></div><div class="line"><a name="l01314"></a><span class="lineno"> 1314</span>&#160;    else</div><div class="line"><a name="l01315"></a><span class="lineno"> 1315</span>&#160;        s_prefix = &quot;&quot;</div><div class="line"><a name="l01316"></a><span class="lineno"> 1316</span>&#160;        s_int = &quot;values&quot;    <span class="comment">// &quot;i&quot; is not a valid wave name</span></div><div class="line"><a name="l01317"></a><span class="lineno"> 1317</span>&#160;    endif</div><div class="line"><a name="l01318"></a><span class="lineno"> 1318</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;       <span class="comment">// thetas for each int-point of the holo</span></div><div class="line"><a name="l01319"></a><span class="lineno"> 1319</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;        <span class="comment">// phis for each int-point of the holo</span></div><div class="line"><a name="l01320"></a><span class="lineno"> 1320</span>&#160;</div><div class="line"><a name="l01321"></a><span class="lineno"> 1321</span>&#160;    <span class="keywordtype">string</span> s_index = s_prefix + &quot;index&quot;       <span class="comment">// starting index for each theta</span></div><div class="line"><a name="l01322"></a><span class="lineno"> 1322</span>&#160;    <span class="keywordtype">string</span> s_theta = s_prefix + &quot;th&quot;        <span class="comment">// theta values</span></div><div class="line"><a name="l01323"></a><span class="lineno"> 1323</span>&#160;    <span class="keywordtype">string</span> s_dphi = s_prefix + &quot;dphi&quot;        <span class="comment">// delta phis at each theta</span></div><div class="line"><a name="l01324"></a><span class="lineno"> 1324</span>&#160;    <span class="keywordtype">string</span> s_nphis = s_prefix + &quot;nphis&quot;     <span class="comment">// number of phis at each theta</span></div><div class="line"><a name="l01325"></a><span class="lineno"> 1325</span>&#160;</div><div class="line"><a name="l01326"></a><span class="lineno"> 1326</span>&#160;    <span class="keywordtype">string</span> s_HoloData = s_prefix + &quot;data&quot;          <span class="comment">// All holo exp.- parameter information</span></div><div class="line"><a name="l01327"></a><span class="lineno"> 1327</span>&#160;    <span class="keywordtype">string</span> s_HoloInfo = s_prefix + &quot;info&quot;</div><div class="line"><a name="l01328"></a><span class="lineno"> 1328</span>&#160;    </div><div class="line"><a name="l01329"></a><span class="lineno"> 1329</span>&#160;    <span class="comment">// the following two waves are used by the pearl-anglescan procedures but not by XPDplot</span></div><div class="line"><a name="l01330"></a><span class="lineno"> 1330</span>&#160;    <span class="keywordtype">string</span> s_tot = s_prefix + &quot;tot&quot; <span class="comment">// accumulated counts at each point</span></div><div class="line"><a name="l01331"></a><span class="lineno"> 1331</span>&#160;    <span class="keywordtype">string</span> s_weight = s_prefix + &quot;wt&quot;   <span class="comment">// total accumulation time at each point (arb. units)</span></div><div class="line"><a name="l01332"></a><span class="lineno"> 1332</span>&#160;</div><div class="line"><a name="l01333"></a><span class="lineno"> 1333</span>&#160;    make /O/D/n=(n_theta) $s_index /wave=index</div><div class="line"><a name="l01334"></a><span class="lineno"> 1334</span>&#160;    make /O/D/n=(n_theta) $s_theta /wave=theta</div><div class="line"><a name="l01335"></a><span class="lineno"> 1335</span>&#160;    make /O/D/n=(n_theta) $s_dphi /wave=dphi</div><div class="line"><a name="l01336"></a><span class="lineno"> 1336</span>&#160;    make /O/D/n=(n_theta) $s_nphis /wave=nphis</div><div class="line"><a name="l01337"></a><span class="lineno"> 1337</span>&#160;    </div><div class="line"><a name="l01338"></a><span class="lineno"> 1338</span>&#160;    <span class="comment">//---------- calculate phi-step-size for this theta:</span></div><div class="line"><a name="l01339"></a><span class="lineno"> 1339</span>&#160;    variable aux = <a class="code" href="pearl-anglescan-process_8ipf.html#a1fb6aa7870dfbf0ed92660b7aae579e0">Calc_The_step</a>(Theta_in, Theta_st, HoloMode)</div><div class="line"><a name="l01340"></a><span class="lineno"> 1340</span>&#160;    dphi[0] =  <a class="code" href="pearl-anglescan-process_8ipf.html#a999a9cd7d00d3e1ec8e768228a664ad1">calc_phi_step</a>(Theta_in, Theta_in, aux, Phi_ran, Phi_ref, HoloMode)</div><div class="line"><a name="l01341"></a><span class="lineno"> 1341</span>&#160;    Theta[0] = Theta_in</div><div class="line"><a name="l01342"></a><span class="lineno"> 1342</span>&#160;    nphis[0] = <a class="code" href="pearl-anglescan-process_8ipf.html#a9624070f3e938378631432430d47a389">calc_nth</a>(aux, Theta_in, Theta_in, Phi_ran, Phi_ref, HoloMode) </div><div class="line"><a name="l01343"></a><span class="lineno"> 1343</span>&#160;    Index[0] = nphis[0]</div><div class="line"><a name="l01344"></a><span class="lineno"> 1344</span>&#160;    </div><div class="line"><a name="l01345"></a><span class="lineno"> 1345</span>&#160;    <span class="comment">//---------- calculate number of phis, phi-step, and starting-index for each theta:</span></div><div class="line"><a name="l01346"></a><span class="lineno"> 1346</span>&#160;    variable ii = 1</div><div class="line"><a name="l01347"></a><span class="lineno"> 1347</span>&#160;    do</div><div class="line"><a name="l01348"></a><span class="lineno"> 1348</span>&#160;        Theta[ii] = Theta[ii-1] - aux</div><div class="line"><a name="l01349"></a><span class="lineno"> 1349</span>&#160;        if(Theta[ii] &lt;= Theta_in-Theta_ran)</div><div class="line"><a name="l01350"></a><span class="lineno"> 1350</span>&#160;            Theta[ii] = Theta_in-Theta_ran</div><div class="line"><a name="l01351"></a><span class="lineno"> 1351</span>&#160;        endif</div><div class="line"><a name="l01352"></a><span class="lineno"> 1352</span>&#160;        aux =  <a class="code" href="pearl-anglescan-process_8ipf.html#a1fb6aa7870dfbf0ed92660b7aae579e0">Calc_The_step</a>(Theta[ii], Theta_st, HoloMode)</div><div class="line"><a name="l01353"></a><span class="lineno"> 1353</span>&#160;        dphi[ii] = <a class="code" href="pearl-anglescan-process_8ipf.html#a999a9cd7d00d3e1ec8e768228a664ad1">calc_phi_step</a>(Theta_in, Theta[ii],  aux, Phi_ran, Phi_ref, HoloMode)</div><div class="line"><a name="l01354"></a><span class="lineno"> 1354</span>&#160;        nphis[ii] = <a class="code" href="pearl-anglescan-process_8ipf.html#a9624070f3e938378631432430d47a389">calc_nth</a>(aux, Theta_in, Theta[ii], Phi_ran, Phi_ref, HoloMode)</div><div class="line"><a name="l01355"></a><span class="lineno"> 1355</span>&#160;        Index[ii] = Index[ii-1] + nphis[ii]</div><div class="line"><a name="l01356"></a><span class="lineno"> 1356</span>&#160;        ii=ii+1</div><div class="line"><a name="l01357"></a><span class="lineno"> 1357</span>&#160;    while(ii &lt; n_theta)</div><div class="line"><a name="l01358"></a><span class="lineno"> 1358</span>&#160;</div><div class="line"><a name="l01359"></a><span class="lineno"> 1359</span>&#160;    if (Index[n_theta-1]==Index[n_theta-2])</div><div class="line"><a name="l01360"></a><span class="lineno"> 1360</span>&#160;        Index[n_theta-1]=Index[n_theta-2]+1</div><div class="line"><a name="l01361"></a><span class="lineno"> 1361</span>&#160;        nphis[n_theta-1]=1</div><div class="line"><a name="l01362"></a><span class="lineno"> 1362</span>&#160;    endif</div><div class="line"><a name="l01363"></a><span class="lineno"> 1363</span>&#160;</div><div class="line"><a name="l01364"></a><span class="lineno"> 1364</span>&#160;    variable NumPoints = sum(nphis, 0, numpnts(nphis))</div><div class="line"><a name="l01365"></a><span class="lineno"> 1365</span>&#160;    </div><div class="line"><a name="l01366"></a><span class="lineno"> 1366</span>&#160;    <span class="comment">//---------- calculate theta and phi for each data point:</span></div><div class="line"><a name="l01367"></a><span class="lineno"> 1367</span>&#160;    make /O/D/N=(NumPoints) $s_polar /wave=polar, $s_azim /wave=azim</div><div class="line"><a name="l01368"></a><span class="lineno"> 1368</span>&#160;    note azim, &quot;<a class="code" href="pearl-anglescan-tracker_8ipf.html#a4c7a521b8f1a0769c09bfa4a1fca7dab">version</a>=1.6&quot;</div><div class="line"><a name="l01369"></a><span class="lineno"> 1369</span>&#160;    </div><div class="line"><a name="l01370"></a><span class="lineno"> 1370</span>&#160;    ii = 0</div><div class="line"><a name="l01371"></a><span class="lineno"> 1371</span>&#160;    variable StartIndex = 0</div><div class="line"><a name="l01372"></a><span class="lineno"> 1372</span>&#160;    variable EndIndex</div><div class="line"><a name="l01373"></a><span class="lineno"> 1373</span>&#160;    do</div><div class="line"><a name="l01374"></a><span class="lineno"> 1374</span>&#160;        EndIndex=Index[ii]</div><div class="line"><a name="l01375"></a><span class="lineno"> 1375</span>&#160;        Polar[StartIndex, EndIndex-1]=Theta[ii]</div><div class="line"><a name="l01376"></a><span class="lineno"> 1376</span>&#160;        Azim[StartIndex, EndIndex-1]= mod(Phi_ran+(x-StartIndex)*dphi[ii]+Phi_in,Phi_ran)</div><div class="line"><a name="l01377"></a><span class="lineno"> 1377</span>&#160;        ii = ii + 1 </div><div class="line"><a name="l01378"></a><span class="lineno"> 1378</span>&#160;        StartIndex = EndIndex   </div><div class="line"><a name="l01379"></a><span class="lineno"> 1379</span>&#160;    while(ii &lt; n_theta)</div><div class="line"><a name="l01380"></a><span class="lineno"> 1380</span>&#160;</div><div class="line"><a name="l01381"></a><span class="lineno"> 1381</span>&#160;    duplicate /o azim, $s_int /wave=values</div><div class="line"><a name="l01382"></a><span class="lineno"> 1382</span>&#160;    duplicate /o azim, $s_tot /wave=totals</div><div class="line"><a name="l01383"></a><span class="lineno"> 1383</span>&#160;    duplicate /o azim, $s_weight /wave=weights</div><div class="line"><a name="l01384"></a><span class="lineno"> 1384</span>&#160;    values = nan</div><div class="line"><a name="l01385"></a><span class="lineno"> 1385</span>&#160;    totals = 0</div><div class="line"><a name="l01386"></a><span class="lineno"> 1386</span>&#160;    weights = 0</div><div class="line"><a name="l01387"></a><span class="lineno"> 1387</span>&#160;</div><div class="line"><a name="l01388"></a><span class="lineno"> 1388</span>&#160;    <span class="comment">// XPDplot metadata</span></div><div class="line"><a name="l01389"></a><span class="lineno"> 1389</span>&#160;    if (xpdplot)</div><div class="line"><a name="l01390"></a><span class="lineno"> 1390</span>&#160;        <span class="keywordtype">string</span> s_FileName = &quot;&quot;</div><div class="line"><a name="l01391"></a><span class="lineno"> 1391</span>&#160;        <span class="keywordtype">string</span> s_Comment = &quot;created by pearl-anglescan-process.ipf&quot;</div><div class="line"><a name="l01392"></a><span class="lineno"> 1392</span>&#160;        <span class="keywordtype">string</span> s_HoloMode = &quot;Stereographic&quot;</div><div class="line"><a name="l01393"></a><span class="lineno"> 1393</span>&#160;        variable /g gb_SpectraFile = 0</div><div class="line"><a name="l01394"></a><span class="lineno"> 1394</span>&#160;    </div><div class="line"><a name="l01395"></a><span class="lineno"> 1395</span>&#160;        Make/O/D/n=22 $s_HoloData /wave=HoloData</div><div class="line"><a name="l01396"></a><span class="lineno"> 1396</span>&#160;        HoloData[0] = NaN     <span class="comment">// v_StartKE</span></div><div class="line"><a name="l01397"></a><span class="lineno"> 1397</span>&#160;        HoloData[1] = NaN     <span class="comment">// v_StoppKE</span></div><div class="line"><a name="l01398"></a><span class="lineno"> 1398</span>&#160;        HoloData[6] = NumPoints</div><div class="line"><a name="l01399"></a><span class="lineno"> 1399</span>&#160;        HoloData[7] = Theta_in</div><div class="line"><a name="l01400"></a><span class="lineno"> 1400</span>&#160;        HoloData[8] = Theta_ran</div><div class="line"><a name="l01401"></a><span class="lineno"> 1401</span>&#160;        HoloData[9] = Theta_st</div><div class="line"><a name="l01402"></a><span class="lineno"> 1402</span>&#160;        HoloData[11] = Phi_in</div><div class="line"><a name="l01403"></a><span class="lineno"> 1403</span>&#160;        HoloData[12] = Phi_ran</div><div class="line"><a name="l01404"></a><span class="lineno"> 1404</span>&#160;        HoloData[13] = Theta_st</div><div class="line"><a name="l01405"></a><span class="lineno"> 1405</span>&#160;        HoloData[15] = Phi_ref</div><div class="line"><a name="l01406"></a><span class="lineno"> 1406</span>&#160;        HoloData[16] = Phi_ran</div><div class="line"><a name="l01407"></a><span class="lineno"> 1407</span>&#160;        HoloData[17] = 0 <span class="comment">// v_HoloBit (stereographic)</span></div><div class="line"><a name="l01408"></a><span class="lineno"> 1408</span>&#160;</div><div class="line"><a name="l01409"></a><span class="lineno"> 1409</span>&#160;        Make/O/T/n=22 $s_HoloInfo /wave=HoloInfo</div><div class="line"><a name="l01410"></a><span class="lineno"> 1410</span>&#160;        HoloInfo[0] = s_FileName</div><div class="line"><a name="l01411"></a><span class="lineno"> 1411</span>&#160;        HoloInfo[1] = s_Comment</div><div class="line"><a name="l01412"></a><span class="lineno"> 1412</span>&#160;        HoloInfo[10] = s_HoloMode</div><div class="line"><a name="l01413"></a><span class="lineno"> 1413</span>&#160;        HoloInfo[11] = &quot;&quot; <span class="comment">// s_MeasuringMode</span></div><div class="line"><a name="l01414"></a><span class="lineno"> 1414</span>&#160;</div><div class="line"><a name="l01415"></a><span class="lineno"> 1415</span>&#160;        <span class="comment">// notebook for XPDplot</span></div><div class="line"><a name="l01416"></a><span class="lineno"> 1416</span>&#160;        if (WinType(NickName) == 5)</div><div class="line"><a name="l01417"></a><span class="lineno"> 1417</span>&#160;            Notebook $NickName selection={startOfFile, endOfFile}   </div><div class="line"><a name="l01418"></a><span class="lineno"> 1418</span>&#160;            Notebook $NickName text=<span class="stringliteral">&quot;&quot;</span></div><div class="line"><a name="l01419"></a><span class="lineno"> 1419</span>&#160;        <span class="keywordflow">else</span></div><div class="line"><a name="l01420"></a><span class="lineno"> 1420</span>&#160;            NewNotebook /F=0 /K=1 /N=$NickName /W=(5,40,341,260)</div><div class="line"><a name="l01421"></a><span class="lineno"> 1421</span>&#160;            Notebook $NickName defaultTab=140</div><div class="line"><a name="l01422"></a><span class="lineno"> 1422</span>&#160;            Notebook $NickName statusWidth=300</div><div class="line"><a name="l01423"></a><span class="lineno"> 1423</span>&#160;            Notebook $NickName backRGB=(56797,56797,56797)</div><div class="line"><a name="l01424"></a><span class="lineno"> 1424</span>&#160;            Notebook $NickName pageMargins={80,80,80,80}</div><div class="line"><a name="l01425"></a><span class="lineno"> 1425</span>&#160;            Notebook $NickName fSize=10</div><div class="line"><a name="l01426"></a><span class="lineno"> 1426</span>&#160;            Notebook $NickName fStyle=0,textRGB=(65535,0,26214) </div><div class="line"><a name="l01427"></a><span class="lineno"> 1427</span>&#160;            Notebook $NickName textRGB=(65535,0,26214) </div><div class="line"><a name="l01428"></a><span class="lineno"> 1428</span>&#160;        endif</div><div class="line"><a name="l01429"></a><span class="lineno"> 1429</span>&#160;        Notebook $NickName text = <span class="stringliteral">&quot;File:\t&quot;</span> + s_FileName + <span class="stringliteral">&quot;\r&quot;</span></div><div class="line"><a name="l01430"></a><span class="lineno"> 1430</span>&#160;        Notebook $NickName text = <span class="stringliteral">&quot;*** &quot;</span> + s_Comment + <span class="stringliteral">&quot; ***\r\r&quot;</span></div><div class="line"><a name="l01431"></a><span class="lineno"> 1431</span>&#160;        Notebook $NickName text = <span class="stringliteral">&quot;Angle-Mode:\t&quot;</span> + s_HoloMode + <span class="stringliteral">&quot;\r&quot;</span></div><div class="line"><a name="l01432"></a><span class="lineno"> 1432</span>&#160;        Notebook $NickName text = <span class="stringliteral">&quot;XPDplot Nickname:\t&quot;</span> + NickName + <span class="stringliteral">&quot;\r&quot;</span></div><div class="line"><a name="l01433"></a><span class="lineno"> 1433</span>&#160;    endif</div><div class="line"><a name="l01434"></a><span class="lineno"> 1434</span>&#160;end</div><div class="line"><a name="l01435"></a><span class="lineno"> 1435</span>&#160;</div><div class="line"><a name="l01442"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a987811346894d8d81fc590b2f5ccec49"> 1442</a></span>&#160;<span class="keyword">function</span> /s <a class="code" href="pearl-anglescan-process_8ipf.html#a987811346894d8d81fc590b2f5ccec49">get_hemi_nickname</a>(w)</div><div class="line"><a name="l01443"></a><span class="lineno"> 1443</span>&#160;    wave w</div><div class="line"><a name="l01444"></a><span class="lineno"> 1444</span>&#160;    </div><div class="line"><a name="l01445"></a><span class="lineno"> 1445</span>&#160;    <span class="keywordtype">string</span> prefix = <a class="code" href="pearl-anglescan-process_8ipf.html#a1442bc23122d52ba9c77e0f9baaad1da">get_hemi_prefix</a>(w)</div><div class="line"><a name="l01446"></a><span class="lineno"> 1446</span>&#160;    <span class="keywordtype">string</span> wname = nameofwave(w)</div><div class="line"><a name="l01447"></a><span class="lineno"> 1447</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l01448"></a><span class="lineno"> 1448</span>&#160;    </div><div class="line"><a name="l01449"></a><span class="lineno"> 1449</span>&#160;    <span class="keywordflow">if</span> (strlen(prefix))</div><div class="line"><a name="l01450"></a><span class="lineno"> 1450</span>&#160;        nickname = prefix</div><div class="line"><a name="l01451"></a><span class="lineno"> 1451</span>&#160;    <span class="keywordflow">else</span></div><div class="line"><a name="l01452"></a><span class="lineno"> 1452</span>&#160;        <span class="keywordtype">string</span> s_wave_df = GetWavesDataFolder(w, 1)</div><div class="line"><a name="l01453"></a><span class="lineno"> 1453</span>&#160;        dfref   parent_df = $(s_wave_df + &quot;::&quot;)</div><div class="line"><a name="l01454"></a><span class="lineno"> 1454</span>&#160;        nickname = GetDataFolder(0, parent_df)</div><div class="line"><a name="l01455"></a><span class="lineno"> 1455</span>&#160;    endif</div><div class="line"><a name="l01456"></a><span class="lineno"> 1456</span>&#160;    </div><div class="line"><a name="l01457"></a><span class="lineno"> 1457</span>&#160;    return nickname</div><div class="line"><a name="l01458"></a><span class="lineno"> 1458</span>&#160;end</div><div class="line"><a name="l01459"></a><span class="lineno"> 1459</span>&#160;</div><div class="line"><a name="l01467"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a1442bc23122d52ba9c77e0f9baaad1da"> 1467</a></span>&#160;function /s <a class="code" href="pearl-anglescan-process_8ipf.html#a1442bc23122d52ba9c77e0f9baaad1da">get_hemi_prefix</a>(w)</div><div class="line"><a name="l01468"></a><span class="lineno"> 1468</span>&#160;    wave w</div><div class="line"><a name="l01469"></a><span class="lineno"> 1469</span>&#160;</div><div class="line"><a name="l01470"></a><span class="lineno"> 1470</span>&#160;    <span class="keywordtype">string</span> wname = nameofwave(w)</div><div class="line"><a name="l01471"></a><span class="lineno"> 1471</span>&#160;    <span class="keywordtype">string</span> prefix</div><div class="line"><a name="l01472"></a><span class="lineno"> 1472</span>&#160;    if (ItemsInList(wname, &quot;_&quot;) &gt;= 2)</div><div class="line"><a name="l01473"></a><span class="lineno"> 1473</span>&#160;        prefix = StringFromList(0, wname, &quot;_&quot;)</div><div class="line"><a name="l01474"></a><span class="lineno"> 1474</span>&#160;    else</div><div class="line"><a name="l01475"></a><span class="lineno"> 1475</span>&#160;        prefix = &quot;&quot;</div><div class="line"><a name="l01476"></a><span class="lineno"> 1476</span>&#160;    endif</div><div class="line"><a name="l01477"></a><span class="lineno"> 1477</span>&#160;    </div><div class="line"><a name="l01478"></a><span class="lineno"> 1478</span>&#160;    return prefix</div><div class="line"><a name="l01479"></a><span class="lineno"> 1479</span>&#160;end</div><div class="line"><a name="l01480"></a><span class="lineno"> 1480</span>&#160;</div><div class="line"><a name="l01498"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d"> 1498</a></span>&#160;function /df <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, prefix, intwave)</div><div class="line"><a name="l01499"></a><span class="lineno"> 1499</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l01500"></a><span class="lineno"> 1500</span>&#160;    <span class="keywordtype">string</span> &amp;prefix</div><div class="line"><a name="l01501"></a><span class="lineno"> 1501</span>&#160;    <span class="keywordtype">string</span> &amp;intwave</div><div class="line"><a name="l01502"></a><span class="lineno"> 1502</span>&#160;</div><div class="line"><a name="l01503"></a><span class="lineno"> 1503</span>&#160;    dfref datadf</div><div class="line"><a name="l01504"></a><span class="lineno"> 1504</span>&#160;    prefix = &quot;&quot;</div><div class="line"><a name="l01505"></a><span class="lineno"> 1505</span>&#160;    intwave = &quot;values&quot;</div><div class="line"><a name="l01506"></a><span class="lineno"> 1506</span>&#160;    if (strlen(nickname))</div><div class="line"><a name="l01507"></a><span class="lineno"> 1507</span>&#160;        if (DataFolderExists(nickname))</div><div class="line"><a name="l01508"></a><span class="lineno"> 1508</span>&#160;            datadf = $nickname</div><div class="line"><a name="l01509"></a><span class="lineno"> 1509</span>&#160;        else</div><div class="line"><a name="l01510"></a><span class="lineno"> 1510</span>&#160;            datadf = getdatafolderdfr()</div><div class="line"><a name="l01511"></a><span class="lineno"> 1511</span>&#160;            prefix = nickname + &quot;_&quot;</div><div class="line"><a name="l01512"></a><span class="lineno"> 1512</span>&#160;            intwave = prefix + &quot;i&quot;</div><div class="line"><a name="l01513"></a><span class="lineno"> 1513</span>&#160;            if (exists(intwave) != 1)</div><div class="line"><a name="l01514"></a><span class="lineno"> 1514</span>&#160;                datadf = root:</div><div class="line"><a name="l01515"></a><span class="lineno"> 1515</span>&#160;            endif</div><div class="line"><a name="l01516"></a><span class="lineno"> 1516</span>&#160;        endif</div><div class="line"><a name="l01517"></a><span class="lineno"> 1517</span>&#160;    else</div><div class="line"><a name="l01518"></a><span class="lineno"> 1518</span>&#160;        datadf = getdatafolderdfr()</div><div class="line"><a name="l01519"></a><span class="lineno"> 1519</span>&#160;        prefix = &quot;&quot;</div><div class="line"><a name="l01520"></a><span class="lineno"> 1520</span>&#160;        intwave = &quot;values&quot;</div><div class="line"><a name="l01521"></a><span class="lineno"> 1521</span>&#160;    endif</div><div class="line"><a name="l01522"></a><span class="lineno"> 1522</span>&#160;    return datadf</div><div class="line"><a name="l01523"></a><span class="lineno"> 1523</span>&#160;end</div><div class="line"><a name="l01524"></a><span class="lineno"> 1524</span>&#160;</div><div class="line"><a name="l01532"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a3ec6935a5903d0974c93a2072d743013"> 1532</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a3ec6935a5903d0974c93a2072d743013">clear_hemi_grid</a>(nickname)</div><div class="line"><a name="l01533"></a><span class="lineno"> 1533</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l01534"></a><span class="lineno"> 1534</span>&#160;</div><div class="line"><a name="l01535"></a><span class="lineno"> 1535</span>&#160;    dfref datadf</div><div class="line"><a name="l01536"></a><span class="lineno"> 1536</span>&#160;    <span class="keywordtype">string</span> s_prefix</div><div class="line"><a name="l01537"></a><span class="lineno"> 1537</span>&#160;    <span class="keywordtype">string</span> s_int</div><div class="line"><a name="l01538"></a><span class="lineno"> 1538</span>&#160;    datadf = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l01539"></a><span class="lineno"> 1539</span>&#160;</div><div class="line"><a name="l01540"></a><span class="lineno"> 1540</span>&#160;    <span class="keywordtype">string</span> s_totals = s_prefix + &quot;tot&quot;</div><div class="line"><a name="l01541"></a><span class="lineno"> 1541</span>&#160;    <span class="keywordtype">string</span> s_weights = s_prefix + &quot;wt&quot;</div><div class="line"><a name="l01542"></a><span class="lineno"> 1542</span>&#160;    </div><div class="line"><a name="l01543"></a><span class="lineno"> 1543</span>&#160;    wave /sdfr=datadf /z w_values = $s_int</div><div class="line"><a name="l01544"></a><span class="lineno"> 1544</span>&#160;    wave /sdfr=datadf /z w_totals = $s_totals</div><div class="line"><a name="l01545"></a><span class="lineno"> 1545</span>&#160;    wave /sdfr=datadf /z w_weights = $s_weights</div><div class="line"><a name="l01546"></a><span class="lineno"> 1546</span>&#160;</div><div class="line"><a name="l01547"></a><span class="lineno"> 1547</span>&#160;    if (waveexists(w_totals))</div><div class="line"><a name="l01548"></a><span class="lineno"> 1548</span>&#160;        w_totals = 0</div><div class="line"><a name="l01549"></a><span class="lineno"> 1549</span>&#160;    endif</div><div class="line"><a name="l01550"></a><span class="lineno"> 1550</span>&#160;    if (waveexists(w_weights))</div><div class="line"><a name="l01551"></a><span class="lineno"> 1551</span>&#160;        w_weights = 0</div><div class="line"><a name="l01552"></a><span class="lineno"> 1552</span>&#160;    endif</div><div class="line"><a name="l01553"></a><span class="lineno"> 1553</span>&#160;    if (waveexists(w_values))</div><div class="line"><a name="l01554"></a><span class="lineno"> 1554</span>&#160;        w_values = nan  </div><div class="line"><a name="l01555"></a><span class="lineno"> 1555</span>&#160;    endif</div><div class="line"><a name="l01556"></a><span class="lineno"> 1556</span>&#160;end</div><div class="line"><a name="l01557"></a><span class="lineno"> 1557</span>&#160;</div><div class="line"><a name="l01579"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#aa5b1e2ab1dd43a73b7157406b803887e"> 1579</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#aa5b1e2ab1dd43a73b7157406b803887e">duplicate_hemi_scan</a>(source_nickname, dest_folder, dest_nickname, [xpdplot])</div><div class="line"><a name="l01580"></a><span class="lineno"> 1580</span>&#160;    <span class="keywordtype">string</span> source_nickname</div><div class="line"><a name="l01581"></a><span class="lineno"> 1581</span>&#160;    dfref dest_folder</div><div class="line"><a name="l01582"></a><span class="lineno"> 1582</span>&#160;    <span class="keywordtype">string</span> dest_nickname</div><div class="line"><a name="l01583"></a><span class="lineno"> 1583</span>&#160;    variable xpdplot</div><div class="line"><a name="l01584"></a><span class="lineno"> 1584</span>&#160;    </div><div class="line"><a name="l01585"></a><span class="lineno"> 1585</span>&#160;    if (ParamIsDefault(xpdplot))</div><div class="line"><a name="l01586"></a><span class="lineno"> 1586</span>&#160;        xpdplot = 0</div><div class="line"><a name="l01587"></a><span class="lineno"> 1587</span>&#160;    endif</div><div class="line"><a name="l01588"></a><span class="lineno"> 1588</span>&#160;    </div><div class="line"><a name="l01589"></a><span class="lineno"> 1589</span>&#160;    dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l01590"></a><span class="lineno"> 1590</span>&#160;</div><div class="line"><a name="l01591"></a><span class="lineno"> 1591</span>&#160;    <span class="comment">// source data</span></div><div class="line"><a name="l01592"></a><span class="lineno"> 1592</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l01593"></a><span class="lineno"> 1593</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l01594"></a><span class="lineno"> 1594</span>&#160;    dfref source_df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(source_nickname, s_prefix, s_int)</div><div class="line"><a name="l01595"></a><span class="lineno"> 1595</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l01596"></a><span class="lineno"> 1596</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l01597"></a><span class="lineno"> 1597</span>&#160;    <span class="keywordtype">string</span> s_theta = s_prefix + &quot;th&quot;</div><div class="line"><a name="l01598"></a><span class="lineno"> 1598</span>&#160;    <span class="keywordtype">string</span> s_tot = s_prefix + &quot;tot&quot;</div><div class="line"><a name="l01599"></a><span class="lineno"> 1599</span>&#160;    <span class="keywordtype">string</span> s_weight = s_prefix + &quot;wt&quot;</div><div class="line"><a name="l01600"></a><span class="lineno"> 1600</span>&#160;    <span class="keywordtype">string</span> s_matrix = s_prefix + &quot;matrix&quot;</div><div class="line"><a name="l01601"></a><span class="lineno"> 1601</span>&#160;</div><div class="line"><a name="l01602"></a><span class="lineno"> 1602</span>&#160;    wave /sdfr=source_df theta1 = $s_theta</div><div class="line"><a name="l01603"></a><span class="lineno"> 1603</span>&#160;    wave /sdfr=source_df polar1 = $s_polar</div><div class="line"><a name="l01604"></a><span class="lineno"> 1604</span>&#160;    wave /sdfr=source_df azim1 = $s_azim</div><div class="line"><a name="l01605"></a><span class="lineno"> 1605</span>&#160;    wave /sdfr=source_df tot1 = $s_tot</div><div class="line"><a name="l01606"></a><span class="lineno"> 1606</span>&#160;    wave /sdfr=source_df weight1 = $s_weight</div><div class="line"><a name="l01607"></a><span class="lineno"> 1607</span>&#160;    wave /sdfr=source_df values1 = $s_int</div><div class="line"><a name="l01608"></a><span class="lineno"> 1608</span>&#160;    wave /sdfr=source_df /z matrix1 = $s_matrix</div><div class="line"><a name="l01609"></a><span class="lineno"> 1609</span>&#160;    </div><div class="line"><a name="l01610"></a><span class="lineno"> 1610</span>&#160;    variable npol = numpnts(theta1)</div><div class="line"><a name="l01611"></a><span class="lineno"> 1611</span>&#160;    </div><div class="line"><a name="l01612"></a><span class="lineno"> 1612</span>&#160;    setdatafolder dest_folder</div><div class="line"><a name="l01613"></a><span class="lineno"> 1613</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a902ac3a24e33f651e83ee03d31707da7">make_hemi_grid</a>(npol, dest_nickname, xpdplot=xpdplot)</div><div class="line"><a name="l01614"></a><span class="lineno"> 1614</span>&#160;    </div><div class="line"><a name="l01615"></a><span class="lineno"> 1615</span>&#160;    <span class="comment">// dest data</span></div><div class="line"><a name="l01616"></a><span class="lineno"> 1616</span>&#160;    dfref dest_df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(dest_nickname, s_prefix, s_int)</div><div class="line"><a name="l01617"></a><span class="lineno"> 1617</span>&#160;    s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l01618"></a><span class="lineno"> 1618</span>&#160;    s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l01619"></a><span class="lineno"> 1619</span>&#160;    s_theta = s_prefix + &quot;th&quot;</div><div class="line"><a name="l01620"></a><span class="lineno"> 1620</span>&#160;    s_tot = s_prefix + &quot;tot&quot;</div><div class="line"><a name="l01621"></a><span class="lineno"> 1621</span>&#160;    s_weight = s_prefix + &quot;wt&quot;</div><div class="line"><a name="l01622"></a><span class="lineno"> 1622</span>&#160;    s_matrix = s_prefix + &quot;matrix&quot;</div><div class="line"><a name="l01623"></a><span class="lineno"> 1623</span>&#160;</div><div class="line"><a name="l01624"></a><span class="lineno"> 1624</span>&#160;    wave /sdfr=dest_df theta2 = $s_theta</div><div class="line"><a name="l01625"></a><span class="lineno"> 1625</span>&#160;    wave /sdfr=dest_df polar2 = $s_polar</div><div class="line"><a name="l01626"></a><span class="lineno"> 1626</span>&#160;    wave /sdfr=dest_df azim2 = $s_azim</div><div class="line"><a name="l01627"></a><span class="lineno"> 1627</span>&#160;    wave /sdfr=dest_df tot2 = $s_tot</div><div class="line"><a name="l01628"></a><span class="lineno"> 1628</span>&#160;    wave /sdfr=dest_df weight2 = $s_weight</div><div class="line"><a name="l01629"></a><span class="lineno"> 1629</span>&#160;    wave /sdfr=dest_df values2 = $s_int</div><div class="line"><a name="l01630"></a><span class="lineno"> 1630</span>&#160;</div><div class="line"><a name="l01631"></a><span class="lineno"> 1631</span>&#160;    tot2 = tot1</div><div class="line"><a name="l01632"></a><span class="lineno"> 1632</span>&#160;    weight2 = weight1</div><div class="line"><a name="l01633"></a><span class="lineno"> 1633</span>&#160;    values2 = values1</div><div class="line"><a name="l01634"></a><span class="lineno"> 1634</span>&#160;    if (waveexists(matrix1))</div><div class="line"><a name="l01635"></a><span class="lineno"> 1635</span>&#160;        setdatafolder dest_df</div><div class="line"><a name="l01636"></a><span class="lineno"> 1636</span>&#160;        duplicate /o matrix1, $s_matrix</div><div class="line"><a name="l01637"></a><span class="lineno"> 1637</span>&#160;    endif</div><div class="line"><a name="l01638"></a><span class="lineno"> 1638</span>&#160;    </div><div class="line"><a name="l01639"></a><span class="lineno"> 1639</span>&#160;    if (!(NumberByKey(&quot;<a class="code" href="pearl-anglescan-tracker_8ipf.html#a4c7a521b8f1a0769c09bfa4a1fca7dab">version</a>&quot;, note(azim1), &quot;=&quot;, &quot;\r&quot;) &gt;= 1.6))</div><div class="line"><a name="l01640"></a><span class="lineno"> 1640</span>&#160;        azim2 += 180    <span class="comment">// changed 151030 (v1.6)</span></div><div class="line"><a name="l01641"></a><span class="lineno"> 1641</span>&#160;        azim2 = azim2 &gt;= 360 ? azim2 - 360 : azim2</div><div class="line"><a name="l01642"></a><span class="lineno"> 1642</span>&#160;    endif</div><div class="line"><a name="l01643"></a><span class="lineno"> 1643</span>&#160;    </div><div class="line"><a name="l01644"></a><span class="lineno"> 1644</span>&#160;    setdatafolder saveDF</div><div class="line"><a name="l01645"></a><span class="lineno"> 1645</span>&#160;end</div><div class="line"><a name="l01646"></a><span class="lineno"> 1646</span>&#160;</div><div class="line"><a name="l01654"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a5162488b366e217195d8f8bd7cdde0ce"> 1654</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a5162488b366e217195d8f8bd7cdde0ce">rotate_hemi_scan</a>(nickname, angle)</div><div class="line"><a name="l01655"></a><span class="lineno"> 1655</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l01656"></a><span class="lineno"> 1656</span>&#160;    variable angle</div><div class="line"><a name="l01657"></a><span class="lineno"> 1657</span>&#160;    </div><div class="line"><a name="l01658"></a><span class="lineno"> 1658</span>&#160;    dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l01659"></a><span class="lineno"> 1659</span>&#160;</div><div class="line"><a name="l01660"></a><span class="lineno"> 1660</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l01661"></a><span class="lineno"> 1661</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l01662"></a><span class="lineno"> 1662</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l01663"></a><span class="lineno"> 1663</span>&#160;</div><div class="line"><a name="l01664"></a><span class="lineno"> 1664</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l01665"></a><span class="lineno"> 1665</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l01666"></a><span class="lineno"> 1666</span>&#160;    <span class="keywordtype">string</span> s_tot = s_prefix + &quot;tot&quot;</div><div class="line"><a name="l01667"></a><span class="lineno"> 1667</span>&#160;    <span class="keywordtype">string</span> s_weight = s_prefix + &quot;wt&quot;</div><div class="line"><a name="l01668"></a><span class="lineno"> 1668</span>&#160;    </div><div class="line"><a name="l01669"></a><span class="lineno"> 1669</span>&#160;    wave /sdfr=df polar = $s_polar</div><div class="line"><a name="l01670"></a><span class="lineno"> 1670</span>&#160;    wave /sdfr=df azim = $s_azim</div><div class="line"><a name="l01671"></a><span class="lineno"> 1671</span>&#160;    wave /sdfr=df tot = $s_tot</div><div class="line"><a name="l01672"></a><span class="lineno"> 1672</span>&#160;    wave /sdfr=df weight = $s_weight</div><div class="line"><a name="l01673"></a><span class="lineno"> 1673</span>&#160;    wave /sdfr=df values = $s_int</div><div class="line"><a name="l01674"></a><span class="lineno"> 1674</span>&#160;</div><div class="line"><a name="l01675"></a><span class="lineno"> 1675</span>&#160;    azim += angle</div><div class="line"><a name="l01676"></a><span class="lineno"> 1676</span>&#160;    azim = azim &lt; 0 ? azim + 360 : azim</div><div class="line"><a name="l01677"></a><span class="lineno"> 1677</span>&#160;    azim = azim &gt;= 360 ? azim - 360 : azim</div><div class="line"><a name="l01678"></a><span class="lineno"> 1678</span>&#160;</div><div class="line"><a name="l01679"></a><span class="lineno"> 1679</span>&#160;    duplicate /free polar, neg_polar</div><div class="line"><a name="l01680"></a><span class="lineno"> 1680</span>&#160;    neg_polar = -polar</div><div class="line"><a name="l01681"></a><span class="lineno"> 1681</span>&#160;    sort {neg_polar, azim}, polar, azim, tot, weight, values</div><div class="line"><a name="l01682"></a><span class="lineno"> 1682</span>&#160;    </div><div class="line"><a name="l01683"></a><span class="lineno"> 1683</span>&#160;    setdatafolder saveDF</div><div class="line"><a name="l01684"></a><span class="lineno"> 1684</span>&#160;end</div><div class="line"><a name="l01685"></a><span class="lineno"> 1685</span>&#160;</div><div class="line"><a name="l01702"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ac15ebd5a19c558dde666ab36aeb9906f"> 1702</a></span>&#160;<span class="keyword">function</span> /s <a class="code" href="pearl-anglescan-process_8ipf.html#ac15ebd5a19c558dde666ab36aeb9906f">prepare_hemi_scan_display</a>(nickname, [projection])</div><div class="line"><a name="l01703"></a><span class="lineno"> 1703</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l01704"></a><span class="lineno"> 1704</span>&#160;    variable projection</div><div class="line"><a name="l01705"></a><span class="lineno"> 1705</span>&#160;    </div><div class="line"><a name="l01706"></a><span class="lineno"> 1706</span>&#160;    dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l01707"></a><span class="lineno"> 1707</span>&#160;</div><div class="line"><a name="l01708"></a><span class="lineno"> 1708</span>&#160;    if (ParamIsDefault(projection))</div><div class="line"><a name="l01709"></a><span class="lineno"> 1709</span>&#160;        projection = 1</div><div class="line"><a name="l01710"></a><span class="lineno"> 1710</span>&#160;    endif</div><div class="line"><a name="l01711"></a><span class="lineno"> 1711</span>&#160;    </div><div class="line"><a name="l01712"></a><span class="lineno"> 1712</span>&#160;    <span class="comment">// hemi grid waves</span></div><div class="line"><a name="l01713"></a><span class="lineno"> 1713</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l01714"></a><span class="lineno"> 1714</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l01715"></a><span class="lineno"> 1715</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l01716"></a><span class="lineno"> 1716</span>&#160;</div><div class="line"><a name="l01717"></a><span class="lineno"> 1717</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l01718"></a><span class="lineno"> 1718</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l01719"></a><span class="lineno"> 1719</span>&#160;    </div><div class="line"><a name="l01720"></a><span class="lineno"> 1720</span>&#160;    wave /sdfr=df /z values = $s_int</div><div class="line"><a name="l01721"></a><span class="lineno"> 1721</span>&#160;    wave /sdfr=df /z azim = $s_azim</div><div class="line"><a name="l01722"></a><span class="lineno"> 1722</span>&#160;    wave /sdfr=df /z polar = $s_polar</div><div class="line"><a name="l01723"></a><span class="lineno"> 1723</span>&#160;</div><div class="line"><a name="l01724"></a><span class="lineno"> 1724</span>&#160;    setdatafolder df</div><div class="line"><a name="l01725"></a><span class="lineno"> 1725</span>&#160;    <span class="keywordtype">string</span> s_ster_rad = s_prefix + &quot;ster_rad&quot;</div><div class="line"><a name="l01726"></a><span class="lineno"> 1726</span>&#160;    duplicate /o polar, $s_ster_rad /wave=ster_rad</div><div class="line"><a name="l01727"></a><span class="lineno"> 1727</span>&#160;    ster_rad = <a class="code" href="pearl-anglescan-process_8ipf.html#a75219b38ea58012abcffc848d536faa4">calc_graph_radius</a>(polar, projection=projection)</div><div class="line"><a name="l01728"></a><span class="lineno"> 1728</span>&#160;    </div><div class="line"><a name="l01729"></a><span class="lineno"> 1729</span>&#160;    <span class="keywordtype">string</span> s_ster_x = s_prefix + &quot;ster_x&quot;</div><div class="line"><a name="l01730"></a><span class="lineno"> 1730</span>&#160;    <span class="keywordtype">string</span> s_ster_y = s_prefix + &quot;ster_y&quot;</div><div class="line"><a name="l01731"></a><span class="lineno"> 1731</span>&#160;    duplicate /o azim, $s_ster_x /wave=ster_x, $s_ster_y /wave=ster_y</div><div class="line"><a name="l01732"></a><span class="lineno"> 1732</span>&#160;    ster_x = ster_rad * cos(azim * pi / 180)</div><div class="line"><a name="l01733"></a><span class="lineno"> 1733</span>&#160;    ster_y = ster_rad * sin(azim * pi / 180)</div><div class="line"><a name="l01734"></a><span class="lineno"> 1734</span>&#160;</div><div class="line"><a name="l01735"></a><span class="lineno"> 1735</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l01736"></a><span class="lineno"> 1736</span>&#160;end</div><div class="line"><a name="l01737"></a><span class="lineno"> 1737</span>&#160;</div><div class="line"><a name="l01784"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ae57302acfc822c4817f2b7eef55efea2"> 1784</a></span>&#160;function /s <a class="code" href="pearl-anglescan-process_8ipf.html#ae57302acfc822c4817f2b7eef55efea2">display_hemi_scan</a>(nickname, [projection, graphtype, do_ticks, do_grids, graphname])</div><div class="line"><a name="l01785"></a><span class="lineno"> 1785</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l01786"></a><span class="lineno"> 1786</span>&#160;    variable projection</div><div class="line"><a name="l01787"></a><span class="lineno"> 1787</span>&#160;    variable graphtype</div><div class="line"><a name="l01788"></a><span class="lineno"> 1788</span>&#160;    variable do_ticks</div><div class="line"><a name="l01789"></a><span class="lineno"> 1789</span>&#160;    variable do_grids</div><div class="line"><a name="l01790"></a><span class="lineno"> 1790</span>&#160;    <span class="keywordtype">string</span> graphname</div><div class="line"><a name="l01791"></a><span class="lineno"> 1791</span>&#160;    </div><div class="line"><a name="l01792"></a><span class="lineno"> 1792</span>&#160;    dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l01793"></a><span class="lineno"> 1793</span>&#160;</div><div class="line"><a name="l01794"></a><span class="lineno"> 1794</span>&#160;    if (ParamIsDefault(projection))</div><div class="line"><a name="l01795"></a><span class="lineno"> 1795</span>&#160;        projection = 1</div><div class="line"><a name="l01796"></a><span class="lineno"> 1796</span>&#160;    endif</div><div class="line"><a name="l01797"></a><span class="lineno"> 1797</span>&#160;    if (ParamIsDefault(graphtype))</div><div class="line"><a name="l01798"></a><span class="lineno"> 1798</span>&#160;        graphtype = 1</div><div class="line"><a name="l01799"></a><span class="lineno"> 1799</span>&#160;    endif</div><div class="line"><a name="l01800"></a><span class="lineno"> 1800</span>&#160;    if (ParamIsDefault(do_ticks))</div><div class="line"><a name="l01801"></a><span class="lineno"> 1801</span>&#160;        do_ticks = 3</div><div class="line"><a name="l01802"></a><span class="lineno"> 1802</span>&#160;    endif</div><div class="line"><a name="l01803"></a><span class="lineno"> 1803</span>&#160;    if (ParamIsDefault(do_grids))</div><div class="line"><a name="l01804"></a><span class="lineno"> 1804</span>&#160;        do_grids = 3</div><div class="line"><a name="l01805"></a><span class="lineno"> 1805</span>&#160;    endif</div><div class="line"><a name="l01806"></a><span class="lineno"> 1806</span>&#160;    if (ParamIsDefault(graphname))</div><div class="line"><a name="l01807"></a><span class="lineno"> 1807</span>&#160;        if (strlen(nickname) &gt; 0)</div><div class="line"><a name="l01808"></a><span class="lineno"> 1808</span>&#160;            graphname = nickname</div><div class="line"><a name="l01809"></a><span class="lineno"> 1809</span>&#160;        else</div><div class="line"><a name="l01810"></a><span class="lineno"> 1810</span>&#160;            graphname = GetDataFolder(0)</div><div class="line"><a name="l01811"></a><span class="lineno"> 1811</span>&#160;        endif</div><div class="line"><a name="l01812"></a><span class="lineno"> 1812</span>&#160;    endif</div><div class="line"><a name="l01813"></a><span class="lineno"> 1813</span>&#160;    </div><div class="line"><a name="l01814"></a><span class="lineno"> 1814</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#ac15ebd5a19c558dde666ab36aeb9906f">prepare_hemi_scan_display</a>(nickname, projection=projection)</div><div class="line"><a name="l01815"></a><span class="lineno"> 1815</span>&#160;    </div><div class="line"><a name="l01816"></a><span class="lineno"> 1816</span>&#160;    <span class="comment">// hemi grid waves</span></div><div class="line"><a name="l01817"></a><span class="lineno"> 1817</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l01818"></a><span class="lineno"> 1818</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l01819"></a><span class="lineno"> 1819</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l01820"></a><span class="lineno"> 1820</span>&#160;</div><div class="line"><a name="l01821"></a><span class="lineno"> 1821</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l01822"></a><span class="lineno"> 1822</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l01823"></a><span class="lineno"> 1823</span>&#160;    <span class="keywordtype">string</span> s_matrix = s_prefix + &quot;matrix&quot;</div><div class="line"><a name="l01824"></a><span class="lineno"> 1824</span>&#160;    <span class="keywordtype">string</span> s_ster_rad = s_prefix + &quot;ster_rad&quot;</div><div class="line"><a name="l01825"></a><span class="lineno"> 1825</span>&#160;    </div><div class="line"><a name="l01826"></a><span class="lineno"> 1826</span>&#160;    wave /sdfr=df /z values = $s_int</div><div class="line"><a name="l01827"></a><span class="lineno"> 1827</span>&#160;    wave /sdfr=df /z azim = $s_azim</div><div class="line"><a name="l01828"></a><span class="lineno"> 1828</span>&#160;    wave /sdfr=df /z polar = $s_polar</div><div class="line"><a name="l01829"></a><span class="lineno"> 1829</span>&#160;    wave /sdfr=df /z ster_rad = $s_ster_rad</div><div class="line"><a name="l01830"></a><span class="lineno"> 1830</span>&#160;    wave /sdfr=df /z matrix = $s_matrix</div><div class="line"><a name="l01831"></a><span class="lineno"> 1831</span>&#160;</div><div class="line"><a name="l01832"></a><span class="lineno"> 1832</span>&#160;    setdatafolder df</div><div class="line"><a name="l01833"></a><span class="lineno"> 1833</span>&#160;    variable azim_offset = 0</div><div class="line"><a name="l01834"></a><span class="lineno"> 1834</span>&#160;    if (!(NumberByKey(&quot;<a class="code" href="pearl-anglescan-tracker_8ipf.html#a4c7a521b8f1a0769c09bfa4a1fca7dab">version</a>&quot;, note(azim), &quot;=&quot;, &quot;\r&quot;) &gt;= 1.6))</div><div class="line"><a name="l01835"></a><span class="lineno"> 1835</span>&#160;        DoAlert /T=&quot;display hemi scan&quot; 0, &quot;your dataset doesn&#39;t include the version 1.6 flag. if it was created with an earlier version that might be okay. please check that the orientation is correct!&quot;</div><div class="line"><a name="l01836"></a><span class="lineno"> 1836</span>&#160;        azim_offset = 180   <span class="comment">// changed 151030 (v1.6)</span></div><div class="line"><a name="l01837"></a><span class="lineno"> 1837</span>&#160;    endif</div><div class="line"><a name="l01838"></a><span class="lineno"> 1838</span>&#160;</div><div class="line"><a name="l01839"></a><span class="lineno"> 1839</span>&#160;    <span class="keywordtype">string</span> s_trace</div><div class="line"><a name="l01840"></a><span class="lineno"> 1840</span>&#160;    DoWindow $graphname</div><div class="line"><a name="l01841"></a><span class="lineno"> 1841</span>&#160;    if (v_flag)</div><div class="line"><a name="l01842"></a><span class="lineno"> 1842</span>&#160;        if (str2num(GetUserData(graphname, &quot;&quot;, &quot;graphtype&quot;)) == graphtype)</div><div class="line"><a name="l01843"></a><span class="lineno"> 1843</span>&#160;            <span class="comment">// graph exists and will update automatically - do not recreate</span></div><div class="line"><a name="l01844"></a><span class="lineno"> 1844</span>&#160;            graphtype = 0</div><div class="line"><a name="l01845"></a><span class="lineno"> 1845</span>&#160;        else</div><div class="line"><a name="l01846"></a><span class="lineno"> 1846</span>&#160;            <span class="comment">// graph exists - but needs recreating</span></div><div class="line"><a name="l01847"></a><span class="lineno"> 1847</span>&#160;            killwindow $graphname</div><div class="line"><a name="l01848"></a><span class="lineno"> 1848</span>&#160;        endif</div><div class="line"><a name="l01849"></a><span class="lineno"> 1849</span>&#160;    endif</div><div class="line"><a name="l01850"></a><span class="lineno"> 1850</span>&#160;    </div><div class="line"><a name="l01851"></a><span class="lineno"> 1851</span>&#160;    switch(graphtype)</div><div class="line"><a name="l01852"></a><span class="lineno"> 1852</span>&#160;        case 1:</div><div class="line"><a name="l01853"></a><span class="lineno"> 1853</span>&#160;            graphname = <a class="code" href="pearl-anglescan-process_8ipf.html#a46fd99d35a43601c39af6096d4e4f770">display_polar_graph</a>(graphname, angle_offset=azim_offset, do_ticks=do_ticks)</div><div class="line"><a name="l01854"></a><span class="lineno"> 1854</span>&#160;</div><div class="line"><a name="l01855"></a><span class="lineno"> 1855</span>&#160;            s_trace = WMPolarAppendTrace(graphname, ster_rad, azim, 360)</div><div class="line"><a name="l01856"></a><span class="lineno"> 1856</span>&#160;            ModifyGraph /W=$graphname mode($s_trace)=2, lsize($s_trace)=2</div><div class="line"><a name="l01857"></a><span class="lineno"> 1857</span>&#160;            ModifyGraph /W=$graphname zColor($s_trace)={values,*,*,BlueGreenOrange,0}</div><div class="line"><a name="l01858"></a><span class="lineno"> 1858</span>&#160;            </div><div class="line"><a name="l01859"></a><span class="lineno"> 1859</span>&#160;            ColorScale /W=$graphname /C /N=text0 /E=2 /F=0 /B=1 /A=RB /X=0.00 /Y=0.00 trace=polarY0</div><div class="line"><a name="l01860"></a><span class="lineno"> 1860</span>&#160;            ColorScale /W=$graphname /C /N=text0 side=2, width=5, heightPct=40, frame=0.50, lblMargin=0</div><div class="line"><a name="l01861"></a><span class="lineno"> 1861</span>&#160;            ColorScale /W=$graphname /C /N=text0 nticks=2, minor=1, tickLen=4.00, tickThick=0.50</div><div class="line"><a name="l01862"></a><span class="lineno"> 1862</span>&#160;</div><div class="line"><a name="l01863"></a><span class="lineno"> 1863</span>&#160;            SetWindow $graphname, userdata(projection)=num2str(projection)</div><div class="line"><a name="l01864"></a><span class="lineno"> 1864</span>&#160;            SetWindow $graphname, userdata(graphtype)=num2str(graphtype)</div><div class="line"><a name="l01865"></a><span class="lineno"> 1865</span>&#160;            <a class="code" href="pearl-anglescan-process_8ipf.html#af00d9061e410ad033a9fd1f0ca561e0d">draw_hemi_axes</a>(graphname, do_grids=do_grids)</div><div class="line"><a name="l01866"></a><span class="lineno"> 1866</span>&#160;            <span class="keywordflow">break</span></div><div class="line"><a name="l01867"></a><span class="lineno"> 1867</span>&#160;        <span class="keywordflow">case</span> 3:</div><div class="line"><a name="l01868"></a><span class="lineno"> 1868</span>&#160;            graphname = <a class="code" href="pearl-anglescan-process_8ipf.html#a46fd99d35a43601c39af6096d4e4f770">display_polar_graph</a>(graphname, angle_offset=azim_offset, do_ticks=do_ticks)</div><div class="line"><a name="l01869"></a><span class="lineno"> 1869</span>&#160;</div><div class="line"><a name="l01870"></a><span class="lineno"> 1870</span>&#160;            s_trace = WMPolarAppendTrace(graphname, ster_rad, azim, 360)</div><div class="line"><a name="l01871"></a><span class="lineno"> 1871</span>&#160;            ModifyGraph /W=$graphname mode($s_trace)=0, lsize($s_trace)=0</div><div class="line"><a name="l01872"></a><span class="lineno"> 1872</span>&#160;            AppendImage /L=VertCrossing /B=HorizCrossing matrix</div><div class="line"><a name="l01873"></a><span class="lineno"> 1873</span>&#160;</div><div class="line"><a name="l01874"></a><span class="lineno"> 1874</span>&#160;            ColorScale /W=$graphname /C /N=text0 /E=2 /F=0 /B=1 /A=RB /X=0.00 /Y=0.00 image=$s_matrix</div><div class="line"><a name="l01875"></a><span class="lineno"> 1875</span>&#160;            ColorScale /W=$graphname /C /N=text0 side=2, width=5, heightPct=40, frame=0.50, lblMargin=0</div><div class="line"><a name="l01876"></a><span class="lineno"> 1876</span>&#160;            ColorScale /W=$graphname /C /N=text0 nticks=2, minor=1, tickLen=4.00, tickThick=0.50</div><div class="line"><a name="l01877"></a><span class="lineno"> 1877</span>&#160;        </div><div class="line"><a name="l01878"></a><span class="lineno"> 1878</span>&#160;            SetWindow $graphname, userdata(projection)=num2str(projection)</div><div class="line"><a name="l01879"></a><span class="lineno"> 1879</span>&#160;            SetWindow $graphname, userdata(graphtype)=num2str(graphtype)</div><div class="line"><a name="l01880"></a><span class="lineno"> 1880</span>&#160;            <a class="code" href="pearl-anglescan-process_8ipf.html#af00d9061e410ad033a9fd1f0ca561e0d">draw_hemi_axes</a>(graphname, do_grids=do_grids)</div><div class="line"><a name="l01881"></a><span class="lineno"> 1881</span>&#160;            <span class="keywordflow">break</span></div><div class="line"><a name="l01882"></a><span class="lineno"> 1882</span>&#160;    endswitch</div><div class="line"><a name="l01883"></a><span class="lineno"> 1883</span>&#160;    </div><div class="line"><a name="l01884"></a><span class="lineno"> 1884</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l01885"></a><span class="lineno"> 1885</span>&#160;    <span class="keywordflow">return</span> graphname</div><div class="line"><a name="l01886"></a><span class="lineno"> 1886</span>&#160;end</div><div class="line"><a name="l01887"></a><span class="lineno"> 1887</span>&#160;</div><div class="line"><a name="l01929"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a46fd99d35a43601c39af6096d4e4f770"> 1929</a></span>&#160;<span class="keyword">static</span> <span class="keyword">function</span> /s <a class="code" href="pearl-anglescan-process_8ipf.html#a46fd99d35a43601c39af6096d4e4f770">display_polar_graph</a>(graphname, [angle_offset, do_ticks])</div><div class="line"><a name="l01930"></a><span class="lineno"> 1930</span>&#160;    </div><div class="line"><a name="l01931"></a><span class="lineno"> 1931</span>&#160;    <span class="keywordtype">string</span> graphname</div><div class="line"><a name="l01932"></a><span class="lineno"> 1932</span>&#160;    variable angle_offset</div><div class="line"><a name="l01933"></a><span class="lineno"> 1933</span>&#160;    variable do_ticks</div><div class="line"><a name="l01934"></a><span class="lineno"> 1934</span>&#160;    </div><div class="line"><a name="l01935"></a><span class="lineno"> 1935</span>&#160;    dfref savedf = GetDataFolderDFR()</div><div class="line"><a name="l01936"></a><span class="lineno"> 1936</span>&#160;    </div><div class="line"><a name="l01937"></a><span class="lineno"> 1937</span>&#160;    if (ParamIsDefault(angle_offset))</div><div class="line"><a name="l01938"></a><span class="lineno"> 1938</span>&#160;        angle_offset = 0</div><div class="line"><a name="l01939"></a><span class="lineno"> 1939</span>&#160;    endif</div><div class="line"><a name="l01940"></a><span class="lineno"> 1940</span>&#160;    if (ParamIsDefault(do_ticks))</div><div class="line"><a name="l01941"></a><span class="lineno"> 1941</span>&#160;        do_ticks = 3</div><div class="line"><a name="l01942"></a><span class="lineno"> 1942</span>&#160;    endif</div><div class="line"><a name="l01943"></a><span class="lineno"> 1943</span>&#160;    </div><div class="line"><a name="l01944"></a><span class="lineno"> 1944</span>&#160;    if ((strlen(graphname) == 0) || (wintype(graphname) == 0))</div><div class="line"><a name="l01945"></a><span class="lineno"> 1945</span>&#160;        Display /k=1 /W=(10,45,360,345)</div><div class="line"><a name="l01946"></a><span class="lineno"> 1946</span>&#160;        DoWindow /C $graphname</div><div class="line"><a name="l01947"></a><span class="lineno"> 1947</span>&#160;        graphname = WMNewPolarGraph(&quot;&quot;, graphname)</div><div class="line"><a name="l01948"></a><span class="lineno"> 1948</span>&#160;        WMPolarGraphSetVar(graphname, &quot;zeroAngleWhere&quot;, angle_offset)</div><div class="line"><a name="l01949"></a><span class="lineno"> 1949</span>&#160;        </div><div class="line"><a name="l01950"></a><span class="lineno"> 1950</span>&#160;        WMPolarGraphSetVar(graphname, &quot;angleAxisThick&quot;, 0.5)</div><div class="line"><a name="l01951"></a><span class="lineno"> 1951</span>&#160;        WMPolarGraphSetStr(graphname, &quot;doMajorAngleTicks&quot;, &quot;manual&quot;)</div><div class="line"><a name="l01952"></a><span class="lineno"> 1952</span>&#160;        WMPolarGraphSetVar(graphname, &quot;majorAngleInc&quot;, 30) <span class="comment">// major ticks in 30 deg steps</span></div><div class="line"><a name="l01953"></a><span class="lineno"> 1953</span>&#160;        WMPolarGraphSetVar(graphname, &quot;minorAngleTicks&quot;, 2) <span class="comment">// minor ticks in 10 deg steps</span></div><div class="line"><a name="l01954"></a><span class="lineno"> 1954</span>&#160;        WMPolarGraphSetStr(graphname, &quot;angleTicksLocation&quot;, &quot;Outside&quot;)</div><div class="line"><a name="l01955"></a><span class="lineno"> 1955</span>&#160;        WMPolarGraphSetVar(graphname, &quot;doAngleTickLabelSubRange&quot;, 1)</div><div class="line"><a name="l01956"></a><span class="lineno"> 1956</span>&#160;        WMPolarGraphSetVar(graphname, &quot;angleTickLabelRangeStart&quot;, 0)</div><div class="line"><a name="l01957"></a><span class="lineno"> 1957</span>&#160;        WMPolarGraphSetVar(graphname, &quot;angleTickLabelRangeExtent&quot;, 90)</div><div class="line"><a name="l01958"></a><span class="lineno"> 1958</span>&#160;        WMPolarGraphSetStr(graphname, &quot;angleTickLabelNotation&quot;, &quot;%g°&quot;)</div><div class="line"><a name="l01959"></a><span class="lineno"> 1959</span>&#160;  </div><div class="line"><a name="l01960"></a><span class="lineno"> 1960</span>&#160;        WMPolarGraphSetVar(graphname, &quot;doPolarGrids&quot;, 0)</div><div class="line"><a name="l01961"></a><span class="lineno"> 1961</span>&#160;        WMPolarGraphSetVar(graphname, &quot;doRadiusTickLabels&quot;, 0)</div><div class="line"><a name="l01962"></a><span class="lineno"> 1962</span>&#160;        WMPolarGraphSetStr(graphname, &quot;radiusAxesWhere&quot;, &quot;  Off&quot;)   <span class="comment">// note the leading spaces, cf. WMPolarAnglesForRadiusAxes</span></div><div class="line"><a name="l01963"></a><span class="lineno"> 1963</span>&#160;        WMPolarGraphSetStr(graphname, &quot;radiusTicksLocation&quot;, &quot;Off&quot;)</div><div class="line"><a name="l01964"></a><span class="lineno"> 1964</span>&#160;</div><div class="line"><a name="l01965"></a><span class="lineno"> 1965</span>&#160;        WMPolarGraphSetVar(graphname, &quot;majorTickLength&quot;, 2)</div><div class="line"><a name="l01966"></a><span class="lineno"> 1966</span>&#160;        WMPolarGraphSetVar(graphname, &quot;majorTickThick&quot;, 0.5)</div><div class="line"><a name="l01967"></a><span class="lineno"> 1967</span>&#160;        WMPolarGraphSetVar(graphname, &quot;minorTickLength&quot;, 1)</div><div class="line"><a name="l01968"></a><span class="lineno"> 1968</span>&#160;        WMPolarGraphSetVar(graphname, &quot;minorTickThick&quot;, 0.5)</div><div class="line"><a name="l01969"></a><span class="lineno"> 1969</span>&#160;        WMPolarGraphSetVar(graphname, &quot;tickLabelOpaque&quot;, 0)</div><div class="line"><a name="l01970"></a><span class="lineno"> 1970</span>&#160;        WMPolarGraphSetVar(graphname, &quot;tickLabelFontSize&quot;, 7)</div><div class="line"><a name="l01971"></a><span class="lineno"> 1971</span>&#160;</div><div class="line"><a name="l01972"></a><span class="lineno"> 1972</span>&#160;        <span class="comment">// changes</span></div><div class="line"><a name="l01973"></a><span class="lineno"> 1973</span>&#160;        if (do_ticks &amp; 1)</div><div class="line"><a name="l01974"></a><span class="lineno"> 1974</span>&#160;            WMPolarGraphSetStr(graphname, &quot;angleTicksLocation&quot;, &quot;Outside&quot;)</div><div class="line"><a name="l01975"></a><span class="lineno"> 1975</span>&#160;        else</div><div class="line"><a name="l01976"></a><span class="lineno"> 1976</span>&#160;            WMPolarGraphSetStr(graphname, &quot;angleTicksLocation&quot;, &quot;Off&quot;)</div><div class="line"><a name="l01977"></a><span class="lineno"> 1977</span>&#160;        endif</div><div class="line"><a name="l01978"></a><span class="lineno"> 1978</span>&#160;        if (do_ticks &amp; 2)</div><div class="line"><a name="l01979"></a><span class="lineno"> 1979</span>&#160;            WMPolarGraphSetVar(graphname, &quot;doMinorAngleTicks&quot;, 1)</div><div class="line"><a name="l01980"></a><span class="lineno"> 1980</span>&#160;        else</div><div class="line"><a name="l01981"></a><span class="lineno"> 1981</span>&#160;            WMPolarGraphSetVar(graphname, &quot;doMinorAngleTicks&quot;, 0)</div><div class="line"><a name="l01982"></a><span class="lineno"> 1982</span>&#160;        endif</div><div class="line"><a name="l01983"></a><span class="lineno"> 1983</span>&#160;        </div><div class="line"><a name="l01984"></a><span class="lineno"> 1984</span>&#160;        DoWindow /T $graphname, graphname</div><div class="line"><a name="l01985"></a><span class="lineno"> 1985</span>&#160;</div><div class="line"><a name="l01986"></a><span class="lineno"> 1986</span>&#160;        <span class="comment">// cursor info in angles</span></div><div class="line"><a name="l01987"></a><span class="lineno"> 1987</span>&#160;        <span class="keywordtype">string</span> graphdf = &quot;root:packages:WMPolarGraphs:&quot; + graphname</div><div class="line"><a name="l01988"></a><span class="lineno"> 1988</span>&#160;        setdatafolder graphdf</div><div class="line"><a name="l01989"></a><span class="lineno"> 1989</span>&#160;        <span class="comment">// current theta, phi coordinates are stored in global variables in the package folder of the graph</span></div><div class="line"><a name="l01990"></a><span class="lineno"> 1990</span>&#160;        variable /g csrA_theta</div><div class="line"><a name="l01991"></a><span class="lineno"> 1991</span>&#160;        variable /g csrA_phi</div><div class="line"><a name="l01992"></a><span class="lineno"> 1992</span>&#160;        variable /g csrB_theta</div><div class="line"><a name="l01993"></a><span class="lineno"> 1993</span>&#160;        variable /g csrB_phi</div><div class="line"><a name="l01994"></a><span class="lineno"> 1994</span>&#160;        <span class="comment">// the text box is hidden initially. it shows up and hides with the cursor info box.</span></div><div class="line"><a name="l01995"></a><span class="lineno"> 1995</span>&#160;        <span class="keywordtype">string</span> tb </div><div class="line"><a name="l01996"></a><span class="lineno"> 1996</span>&#160;        tb = &quot;\\{<span class="stringliteral">&quot;</span></div><div class="line"><a name="l01997"></a><span class="lineno"> 1997</span>&#160;<span class="stringliteral">        tb = tb + &quot;</span>\<span class="stringliteral">&quot;A = (%.1f, %.1f)\&quot;,&quot;</span></div><div class="line"><a name="l01998"></a><span class="lineno"> 1998</span>&#160;        tb = tb + graphdf + <span class="stringliteral">&quot;:csrA_theta,&quot;</span></div><div class="line"><a name="l01999"></a><span class="lineno"> 1999</span>&#160;        tb = tb + graphdf + <span class="stringliteral">&quot;:csrA_phi&quot;</span></div><div class="line"><a name="l02000"></a><span class="lineno"> 2000</span>&#160;        tb = tb + <span class="stringliteral">&quot;}&quot;</span></div><div class="line"><a name="l02001"></a><span class="lineno"> 2001</span>&#160;        TextBox /W=$graphname /A=LT /B=1 /E=2 /F=0 /N=tb_angles /X=1 /Y=1 /V=0 tb</div><div class="line"><a name="l02002"></a><span class="lineno"> 2002</span>&#160;        tb = <span class="stringliteral">&quot;\\{&quot;</span></div><div class="line"><a name="l02003"></a><span class="lineno"> 2003</span>&#160;        tb = tb + <span class="stringliteral">&quot;\&quot;B = (%.1f, %.1f)\&quot;,&quot;</span></div><div class="line"><a name="l02004"></a><span class="lineno"> 2004</span>&#160;        tb = tb + graphdf + <span class="stringliteral">&quot;:csrB_theta,&quot;</span></div><div class="line"><a name="l02005"></a><span class="lineno"> 2005</span>&#160;        tb = tb + graphdf + <span class="stringliteral">&quot;:csrB_phi&quot;</span></div><div class="line"><a name="l02006"></a><span class="lineno"> 2006</span>&#160;        tb = tb + <span class="stringliteral">&quot;}&quot;</span></div><div class="line"><a name="l02007"></a><span class="lineno"> 2007</span>&#160;        AppendText /W=$graphname /N=tb_angles tb</div><div class="line"><a name="l02008"></a><span class="lineno"> 2008</span>&#160;        <span class="comment">// updates are triggered by a window hook</span></div><div class="line"><a name="l02009"></a><span class="lineno"> 2009</span>&#160;        SetWindow $graphname, hook(<a class="code" href="pearl-anglescan-process_8ipf.html#ac4dbd1ece37b2cf22fa976a153977288">polar_graph_hook</a>)=<a class="code" href="namespace_pearl_anglescan_process.html">PearlAnglescanProcess</a>#<a class="code" href="pearl-anglescan-process_8ipf.html#ac4dbd1ece37b2cf22fa976a153977288">polar_graph_hook</a></div><div class="line"><a name="l02010"></a><span class="lineno"> 2010</span>&#160;    <span class="keywordflow">else</span></div><div class="line"><a name="l02011"></a><span class="lineno"> 2011</span>&#160;        <span class="comment">// graph window exists</span></div><div class="line"><a name="l02012"></a><span class="lineno"> 2012</span>&#160;        DoWindow /F $graphname</div><div class="line"><a name="l02013"></a><span class="lineno"> 2013</span>&#160;    endif</div><div class="line"><a name="l02014"></a><span class="lineno"> 2014</span>&#160;</div><div class="line"><a name="l02015"></a><span class="lineno"> 2015</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l02016"></a><span class="lineno"> 2016</span>&#160;    <span class="keywordflow">return</span> graphname</div><div class="line"><a name="l02017"></a><span class="lineno"> 2017</span>&#160;end</div><div class="line"><a name="l02018"></a><span class="lineno"> 2018</span>&#160;</div><div class="line"><a name="l02044"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#af00d9061e410ad033a9fd1f0ca561e0d"> 2044</a></span>&#160;<span class="keyword">static</span> <span class="keyword">function</span> /s <a class="code" href="pearl-anglescan-process_8ipf.html#af00d9061e410ad033a9fd1f0ca561e0d">draw_hemi_axes</a>(graphname, [do_grids])</div><div class="line"><a name="l02045"></a><span class="lineno"> 2045</span>&#160;    <span class="keywordtype">string</span> graphname</div><div class="line"><a name="l02046"></a><span class="lineno"> 2046</span>&#160;    variable do_grids</div><div class="line"><a name="l02047"></a><span class="lineno"> 2047</span>&#160;    </div><div class="line"><a name="l02048"></a><span class="lineno"> 2048</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(do_grids))</div><div class="line"><a name="l02049"></a><span class="lineno"> 2049</span>&#160;        do_grids = 3</div><div class="line"><a name="l02050"></a><span class="lineno"> 2050</span>&#160;    endif</div><div class="line"><a name="l02051"></a><span class="lineno"> 2051</span>&#160;</div><div class="line"><a name="l02052"></a><span class="lineno"> 2052</span>&#160;    dfref savedf = GetDataFolderDFR()</div><div class="line"><a name="l02053"></a><span class="lineno"> 2053</span>&#160;</div><div class="line"><a name="l02054"></a><span class="lineno"> 2054</span>&#160;    string sproj = GetUserData(graphname, &quot;&quot;, &quot;projection&quot;)</div><div class="line"><a name="l02055"></a><span class="lineno"> 2055</span>&#160;    variable projection = str2num(&quot;0&quot; + sproj)</div><div class="line"><a name="l02056"></a><span class="lineno"> 2056</span>&#160;</div><div class="line"><a name="l02057"></a><span class="lineno"> 2057</span>&#160;    SetDrawLayer /W=$graphname ProgFront</div><div class="line"><a name="l02058"></a><span class="lineno"> 2058</span>&#160;</div><div class="line"><a name="l02059"></a><span class="lineno"> 2059</span>&#160;    <span class="comment">// polar axis</span></div><div class="line"><a name="l02060"></a><span class="lineno"> 2060</span>&#160;    SetDrawEnv /W=$graphname xcoord=HorizCrossing, ycoord=VertCrossing</div><div class="line"><a name="l02061"></a><span class="lineno"> 2061</span>&#160;    SetDrawEnv /W=$graphname linethick= 0.5</div><div class="line"><a name="l02062"></a><span class="lineno"> 2062</span>&#160;    SetDrawEnv /W=$graphname dash=2</div><div class="line"><a name="l02063"></a><span class="lineno"> 2063</span>&#160;    SetDrawEnv /W=$graphname fillpat=0</div><div class="line"><a name="l02064"></a><span class="lineno"> 2064</span>&#160;    SetDrawEnv /W=$graphname fname=&quot;default&quot;, fsize=7</div><div class="line"><a name="l02065"></a><span class="lineno"> 2065</span>&#160;    SetDrawEnv /W=$graphname textxjust=1, textyjust=1</div><div class="line"><a name="l02066"></a><span class="lineno"> 2066</span>&#160;    <span class="comment">//SetDrawEnv /W=$graphname linefgc=(65535,65535,65535)</span></div><div class="line"><a name="l02067"></a><span class="lineno"> 2067</span>&#160;    SetDrawEnv /W=$graphname save</div><div class="line"><a name="l02068"></a><span class="lineno"> 2068</span>&#160;</div><div class="line"><a name="l02069"></a><span class="lineno"> 2069</span>&#160;    if (do_grids &amp; 1)</div><div class="line"><a name="l02070"></a><span class="lineno"> 2070</span>&#160;        DrawLine /W=$graphname 0, -2, 0, 2</div><div class="line"><a name="l02071"></a><span class="lineno"> 2071</span>&#160;        DrawLine /W=$graphname -2, 0, 2, 0</div><div class="line"><a name="l02072"></a><span class="lineno"> 2072</span>&#160;    endif</div><div class="line"><a name="l02073"></a><span class="lineno"> 2073</span>&#160;</div><div class="line"><a name="l02074"></a><span class="lineno"> 2074</span>&#160;    variable radi</div><div class="line"><a name="l02075"></a><span class="lineno"> 2075</span>&#160;    if (do_grids &amp; 2)</div><div class="line"><a name="l02076"></a><span class="lineno"> 2076</span>&#160;        radi = <a class="code" href="pearl-anglescan-process_8ipf.html#a75219b38ea58012abcffc848d536faa4">calc_graph_radius</a>(0.5, projection=projection)</div><div class="line"><a name="l02077"></a><span class="lineno"> 2077</span>&#160;        DrawOval /W=$graphname -radi, radi, radi, -radi</div><div class="line"><a name="l02078"></a><span class="lineno"> 2078</span>&#160;        radi = calc_graph_radius(30, projection=projection)</div><div class="line"><a name="l02079"></a><span class="lineno"> 2079</span>&#160;        DrawOval /W=$graphname -radi, radi, radi, -radi</div><div class="line"><a name="l02080"></a><span class="lineno"> 2080</span>&#160;        radi = calc_graph_radius(60, projection=projection)</div><div class="line"><a name="l02081"></a><span class="lineno"> 2081</span>&#160;        DrawOval /W=$graphname -radi, radi, radi, -radi</div><div class="line"><a name="l02082"></a><span class="lineno"> 2082</span>&#160;</div><div class="line"><a name="l02083"></a><span class="lineno"> 2083</span>&#160;        SetDrawEnv /W=$graphname textxjust= 1,textyjust= 2</div><div class="line"><a name="l02084"></a><span class="lineno"> 2084</span>&#160;        SetDrawEnv /W=$graphname save</div><div class="line"><a name="l02085"></a><span class="lineno"> 2085</span>&#160;        radi = calc_graph_radius(30, projection=projection)</div><div class="line"><a name="l02086"></a><span class="lineno"> 2086</span>&#160;        DrawText /W=$graphname radi, -0.1, &quot;30°&quot;</div><div class="line"><a name="l02087"></a><span class="lineno"> 2087</span>&#160;        radi = calc_graph_radius(60, projection=projection)</div><div class="line"><a name="l02088"></a><span class="lineno"> 2088</span>&#160;        DrawText /W=$graphname radi, -0.1, &quot;60°&quot;</div><div class="line"><a name="l02089"></a><span class="lineno"> 2089</span>&#160;    endif</div><div class="line"><a name="l02090"></a><span class="lineno"> 2090</span>&#160;    </div><div class="line"><a name="l02091"></a><span class="lineno"> 2091</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l02092"></a><span class="lineno"> 2092</span>&#160;end</div><div class="line"><a name="l02093"></a><span class="lineno"> 2093</span>&#160;</div><div class="line"><a name="l02116"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#afedad38a418cee5d1fb9e08aae2160a0"> 2116</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#afedad38a418cee5d1fb9e08aae2160a0">draw_diffraction_cone</a>(graphname, groupname, theta_axis, theta_inner, phi)</div><div class="line"><a name="l02117"></a><span class="lineno"> 2117</span>&#160;    <span class="keywordtype">string</span> graphname</div><div class="line"><a name="l02118"></a><span class="lineno"> 2118</span>&#160;    <span class="keywordtype">string</span> groupname</div><div class="line"><a name="l02119"></a><span class="lineno"> 2119</span>&#160;    </div><div class="line"><a name="l02120"></a><span class="lineno"> 2120</span>&#160;    variable theta_axis</div><div class="line"><a name="l02121"></a><span class="lineno"> 2121</span>&#160;    variable theta_inner</div><div class="line"><a name="l02122"></a><span class="lineno"> 2122</span>&#160;    variable phi</div><div class="line"><a name="l02123"></a><span class="lineno"> 2123</span>&#160;    </div><div class="line"><a name="l02124"></a><span class="lineno"> 2124</span>&#160;    variable r_axis = calc_graph_radius(theta_axis)</div><div class="line"><a name="l02125"></a><span class="lineno"> 2125</span>&#160;    variable r_inner = calc_graph_radius(theta_inner)</div><div class="line"><a name="l02126"></a><span class="lineno"> 2126</span>&#160;    variable r_outer = calc_graph_radius(2 * theta_axis - theta_inner)</div><div class="line"><a name="l02127"></a><span class="lineno"> 2127</span>&#160;    </div><div class="line"><a name="l02128"></a><span class="lineno"> 2128</span>&#160;    SetDrawEnv push</div><div class="line"><a name="l02129"></a><span class="lineno"> 2129</span>&#160;    SetDrawLayer UserFront</div><div class="line"><a name="l02130"></a><span class="lineno"> 2130</span>&#160;    DrawAction getgroup=$groupname, delete</div><div class="line"><a name="l02131"></a><span class="lineno"> 2131</span>&#160;    SetDrawEnv gstart, gname=$groupname</div><div class="line"><a name="l02132"></a><span class="lineno"> 2132</span>&#160;    variable xc, yc, xr, yr</div><div class="line"><a name="l02133"></a><span class="lineno"> 2133</span>&#160;</div><div class="line"><a name="l02134"></a><span class="lineno"> 2134</span>&#160;    <span class="comment">// cone periphery</span></div><div class="line"><a name="l02135"></a><span class="lineno"> 2135</span>&#160;    variable r_center = (r_outer + r_inner) / 2</div><div class="line"><a name="l02136"></a><span class="lineno"> 2136</span>&#160;    variable r_radius = (r_outer - r_inner) / 2</div><div class="line"><a name="l02137"></a><span class="lineno"> 2137</span>&#160;    xc = r_center * cos(phi * pi / 180)</div><div class="line"><a name="l02138"></a><span class="lineno"> 2138</span>&#160;    yc = r_center * sin(phi * pi / 180)</div><div class="line"><a name="l02139"></a><span class="lineno"> 2139</span>&#160;    xr = r_radius</div><div class="line"><a name="l02140"></a><span class="lineno"> 2140</span>&#160;    yr = r_radius</div><div class="line"><a name="l02141"></a><span class="lineno"> 2141</span>&#160;    SetDrawEnv xcoord=HorizCrossing, ycoord=VertCrossing</div><div class="line"><a name="l02142"></a><span class="lineno"> 2142</span>&#160;    SetDrawEnv dash=11, fillpat=0</div><div class="line"><a name="l02143"></a><span class="lineno"> 2143</span>&#160;    DrawOval xc - xr, yc - yr, xc + xr, yc + yr</div><div class="line"><a name="l02144"></a><span class="lineno"> 2144</span>&#160;</div><div class="line"><a name="l02145"></a><span class="lineno"> 2145</span>&#160;    <span class="comment">// cone axis    </span></div><div class="line"><a name="l02146"></a><span class="lineno"> 2146</span>&#160;    xc = r_axis * cos(phi * pi / 180)</div><div class="line"><a name="l02147"></a><span class="lineno"> 2147</span>&#160;    yc = r_axis * sin(phi * pi / 180)</div><div class="line"><a name="l02148"></a><span class="lineno"> 2148</span>&#160;    r_radius = calc_graph_radius(2)</div><div class="line"><a name="l02149"></a><span class="lineno"> 2149</span>&#160;    xr = r_radius</div><div class="line"><a name="l02150"></a><span class="lineno"> 2150</span>&#160;    yr = r_radius</div><div class="line"><a name="l02151"></a><span class="lineno"> 2151</span>&#160;    SetDrawEnv xcoord=HorizCrossing, ycoord=VertCrossing</div><div class="line"><a name="l02152"></a><span class="lineno"> 2152</span>&#160;    SetDrawEnv fillfgc=(0,0,0)</div><div class="line"><a name="l02153"></a><span class="lineno"> 2153</span>&#160;    DrawOval xc - xr, yc - yr, xc + xr, yc + yr</div><div class="line"><a name="l02154"></a><span class="lineno"> 2154</span>&#160;    </div><div class="line"><a name="l02155"></a><span class="lineno"> 2155</span>&#160;    SetDrawEnv gstop</div><div class="line"><a name="l02156"></a><span class="lineno"> 2156</span>&#160;    SetDrawEnv pop</div><div class="line"><a name="l02157"></a><span class="lineno"> 2157</span>&#160;end</div><div class="line"><a name="l02158"></a><span class="lineno"> 2158</span>&#160;</div><div class="line"><a name="l02180"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a1f4f74a8ae557c56e1e3aacd0b45f3f1"> 2180</a></span>&#160;function /s <a class="code" href="pearl-anglescan-process_8ipf.html#a1f4f74a8ae557c56e1e3aacd0b45f3f1">display_scanlines</a>(nickname, alpha_lo, alpha_hi, m_theta, m_tilt, m_phi, [folding, projection])</div><div class="line"><a name="l02181"></a><span class="lineno"> 2181</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l02182"></a><span class="lineno"> 2182</span>&#160;    variable alpha_lo</div><div class="line"><a name="l02183"></a><span class="lineno"> 2183</span>&#160;    variable alpha_hi</div><div class="line"><a name="l02184"></a><span class="lineno"> 2184</span>&#160;    wave m_theta</div><div class="line"><a name="l02185"></a><span class="lineno"> 2185</span>&#160;    wave m_tilt</div><div class="line"><a name="l02186"></a><span class="lineno"> 2186</span>&#160;    wave m_phi</div><div class="line"><a name="l02187"></a><span class="lineno"> 2187</span>&#160;    variable folding</div><div class="line"><a name="l02188"></a><span class="lineno"> 2188</span>&#160;    variable projection</div><div class="line"><a name="l02189"></a><span class="lineno"> 2189</span>&#160;    </div><div class="line"><a name="l02190"></a><span class="lineno"> 2190</span>&#160;    if (ParamIsDefault(folding))</div><div class="line"><a name="l02191"></a><span class="lineno"> 2191</span>&#160;        folding = 1</div><div class="line"><a name="l02192"></a><span class="lineno"> 2192</span>&#160;    endif</div><div class="line"><a name="l02193"></a><span class="lineno"> 2193</span>&#160;    if (ParamIsDefault(projection))</div><div class="line"><a name="l02194"></a><span class="lineno"> 2194</span>&#160;        projection = 1</div><div class="line"><a name="l02195"></a><span class="lineno"> 2195</span>&#160;    endif</div><div class="line"><a name="l02196"></a><span class="lineno"> 2196</span>&#160;    </div><div class="line"><a name="l02197"></a><span class="lineno"> 2197</span>&#160;    <span class="comment">// sort out data folder structure</span></div><div class="line"><a name="l02198"></a><span class="lineno"> 2198</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l02199"></a><span class="lineno"> 2199</span>&#160;    newdatafolder /s/o $nickname</div><div class="line"><a name="l02200"></a><span class="lineno"> 2200</span>&#160;    <span class="keywordtype">string</span> graphname = &quot;graph_&quot; + nickname</div><div class="line"><a name="l02201"></a><span class="lineno"> 2201</span>&#160;    </div><div class="line"><a name="l02202"></a><span class="lineno"> 2202</span>&#160;    duplicate /free m_tilt, loc_m_tilt</div><div class="line"><a name="l02203"></a><span class="lineno"> 2203</span>&#160;    loc_m_tilt = -m_tilt</div><div class="line"><a name="l02204"></a><span class="lineno"> 2204</span>&#160;    </div><div class="line"><a name="l02205"></a><span class="lineno"> 2205</span>&#160;    make /n=1 /d /free d_polar, d_azi</div><div class="line"><a name="l02206"></a><span class="lineno"> 2206</span>&#160;    variable n_alpha = round(alpha_hi - alpha_lo) + 1</div><div class="line"><a name="l02207"></a><span class="lineno"> 2207</span>&#160;    make /n=(n_alpha) /d /free analyser</div><div class="line"><a name="l02208"></a><span class="lineno"> 2208</span>&#160;    setscale /i x alpha_lo, alpha_hi, &quot;°&quot;, analyser</div><div class="line"><a name="l02209"></a><span class="lineno"> 2209</span>&#160;    analyser = x</div><div class="line"><a name="l02210"></a><span class="lineno"> 2210</span>&#160;    </div><div class="line"><a name="l02211"></a><span class="lineno"> 2211</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a3cc7eddf5c6b0658260cfb32dd2c026d">convert_angles_ttpa2polar</a>(m_theta, loc_m_tilt, m_phi, analyser, d_polar, d_azi)</div><div class="line"><a name="l02212"></a><span class="lineno"> 2212</span>&#160;    duplicate /free d_polar, d_radius</div><div class="line"><a name="l02213"></a><span class="lineno"> 2213</span>&#160;    d_radius = calc_graph_radius(d_polar, projection=projection)</div><div class="line"><a name="l02214"></a><span class="lineno"> 2214</span>&#160;    d_azi += 180    <span class="comment">// changed 151030 (v1.6)</span></div><div class="line"><a name="l02215"></a><span class="lineno"> 2215</span>&#160;    </div><div class="line"><a name="l02216"></a><span class="lineno"> 2216</span>&#160;    graphname = <a class="code" href="pearl-anglescan-process_8ipf.html#a46fd99d35a43601c39af6096d4e4f770">display_polar_graph</a>(graphname)</div><div class="line"><a name="l02217"></a><span class="lineno"> 2217</span>&#160;    SetWindow $graphname, userdata(projection)=num2str(projection)</div><div class="line"><a name="l02218"></a><span class="lineno"> 2218</span>&#160;    </div><div class="line"><a name="l02219"></a><span class="lineno"> 2219</span>&#160;    variable ifold</div><div class="line"><a name="l02220"></a><span class="lineno"> 2220</span>&#160;    variable iang</div><div class="line"><a name="l02221"></a><span class="lineno"> 2221</span>&#160;    variable nang = numpnts(m_theta)</div><div class="line"><a name="l02222"></a><span class="lineno"> 2222</span>&#160;    <span class="keywordtype">string</span> s_rad</div><div class="line"><a name="l02223"></a><span class="lineno"> 2223</span>&#160;    <span class="keywordtype">string</span> s_azi</div><div class="line"><a name="l02224"></a><span class="lineno"> 2224</span>&#160;    <span class="keywordtype">string</span> s_trace</div><div class="line"><a name="l02225"></a><span class="lineno"> 2225</span>&#160;    for (ifold = 0; ifold &lt; folding; ifold += 1)</div><div class="line"><a name="l02226"></a><span class="lineno"> 2226</span>&#160;        d_azi = d_azi &gt;= 360 ? d_azi - 360 : d_azi</div><div class="line"><a name="l02227"></a><span class="lineno"> 2227</span>&#160;        for (iang = 0; iang &lt; nang; iang += 1)</div><div class="line"><a name="l02228"></a><span class="lineno"> 2228</span>&#160;            sprintf s_rad, &quot;rad_%d_%d&quot;, ifold, iang</div><div class="line"><a name="l02229"></a><span class="lineno"> 2229</span>&#160;            duplicate /o analyser, $s_rad</div><div class="line"><a name="l02230"></a><span class="lineno"> 2230</span>&#160;            wave w_rad = $s_rad</div><div class="line"><a name="l02231"></a><span class="lineno"> 2231</span>&#160;            w_rad = d_radius[p][iang]</div><div class="line"><a name="l02232"></a><span class="lineno"> 2232</span>&#160;            </div><div class="line"><a name="l02233"></a><span class="lineno"> 2233</span>&#160;            sprintf s_azi, &quot;azi_%d_%d&quot;, ifold, iang</div><div class="line"><a name="l02234"></a><span class="lineno"> 2234</span>&#160;            duplicate /o analyser, $s_azi</div><div class="line"><a name="l02235"></a><span class="lineno"> 2235</span>&#160;            wave w_azi = $s_azi</div><div class="line"><a name="l02236"></a><span class="lineno"> 2236</span>&#160;            w_azi = d_azi[p][iang]</div><div class="line"><a name="l02237"></a><span class="lineno"> 2237</span>&#160;            </div><div class="line"><a name="l02238"></a><span class="lineno"> 2238</span>&#160;            if (numtype(sum(w_rad)) == 0)</div><div class="line"><a name="l02239"></a><span class="lineno"> 2239</span>&#160;                s_trace = WMPolarAppendTrace(graphname, w_rad, w_azi, 360)</div><div class="line"><a name="l02240"></a><span class="lineno"> 2240</span>&#160;                ModifyGraph /w=$graphname mode($s_trace)=0, lsize($s_trace)=0.5</div><div class="line"><a name="l02241"></a><span class="lineno"> 2241</span>&#160;            endif</div><div class="line"><a name="l02242"></a><span class="lineno"> 2242</span>&#160;        endfor</div><div class="line"><a name="l02243"></a><span class="lineno"> 2243</span>&#160;        d_azi += 360 / folding</div><div class="line"><a name="l02244"></a><span class="lineno"> 2244</span>&#160;    endfor</div><div class="line"><a name="l02245"></a><span class="lineno"> 2245</span>&#160;</div><div class="line"><a name="l02246"></a><span class="lineno"> 2246</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#af00d9061e410ad033a9fd1f0ca561e0d">draw_hemi_axes</a>(graphname)</div><div class="line"><a name="l02247"></a><span class="lineno"> 2247</span>&#160;</div><div class="line"><a name="l02248"></a><span class="lineno"> 2248</span>&#160;    setdatafolder saveDF</div><div class="line"><a name="l02249"></a><span class="lineno"> 2249</span>&#160;    return graphname</div><div class="line"><a name="l02250"></a><span class="lineno"> 2250</span>&#160;end</div><div class="line"><a name="l02251"></a><span class="lineno"> 2251</span>&#160;</div><div class="line"><a name="l02268"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#aae45cc49d67f79dcedc4420f82acea4c"> 2268</a></span>&#160;constant <a class="code" href="pearl-anglescan-process_8ipf.html#aae45cc49d67f79dcedc4420f82acea4c">kProjDist</a> = 0</div><div class="line"><a name="l02269"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ac151c6f989d6a568fdef0acb791f84db"> 2269</a></span>&#160;constant <a class="code" href="pearl-anglescan-process_8ipf.html#ac151c6f989d6a568fdef0acb791f84db">kProjStereo</a> = 1</div><div class="line"><a name="l02270"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a207c56ac03cc18bf1bfde88dbfe2666f"> 2270</a></span>&#160;constant <a class="code" href="pearl-anglescan-process_8ipf.html#a207c56ac03cc18bf1bfde88dbfe2666f">kProjArea</a> = 2</div><div class="line"><a name="l02271"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a4a40c73c0e03545e0050ea370e9c57d3"> 2271</a></span>&#160;constant <a class="code" href="pearl-anglescan-process_8ipf.html#a4a40c73c0e03545e0050ea370e9c57d3">kProjGnom</a> = 3</div><div class="line"><a name="l02272"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a3b3bd11c35d5f850b34937ab6c45f659"> 2272</a></span>&#160;constant <a class="code" href="pearl-anglescan-process_8ipf.html#a3b3bd11c35d5f850b34937ab6c45f659">kProjOrtho</a> = 4</div><div class="line"><a name="l02273"></a><span class="lineno"> 2273</span>&#160;</div><div class="line"><a name="l02274"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a04e75675884236b6ed8244d7575d3a13"> 2274</a></span>&#160;static constant <a class="code" href="pearl-anglescan-process_8ipf.html#a04e75675884236b6ed8244d7575d3a13">kProjScaleDist</a> = 2</div><div class="line"><a name="l02275"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#aed66bda9701d8a69b2174fac974aa665"> 2275</a></span>&#160;static constant <a class="code" href="pearl-anglescan-process_8ipf.html#aed66bda9701d8a69b2174fac974aa665">kProjScaleStereo</a> = 2</div><div class="line"><a name="l02276"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#afa14187803f5b428a96c8234e04ab217"> 2276</a></span>&#160;static constant <a class="code" href="pearl-anglescan-process_8ipf.html#afa14187803f5b428a96c8234e04ab217">kProjScaleArea</a> = 2</div><div class="line"><a name="l02277"></a><span class="lineno"> 2277</span>&#160;<span class="comment">// scaled so that radius(gnom) = radius(stereo) for polar = 88</span></div><div class="line"><a name="l02278"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ab6670abb621d01994c0b9974f58be843"> 2278</a></span>&#160;static constant <a class="code" href="pearl-anglescan-process_8ipf.html#ab6670abb621d01994c0b9974f58be843">kProjScaleGnom</a> = 0.06744519021</div><div class="line"><a name="l02279"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#aa5487fdee22e0da61a511c14239262f5"> 2279</a></span>&#160;static constant <a class="code" href="pearl-anglescan-process_8ipf.html#aa5487fdee22e0da61a511c14239262f5">kProjScaleOrtho</a> = 2</div><div class="line"><a name="l02280"></a><span class="lineno"> 2280</span>&#160;</div><div class="line"><a name="l02295"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a75219b38ea58012abcffc848d536faa4"> 2295</a></span>&#160;threadsafe function calc_graph_radius(polar, [projection])</div><div class="line"><a name="l02296"></a><span class="lineno"> 2296</span>&#160;    variable polar</div><div class="line"><a name="l02297"></a><span class="lineno"> 2297</span>&#160;    variable projection</div><div class="line"><a name="l02298"></a><span class="lineno"> 2298</span>&#160;    </div><div class="line"><a name="l02299"></a><span class="lineno"> 2299</span>&#160;    if (ParamIsDefault(projection))</div><div class="line"><a name="l02300"></a><span class="lineno"> 2300</span>&#160;        projection = 1</div><div class="line"><a name="l02301"></a><span class="lineno"> 2301</span>&#160;    endif</div><div class="line"><a name="l02302"></a><span class="lineno"> 2302</span>&#160;</div><div class="line"><a name="l02303"></a><span class="lineno"> 2303</span>&#160;    variable radius</div><div class="line"><a name="l02304"></a><span class="lineno"> 2304</span>&#160;    switch(projection)</div><div class="line"><a name="l02305"></a><span class="lineno"> 2305</span>&#160;        case <a class="code" href="pearl-anglescan-process_8ipf.html#ac151c6f989d6a568fdef0acb791f84db">kProjStereo</a>: <span class="comment">// stereographic</span></div><div class="line"><a name="l02306"></a><span class="lineno"> 2306</span>&#160;            radius = <a class="code" href="pearl-anglescan-process_8ipf.html#aed66bda9701d8a69b2174fac974aa665">kProjScaleStereo</a> * tan(polar / 2 * pi / 180)</div><div class="line"><a name="l02307"></a><span class="lineno"> 2307</span>&#160;            break</div><div class="line"><a name="l02308"></a><span class="lineno"> 2308</span>&#160;        case <a class="code" href="pearl-anglescan-process_8ipf.html#a207c56ac03cc18bf1bfde88dbfe2666f">kProjArea</a>: <span class="comment">// equal area</span></div><div class="line"><a name="l02309"></a><span class="lineno"> 2309</span>&#160;            radius = <a class="code" href="pearl-anglescan-process_8ipf.html#afa14187803f5b428a96c8234e04ab217">kProjScaleArea</a> * sin(polar / 2 * pi / 180)</div><div class="line"><a name="l02310"></a><span class="lineno"> 2310</span>&#160;            break</div><div class="line"><a name="l02311"></a><span class="lineno"> 2311</span>&#160;        case <a class="code" href="pearl-anglescan-process_8ipf.html#a4a40c73c0e03545e0050ea370e9c57d3">kProjGnom</a>: <span class="comment">// gnomonic</span></div><div class="line"><a name="l02312"></a><span class="lineno"> 2312</span>&#160;            radius = polar &lt; 90 ? <a class="code" href="pearl-anglescan-process_8ipf.html#ab6670abb621d01994c0b9974f58be843">kProjScaleGnom</a> * tan(polar * pi / 180) : inf</div><div class="line"><a name="l02313"></a><span class="lineno"> 2313</span>&#160;            break</div><div class="line"><a name="l02314"></a><span class="lineno"> 2314</span>&#160;        case <a class="code" href="pearl-anglescan-process_8ipf.html#a3b3bd11c35d5f850b34937ab6c45f659">kProjOrtho</a>: <span class="comment">// orthographic</span></div><div class="line"><a name="l02315"></a><span class="lineno"> 2315</span>&#160;            radius = <a class="code" href="pearl-anglescan-process_8ipf.html#aa5487fdee22e0da61a511c14239262f5">kProjScaleOrtho</a> * sin(polar * pi / 180)</div><div class="line"><a name="l02316"></a><span class="lineno"> 2316</span>&#160;            break</div><div class="line"><a name="l02317"></a><span class="lineno"> 2317</span>&#160;        default: <span class="comment">// equidistant</span></div><div class="line"><a name="l02318"></a><span class="lineno"> 2318</span>&#160;            radius = <a class="code" href="pearl-anglescan-process_8ipf.html#a04e75675884236b6ed8244d7575d3a13">kProjScaleDist</a> * polar / 90</div><div class="line"><a name="l02319"></a><span class="lineno"> 2319</span>&#160;    endswitch</div><div class="line"><a name="l02320"></a><span class="lineno"> 2320</span>&#160;    </div><div class="line"><a name="l02321"></a><span class="lineno"> 2321</span>&#160;    return radius</div><div class="line"><a name="l02322"></a><span class="lineno"> 2322</span>&#160;end</div><div class="line"><a name="l02323"></a><span class="lineno"> 2323</span>&#160;</div><div class="line"><a name="l02340"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ae2b036a06ffac8d2bb292a65401f8a9a"> 2340</a></span>&#160;threadsafe function <a class="code" href="pearl-anglescan-process_8ipf.html#ae2b036a06ffac8d2bb292a65401f8a9a">calc_graph_polar</a>(x, y, [projection])</div><div class="line"><a name="l02341"></a><span class="lineno"> 2341</span>&#160;    variable x</div><div class="line"><a name="l02342"></a><span class="lineno"> 2342</span>&#160;    variable y</div><div class="line"><a name="l02343"></a><span class="lineno"> 2343</span>&#160;    variable projection </div><div class="line"><a name="l02344"></a><span class="lineno"> 2344</span>&#160;    </div><div class="line"><a name="l02345"></a><span class="lineno"> 2345</span>&#160;    if (ParamIsDefault(projection))</div><div class="line"><a name="l02346"></a><span class="lineno"> 2346</span>&#160;        projection = 1</div><div class="line"><a name="l02347"></a><span class="lineno"> 2347</span>&#160;    endif</div><div class="line"><a name="l02348"></a><span class="lineno"> 2348</span>&#160;</div><div class="line"><a name="l02349"></a><span class="lineno"> 2349</span>&#160;    variable radius</div><div class="line"><a name="l02350"></a><span class="lineno"> 2350</span>&#160;    variable polar</div><div class="line"><a name="l02351"></a><span class="lineno"> 2351</span>&#160;    </div><div class="line"><a name="l02352"></a><span class="lineno"> 2352</span>&#160;    radius = sqrt(x^2 + y^2)</div><div class="line"><a name="l02353"></a><span class="lineno"> 2353</span>&#160;    switch(projection)</div><div class="line"><a name="l02354"></a><span class="lineno"> 2354</span>&#160;        case <a class="code" href="pearl-anglescan-process_8ipf.html#ac151c6f989d6a568fdef0acb791f84db">kProjStereo</a>: <span class="comment">// stereographic</span></div><div class="line"><a name="l02355"></a><span class="lineno"> 2355</span>&#160;            polar = 2 * atan(radius / <a class="code" href="pearl-anglescan-process_8ipf.html#aed66bda9701d8a69b2174fac974aa665">kProjScaleStereo</a>) * 180 / pi</div><div class="line"><a name="l02356"></a><span class="lineno"> 2356</span>&#160;            break</div><div class="line"><a name="l02357"></a><span class="lineno"> 2357</span>&#160;        case <a class="code" href="pearl-anglescan-process_8ipf.html#a207c56ac03cc18bf1bfde88dbfe2666f">kProjArea</a>: <span class="comment">// equal area</span></div><div class="line"><a name="l02358"></a><span class="lineno"> 2358</span>&#160;            polar = 2 * asin(radius / <a class="code" href="pearl-anglescan-process_8ipf.html#afa14187803f5b428a96c8234e04ab217">kProjScaleArea</a>) * 180 / pi</div><div class="line"><a name="l02359"></a><span class="lineno"> 2359</span>&#160;            break</div><div class="line"><a name="l02360"></a><span class="lineno"> 2360</span>&#160;        case <a class="code" href="pearl-anglescan-process_8ipf.html#a4a40c73c0e03545e0050ea370e9c57d3">kProjGnom</a>: <span class="comment">// gnomonic</span></div><div class="line"><a name="l02361"></a><span class="lineno"> 2361</span>&#160;            polar = atan(radius / <a class="code" href="pearl-anglescan-process_8ipf.html#ab6670abb621d01994c0b9974f58be843">kProjScaleGnom</a>) * 180 / pi</div><div class="line"><a name="l02362"></a><span class="lineno"> 2362</span>&#160;            break</div><div class="line"><a name="l02363"></a><span class="lineno"> 2363</span>&#160;        case <a class="code" href="pearl-anglescan-process_8ipf.html#a3b3bd11c35d5f850b34937ab6c45f659">kProjOrtho</a>: <span class="comment">// orthographic</span></div><div class="line"><a name="l02364"></a><span class="lineno"> 2364</span>&#160;            polar = asin(radius / <a class="code" href="pearl-anglescan-process_8ipf.html#aa5487fdee22e0da61a511c14239262f5">kProjScaleOrtho</a>) * 180 / pi</div><div class="line"><a name="l02365"></a><span class="lineno"> 2365</span>&#160;            break</div><div class="line"><a name="l02366"></a><span class="lineno"> 2366</span>&#160;        default: <span class="comment">// equidistant</span></div><div class="line"><a name="l02367"></a><span class="lineno"> 2367</span>&#160;            polar = 90 * radius / <a class="code" href="pearl-anglescan-process_8ipf.html#a04e75675884236b6ed8244d7575d3a13">kProjScaleDist</a></div><div class="line"><a name="l02368"></a><span class="lineno"> 2368</span>&#160;    endswitch</div><div class="line"><a name="l02369"></a><span class="lineno"> 2369</span>&#160;</div><div class="line"><a name="l02370"></a><span class="lineno"> 2370</span>&#160;    return polar</div><div class="line"><a name="l02371"></a><span class="lineno"> 2371</span>&#160;end</div><div class="line"><a name="l02372"></a><span class="lineno"> 2372</span>&#160;</div><div class="line"><a name="l02393"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a4fc744e24e3e9c5efb17f14ab622bcae"> 2393</a></span>&#160;threadsafe function <a class="code" href="pearl-anglescan-process_8ipf.html#a4fc744e24e3e9c5efb17f14ab622bcae">calc_graph_azi</a>(x, y, [projection,zeroAngle])</div><div class="line"><a name="l02394"></a><span class="lineno"> 2394</span>&#160;    variable x</div><div class="line"><a name="l02395"></a><span class="lineno"> 2395</span>&#160;    variable y</div><div class="line"><a name="l02396"></a><span class="lineno"> 2396</span>&#160;    variable projection </div><div class="line"><a name="l02397"></a><span class="lineno"> 2397</span>&#160;    variable zeroAngle</div><div class="line"><a name="l02398"></a><span class="lineno"> 2398</span>&#160;    </div><div class="line"><a name="l02399"></a><span class="lineno"> 2399</span>&#160;    if (ParamIsDefault(projection))</div><div class="line"><a name="l02400"></a><span class="lineno"> 2400</span>&#160;        projection = 1</div><div class="line"><a name="l02401"></a><span class="lineno"> 2401</span>&#160;    endif</div><div class="line"><a name="l02402"></a><span class="lineno"> 2402</span>&#160;    if (ParamIsDefault(zeroAngle))</div><div class="line"><a name="l02403"></a><span class="lineno"> 2403</span>&#160;        zeroAngle = 0</div><div class="line"><a name="l02404"></a><span class="lineno"> 2404</span>&#160;    endif</div><div class="line"><a name="l02405"></a><span class="lineno"> 2405</span>&#160;</div><div class="line"><a name="l02406"></a><span class="lineno"> 2406</span>&#160;    variable azi</div><div class="line"><a name="l02407"></a><span class="lineno"> 2407</span>&#160;    if (x &gt; 0)</div><div class="line"><a name="l02408"></a><span class="lineno"> 2408</span>&#160;        azi = atan(y / x) * 180 / pi</div><div class="line"><a name="l02409"></a><span class="lineno"> 2409</span>&#160;    else</div><div class="line"><a name="l02410"></a><span class="lineno"> 2410</span>&#160;        azi = atan(y / x) * 180 / pi + 180</div><div class="line"><a name="l02411"></a><span class="lineno"> 2411</span>&#160;    endif</div><div class="line"><a name="l02412"></a><span class="lineno"> 2412</span>&#160;    </div><div class="line"><a name="l02413"></a><span class="lineno"> 2413</span>&#160;    azi += zeroAngle</div><div class="line"><a name="l02414"></a><span class="lineno"> 2414</span>&#160;    if (azi &lt; 0)</div><div class="line"><a name="l02415"></a><span class="lineno"> 2415</span>&#160;        azi += 360</div><div class="line"><a name="l02416"></a><span class="lineno"> 2416</span>&#160;    endif</div><div class="line"><a name="l02417"></a><span class="lineno"> 2417</span>&#160;    if (azi &gt;= 360)</div><div class="line"><a name="l02418"></a><span class="lineno"> 2418</span>&#160;        azi -= 360</div><div class="line"><a name="l02419"></a><span class="lineno"> 2419</span>&#160;    endif</div><div class="line"><a name="l02420"></a><span class="lineno"> 2420</span>&#160;    if (numtype(azi) != 0)</div><div class="line"><a name="l02421"></a><span class="lineno"> 2421</span>&#160;        azi = 0</div><div class="line"><a name="l02422"></a><span class="lineno"> 2422</span>&#160;    endif</div><div class="line"><a name="l02423"></a><span class="lineno"> 2423</span>&#160;    </div><div class="line"><a name="l02424"></a><span class="lineno"> 2424</span>&#160;    return azi</div><div class="line"><a name="l02425"></a><span class="lineno"> 2425</span>&#160;end</div><div class="line"><a name="l02426"></a><span class="lineno"> 2426</span>&#160;</div><div class="line"><a name="l02438"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a1baaa3ffd9495ed427b43cbfe6e1edf8"> 2438</a></span>&#160;static function <a class="code" href="pearl-anglescan-process_8ipf.html#a1baaa3ffd9495ed427b43cbfe6e1edf8">update_polar_info</a>(graphname)</div><div class="line"><a name="l02439"></a><span class="lineno"> 2439</span>&#160;    <span class="keywordtype">string</span> graphname</div><div class="line"><a name="l02440"></a><span class="lineno"> 2440</span>&#160;    </div><div class="line"><a name="l02441"></a><span class="lineno"> 2441</span>&#160;    dfref savedf = GetDataFolderDFR()</div><div class="line"><a name="l02442"></a><span class="lineno"> 2442</span>&#160;</div><div class="line"><a name="l02443"></a><span class="lineno"> 2443</span>&#160;    <span class="keywordtype">string</span> graphdf = &quot;root:packages:WMPolarGraphs:&quot; + graphname</div><div class="line"><a name="l02444"></a><span class="lineno"> 2444</span>&#160;    setdatafolder graphdf</div><div class="line"><a name="l02445"></a><span class="lineno"> 2445</span>&#160;    </div><div class="line"><a name="l02446"></a><span class="lineno"> 2446</span>&#160;    nvar csrA_theta</div><div class="line"><a name="l02447"></a><span class="lineno"> 2447</span>&#160;    nvar csrA_phi</div><div class="line"><a name="l02448"></a><span class="lineno"> 2448</span>&#160;    nvar csrB_theta</div><div class="line"><a name="l02449"></a><span class="lineno"> 2449</span>&#160;    nvar csrB_phi</div><div class="line"><a name="l02450"></a><span class="lineno"> 2450</span>&#160;</div><div class="line"><a name="l02451"></a><span class="lineno"> 2451</span>&#160;    <span class="keywordtype">string</span> sproj = GetUserData(graphname, &quot;&quot;, &quot;projection&quot;)</div><div class="line"><a name="l02452"></a><span class="lineno"> 2452</span>&#160;    variable projection = str2num(&quot;0&quot; + sproj)</div><div class="line"><a name="l02453"></a><span class="lineno"> 2453</span>&#160;    nvar zeroAngleWhere</div><div class="line"><a name="l02454"></a><span class="lineno"> 2454</span>&#160;    </div><div class="line"><a name="l02455"></a><span class="lineno"> 2455</span>&#160;    variable x = hcsr(A, graphname)</div><div class="line"><a name="l02456"></a><span class="lineno"> 2456</span>&#160;    variable y = vcsr(A, graphname)</div><div class="line"><a name="l02457"></a><span class="lineno"> 2457</span>&#160;    csrA_theta = <a class="code" href="pearl-anglescan-process_8ipf.html#ae2b036a06ffac8d2bb292a65401f8a9a">calc_graph_polar</a>(x, y, projection=projection)</div><div class="line"><a name="l02458"></a><span class="lineno"> 2458</span>&#160;    csrA_phi = <a class="code" href="pearl-anglescan-process_8ipf.html#a4fc744e24e3e9c5efb17f14ab622bcae">calc_graph_azi</a>(x, y, projection=projection, zeroAngle=zeroAngleWhere)</div><div class="line"><a name="l02459"></a><span class="lineno"> 2459</span>&#160;</div><div class="line"><a name="l02460"></a><span class="lineno"> 2460</span>&#160;    x = hcsr(B, graphname)</div><div class="line"><a name="l02461"></a><span class="lineno"> 2461</span>&#160;    y = vcsr(B, graphname)</div><div class="line"><a name="l02462"></a><span class="lineno"> 2462</span>&#160;    csrB_theta = <a class="code" href="pearl-anglescan-process_8ipf.html#ae2b036a06ffac8d2bb292a65401f8a9a">calc_graph_polar</a>(x, y, projection=projection)</div><div class="line"><a name="l02463"></a><span class="lineno"> 2463</span>&#160;    csrB_phi = <a class="code" href="pearl-anglescan-process_8ipf.html#a4fc744e24e3e9c5efb17f14ab622bcae">calc_graph_azi</a>(x, y, projection=projection, zeroAngle=zeroAngleWhere)</div><div class="line"><a name="l02464"></a><span class="lineno"> 2464</span>&#160;    </div><div class="line"><a name="l02465"></a><span class="lineno"> 2465</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l02466"></a><span class="lineno"> 2466</span>&#160;end</div><div class="line"><a name="l02467"></a><span class="lineno"> 2467</span>&#160;</div><div class="line"><a name="l02473"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ac4dbd1ece37b2cf22fa976a153977288"> 2473</a></span>&#160;static function <a class="code" href="pearl-anglescan-process_8ipf.html#ac4dbd1ece37b2cf22fa976a153977288">polar_graph_hook</a>(s)</div><div class="line"><a name="l02474"></a><span class="lineno"> 2474</span>&#160;    STRUCT WMWinHookStruct &amp;s</div><div class="line"><a name="l02475"></a><span class="lineno"> 2475</span>&#160;</div><div class="line"><a name="l02476"></a><span class="lineno"> 2476</span>&#160;    Variable hookResult = 0</div><div class="line"><a name="l02477"></a><span class="lineno"> 2477</span>&#160;</div><div class="line"><a name="l02478"></a><span class="lineno"> 2478</span>&#160;    switch(s.eventCode)</div><div class="line"><a name="l02479"></a><span class="lineno"> 2479</span>&#160;        case 7: <span class="comment">// cursor moved</span></div><div class="line"><a name="l02480"></a><span class="lineno"> 2480</span>&#160;            <a class="code" href="pearl-anglescan-process_8ipf.html#a1baaa3ffd9495ed427b43cbfe6e1edf8">update_polar_info</a>(s.winname)</div><div class="line"><a name="l02481"></a><span class="lineno"> 2481</span>&#160;            break</div><div class="line"><a name="l02482"></a><span class="lineno"> 2482</span>&#160;        case 20: <span class="comment">// show info</span></div><div class="line"><a name="l02483"></a><span class="lineno"> 2483</span>&#160;            TextBox /W=$s.winname /N=tb_angles /C /V=1</div><div class="line"><a name="l02484"></a><span class="lineno"> 2484</span>&#160;            break</div><div class="line"><a name="l02485"></a><span class="lineno"> 2485</span>&#160;        case 21: <span class="comment">// hide info</span></div><div class="line"><a name="l02486"></a><span class="lineno"> 2486</span>&#160;            TextBox /W=$s.winname /N=tb_angles /C /V=0</div><div class="line"><a name="l02487"></a><span class="lineno"> 2487</span>&#160;            break</div><div class="line"><a name="l02488"></a><span class="lineno"> 2488</span>&#160;    endswitch</div><div class="line"><a name="l02489"></a><span class="lineno"> 2489</span>&#160;</div><div class="line"><a name="l02490"></a><span class="lineno"> 2490</span>&#160;    return hookResult       <span class="comment">// 0 if nothing done, else 1</span></div><div class="line"><a name="l02491"></a><span class="lineno"> 2491</span>&#160;end</div><div class="line"><a name="l02492"></a><span class="lineno"> 2492</span>&#160;</div><div class="line"><a name="l02493"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a70b0e243bcbd549e2b1da74aab605629"> 2493</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a70b0e243bcbd549e2b1da74aab605629">set_polar_graph_cursor</a>(nickname, cursorname, polar_angle, azim_angle, [graphname])</div><div class="line"><a name="l02494"></a><span class="lineno"> 2494</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l02495"></a><span class="lineno"> 2495</span>&#160;    <span class="keywordtype">string</span> cursorname</div><div class="line"><a name="l02496"></a><span class="lineno"> 2496</span>&#160;    variable polar_angle</div><div class="line"><a name="l02497"></a><span class="lineno"> 2497</span>&#160;    variable azim_angle</div><div class="line"><a name="l02498"></a><span class="lineno"> 2498</span>&#160;    <span class="keywordtype">string</span> graphname</div><div class="line"><a name="l02499"></a><span class="lineno"> 2499</span>&#160;    </div><div class="line"><a name="l02500"></a><span class="lineno"> 2500</span>&#160;    if (ParamIsDefault(graphname))</div><div class="line"><a name="l02501"></a><span class="lineno"> 2501</span>&#160;        if (strlen(nickname) &gt; 0)</div><div class="line"><a name="l02502"></a><span class="lineno"> 2502</span>&#160;            graphname = nickname</div><div class="line"><a name="l02503"></a><span class="lineno"> 2503</span>&#160;        else</div><div class="line"><a name="l02504"></a><span class="lineno"> 2504</span>&#160;            graphname = GetDataFolder(0)</div><div class="line"><a name="l02505"></a><span class="lineno"> 2505</span>&#160;        endif</div><div class="line"><a name="l02506"></a><span class="lineno"> 2506</span>&#160;    endif</div><div class="line"><a name="l02507"></a><span class="lineno"> 2507</span>&#160;    </div><div class="line"><a name="l02508"></a><span class="lineno"> 2508</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l02509"></a><span class="lineno"> 2509</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l02510"></a><span class="lineno"> 2510</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l02511"></a><span class="lineno"> 2511</span>&#160;</div><div class="line"><a name="l02512"></a><span class="lineno"> 2512</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l02513"></a><span class="lineno"> 2513</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l02514"></a><span class="lineno"> 2514</span>&#160;    wave /sdfr=df /z azim = $s_azim</div><div class="line"><a name="l02515"></a><span class="lineno"> 2515</span>&#160;    wave /sdfr=df /z polar = $s_polar</div><div class="line"><a name="l02516"></a><span class="lineno"> 2516</span>&#160;</div><div class="line"><a name="l02517"></a><span class="lineno"> 2517</span>&#160;    FindLevel /P /Q polar, polar_angle</div><div class="line"><a name="l02518"></a><span class="lineno"> 2518</span>&#160;    if (v_flag == 0)</div><div class="line"><a name="l02519"></a><span class="lineno"> 2519</span>&#160;        variable polar_level = floor(v_levelx)</div><div class="line"><a name="l02520"></a><span class="lineno"> 2520</span>&#160;        FindLevel /P /Q /R=[polar_level] azim, azim_angle</div><div class="line"><a name="l02521"></a><span class="lineno"> 2521</span>&#160;        if (v_flag == 0)</div><div class="line"><a name="l02522"></a><span class="lineno"> 2522</span>&#160;            variable azim_level = round(v_levelx)</div><div class="line"><a name="l02523"></a><span class="lineno"> 2523</span>&#160;            <span class="keywordtype">string</span> tracename = &quot;polarY0&quot;</div><div class="line"><a name="l02524"></a><span class="lineno"> 2524</span>&#160;            Cursor /W=$graphname /P $cursorname $traceName azim_level</div><div class="line"><a name="l02525"></a><span class="lineno"> 2525</span>&#160;        endif</div><div class="line"><a name="l02526"></a><span class="lineno"> 2526</span>&#160;    endif</div><div class="line"><a name="l02527"></a><span class="lineno"> 2527</span>&#160;end</div><div class="line"><a name="l02528"></a><span class="lineno"> 2528</span>&#160;</div><div class="line"><a name="l02538"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a4952bc53e3d6d272d25b5e35e91696b5"> 2538</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a4952bc53e3d6d272d25b5e35e91696b5">hemi_add_anglescan</a>(nickname, values, polar, azi, [weights])</div><div class="line"><a name="l02539"></a><span class="lineno"> 2539</span>&#160;    <span class="keywordtype">string</span> nickname <span class="comment">// name prefix of holo waves.</span></div><div class="line"><a name="l02540"></a><span class="lineno"> 2540</span>&#160;        <span class="comment">// may be empty.</span></div><div class="line"><a name="l02541"></a><span class="lineno"> 2541</span>&#160;    wave values <span class="comment">// intensity values</span></div><div class="line"><a name="l02542"></a><span class="lineno"> 2542</span>&#160;        <span class="comment">// the wave can be one- or two-dimensional.</span></div><div class="line"><a name="l02543"></a><span class="lineno"> 2543</span>&#160;        <span class="comment">// no specific order required, the function sorts the arrays internally</span></div><div class="line"><a name="l02544"></a><span class="lineno"> 2544</span>&#160;    wave polar  <span class="comment">// polar coordinates. allowed range 0 &lt;= theta &lt;= 90</span></div><div class="line"><a name="l02545"></a><span class="lineno"> 2545</span>&#160;        <span class="comment">// dimensions corresponding to value.</span></div><div class="line"><a name="l02546"></a><span class="lineno"> 2546</span>&#160;    wave azi    <span class="comment">// azimuthal coordinates. allowed range -360 &lt;= phi &lt; +360</span></div><div class="line"><a name="l02547"></a><span class="lineno"> 2547</span>&#160;        <span class="comment">// dimensions corresponding to value.</span></div><div class="line"><a name="l02548"></a><span class="lineno"> 2548</span>&#160;    wave weights    <span class="comment">// total accumulation time of each point of values. default = 1</span></div><div class="line"><a name="l02549"></a><span class="lineno"> 2549</span>&#160;</div><div class="line"><a name="l02550"></a><span class="lineno"> 2550</span>&#160;    if (ParamIsDefault(weights))</div><div class="line"><a name="l02551"></a><span class="lineno"> 2551</span>&#160;        duplicate /free values, weights</div><div class="line"><a name="l02552"></a><span class="lineno"> 2552</span>&#160;        weights = 1</div><div class="line"><a name="l02553"></a><span class="lineno"> 2553</span>&#160;    endif</div><div class="line"><a name="l02554"></a><span class="lineno"> 2554</span>&#160;    </div><div class="line"><a name="l02555"></a><span class="lineno"> 2555</span>&#160;    <span class="comment">// quick check whether hemi grid is existing</span></div><div class="line"><a name="l02556"></a><span class="lineno"> 2556</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l02557"></a><span class="lineno"> 2557</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l02558"></a><span class="lineno"> 2558</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l02559"></a><span class="lineno"> 2559</span>&#160;</div><div class="line"><a name="l02560"></a><span class="lineno"> 2560</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l02561"></a><span class="lineno"> 2561</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l02562"></a><span class="lineno"> 2562</span>&#160;    <span class="keywordtype">string</span> s_theta = s_prefix + &quot;th&quot;</div><div class="line"><a name="l02563"></a><span class="lineno"> 2563</span>&#160;</div><div class="line"><a name="l02564"></a><span class="lineno"> 2564</span>&#160;    wave /sdfr=df /z w_values = $s_int</div><div class="line"><a name="l02565"></a><span class="lineno"> 2565</span>&#160;    wave /sdfr=df /z w_azim = $s_azim</div><div class="line"><a name="l02566"></a><span class="lineno"> 2566</span>&#160;    wave /sdfr=df /z w_polar = $s_polar</div><div class="line"><a name="l02567"></a><span class="lineno"> 2567</span>&#160;    wave /sdfr=df /z w_theta = $s_theta</div><div class="line"><a name="l02568"></a><span class="lineno"> 2568</span>&#160;    if (!waveexists(w_values) || !waveexists(w_azim) || !waveexists(w_polar))</div><div class="line"><a name="l02569"></a><span class="lineno"> 2569</span>&#160;        abort &quot;Missing hemispherical scan grid. Please call <a class="code" href="pearl-anglescan-process_8ipf.html#a902ac3a24e33f651e83ee03d31707da7">make_hemi_grid</a>() first.&quot;</div><div class="line"><a name="l02570"></a><span class="lineno"> 2570</span>&#160;    endif</div><div class="line"><a name="l02571"></a><span class="lineno"> 2571</span>&#160;    </div><div class="line"><a name="l02572"></a><span class="lineno"> 2572</span>&#160;    <span class="comment">// make internal copies, one-dimensional, ordered in theta</span></div><div class="line"><a name="l02573"></a><span class="lineno"> 2573</span>&#160;    duplicate /free values, values_copy</div><div class="line"><a name="l02574"></a><span class="lineno"> 2574</span>&#160;    duplicate /free polar, polar_copy</div><div class="line"><a name="l02575"></a><span class="lineno"> 2575</span>&#160;    duplicate /free azi, azi_copy</div><div class="line"><a name="l02576"></a><span class="lineno"> 2576</span>&#160;    duplicate /free weights, weights_copy</div><div class="line"><a name="l02577"></a><span class="lineno"> 2577</span>&#160;    variable nn = dimsize(values, 0) * max(dimsize(values, 1), 1)</div><div class="line"><a name="l02578"></a><span class="lineno"> 2578</span>&#160;    redimension /n=(nn) values_copy, polar_copy, azi_copy, weights_copy</div><div class="line"><a name="l02579"></a><span class="lineno"> 2579</span>&#160;    sort /r polar_copy, polar_copy, azi_copy, values_copy, weights_copy</div><div class="line"><a name="l02580"></a><span class="lineno"> 2580</span>&#160;    </div><div class="line"><a name="l02581"></a><span class="lineno"> 2581</span>&#160;    variable pol</div><div class="line"><a name="l02582"></a><span class="lineno"> 2582</span>&#160;    variable pol_st = abs(w_theta[1] - w_theta[0])</div><div class="line"><a name="l02583"></a><span class="lineno"> 2583</span>&#160;    variable pol1, pol2</div><div class="line"><a name="l02584"></a><span class="lineno"> 2584</span>&#160;    </div><div class="line"><a name="l02585"></a><span class="lineno"> 2585</span>&#160;    duplicate /free azi_copy, azi_slice</div><div class="line"><a name="l02586"></a><span class="lineno"> 2586</span>&#160;    duplicate /free values_copy, values_slice</div><div class="line"><a name="l02587"></a><span class="lineno"> 2587</span>&#160;    duplicate /free weights_copy, weights_slice</div><div class="line"><a name="l02588"></a><span class="lineno"> 2588</span>&#160;    for (pol = 90; pol &gt;= 0; pol -= pol_st)</div><div class="line"><a name="l02589"></a><span class="lineno"> 2589</span>&#160;        pol1 = pol - pol_st / 2</div><div class="line"><a name="l02590"></a><span class="lineno"> 2590</span>&#160;        pol2 = pol + pol_st / 2</div><div class="line"><a name="l02591"></a><span class="lineno"> 2591</span>&#160;        extract /free /indx polar_copy, sel, (pol1 &lt; polar_copy) &amp;&amp; (polar_copy &lt;= pol2)</div><div class="line"><a name="l02592"></a><span class="lineno"> 2592</span>&#160;        if (numpnts(sel) &gt; 0)</div><div class="line"><a name="l02593"></a><span class="lineno"> 2593</span>&#160;            redimension /n=(numpnts(sel)) azi_slice, values_slice, weights_slice</div><div class="line"><a name="l02594"></a><span class="lineno"> 2594</span>&#160;            azi_slice = azi_copy[sel]</div><div class="line"><a name="l02595"></a><span class="lineno"> 2595</span>&#160;            values_slice = values_copy[sel]</div><div class="line"><a name="l02596"></a><span class="lineno"> 2596</span>&#160;            weights_slice = weights_copy[sel]</div><div class="line"><a name="l02597"></a><span class="lineno"> 2597</span>&#160;            <a class="code" href="pearl-anglescan-process_8ipf.html#a4641c716180d737700c6df87f5f8974e">hemi_add_aziscan</a>(nickname, values_slice, pol, azi_slice, weights=weights_slice)</div><div class="line"><a name="l02598"></a><span class="lineno"> 2598</span>&#160;        endif</div><div class="line"><a name="l02599"></a><span class="lineno"> 2599</span>&#160;    endfor</div><div class="line"><a name="l02600"></a><span class="lineno"> 2600</span>&#160;end</div><div class="line"><a name="l02601"></a><span class="lineno"> 2601</span>&#160;</div><div class="line"><a name="l02608"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a4641c716180d737700c6df87f5f8974e"> 2608</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a4641c716180d737700c6df87f5f8974e">hemi_add_aziscan</a>(nickname, values, polar, azi, [weights])</div><div class="line"><a name="l02609"></a><span class="lineno"> 2609</span>&#160;    <span class="keywordtype">string</span> nickname <span class="comment">// name prefix of holo waves.</span></div><div class="line"><a name="l02610"></a><span class="lineno"> 2610</span>&#160;        <span class="comment">// may be empty.</span></div><div class="line"><a name="l02611"></a><span class="lineno"> 2611</span>&#160;    wave values <span class="comment">// intensity values of the azimuthal scan at the positions given in the azi parameter</span></div><div class="line"><a name="l02612"></a><span class="lineno"> 2612</span>&#160;    variable polar <span class="comment">// polar angle where to add the azi scan</span></div><div class="line"><a name="l02613"></a><span class="lineno"> 2613</span>&#160;    wave azi <span class="comment">// angle positions of the azimuthal scan</span></div><div class="line"><a name="l02614"></a><span class="lineno"> 2614</span>&#160;        <span class="comment">// acceptable range: &gt;= -360 and &lt; +360</span></div><div class="line"><a name="l02615"></a><span class="lineno"> 2615</span>&#160;        <span class="comment">// no specific order required, the function sorts the array internally</span></div><div class="line"><a name="l02616"></a><span class="lineno"> 2616</span>&#160;    wave weights    <span class="comment">// total accumulation time of each point of values. default = 1</span></div><div class="line"><a name="l02617"></a><span class="lineno"> 2617</span>&#160;</div><div class="line"><a name="l02618"></a><span class="lineno"> 2618</span>&#160;    if (ParamIsDefault(weights))</div><div class="line"><a name="l02619"></a><span class="lineno"> 2619</span>&#160;        duplicate /free values, weights</div><div class="line"><a name="l02620"></a><span class="lineno"> 2620</span>&#160;        weights = 1</div><div class="line"><a name="l02621"></a><span class="lineno"> 2621</span>&#160;    endif</div><div class="line"><a name="l02622"></a><span class="lineno"> 2622</span>&#160;        </div><div class="line"><a name="l02623"></a><span class="lineno"> 2623</span>&#160;    <span class="comment">// hemi grid waves</span></div><div class="line"><a name="l02624"></a><span class="lineno"> 2624</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l02625"></a><span class="lineno"> 2625</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l02626"></a><span class="lineno"> 2626</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l02627"></a><span class="lineno"> 2627</span>&#160;</div><div class="line"><a name="l02628"></a><span class="lineno"> 2628</span>&#160;    <span class="keywordtype">string</span> s_totals = s_prefix + &quot;tot&quot;</div><div class="line"><a name="l02629"></a><span class="lineno"> 2629</span>&#160;    <span class="keywordtype">string</span> s_weights = s_prefix + &quot;wt&quot;</div><div class="line"><a name="l02630"></a><span class="lineno"> 2630</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l02631"></a><span class="lineno"> 2631</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l02632"></a><span class="lineno"> 2632</span>&#160;    <span class="keywordtype">string</span> s_index = s_prefix + &quot;index&quot;</div><div class="line"><a name="l02633"></a><span class="lineno"> 2633</span>&#160;    <span class="keywordtype">string</span> s_theta = s_prefix + &quot;th&quot;</div><div class="line"><a name="l02634"></a><span class="lineno"> 2634</span>&#160;    <span class="keywordtype">string</span> s_dphi = s_prefix + &quot;dphi&quot;</div><div class="line"><a name="l02635"></a><span class="lineno"> 2635</span>&#160;    <span class="keywordtype">string</span> s_nphis = s_prefix + &quot;nphis&quot;</div><div class="line"><a name="l02636"></a><span class="lineno"> 2636</span>&#160;    </div><div class="line"><a name="l02637"></a><span class="lineno"> 2637</span>&#160;    wave /sdfr=df w_polar = $s_polar</div><div class="line"><a name="l02638"></a><span class="lineno"> 2638</span>&#160;    wave /sdfr=df w_azim = $s_azim</div><div class="line"><a name="l02639"></a><span class="lineno"> 2639</span>&#160;    wave /sdfr=df w_values = $s_int</div><div class="line"><a name="l02640"></a><span class="lineno"> 2640</span>&#160;    wave /sdfr=df w_totals = $s_totals</div><div class="line"><a name="l02641"></a><span class="lineno"> 2641</span>&#160;    wave /sdfr=df w_weights = $s_weights</div><div class="line"><a name="l02642"></a><span class="lineno"> 2642</span>&#160;    wave /sdfr=df w_index = $s_index</div><div class="line"><a name="l02643"></a><span class="lineno"> 2643</span>&#160;    wave /sdfr=df w_theta = $s_theta</div><div class="line"><a name="l02644"></a><span class="lineno"> 2644</span>&#160;    wave /sdfr=df w_dphi = $s_dphi</div><div class="line"><a name="l02645"></a><span class="lineno"> 2645</span>&#160;    wave /sdfr=df w_nphis = $s_nphis</div><div class="line"><a name="l02646"></a><span class="lineno"> 2646</span>&#160;    </div><div class="line"><a name="l02647"></a><span class="lineno"> 2647</span>&#160;    <span class="comment">// destination slice coordinates</span></div><div class="line"><a name="l02648"></a><span class="lineno"> 2648</span>&#160;    <span class="comment">//polar = round(polar)</span></div><div class="line"><a name="l02649"></a><span class="lineno"> 2649</span>&#160;    <span class="comment">//variable ipol = 90 - polar</span></div><div class="line"><a name="l02650"></a><span class="lineno"> 2650</span>&#160;    variable ipol = BinarySearch(w_theta, polar)</div><div class="line"><a name="l02651"></a><span class="lineno"> 2651</span>&#160;    if (ipol &lt; 0)</div><div class="line"><a name="l02652"></a><span class="lineno"> 2652</span>&#160;        abort &quot;assertion failed in <a class="code" href="pearl-anglescan-process_8ipf.html#a4641c716180d737700c6df87f5f8974e">hemi_add_aziscan</a>(): polar angle not found in grid.&quot;</div><div class="line"><a name="l02653"></a><span class="lineno"> 2653</span>&#160;    endif</div><div class="line"><a name="l02654"></a><span class="lineno"> 2654</span>&#160;    </div><div class="line"><a name="l02655"></a><span class="lineno"> 2655</span>&#160;    variable d1, d2</div><div class="line"><a name="l02656"></a><span class="lineno"> 2656</span>&#160;    if (ipol &gt;= 1)</div><div class="line"><a name="l02657"></a><span class="lineno"> 2657</span>&#160;        d1 = w_index[ipol - 1]</div><div class="line"><a name="l02658"></a><span class="lineno"> 2658</span>&#160;    else</div><div class="line"><a name="l02659"></a><span class="lineno"> 2659</span>&#160;        d1 = 0</div><div class="line"><a name="l02660"></a><span class="lineno"> 2660</span>&#160;    endif</div><div class="line"><a name="l02661"></a><span class="lineno"> 2661</span>&#160;    d2 = w_index[ipol] - 1</div><div class="line"><a name="l02662"></a><span class="lineno"> 2662</span>&#160;    variable nd = d2 - d1 + 1</div><div class="line"><a name="l02663"></a><span class="lineno"> 2663</span>&#160;    variable dphi = w_dphi[ipol]</div><div class="line"><a name="l02664"></a><span class="lineno"> 2664</span>&#160;    variable az1, az2</div><div class="line"><a name="l02665"></a><span class="lineno"> 2665</span>&#160;    </div><div class="line"><a name="l02666"></a><span class="lineno"> 2666</span>&#160;    <span class="comment">// source slice coordinates </span></div><div class="line"><a name="l02667"></a><span class="lineno"> 2667</span>&#160;    <span class="comment">// order the slice from -dphi/2 to 360-dphi/2</span></div><div class="line"><a name="l02668"></a><span class="lineno"> 2668</span>&#160;    azi = azi &lt; 0 ? azi + 360 : azi</div><div class="line"><a name="l02669"></a><span class="lineno"> 2669</span>&#160;    azi = azi &gt;= 360 - dphi/2 ? azi - 360 : azi</div><div class="line"><a name="l02670"></a><span class="lineno"> 2670</span>&#160;    duplicate /free values, sel_values</div><div class="line"><a name="l02671"></a><span class="lineno"> 2671</span>&#160;    duplicate /free weights, sel_weights</div><div class="line"><a name="l02672"></a><span class="lineno"> 2672</span>&#160;    </div><div class="line"><a name="l02673"></a><span class="lineno"> 2673</span>&#160;    <span class="comment">// loop over destination</span></div><div class="line"><a name="l02674"></a><span class="lineno"> 2674</span>&#160;    variable <span class="keywordtype">id</span></div><div class="line"><a name="l02675"></a><span class="lineno"> 2675</span>&#160;    variable v1, v2, w1, w2</div><div class="line"><a name="l02676"></a><span class="lineno"> 2676</span>&#160;    for (<span class="keywordtype">id</span> = 0; <span class="keywordtype">id</span> &lt; nd; <span class="keywordtype">id</span> += 1)</div><div class="line"><a name="l02677"></a><span class="lineno"> 2677</span>&#160;        az1 = (<span class="keywordtype">id</span> - 0.5) * dphi</div><div class="line"><a name="l02678"></a><span class="lineno"> 2678</span>&#160;        az2 = (<span class="keywordtype">id</span> + 0.5) * dphi</div><div class="line"><a name="l02679"></a><span class="lineno"> 2679</span>&#160;        extract /free /indx azi, sel, (az1 &lt;= azi) &amp;&amp; (azi &lt; az2)</div><div class="line"><a name="l02680"></a><span class="lineno"> 2680</span>&#160;        if (numpnts(sel) &gt; 0)</div><div class="line"><a name="l02681"></a><span class="lineno"> 2681</span>&#160;            redimension /n=(numpnts(sel)) sel_values, sel_weights</div><div class="line"><a name="l02682"></a><span class="lineno"> 2682</span>&#160;            sel_values = values[sel]</div><div class="line"><a name="l02683"></a><span class="lineno"> 2683</span>&#160;            sel_weights = weights[sel]</div><div class="line"><a name="l02684"></a><span class="lineno"> 2684</span>&#160;            v1 = w_totals[d1 + <span class="keywordtype">id</span>]</div><div class="line"><a name="l02685"></a><span class="lineno"> 2685</span>&#160;            w1 = w_weights[d1 + <span class="keywordtype">id</span>]</div><div class="line"><a name="l02686"></a><span class="lineno"> 2686</span>&#160;            if ((numtype(v1) == 2) || (w1 &lt;= 0))</div><div class="line"><a name="l02687"></a><span class="lineno"> 2687</span>&#160;                v1 = 0</div><div class="line"><a name="l02688"></a><span class="lineno"> 2688</span>&#160;                w1 = 0</div><div class="line"><a name="l02689"></a><span class="lineno"> 2689</span>&#160;            endif</div><div class="line"><a name="l02690"></a><span class="lineno"> 2690</span>&#160;            v2 = sum(sel_values)</div><div class="line"><a name="l02691"></a><span class="lineno"> 2691</span>&#160;            w2 = sum(sel_weights)</div><div class="line"><a name="l02692"></a><span class="lineno"> 2692</span>&#160;            w_totals[d1 + <span class="keywordtype">id</span>] = v1 + v2</div><div class="line"><a name="l02693"></a><span class="lineno"> 2693</span>&#160;            w_weights[d1 + <span class="keywordtype">id</span>] = w1 + w2</div><div class="line"><a name="l02694"></a><span class="lineno"> 2694</span>&#160;        endif</div><div class="line"><a name="l02695"></a><span class="lineno"> 2695</span>&#160;    endfor</div><div class="line"><a name="l02696"></a><span class="lineno"> 2696</span>&#160;    w_values[d1, d1 + nd - 1] = w_totals[p] / w_weights[p]</div><div class="line"><a name="l02697"></a><span class="lineno"> 2697</span>&#160;end</div><div class="line"><a name="l02698"></a><span class="lineno"> 2698</span>&#160;</div><div class="line"><a name="l02726"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#acca0130cccf2286863bbf5b7f91c5b3b"> 2726</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#acca0130cccf2286863bbf5b7f91c5b3b">interpolate_hemi_scan</a>(nickname, [projection])</div><div class="line"><a name="l02727"></a><span class="lineno"> 2727</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l02728"></a><span class="lineno"> 2728</span>&#160;    variable projection</div><div class="line"><a name="l02729"></a><span class="lineno"> 2729</span>&#160;</div><div class="line"><a name="l02730"></a><span class="lineno"> 2730</span>&#160;    dfref savedf = GetDataFolderDFR()</div><div class="line"><a name="l02731"></a><span class="lineno"> 2731</span>&#160;</div><div class="line"><a name="l02732"></a><span class="lineno"> 2732</span>&#160;    if (ParamIsDefault(projection))</div><div class="line"><a name="l02733"></a><span class="lineno"> 2733</span>&#160;        projection = 1</div><div class="line"><a name="l02734"></a><span class="lineno"> 2734</span>&#160;    endif</div><div class="line"><a name="l02735"></a><span class="lineno"> 2735</span>&#160;    </div><div class="line"><a name="l02736"></a><span class="lineno"> 2736</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l02737"></a><span class="lineno"> 2737</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l02738"></a><span class="lineno"> 2738</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l02739"></a><span class="lineno"> 2739</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#ac15ebd5a19c558dde666ab36aeb9906f">prepare_hemi_scan_display</a>(nickname, projection=projection)</div><div class="line"><a name="l02740"></a><span class="lineno"> 2740</span>&#160;    </div><div class="line"><a name="l02741"></a><span class="lineno"> 2741</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l02742"></a><span class="lineno"> 2742</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l02743"></a><span class="lineno"> 2743</span>&#160;    <span class="keywordtype">string</span> s_matrix = s_prefix + &quot;matrix&quot;</div><div class="line"><a name="l02744"></a><span class="lineno"> 2744</span>&#160;    <span class="keywordtype">string</span> s_ster_rad = s_prefix + &quot;ster_rad&quot;</div><div class="line"><a name="l02745"></a><span class="lineno"> 2745</span>&#160;    <span class="keywordtype">string</span> s_ster_x = s_prefix + &quot;ster_x&quot;</div><div class="line"><a name="l02746"></a><span class="lineno"> 2746</span>&#160;    <span class="keywordtype">string</span> s_ster_y = s_prefix + &quot;ster_y&quot;</div><div class="line"><a name="l02747"></a><span class="lineno"> 2747</span>&#160;    </div><div class="line"><a name="l02748"></a><span class="lineno"> 2748</span>&#160;    wave /sdfr=df /z values = $s_int</div><div class="line"><a name="l02749"></a><span class="lineno"> 2749</span>&#160;    wave /sdfr=df /z azim = $s_azim</div><div class="line"><a name="l02750"></a><span class="lineno"> 2750</span>&#160;    wave /sdfr=df /z polar = $s_polar</div><div class="line"><a name="l02751"></a><span class="lineno"> 2751</span>&#160;    wave /sdfr=df /z ster_rad = $s_ster_rad</div><div class="line"><a name="l02752"></a><span class="lineno"> 2752</span>&#160;    wave /sdfr=df /z ster_x = $s_ster_x</div><div class="line"><a name="l02753"></a><span class="lineno"> 2753</span>&#160;    wave /sdfr=df /z ster_y = $s_ster_y</div><div class="line"><a name="l02754"></a><span class="lineno"> 2754</span>&#160;</div><div class="line"><a name="l02755"></a><span class="lineno"> 2755</span>&#160;    variable min_ster_x = wavemin(ster_x)</div><div class="line"><a name="l02756"></a><span class="lineno"> 2756</span>&#160;    variable max_ster_x = wavemax(ster_x)</div><div class="line"><a name="l02757"></a><span class="lineno"> 2757</span>&#160;    variable x0 = min_ster_x</div><div class="line"><a name="l02758"></a><span class="lineno"> 2758</span>&#160;    variable xn = 181</div><div class="line"><a name="l02759"></a><span class="lineno"> 2759</span>&#160;    variable dx = (max_ster_x - min_ster_x) / (xn - 1)</div><div class="line"><a name="l02760"></a><span class="lineno"> 2760</span>&#160;    make /n=(numpnts(ster_x), 3) /free triplet</div><div class="line"><a name="l02761"></a><span class="lineno"> 2761</span>&#160;    triplet[][0] = ster_x[p]</div><div class="line"><a name="l02762"></a><span class="lineno"> 2762</span>&#160;    triplet[][1] = ster_y[p]</div><div class="line"><a name="l02763"></a><span class="lineno"> 2763</span>&#160;    triplet[][2] = values[p]</div><div class="line"><a name="l02764"></a><span class="lineno"> 2764</span>&#160;</div><div class="line"><a name="l02765"></a><span class="lineno"> 2765</span>&#160;    variable size = 181</div><div class="line"><a name="l02766"></a><span class="lineno"> 2766</span>&#160;    setdatafolder df</div><div class="line"><a name="l02767"></a><span class="lineno"> 2767</span>&#160;    make /n=(size, size) /d /o $(s_prefix + &quot;matrix&quot;) /wave=matrix</div><div class="line"><a name="l02768"></a><span class="lineno"> 2768</span>&#160;    make /n=(size, size) /free mnorm</div><div class="line"><a name="l02769"></a><span class="lineno"> 2769</span>&#160;    ImageFromXYZ /as {ster_x, ster_y, values}, matrix, mnorm</div><div class="line"><a name="l02770"></a><span class="lineno"> 2770</span>&#160;    matrix /= mnorm</div><div class="line"><a name="l02771"></a><span class="lineno"> 2771</span>&#160;    matrixfilter NanZapMedian, matrix</div><div class="line"><a name="l02772"></a><span class="lineno"> 2772</span>&#160;    matrixfilter gauss, matrix</div><div class="line"><a name="l02773"></a><span class="lineno"> 2773</span>&#160;    </div><div class="line"><a name="l02774"></a><span class="lineno"> 2774</span>&#160;    duplicate /free values, ster_finite</div><div class="line"><a name="l02775"></a><span class="lineno"> 2775</span>&#160;    ster_finite = (numtype(values) == 0) * (ster_x^2 + ster_y^2)</div><div class="line"><a name="l02776"></a><span class="lineno"> 2776</span>&#160;    variable ster_max = wavemax(ster_finite)</div><div class="line"><a name="l02777"></a><span class="lineno"> 2777</span>&#160;    matrix = (x^2 + y^2) &lt;= ster_max ? matrix : nan</div><div class="line"><a name="l02778"></a><span class="lineno"> 2778</span>&#160;    </div><div class="line"><a name="l02779"></a><span class="lineno"> 2779</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l02780"></a><span class="lineno"> 2780</span>&#160;end</div><div class="line"><a name="l02781"></a><span class="lineno"> 2781</span>&#160;</div><div class="line"><a name="l02792"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a0b9e2b025e1d55d2a064edccf6c1c3e3"> 2792</a></span>&#160;<span class="keyword">function</span> <a class="code" href="pearl-anglescan-process_8ipf.html#a0b9e2b025e1d55d2a064edccf6c1c3e3">quick_pizza_image</a>(data, nickname, theta_offset, tilt_offset, phi_offset, [npolar, nograph, folding])</div><div class="line"><a name="l02793"></a><span class="lineno"> 2793</span>&#160;    wave data <span class="comment">// 2D intensity wave, see requirements above</span></div><div class="line"><a name="l02794"></a><span class="lineno"> 2794</span>&#160;    <span class="keywordtype">string</span> nickname <span class="comment">// nick name for output data</span></div><div class="line"><a name="l02795"></a><span class="lineno"> 2795</span>&#160;        <span class="comment">// in default mode, this will be the name of a child folder containing the output</span></div><div class="line"><a name="l02796"></a><span class="lineno"> 2796</span>&#160;        <span class="comment">// in XPDplot mode, this will be a prefix of the generated data in the root folder</span></div><div class="line"><a name="l02797"></a><span class="lineno"> 2797</span>&#160;    variable theta_offset <span class="comment">// manipulator theta angle corresponding to normal emission</span></div><div class="line"><a name="l02798"></a><span class="lineno"> 2798</span>&#160;    variable tilt_offset <span class="comment">// manipulator tilt angle corresponding to normal emission</span></div><div class="line"><a name="l02799"></a><span class="lineno"> 2799</span>&#160;    variable phi_offset <span class="comment">// manipulator phi angle corresponding to phi_result = 0</span></div><div class="line"><a name="l02800"></a><span class="lineno"> 2800</span>&#160;    variable npolar <span class="comment">// number of polar angles, determines polar and azimuthal step size</span></div><div class="line"><a name="l02801"></a><span class="lineno"> 2801</span>&#160;        <span class="comment">// default = 91 (1 degree steps)</span></div><div class="line"><a name="l02802"></a><span class="lineno"> 2802</span>&#160;    variable nograph <span class="comment">// 0 (default) = display a new polar graph</span></div><div class="line"><a name="l02803"></a><span class="lineno"> 2803</span>&#160;        <span class="comment">// 1 = don&#39;t display a new graph (if a graph is existing from a previous call, it will update)</span></div><div class="line"><a name="l02804"></a><span class="lineno"> 2804</span>&#160;    variable folding <span class="comment">// rotational averaging, default = 1</span></div><div class="line"><a name="l02805"></a><span class="lineno"> 2805</span>&#160;        </div><div class="line"><a name="l02806"></a><span class="lineno"> 2806</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(npolar))</div><div class="line"><a name="l02807"></a><span class="lineno"> 2807</span>&#160;        npolar = 91</div><div class="line"><a name="l02808"></a><span class="lineno"> 2808</span>&#160;    endif</div><div class="line"><a name="l02809"></a><span class="lineno"> 2809</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(nograph))</div><div class="line"><a name="l02810"></a><span class="lineno"> 2810</span>&#160;        nograph = 0</div><div class="line"><a name="l02811"></a><span class="lineno"> 2811</span>&#160;    endif</div><div class="line"><a name="l02812"></a><span class="lineno"> 2812</span>&#160;    <span class="keywordflow">if</span> (ParamIsDefault(folding))</div><div class="line"><a name="l02813"></a><span class="lineno"> 2813</span>&#160;        folding = 1</div><div class="line"><a name="l02814"></a><span class="lineno"> 2814</span>&#160;    endif</div><div class="line"><a name="l02815"></a><span class="lineno"> 2815</span>&#160;    <span class="keywordtype">string</span> graphname = <span class="stringliteral">&quot;graph_&quot;</span> + nickname</div><div class="line"><a name="l02816"></a><span class="lineno"> 2816</span>&#160;    <span class="keywordtype">string</span> s_prefix = <span class="stringliteral">&quot;&quot;</span></div><div class="line"><a name="l02817"></a><span class="lineno"> 2817</span>&#160;    </div><div class="line"><a name="l02818"></a><span class="lineno"> 2818</span>&#160;    <span class="comment">// sort out data folder structure</span></div><div class="line"><a name="l02819"></a><span class="lineno"> 2819</span>&#160;    dfref saveDF = GetDataFolderDFR()</div><div class="line"><a name="l02820"></a><span class="lineno"> 2820</span>&#160;    dfref dataDF = GetWavesDataFolderDFR(data)</div><div class="line"><a name="l02821"></a><span class="lineno"> 2821</span>&#160;    setdatafolder dataDF</div><div class="line"><a name="l02822"></a><span class="lineno"> 2822</span>&#160;    <span class="keywordflow">if</span> (DataFolderExists(<span class="stringliteral">&quot;:attr&quot;</span>))</div><div class="line"><a name="l02823"></a><span class="lineno"> 2823</span>&#160;        setdatafolder :attr</div><div class="line"><a name="l02824"></a><span class="lineno"> 2824</span>&#160;    endif</div><div class="line"><a name="l02825"></a><span class="lineno"> 2825</span>&#160;    dfref attrDF = GetDataFolderDFR()</div><div class="line"><a name="l02826"></a><span class="lineno"> 2826</span>&#160;    setdatafolder dataDF</div><div class="line"><a name="l02827"></a><span class="lineno"> 2827</span>&#160;    newdatafolder /s/o $nickname</div><div class="line"><a name="l02828"></a><span class="lineno"> 2828</span>&#160;    dfref destDF = GetDataFolderDFR()</div><div class="line"><a name="l02829"></a><span class="lineno"> 2829</span>&#160;    </div><div class="line"><a name="l02830"></a><span class="lineno"> 2830</span>&#160;    <span class="comment">// performance monitoring</span></div><div class="line"><a name="l02831"></a><span class="lineno"> 2831</span>&#160;    variable timerRefNum</div><div class="line"><a name="l02832"></a><span class="lineno"> 2832</span>&#160;    variable /g xyz_perf_secs</div><div class="line"><a name="l02833"></a><span class="lineno"> 2833</span>&#160;    timerRefNum = startMSTimer</div><div class="line"><a name="l02834"></a><span class="lineno"> 2834</span>&#160;</div><div class="line"><a name="l02835"></a><span class="lineno"> 2835</span>&#160;    wave /sdfr=attrDF ManipulatorTheta</div><div class="line"><a name="l02836"></a><span class="lineno"> 2836</span>&#160;    wave /sdfr=attrDF ManipulatorTilt</div><div class="line"><a name="l02837"></a><span class="lineno"> 2837</span>&#160;    wave /sdfr=attrDF ManipulatorPhi</div><div class="line"><a name="l02838"></a><span class="lineno"> 2838</span>&#160;    duplicate /free ManipulatorTheta, m_theta</div><div class="line"><a name="l02839"></a><span class="lineno"> 2839</span>&#160;    duplicate /free ManipulatorTilt, m_tilt</div><div class="line"><a name="l02840"></a><span class="lineno"> 2840</span>&#160;    duplicate /free ManipulatorPhi, m_phi</div><div class="line"><a name="l02841"></a><span class="lineno"> 2841</span>&#160;    m_theta -= theta_offset</div><div class="line"><a name="l02842"></a><span class="lineno"> 2842</span>&#160;    m_tilt -= tilt_offset</div><div class="line"><a name="l02843"></a><span class="lineno"> 2843</span>&#160;    m_tilt *= -1 <span class="comment">// checked 140702</span></div><div class="line"><a name="l02844"></a><span class="lineno"> 2844</span>&#160;    m_phi -= phi_offset</div><div class="line"><a name="l02845"></a><span class="lineno"> 2845</span>&#160;    <span class="comment">//m_phi *= -1 // checked 140702</span></div><div class="line"><a name="l02846"></a><span class="lineno"> 2846</span>&#160;    </div><div class="line"><a name="l02847"></a><span class="lineno"> 2847</span>&#160;    make /n=1/d/free d_polar, d_azi</div><div class="line"><a name="l02848"></a><span class="lineno"> 2848</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a2b38c6c9b6e60593ba69d3773b6bc779">convert_angles_ttpd2polar</a>(m_theta, m_tilt, m_phi, data, d_polar, d_azi)</div><div class="line"><a name="l02849"></a><span class="lineno"> 2849</span>&#160;    d_azi += 180    <span class="comment">// changed 151030 (v1.6)</span></div><div class="line"><a name="l02850"></a><span class="lineno"> 2850</span>&#160;    d_azi = d_azi &gt;= 360 ? d_azi - 360 : d_azi</div><div class="line"><a name="l02851"></a><span class="lineno"> 2851</span>&#160;</div><div class="line"><a name="l02852"></a><span class="lineno"> 2852</span>&#160;    duplicate /free data, values</div><div class="line"><a name="l02853"></a><span class="lineno"> 2853</span>&#160;    variable nn = dimsize(values, 0) * max(dimsize(values, 1), 1)</div><div class="line"><a name="l02854"></a><span class="lineno"> 2854</span>&#160;    redimension /n=(nn) values, d_polar, d_azi</div><div class="line"><a name="l02855"></a><span class="lineno"> 2855</span>&#160;    duplicate /o d_polar, ster_rad, ster_x, ster_y</div><div class="line"><a name="l02856"></a><span class="lineno"> 2856</span>&#160;</div><div class="line"><a name="l02857"></a><span class="lineno"> 2857</span>&#160;    variable projection = 1</div><div class="line"><a name="l02858"></a><span class="lineno"> 2858</span>&#160;    switch(projection)</div><div class="line"><a name="l02859"></a><span class="lineno"> 2859</span>&#160;        case 1: <span class="comment">// stereographic</span></div><div class="line"><a name="l02860"></a><span class="lineno"> 2860</span>&#160;            ster_rad =  2 * tan(d_polar / 2 * pi / 180)</div><div class="line"><a name="l02861"></a><span class="lineno"> 2861</span>&#160;            break</div><div class="line"><a name="l02862"></a><span class="lineno"> 2862</span>&#160;        case 2: <span class="comment">// azimuthal</span></div><div class="line"><a name="l02863"></a><span class="lineno"> 2863</span>&#160;            ster_rad = 2 * cos((180 - d_polar) / 2 * pi / 180)</div><div class="line"><a name="l02864"></a><span class="lineno"> 2864</span>&#160;            break</div><div class="line"><a name="l02865"></a><span class="lineno"> 2865</span>&#160;    endswitch</div><div class="line"><a name="l02866"></a><span class="lineno"> 2866</span>&#160;    <span class="keywordtype">string</span> s_ster_x = s_prefix + &quot;ster_x&quot;</div><div class="line"><a name="l02867"></a><span class="lineno"> 2867</span>&#160;    <span class="keywordtype">string</span> s_ster_y = s_prefix + &quot;ster_y&quot;</div><div class="line"><a name="l02868"></a><span class="lineno"> 2868</span>&#160;    </div><div class="line"><a name="l02869"></a><span class="lineno"> 2869</span>&#160;    nn = 401</div><div class="line"><a name="l02870"></a><span class="lineno"> 2870</span>&#160;    make /n=(nn, nn) /d /o matrix</div><div class="line"><a name="l02871"></a><span class="lineno"> 2871</span>&#160;    make /n=(nn, nn) /free mnorm</div><div class="line"><a name="l02872"></a><span class="lineno"> 2872</span>&#160;    setscale /i x -2, +2, matrix, mnorm</div><div class="line"><a name="l02873"></a><span class="lineno"> 2873</span>&#160;    setscale /i y -2, +2, matrix, mnorm</div><div class="line"><a name="l02874"></a><span class="lineno"> 2874</span>&#160;    matrix = 0</div><div class="line"><a name="l02875"></a><span class="lineno"> 2875</span>&#160;    mnorm = 0</div><div class="line"><a name="l02876"></a><span class="lineno"> 2876</span>&#160;    </div><div class="line"><a name="l02877"></a><span class="lineno"> 2877</span>&#160;    variable ifold</div><div class="line"><a name="l02878"></a><span class="lineno"> 2878</span>&#160;    for (ifold = 0; ifold &lt; folding; ifold += 1)</div><div class="line"><a name="l02879"></a><span class="lineno"> 2879</span>&#160;        ster_x = ster_rad * cos(d_azi * pi / 180)</div><div class="line"><a name="l02880"></a><span class="lineno"> 2880</span>&#160;        ster_y = ster_rad * sin(d_azi * pi / 180)</div><div class="line"><a name="l02881"></a><span class="lineno"> 2881</span>&#160;        ImageFromXYZ {ster_x, ster_y, values}, matrix, mnorm</div><div class="line"><a name="l02882"></a><span class="lineno"> 2882</span>&#160;        d_azi = d_azi &gt;= 180 ? d_azi + 360 / folding - 180 : d_azi + 360 / folding</div><div class="line"><a name="l02883"></a><span class="lineno"> 2883</span>&#160;    endfor</div><div class="line"><a name="l02884"></a><span class="lineno"> 2884</span>&#160;    </div><div class="line"><a name="l02885"></a><span class="lineno"> 2885</span>&#160;    matrix /= mnorm</div><div class="line"><a name="l02886"></a><span class="lineno"> 2886</span>&#160;    matrixfilter /n=5 NanZapMedian matrix</div><div class="line"><a name="l02887"></a><span class="lineno"> 2887</span>&#160;    matrixfilter /n=3 gauss matrix</div><div class="line"><a name="l02888"></a><span class="lineno"> 2888</span>&#160;</div><div class="line"><a name="l02889"></a><span class="lineno"> 2889</span>&#160;    <span class="keywordflow">if</span> (!nograph)</div><div class="line"><a name="l02890"></a><span class="lineno"> 2890</span>&#160;        display /k=1</div><div class="line"><a name="l02891"></a><span class="lineno"> 2891</span>&#160;        appendimage matrix</div><div class="line"><a name="l02892"></a><span class="lineno"> 2892</span>&#160;        modifygraph width={Plan,1,bottom,left}</div><div class="line"><a name="l02893"></a><span class="lineno"> 2893</span>&#160;    endif</div><div class="line"><a name="l02894"></a><span class="lineno"> 2894</span>&#160;    </div><div class="line"><a name="l02895"></a><span class="lineno"> 2895</span>&#160;    <span class="keywordflow">if</span> (timerRefNum &gt;= 0)</div><div class="line"><a name="l02896"></a><span class="lineno"> 2896</span>&#160;        xyz_perf_secs = stopMSTimer(timerRefNum) / 1e6</div><div class="line"><a name="l02897"></a><span class="lineno"> 2897</span>&#160;    endif</div><div class="line"><a name="l02898"></a><span class="lineno"> 2898</span>&#160;</div><div class="line"><a name="l02899"></a><span class="lineno"> 2899</span>&#160;    setdatafolder saveDF</div><div class="line"><a name="l02900"></a><span class="lineno"> 2900</span>&#160;end</div><div class="line"><a name="l02901"></a><span class="lineno"> 2901</span>&#160;</div><div class="line"><a name="l02903"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a48cbd596656bc6d849c53afb4c58b90d"> 2903</a></span>&#160;<span class="keyword">function</span> <a class="code" href="pearl-anglescan-process_8ipf.html#a48cbd596656bc6d849c53afb4c58b90d">save_hemi_scan</a>(nickname, pathname, filename)</div><div class="line"><a name="l02904"></a><span class="lineno"> 2904</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l02905"></a><span class="lineno"> 2905</span>&#160;    <span class="keywordtype">string</span> pathname</div><div class="line"><a name="l02906"></a><span class="lineno"> 2906</span>&#160;    <span class="keywordtype">string</span> filename</div><div class="line"><a name="l02907"></a><span class="lineno"> 2907</span>&#160;    </div><div class="line"><a name="l02908"></a><span class="lineno"> 2908</span>&#160;    dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l02909"></a><span class="lineno"> 2909</span>&#160;</div><div class="line"><a name="l02910"></a><span class="lineno"> 2910</span>&#160;    <span class="comment">// source data</span></div><div class="line"><a name="l02911"></a><span class="lineno"> 2911</span>&#160;    string s_prefix = &quot;&quot;</div><div class="line"><a name="l02912"></a><span class="lineno"> 2912</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l02913"></a><span class="lineno"> 2913</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l02914"></a><span class="lineno"> 2914</span>&#160;</div><div class="line"><a name="l02915"></a><span class="lineno"> 2915</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l02916"></a><span class="lineno"> 2916</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l02917"></a><span class="lineno"> 2917</span>&#160;    <span class="keywordtype">string</span> s_theta = s_prefix + &quot;th&quot;</div><div class="line"><a name="l02918"></a><span class="lineno"> 2918</span>&#160;    <span class="keywordtype">string</span> s_tot = s_prefix + &quot;tot&quot;</div><div class="line"><a name="l02919"></a><span class="lineno"> 2919</span>&#160;    <span class="keywordtype">string</span> s_weight = s_prefix + &quot;wt&quot;</div><div class="line"><a name="l02920"></a><span class="lineno"> 2920</span>&#160;</div><div class="line"><a name="l02921"></a><span class="lineno"> 2921</span>&#160;    wave /sdfr=df theta1 = $s_theta</div><div class="line"><a name="l02922"></a><span class="lineno"> 2922</span>&#160;    wave /sdfr=df polar1 = $s_polar</div><div class="line"><a name="l02923"></a><span class="lineno"> 2923</span>&#160;    wave /sdfr=df azim1 = $s_azim</div><div class="line"><a name="l02924"></a><span class="lineno"> 2924</span>&#160;    wave /sdfr=df tot1 = $s_tot</div><div class="line"><a name="l02925"></a><span class="lineno"> 2925</span>&#160;    wave /sdfr=df weight1 = $s_weight</div><div class="line"><a name="l02926"></a><span class="lineno"> 2926</span>&#160;    wave /sdfr=df values1 = $s_int</div><div class="line"><a name="l02927"></a><span class="lineno"> 2927</span>&#160;    </div><div class="line"><a name="l02928"></a><span class="lineno"> 2928</span>&#160;    save /m=&quot;\r\n&quot; /o /p=$pathname /t theta1, polar1, azim1, tot1, weight1, values1 as filename</div><div class="line"><a name="l02929"></a><span class="lineno"> 2929</span>&#160;    </div><div class="line"><a name="l02930"></a><span class="lineno"> 2930</span>&#160;    setdatafolder saveDF</div><div class="line"><a name="l02931"></a><span class="lineno"> 2931</span>&#160;end</div><div class="line"><a name="l02932"></a><span class="lineno"> 2932</span>&#160;</div><div class="line"><a name="l02936"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a89f73edcd51a675f4c3933cd0242484e"> 2936</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a89f73edcd51a675f4c3933cd0242484e">load_hemi_scan</a>(nickname, pathname, filename)</div><div class="line"><a name="l02937"></a><span class="lineno"> 2937</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l02938"></a><span class="lineno"> 2938</span>&#160;    <span class="keywordtype">string</span> pathname</div><div class="line"><a name="l02939"></a><span class="lineno"> 2939</span>&#160;    <span class="keywordtype">string</span> filename</div><div class="line"><a name="l02940"></a><span class="lineno"> 2940</span>&#160;    </div><div class="line"><a name="l02941"></a><span class="lineno"> 2941</span>&#160;    dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l02942"></a><span class="lineno"> 2942</span>&#160;</div><div class="line"><a name="l02943"></a><span class="lineno"> 2943</span>&#160;    <span class="comment">//loadwave /p=$pathname /t theta1, polar1, azim1, tot1, weight1, values1 as filename</span></div><div class="line"><a name="l02944"></a><span class="lineno"> 2944</span>&#160;    <span class="comment">//LoadWave /t/p=pearl_explorer_filepath/q filename</span></div><div class="line"><a name="l02945"></a><span class="lineno"> 2945</span>&#160;    <span class="comment">//svar waves = s_wavenames</span></div><div class="line"><a name="l02946"></a><span class="lineno"> 2946</span>&#160;    <span class="comment">//if (v_flag &gt; 0)</span></div><div class="line"><a name="l02947"></a><span class="lineno"> 2947</span>&#160;    <span class="comment">//  string /g pearl_explorer_import = &quot;load_itx_file&quot;</span></div><div class="line"><a name="l02948"></a><span class="lineno"> 2948</span>&#160;    <span class="comment">//endif</span></div><div class="line"><a name="l02949"></a><span class="lineno"> 2949</span>&#160;    </div><div class="line"><a name="l02950"></a><span class="lineno"> 2950</span>&#160;    setdatafolder saveDF</div><div class="line"><a name="l02951"></a><span class="lineno"> 2951</span>&#160;end</div><div class="line"><a name="l02952"></a><span class="lineno"> 2952</span>&#160;</div><div class="line"><a name="l02985"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a5265fd61f86eb72dd877e4190bfb4adf"> 2985</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a5265fd61f86eb72dd877e4190bfb4adf">import_tpi_scan</a>(nickname, theta, phi, intensity, [folding, npolar, nograph, xpdplot])</div><div class="line"><a name="l02986"></a><span class="lineno"> 2986</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l02987"></a><span class="lineno"> 2987</span>&#160;    wave theta</div><div class="line"><a name="l02988"></a><span class="lineno"> 2988</span>&#160;    wave phi</div><div class="line"><a name="l02989"></a><span class="lineno"> 2989</span>&#160;    wave intensity</div><div class="line"><a name="l02990"></a><span class="lineno"> 2990</span>&#160;    </div><div class="line"><a name="l02991"></a><span class="lineno"> 2991</span>&#160;    variable folding</div><div class="line"><a name="l02992"></a><span class="lineno"> 2992</span>&#160;    variable npolar</div><div class="line"><a name="l02993"></a><span class="lineno"> 2993</span>&#160;    variable nograph</div><div class="line"><a name="l02994"></a><span class="lineno"> 2994</span>&#160;    variable xpdplot</div><div class="line"><a name="l02995"></a><span class="lineno"> 2995</span>&#160;    </div><div class="line"><a name="l02996"></a><span class="lineno"> 2996</span>&#160;    if (ParamIsDefault(npolar))</div><div class="line"><a name="l02997"></a><span class="lineno"> 2997</span>&#160;        npolar = 91</div><div class="line"><a name="l02998"></a><span class="lineno"> 2998</span>&#160;    endif</div><div class="line"><a name="l02999"></a><span class="lineno"> 2999</span>&#160;    if (ParamIsDefault(nograph))</div><div class="line"><a name="l03000"></a><span class="lineno"> 3000</span>&#160;        nograph = 0</div><div class="line"><a name="l03001"></a><span class="lineno"> 3001</span>&#160;    endif</div><div class="line"><a name="l03002"></a><span class="lineno"> 3002</span>&#160;    if (ParamIsDefault(folding))</div><div class="line"><a name="l03003"></a><span class="lineno"> 3003</span>&#160;        folding = 1</div><div class="line"><a name="l03004"></a><span class="lineno"> 3004</span>&#160;    endif</div><div class="line"><a name="l03005"></a><span class="lineno"> 3005</span>&#160;    if (ParamIsDefault(xpdplot))</div><div class="line"><a name="l03006"></a><span class="lineno"> 3006</span>&#160;        xpdplot = 0</div><div class="line"><a name="l03007"></a><span class="lineno"> 3007</span>&#160;    endif</div><div class="line"><a name="l03008"></a><span class="lineno"> 3008</span>&#160;    </div><div class="line"><a name="l03009"></a><span class="lineno"> 3009</span>&#160;    <a class="code" href="pearl-anglescan-process_8ipf.html#a902ac3a24e33f651e83ee03d31707da7">make_hemi_grid</a>(npolar, nickname, xpdplot=xpdplot)</div><div class="line"><a name="l03010"></a><span class="lineno"> 3010</span>&#160;</div><div class="line"><a name="l03011"></a><span class="lineno"> 3011</span>&#160;    variable ifold</div><div class="line"><a name="l03012"></a><span class="lineno"> 3012</span>&#160;    duplicate /free phi, fold_phi</div><div class="line"><a name="l03013"></a><span class="lineno"> 3013</span>&#160;    for (ifold = 0; ifold &lt; folding; ifold += 1)</div><div class="line"><a name="l03014"></a><span class="lineno"> 3014</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#a4952bc53e3d6d272d25b5e35e91696b5">hemi_add_anglescan</a>(nickname, intensity, theta, fold_phi)</div><div class="line"><a name="l03015"></a><span class="lineno"> 3015</span>&#160;        fold_phi = fold_phi &gt;= 180 ? fold_phi + 360 / folding - fold_phi : fold_phi + 360 / folding</div><div class="line"><a name="l03016"></a><span class="lineno"> 3016</span>&#160;    endfor</div><div class="line"><a name="l03017"></a><span class="lineno"> 3017</span>&#160;</div><div class="line"><a name="l03018"></a><span class="lineno"> 3018</span>&#160;    if (nograph==0)</div><div class="line"><a name="l03019"></a><span class="lineno"> 3019</span>&#160;        <a class="code" href="pearl-anglescan-process_8ipf.html#ae57302acfc822c4817f2b7eef55efea2">display_hemi_scan</a>(nickname)</div><div class="line"><a name="l03020"></a><span class="lineno"> 3020</span>&#160;    endif</div><div class="line"><a name="l03021"></a><span class="lineno"> 3021</span>&#160;end</div><div class="line"><a name="l03022"></a><span class="lineno"> 3022</span>&#160;</div><div class="line"><a name="l03034"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a5dc0cc7db9d3d7a6b3fa3f1b04d84a5e"> 3034</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a5dc0cc7db9d3d7a6b3fa3f1b04d84a5e">trim_hemi_scan</a>(nickname, theta_max)</div><div class="line"><a name="l03035"></a><span class="lineno"> 3035</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l03036"></a><span class="lineno"> 3036</span>&#160;    variable theta_max</div><div class="line"><a name="l03037"></a><span class="lineno"> 3037</span>&#160;</div><div class="line"><a name="l03038"></a><span class="lineno"> 3038</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l03039"></a><span class="lineno"> 3039</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l03040"></a><span class="lineno"> 3040</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l03041"></a><span class="lineno"> 3041</span>&#160;</div><div class="line"><a name="l03042"></a><span class="lineno"> 3042</span>&#160;    <span class="keywordtype">string</span> s_totals = s_prefix + &quot;tot&quot;</div><div class="line"><a name="l03043"></a><span class="lineno"> 3043</span>&#160;    <span class="keywordtype">string</span> s_weights = s_prefix + &quot;wt&quot;</div><div class="line"><a name="l03044"></a><span class="lineno"> 3044</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l03045"></a><span class="lineno"> 3045</span>&#160;</div><div class="line"><a name="l03046"></a><span class="lineno"> 3046</span>&#160;    wave /sdfr=df w_polar = $s_polar</div><div class="line"><a name="l03047"></a><span class="lineno"> 3047</span>&#160;    wave /sdfr=df w_values = $s_int</div><div class="line"><a name="l03048"></a><span class="lineno"> 3048</span>&#160;    wave /sdfr=df w_totals = $s_totals</div><div class="line"><a name="l03049"></a><span class="lineno"> 3049</span>&#160;    wave /sdfr=df w_weights = $s_weights</div><div class="line"><a name="l03050"></a><span class="lineno"> 3050</span>&#160;</div><div class="line"><a name="l03051"></a><span class="lineno"> 3051</span>&#160;    w_values = w_polar &lt;= theta_max ? w_totals / w_weights : nan</div><div class="line"><a name="l03052"></a><span class="lineno"> 3052</span>&#160;end</div><div class="line"><a name="l03053"></a><span class="lineno"> 3053</span>&#160;</div><div class="line"><a name="l03073"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#aa486e16909d01e2251eeb4d635b972b1"> 3073</a></span>&#160;function /wave <a class="code" href="pearl-anglescan-process_8ipf.html#aa486e16909d01e2251eeb4d635b972b1">hemi_polar_cut</a>(nickname, azim)</div><div class="line"><a name="l03074"></a><span class="lineno"> 3074</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l03075"></a><span class="lineno"> 3075</span>&#160;    variable azim</div><div class="line"><a name="l03076"></a><span class="lineno"> 3076</span>&#160;</div><div class="line"><a name="l03077"></a><span class="lineno"> 3077</span>&#160;    dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l03078"></a><span class="lineno"> 3078</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l03079"></a><span class="lineno"> 3079</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l03080"></a><span class="lineno"> 3080</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l03081"></a><span class="lineno"> 3081</span>&#160;</div><div class="line"><a name="l03082"></a><span class="lineno"> 3082</span>&#160;    <span class="keywordtype">string</span> s_totals = s_prefix + &quot;tot&quot;</div><div class="line"><a name="l03083"></a><span class="lineno"> 3083</span>&#160;    <span class="keywordtype">string</span> s_weights = s_prefix + &quot;wt&quot;</div><div class="line"><a name="l03084"></a><span class="lineno"> 3084</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l03085"></a><span class="lineno"> 3085</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l03086"></a><span class="lineno"> 3086</span>&#160;    <span class="keywordtype">string</span> s_index = s_prefix + &quot;index&quot;</div><div class="line"><a name="l03087"></a><span class="lineno"> 3087</span>&#160;    <span class="keywordtype">string</span> s_theta = s_prefix + &quot;th&quot;</div><div class="line"><a name="l03088"></a><span class="lineno"> 3088</span>&#160;    <span class="keywordtype">string</span> s_dphi = s_prefix + &quot;dphi&quot;</div><div class="line"><a name="l03089"></a><span class="lineno"> 3089</span>&#160;    <span class="keywordtype">string</span> s_nphis = s_prefix + &quot;nphis&quot;</div><div class="line"><a name="l03090"></a><span class="lineno"> 3090</span>&#160;    <span class="keywordtype">string</span> s_cut</div><div class="line"><a name="l03091"></a><span class="lineno"> 3091</span>&#160;    sprintf s_cut, &quot;%s_azi%03u&quot;, s_int, round(azim)</div><div class="line"><a name="l03092"></a><span class="lineno"> 3092</span>&#160;</div><div class="line"><a name="l03093"></a><span class="lineno"> 3093</span>&#160;    wave /sdfr=df w_polar = $s_polar</div><div class="line"><a name="l03094"></a><span class="lineno"> 3094</span>&#160;    wave /sdfr=df w_azim = $s_azim</div><div class="line"><a name="l03095"></a><span class="lineno"> 3095</span>&#160;    wave /sdfr=df w_values = $s_int</div><div class="line"><a name="l03096"></a><span class="lineno"> 3096</span>&#160;    wave /sdfr=df w_totals = $s_totals</div><div class="line"><a name="l03097"></a><span class="lineno"> 3097</span>&#160;    wave /sdfr=df w_weights = $s_weights</div><div class="line"><a name="l03098"></a><span class="lineno"> 3098</span>&#160;    wave /sdfr=df w_index = $s_index</div><div class="line"><a name="l03099"></a><span class="lineno"> 3099</span>&#160;    wave /sdfr=df w_theta = $s_theta</div><div class="line"><a name="l03100"></a><span class="lineno"> 3100</span>&#160;    wave /sdfr=df w_dphi = $s_dphi</div><div class="line"><a name="l03101"></a><span class="lineno"> 3101</span>&#160;    wave /sdfr=df w_nphis = $s_nphis</div><div class="line"><a name="l03102"></a><span class="lineno"> 3102</span>&#160;</div><div class="line"><a name="l03103"></a><span class="lineno"> 3103</span>&#160;    variable npol = numpnts(w_theta)</div><div class="line"><a name="l03104"></a><span class="lineno"> 3104</span>&#160;    variable ipol</div><div class="line"><a name="l03105"></a><span class="lineno"> 3105</span>&#160;    variable pol_st = abs(w_theta[1] - w_theta[0])</div><div class="line"><a name="l03106"></a><span class="lineno"> 3106</span>&#160;    variable pol</div><div class="line"><a name="l03107"></a><span class="lineno"> 3107</span>&#160;    variable pol1, pol2</div><div class="line"><a name="l03108"></a><span class="lineno"> 3108</span>&#160;    variable nsel</div><div class="line"><a name="l03109"></a><span class="lineno"> 3109</span>&#160;    </div><div class="line"><a name="l03110"></a><span class="lineno"> 3110</span>&#160;    setdatafolder df</div><div class="line"><a name="l03111"></a><span class="lineno"> 3111</span>&#160;    make /n=(npol) /o $s_cut</div><div class="line"><a name="l03112"></a><span class="lineno"> 3112</span>&#160;    wave w_cut = $s_cut</div><div class="line"><a name="l03113"></a><span class="lineno"> 3113</span>&#160;    setscale /i x w_theta[0], w_theta[numpnts(w_theta)-1], &quot;deg&quot;, w_cut</div><div class="line"><a name="l03114"></a><span class="lineno"> 3114</span>&#160;    make /n=1 /free azi_slice</div><div class="line"><a name="l03115"></a><span class="lineno"> 3115</span>&#160;    make /n=1 /free values_slice</div><div class="line"><a name="l03116"></a><span class="lineno"> 3116</span>&#160;    </div><div class="line"><a name="l03117"></a><span class="lineno"> 3117</span>&#160;    for (ipol = 0; ipol &lt; npol; ipol += 1)</div><div class="line"><a name="l03118"></a><span class="lineno"> 3118</span>&#160;        pol = w_theta[ipol]</div><div class="line"><a name="l03119"></a><span class="lineno"> 3119</span>&#160;        pol1 = pol - pol_st / 2</div><div class="line"><a name="l03120"></a><span class="lineno"> 3120</span>&#160;        pol2 = pol + pol_st / 2</div><div class="line"><a name="l03121"></a><span class="lineno"> 3121</span>&#160;        extract /free /indx w_polar, sel, (pol1 &lt; w_polar) &amp;&amp; (w_polar &lt;= pol2)</div><div class="line"><a name="l03122"></a><span class="lineno"> 3122</span>&#160;        nsel = numpnts(sel)</div><div class="line"><a name="l03123"></a><span class="lineno"> 3123</span>&#160;        if (nsel &gt; 0)</div><div class="line"><a name="l03124"></a><span class="lineno"> 3124</span>&#160;            redimension /n=(nsel+2) azi_slice, values_slice</div><div class="line"><a name="l03125"></a><span class="lineno"> 3125</span>&#160;            azi_slice[1, nsel] = w_azim[sel[p-1]]</div><div class="line"><a name="l03126"></a><span class="lineno"> 3126</span>&#160;            azi_slice[0] = azi_slice[nsel] - 360</div><div class="line"><a name="l03127"></a><span class="lineno"> 3127</span>&#160;            azi_slice[nsel+1] = azi_slice[1] + 360</div><div class="line"><a name="l03128"></a><span class="lineno"> 3128</span>&#160;            values_slice[1, nsel] = w_values[sel[p-1]]</div><div class="line"><a name="l03129"></a><span class="lineno"> 3129</span>&#160;            values_slice[0] = values_slice[nsel]</div><div class="line"><a name="l03130"></a><span class="lineno"> 3130</span>&#160;            values_slice[nsel+1] = values_slice[1]</div><div class="line"><a name="l03131"></a><span class="lineno"> 3131</span>&#160;            w_cut[ipol] = interp(azim, azi_slice, values_slice)</div><div class="line"><a name="l03132"></a><span class="lineno"> 3132</span>&#160;        else</div><div class="line"><a name="l03133"></a><span class="lineno"> 3133</span>&#160;            w_cut[ipol] = nan</div><div class="line"><a name="l03134"></a><span class="lineno"> 3134</span>&#160;        endif</div><div class="line"><a name="l03135"></a><span class="lineno"> 3135</span>&#160;    endfor</div><div class="line"><a name="l03136"></a><span class="lineno"> 3136</span>&#160;    </div><div class="line"><a name="l03137"></a><span class="lineno"> 3137</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l03138"></a><span class="lineno"> 3138</span>&#160;    return w_cut</div><div class="line"><a name="l03139"></a><span class="lineno"> 3139</span>&#160;end</div><div class="line"><a name="l03140"></a><span class="lineno"> 3140</span>&#160;</div><div class="line"><a name="l03159"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#ab6ac1268de338040028dca8d0ddc967c"> 3159</a></span>&#160;function /wave <a class="code" href="pearl-anglescan-process_8ipf.html#ab6ac1268de338040028dca8d0ddc967c">hemi_azi_cut</a>(nickname, pol)</div><div class="line"><a name="l03160"></a><span class="lineno"> 3160</span>&#160;    <span class="keywordtype">string</span> nickname</div><div class="line"><a name="l03161"></a><span class="lineno"> 3161</span>&#160;    variable pol</div><div class="line"><a name="l03162"></a><span class="lineno"> 3162</span>&#160;</div><div class="line"><a name="l03163"></a><span class="lineno"> 3163</span>&#160;    dfref savedf = getdatafolderdfr()</div><div class="line"><a name="l03164"></a><span class="lineno"> 3164</span>&#160;    <span class="keywordtype">string</span> s_prefix = &quot;&quot;</div><div class="line"><a name="l03165"></a><span class="lineno"> 3165</span>&#160;    <span class="keywordtype">string</span> s_int = &quot;values&quot;</div><div class="line"><a name="l03166"></a><span class="lineno"> 3166</span>&#160;    dfref df = <a class="code" href="pearl-anglescan-process_8ipf.html#aa26c9ed4c4d703e07788d980edc2406d">find_hemi_data</a>(nickname, s_prefix, s_int)</div><div class="line"><a name="l03167"></a><span class="lineno"> 3167</span>&#160;</div><div class="line"><a name="l03168"></a><span class="lineno"> 3168</span>&#160;    <span class="keywordtype">string</span> s_totals = s_prefix + &quot;tot&quot;</div><div class="line"><a name="l03169"></a><span class="lineno"> 3169</span>&#160;    <span class="keywordtype">string</span> s_weights = s_prefix + &quot;wt&quot;</div><div class="line"><a name="l03170"></a><span class="lineno"> 3170</span>&#160;    <span class="keywordtype">string</span> s_polar = s_prefix + &quot;pol&quot;</div><div class="line"><a name="l03171"></a><span class="lineno"> 3171</span>&#160;    <span class="keywordtype">string</span> s_azim = s_prefix + &quot;az&quot;</div><div class="line"><a name="l03172"></a><span class="lineno"> 3172</span>&#160;    <span class="keywordtype">string</span> s_index = s_prefix + &quot;index&quot;</div><div class="line"><a name="l03173"></a><span class="lineno"> 3173</span>&#160;    <span class="keywordtype">string</span> s_theta = s_prefix + &quot;th&quot;</div><div class="line"><a name="l03174"></a><span class="lineno"> 3174</span>&#160;    <span class="keywordtype">string</span> s_dphi = s_prefix + &quot;dphi&quot;</div><div class="line"><a name="l03175"></a><span class="lineno"> 3175</span>&#160;    <span class="keywordtype">string</span> s_nphis = s_prefix + &quot;nphis&quot;</div><div class="line"><a name="l03176"></a><span class="lineno"> 3176</span>&#160;    <span class="keywordtype">string</span> s_cut</div><div class="line"><a name="l03177"></a><span class="lineno"> 3177</span>&#160;    sprintf s_cut, &quot;%s_pol%03u&quot;, s_int, round(pol)</div><div class="line"><a name="l03178"></a><span class="lineno"> 3178</span>&#160;</div><div class="line"><a name="l03179"></a><span class="lineno"> 3179</span>&#160;    wave /sdfr=df w_polar = $s_polar</div><div class="line"><a name="l03180"></a><span class="lineno"> 3180</span>&#160;    wave /sdfr=df w_azim = $s_azim</div><div class="line"><a name="l03181"></a><span class="lineno"> 3181</span>&#160;    wave /sdfr=df w_values = $s_int</div><div class="line"><a name="l03182"></a><span class="lineno"> 3182</span>&#160;    wave /sdfr=df w_totals = $s_totals</div><div class="line"><a name="l03183"></a><span class="lineno"> 3183</span>&#160;    wave /sdfr=df w_weights = $s_weights</div><div class="line"><a name="l03184"></a><span class="lineno"> 3184</span>&#160;    wave /sdfr=df w_index = $s_index</div><div class="line"><a name="l03185"></a><span class="lineno"> 3185</span>&#160;    wave /sdfr=df w_theta = $s_theta</div><div class="line"><a name="l03186"></a><span class="lineno"> 3186</span>&#160;    wave /sdfr=df w_dphi = $s_dphi</div><div class="line"><a name="l03187"></a><span class="lineno"> 3187</span>&#160;    wave /sdfr=df w_nphis = $s_nphis</div><div class="line"><a name="l03188"></a><span class="lineno"> 3188</span>&#160;</div><div class="line"><a name="l03189"></a><span class="lineno"> 3189</span>&#160;    variable pol_st = abs(w_theta[1] - w_theta[0])</div><div class="line"><a name="l03190"></a><span class="lineno"> 3190</span>&#160;    variable pol1, pol2</div><div class="line"><a name="l03191"></a><span class="lineno"> 3191</span>&#160;    variable nsel</div><div class="line"><a name="l03192"></a><span class="lineno"> 3192</span>&#160;</div><div class="line"><a name="l03193"></a><span class="lineno"> 3193</span>&#160;    pol1 = pol - pol_st / 2</div><div class="line"><a name="l03194"></a><span class="lineno"> 3194</span>&#160;    pol2 = pol + pol_st / 2</div><div class="line"><a name="l03195"></a><span class="lineno"> 3195</span>&#160;    extract /free /indx w_polar, sel, (pol1 &lt; w_polar) &amp;&amp; (w_polar &lt;= pol2)</div><div class="line"><a name="l03196"></a><span class="lineno"> 3196</span>&#160;    nsel = numpnts(sel)</div><div class="line"><a name="l03197"></a><span class="lineno"> 3197</span>&#160;    if (nsel &gt; 0)</div><div class="line"><a name="l03198"></a><span class="lineno"> 3198</span>&#160;        setdatafolder df</div><div class="line"><a name="l03199"></a><span class="lineno"> 3199</span>&#160;        make /n=(nsel) /o $s_cut</div><div class="line"><a name="l03200"></a><span class="lineno"> 3200</span>&#160;        wave w_cut = $s_cut</div><div class="line"><a name="l03201"></a><span class="lineno"> 3201</span>&#160;        w_cut = w_values[sel]</div><div class="line"><a name="l03202"></a><span class="lineno"> 3202</span>&#160;        setscale /i x w_azim[sel[0]], w_azim[sel[nsel-1]], &quot;°&quot;, w_cut</div><div class="line"><a name="l03203"></a><span class="lineno"> 3203</span>&#160;        setdatafolder savedf</div><div class="line"><a name="l03204"></a><span class="lineno"> 3204</span>&#160;        return w_cut</div><div class="line"><a name="l03205"></a><span class="lineno"> 3205</span>&#160;    else</div><div class="line"><a name="l03206"></a><span class="lineno"> 3206</span>&#160;        setdatafolder savedf</div><div class="line"><a name="l03207"></a><span class="lineno"> 3207</span>&#160;        return $&quot;&quot;</div><div class="line"><a name="l03208"></a><span class="lineno"> 3208</span>&#160;    endif</div><div class="line"><a name="l03209"></a><span class="lineno"> 3209</span>&#160;    setdatafolder savedf</div><div class="line"><a name="l03210"></a><span class="lineno"> 3210</span>&#160;end</div><div class="line"><a name="l03211"></a><span class="lineno"> 3211</span>&#160;</div><div class="line"><a name="l03212"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a2e1ed05781f9eb4be5e77695ef049962"> 3212</a></span>&#160;static function <a class="code" href="pearl-anglescan-process_8ipf.html#a2e1ed05781f9eb4be5e77695ef049962">check_contrast</a>(values, pcmin, pcmax, vmin, vmax)</div><div class="line"><a name="l03213"></a><span class="lineno"> 3213</span>&#160;    wave values</div><div class="line"><a name="l03214"></a><span class="lineno"> 3214</span>&#160;    variable pcmin</div><div class="line"><a name="l03215"></a><span class="lineno"> 3215</span>&#160;    variable pcmax</div><div class="line"><a name="l03216"></a><span class="lineno"> 3216</span>&#160;    variable &amp;vmin</div><div class="line"><a name="l03217"></a><span class="lineno"> 3217</span>&#160;    variable &amp;vmax</div><div class="line"><a name="l03218"></a><span class="lineno"> 3218</span>&#160;    </div><div class="line"><a name="l03219"></a><span class="lineno"> 3219</span>&#160;    dfref save_df = GetDataFolderDFR()</div><div class="line"><a name="l03220"></a><span class="lineno"> 3220</span>&#160;    dfref dfr = NewFreeDataFolder()</div><div class="line"><a name="l03221"></a><span class="lineno"> 3221</span>&#160;    setdatafolder dfr</div><div class="line"><a name="l03222"></a><span class="lineno"> 3222</span>&#160;    StatsQuantiles /inan /iw /q /z values</div><div class="line"><a name="l03223"></a><span class="lineno"> 3223</span>&#160;    wave index = w_quantilesindex</div><div class="line"><a name="l03224"></a><span class="lineno"> 3224</span>&#160;    variable imin = round(numpnts(index) * pcmin / 100)</div><div class="line"><a name="l03225"></a><span class="lineno"> 3225</span>&#160;    variable imax = round(numpnts(index) * (100 - pcmax) / 100)</div><div class="line"><a name="l03226"></a><span class="lineno"> 3226</span>&#160;    vmin = values[index[imin]]</div><div class="line"><a name="l03227"></a><span class="lineno"> 3227</span>&#160;    vmax = values[index[imax]]</div><div class="line"><a name="l03228"></a><span class="lineno"> 3228</span>&#160;    setdatafolder save_df</div><div class="line"><a name="l03229"></a><span class="lineno"> 3229</span>&#160;end</div><div class="line"><a name="l03230"></a><span class="lineno"> 3230</span>&#160;</div><div class="line"><a name="l03247"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#a666dab03bb2e97ffef81cea450184d42"> 3247</a></span>&#160;function <a class="code" href="pearl-anglescan-process_8ipf.html#a666dab03bb2e97ffef81cea450184d42">set_contrast</a>(pcmin, pcmax, [graphname, colortable])</div><div class="line"><a name="l03248"></a><span class="lineno"> 3248</span>&#160;    variable pcmin</div><div class="line"><a name="l03249"></a><span class="lineno"> 3249</span>&#160;    variable pcmax</div><div class="line"><a name="l03250"></a><span class="lineno"> 3250</span>&#160;    <span class="keywordtype">string</span> graphname</div><div class="line"><a name="l03251"></a><span class="lineno"> 3251</span>&#160;    <span class="keywordtype">string</span> colortable</div><div class="line"><a name="l03252"></a><span class="lineno"> 3252</span>&#160;    </div><div class="line"><a name="l03253"></a><span class="lineno"> 3253</span>&#160;    if (ParamIsDefault(graphname))</div><div class="line"><a name="l03254"></a><span class="lineno"> 3254</span>&#160;        graphname = &quot;&quot;</div><div class="line"><a name="l03255"></a><span class="lineno"> 3255</span>&#160;    endif</div><div class="line"><a name="l03256"></a><span class="lineno"> 3256</span>&#160;    if (ParamIsDefault(colortable))</div><div class="line"><a name="l03257"></a><span class="lineno"> 3257</span>&#160;        colortable = &quot;&quot;</div><div class="line"><a name="l03258"></a><span class="lineno"> 3258</span>&#160;    endif</div><div class="line"><a name="l03259"></a><span class="lineno"> 3259</span>&#160;    </div><div class="line"><a name="l03260"></a><span class="lineno"> 3260</span>&#160;    dfref save_df = GetDataFolderDFR()</div><div class="line"><a name="l03261"></a><span class="lineno"> 3261</span>&#160;    </div><div class="line"><a name="l03262"></a><span class="lineno"> 3262</span>&#160;    <span class="keywordtype">string</span> objname</div><div class="line"><a name="l03263"></a><span class="lineno"> 3263</span>&#160;    <span class="keywordtype">string</span> info</div><div class="line"><a name="l03264"></a><span class="lineno"> 3264</span>&#160;    <span class="keywordtype">string</span> wname</div><div class="line"><a name="l03265"></a><span class="lineno"> 3265</span>&#160;    <span class="keywordtype">string</span> ctab</div><div class="line"><a name="l03266"></a><span class="lineno"> 3266</span>&#160;    variable rev</div><div class="line"><a name="l03267"></a><span class="lineno"> 3267</span>&#160;    variable n</div><div class="line"><a name="l03268"></a><span class="lineno"> 3268</span>&#160;    variable i</div><div class="line"><a name="l03269"></a><span class="lineno"> 3269</span>&#160;    variable vmin</div><div class="line"><a name="l03270"></a><span class="lineno"> 3270</span>&#160;    variable vmax</div><div class="line"><a name="l03271"></a><span class="lineno"> 3271</span>&#160;</div><div class="line"><a name="l03272"></a><span class="lineno"> 3272</span>&#160;    <span class="keywordtype">string</span> traces = TraceNameList(graphname, &quot;;&quot;, 1+4)</div><div class="line"><a name="l03273"></a><span class="lineno"> 3273</span>&#160;    n = ItemsInList(traces, &quot;;&quot;)</div><div class="line"><a name="l03274"></a><span class="lineno"> 3274</span>&#160;    for (i = 0; i &lt; n; i += 1)</div><div class="line"><a name="l03275"></a><span class="lineno"> 3275</span>&#160;        objname = StringFromList(i, traces, &quot;;&quot;)</div><div class="line"><a name="l03276"></a><span class="lineno"> 3276</span>&#160;        info = TraceInfo(graphname, objname, 0)</div><div class="line"><a name="l03277"></a><span class="lineno"> 3277</span>&#160;        if (strlen(info) &gt; 0)</div><div class="line"><a name="l03278"></a><span class="lineno"> 3278</span>&#160;            info = StringByKey(&quot;RECREATION&quot;, info, &quot;:&quot;, &quot;;&quot;)</div><div class="line"><a name="l03279"></a><span class="lineno"> 3279</span>&#160;            info = StringByKey(&quot;zColor(x)&quot;, info, &quot;=&quot;, &quot;;&quot;)</div><div class="line"><a name="l03280"></a><span class="lineno"> 3280</span>&#160;            if (strlen(info) &gt; 2)</div><div class="line"><a name="l03281"></a><span class="lineno"> 3281</span>&#160;                info = info[1,strlen(info)-2]</div><div class="line"><a name="l03282"></a><span class="lineno"> 3282</span>&#160;                wname = StringFromList(0, info, &quot;,&quot;)</div><div class="line"><a name="l03283"></a><span class="lineno"> 3283</span>&#160;                wave w = $wname</div><div class="line"><a name="l03284"></a><span class="lineno"> 3284</span>&#160;                ctab = StringFromList(3, info, &quot;,&quot;)</div><div class="line"><a name="l03285"></a><span class="lineno"> 3285</span>&#160;                rev = str2num(&quot;0&quot; + StringFromList(4, info, &quot;,&quot;))</div><div class="line"><a name="l03286"></a><span class="lineno"> 3286</span>&#160;                if (strlen(colortable) &gt; 0)</div><div class="line"><a name="l03287"></a><span class="lineno"> 3287</span>&#160;                    ctab = colortable</div><div class="line"><a name="l03288"></a><span class="lineno"> 3288</span>&#160;                endif</div><div class="line"><a name="l03289"></a><span class="lineno"> 3289</span>&#160;                <a class="code" href="pearl-anglescan-process_8ipf.html#a2e1ed05781f9eb4be5e77695ef049962">check_contrast</a>(w, pcmin, pcmax, vmin, vmax)</div><div class="line"><a name="l03290"></a><span class="lineno"> 3290</span>&#160;                ModifyGraph /w=$graphname zColor($objname)={w, vmin, vmax, $ctab, rev}</div><div class="line"><a name="l03291"></a><span class="lineno"> 3291</span>&#160;            endif</div><div class="line"><a name="l03292"></a><span class="lineno"> 3292</span>&#160;        endif</div><div class="line"><a name="l03293"></a><span class="lineno"> 3293</span>&#160;    endfor</div><div class="line"><a name="l03294"></a><span class="lineno"> 3294</span>&#160;    </div><div class="line"><a name="l03295"></a><span class="lineno"> 3295</span>&#160;    <span class="keywordtype">string</span> images = ImageNameList(graphname, <span class="stringliteral">&quot;;&quot;</span>)</div><div class="line"><a name="l03296"></a><span class="lineno"> 3296</span>&#160;    n = ItemsInList(images, <span class="stringliteral">&quot;;&quot;</span>)</div><div class="line"><a name="l03297"></a><span class="lineno"> 3297</span>&#160;    <span class="keywordflow">for</span> (i = 0; i &lt; n; i += 1)</div><div class="line"><a name="l03298"></a><span class="lineno"> 3298</span>&#160;        objname = StringFromList(i, images, <span class="stringliteral">&quot;;&quot;</span>)</div><div class="line"><a name="l03299"></a><span class="lineno"> 3299</span>&#160;        wave w = ImageNameToWaveRef(graphname, objname)</div><div class="line"><a name="l03300"></a><span class="lineno"> 3300</span>&#160;        info = ImageInfo(graphname, objname, 0)</div><div class="line"><a name="l03301"></a><span class="lineno"> 3301</span>&#160;        <span class="keywordflow">if</span> (strlen(info) &gt; 0)</div><div class="line"><a name="l03302"></a><span class="lineno"> 3302</span>&#160;            info = StringByKey(<span class="stringliteral">&quot;RECREATION&quot;</span>, info, <span class="stringliteral">&quot;:&quot;</span>, <span class="stringliteral">&quot;;&quot;</span>)</div><div class="line"><a name="l03303"></a><span class="lineno"> 3303</span>&#160;            info = StringByKey(<span class="stringliteral">&quot;ctab&quot;</span>, info, <span class="stringliteral">&quot;=&quot;</span>, <span class="stringliteral">&quot;;&quot;</span>)</div><div class="line"><a name="l03304"></a><span class="lineno"> 3304</span>&#160;            <span class="keywordflow">if</span> (strlen(info) &gt; 2)</div><div class="line"><a name="l03305"></a><span class="lineno"> 3305</span>&#160;                info = info[1,strlen(info)-2]</div><div class="line"><a name="l03306"></a><span class="lineno"> 3306</span>&#160;                ctab = StringFromList(2, info, <span class="stringliteral">&quot;,&quot;</span>)</div><div class="line"><a name="l03307"></a><span class="lineno"> 3307</span>&#160;                rev = str2num(<span class="stringliteral">&quot;0&quot;</span> + StringFromList(3, info, <span class="stringliteral">&quot;,&quot;</span>))</div><div class="line"><a name="l03308"></a><span class="lineno"> 3308</span>&#160;                <span class="keywordflow">if</span> (strlen(colortable) &gt; 0)</div><div class="line"><a name="l03309"></a><span class="lineno"> 3309</span>&#160;                    ctab = colortable</div><div class="line"><a name="l03310"></a><span class="lineno"> 3310</span>&#160;                endif</div><div class="line"><a name="l03311"></a><span class="lineno"> 3311</span>&#160;                <a class="code" href="pearl-anglescan-process_8ipf.html#a2e1ed05781f9eb4be5e77695ef049962">check_contrast</a>(w, pcmin, pcmax, vmin, vmax)</div><div class="line"><a name="l03312"></a><span class="lineno"> 3312</span>&#160;                ModifyImage /w=$graphname $objname ctab={vmin, vmax, $ctab, rev}</div><div class="line"><a name="l03313"></a><span class="lineno"> 3313</span>&#160;            endif</div><div class="line"><a name="l03314"></a><span class="lineno"> 3314</span>&#160;        endif</div><div class="line"><a name="l03315"></a><span class="lineno"> 3315</span>&#160;    endfor</div><div class="line"><a name="l03316"></a><span class="lineno"> 3316</span>&#160;</div><div class="line"><a name="l03317"></a><span class="lineno"> 3317</span>&#160;    setdatafolder save_df</div><div class="line"><a name="l03318"></a><span class="lineno"> 3318</span>&#160;end</div><div class="line"><a name="l03319"></a><span class="lineno"> 3319</span>&#160;</div><div class="line"><a name="l03332"></a><span class="lineno"><a class="line" href="pearl-anglescan-process_8ipf.html#acf6fddb73624fe2d21429e38c4994088"> 3332</a></span>&#160;Function <a class="code" href="pearl-anglescan-process_8ipf.html#acf6fddb73624fe2d21429e38c4994088">AngleToK</a>(inwave)</div><div class="line"><a name="l03333"></a><span class="lineno"> 3333</span>&#160;    Wave inwave</div><div class="line"><a name="l03334"></a><span class="lineno"> 3334</span>&#160;    String newname = NameofWave(inwave)+<span class="stringliteral">&quot;_k&quot;</span></div><div class="line"><a name="l03335"></a><span class="lineno"> 3335</span>&#160;    Duplicate/O inwave, $newname</div><div class="line"><a name="l03336"></a><span class="lineno"> 3336</span>&#160;    Wave outwave = $newname</div><div class="line"><a name="l03337"></a><span class="lineno"> 3337</span>&#160;    Variable rows,columns,xdelta,xoffset,ydelta,yoffset,kmin,kmax,Emax</div><div class="line"><a name="l03338"></a><span class="lineno"> 3338</span>&#160;    <span class="comment">// inwave parameters</span></div><div class="line"><a name="l03339"></a><span class="lineno"> 3339</span>&#160;    rows = DimSize(inwave,0)</div><div class="line"><a name="l03340"></a><span class="lineno"> 3340</span>&#160;    columns = DimSize(inwave,1)</div><div class="line"><a name="l03341"></a><span class="lineno"> 3341</span>&#160;    xdelta = DimDelta(inwave,0)</div><div class="line"><a name="l03342"></a><span class="lineno"> 3342</span>&#160;    xoffset = DimOffset(inwave,0)</div><div class="line"><a name="l03343"></a><span class="lineno"> 3343</span>&#160;    ydelta = DimDelta(inwave,1)</div><div class="line"><a name="l03344"></a><span class="lineno"> 3344</span>&#160;    yoffset = DimOffset(inwave,1)</div><div class="line"><a name="l03345"></a><span class="lineno"> 3345</span>&#160;    Emax= xoffset + xdelta*(rows-1)</div><div class="line"><a name="l03346"></a><span class="lineno"> 3346</span>&#160;    kmin = 0.5123*sqrt(Emax)*sin(pi/180*(yoffset)) <span class="comment">// calculate the k boundaries</span></div><div class="line"><a name="l03347"></a><span class="lineno"> 3347</span>&#160;    kmax = 0.5123*sqrt(Emax)*sin(pi/180*(yoffset+(columns-1)*ydelta))</div><div class="line"><a name="l03348"></a><span class="lineno"> 3348</span>&#160;    SetScale/I y kmin,kmax,&quot;Ang^-1&quot;, outwave</div><div class="line"><a name="l03349"></a><span class="lineno"> 3349</span>&#160;    <span class="comment">// scale the y axis</span></div><div class="line"><a name="l03350"></a><span class="lineno"> 3350</span>&#160;    outwave = interp2D(inwave, x, 180/pi*asin(y/ (0.5123*sqrt(x)))) <span class="comment">// recalculate to k</span></div><div class="line"><a name="l03351"></a><span class="lineno"> 3351</span>&#160;    outwave = (NumType(outwave)==2) ? 0 : outwave <span class="comment">// replace NaNs (optional)</span></div><div class="line"><a name="l03352"></a><span class="lineno"> 3352</span>&#160;End</div><div class="ttc" id="pearl-anglescan-process_8ipf_html_aa486e16909d01e2251eeb4d635b972b1"><div class="ttname"><a href="pearl-anglescan-process_8ipf.html#aa486e16909d01e2251eeb4d635b972b1">hemi_polar_cut</a></div><div class="ttdeci">wave hemi_polar_cut(string nickname, variable azim)</div><div class="ttdoc">extract a polar cut from a hemispherical scan. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-anglescan-process_8ipf_source.html#l03073">pearl-anglescan-process.ipf:3073</a></div></div>
 <div class="ttc" id="pearl-anglescan-process_8ipf_html_a5dc0cc7db9d3d7a6b3fa3f1b04d84a5e"><div class="ttname"><a href="pearl-anglescan-process_8ipf.html#a5dc0cc7db9d3d7a6b3fa3f1b04d84a5e">trim_hemi_scan</a></div><div class="ttdeci">variable trim_hemi_scan(string nickname, variable theta_max)</div><div class="ttdoc">trim a hemispherical scan at grazing angle </div><div class="ttdef"><b>Definition:</b> <a href="pearl-anglescan-process_8ipf_source.html#l03034">pearl-anglescan-process.ipf:3034</a></div></div>
 <div class="ttc" id="pearl-anglescan-process_8ipf_html_ac15ebd5a19c558dde666ab36aeb9906f"><div class="ttname"><a href="pearl-anglescan-process_8ipf.html#ac15ebd5a19c558dde666ab36aeb9906f">prepare_hemi_scan_display</a></div><div class="ttdeci">string prepare_hemi_scan_display(string nickname, variable projection=defaultValue)</div><div class="ttdoc">create waves for plotting a hemispherical angle scan. </div><div class="ttdef"><b>Definition:</b> <a href="pearl-anglescan-process_8ipf_source.html#l01702">pearl-anglescan-process.ipf:1702</a></div></div>
 <div class="ttc" id="pearl-anglescan-process_8ipf_html_a229770447193d4fd12032b235aab4d28"><div class="ttname"><a href="pearl-anglescan-process_8ipf.html#a229770447193d4fd12032b235aab4d28">pizza_service_2</a></div><div class="ttdeci">variable pizza_service_2(wave data, string nickname, wave m_theta, wave m_tilt, wave m_phi, variable npolar=defaultValue, variable nograph=defaultValue, variable folding=defaultValue, variable xpdplot=defaultValue)</div><div class="ttdoc">create a pizza plot from a measured (energy-integrated) data strip </div><div class="ttdef"><b>Definition:</b> <a href="pearl-anglescan-process_8ipf_source.html#l00862">pearl-anglescan-process.ipf:862</a></div></div>
@@ -161,7 +161,7 @@ $(document).ready(function(){initNavTree('pearl-anglescan-process_8ipf_source.ht
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-anglescan-process_8ipf.html">pearl-anglescan-process.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-anglescan-tracker_8ipf.html b/doc/html/pearl-anglescan-tracker_8ipf.html
index 51f1db1..7fa0887 100644
--- a/doc/html/pearl-anglescan-tracker_8ipf.html
+++ b/doc/html/pearl-anglescan-tracker_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -1637,7 +1637,7 @@ Variables</h2></td></tr>
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-anglescan-tracker_8ipf.html">pearl-anglescan-tracker.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-anglescan-tracker_8ipf_source.html b/doc/html/pearl-anglescan-tracker_8ipf_source.html
index 73feca6..fb26591 100644
--- a/doc/html/pearl-anglescan-tracker_8ipf_source.html
+++ b/doc/html/pearl-anglescan-tracker_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -153,7 +153,7 @@ $(document).ready(function(){initNavTree('pearl-anglescan-tracker_8ipf_source.ht
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-anglescan-tracker_8ipf.html">pearl-anglescan-tracker.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-area-display_8ipf.html b/doc/html/pearl-area-display_8ipf.html
index d0db7c0..7e0a007 100644
--- a/doc/html/pearl-area-display_8ipf.html
+++ b/doc/html/pearl-area-display_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -1695,7 +1695,7 @@ Functions</h2></td></tr>
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-area-display_8ipf.html">pearl-area-display.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-area-display_8ipf_source.html b/doc/html/pearl-area-display_8ipf_source.html
index 1434828..692424d 100644
--- a/doc/html/pearl-area-display_8ipf_source.html
+++ b/doc/html/pearl-area-display_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -120,7 +120,7 @@ $(document).ready(function(){initNavTree('pearl-area-display_8ipf_source.html','
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-area-display_8ipf.html">pearl-area-display.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-area-import_8ipf.html b/doc/html/pearl-area-import_8ipf.html
index b6bede5..cb6cbc2 100644
--- a/doc/html/pearl-area-import_8ipf.html
+++ b/doc/html/pearl-area-import_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -1448,7 +1448,7 @@ Licensed under the Apache License, Version 2.0 (the "License"); <br />
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-area-import_8ipf.html">pearl-area-import.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-area-import_8ipf_source.html b/doc/html/pearl-area-import_8ipf_source.html
index 56398f6..e154ccd 100644
--- a/doc/html/pearl-area-import_8ipf_source.html
+++ b/doc/html/pearl-area-import_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -125,7 +125,7 @@ $(document).ready(function(){initNavTree('pearl-area-import_8ipf_source.html',''
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-area-import_8ipf.html">pearl-area-import.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-area-profiles_8ipf.html b/doc/html/pearl-area-profiles_8ipf.html
index 9140105..d1dac1d 100644
--- a/doc/html/pearl-area-profiles_8ipf.html
+++ b/doc/html/pearl-area-profiles_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -970,7 +970,7 @@ Licensed under the Apache License, Version 2.0 (the "License"); <br />
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-area-profiles_8ipf.html">pearl-area-profiles.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-area-profiles_8ipf_source.html b/doc/html/pearl-area-profiles_8ipf_source.html
index 49832a6..11af8c1 100644
--- a/doc/html/pearl-area-profiles_8ipf_source.html
+++ b/doc/html/pearl-area-profiles_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -105,7 +105,7 @@ $(document).ready(function(){initNavTree('pearl-area-profiles_8ipf_source.html',
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-area-profiles_8ipf.html">pearl-area-profiles.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-arpes_8ipf.html b/doc/html/pearl-arpes_8ipf.html
index 9d2895b..5d1ef8e 100644
--- a/doc/html/pearl-arpes_8ipf.html
+++ b/doc/html/pearl-arpes_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -189,7 +189,7 @@ Licensed under the Apache License, Version 2.0 (the "License"); <br />
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-arpes_8ipf.html">pearl-arpes.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-arpes_8ipf_source.html b/doc/html/pearl-arpes_8ipf_source.html
index 5979b73..3d7e759 100644
--- a/doc/html/pearl-arpes_8ipf_source.html
+++ b/doc/html/pearl-arpes_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -93,7 +93,7 @@ $(document).ready(function(){initNavTree('pearl-arpes_8ipf_source.html','');});
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-arpes_8ipf.html">pearl-arpes.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-compat_8ipf.html b/doc/html/pearl-compat_8ipf.html
index 3027adf..16034fa 100644
--- a/doc/html/pearl-compat_8ipf.html
+++ b/doc/html/pearl-compat_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -141,7 +141,7 @@ Functions</h2></td></tr>
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-compat_8ipf.html">pearl-compat.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-compat_8ipf_source.html b/doc/html/pearl-compat_8ipf_source.html
index 674e0c6..2508edc 100644
--- a/doc/html/pearl-compat_8ipf_source.html
+++ b/doc/html/pearl-compat_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -92,7 +92,7 @@ $(document).ready(function(){initNavTree('pearl-compat_8ipf_source.html','');});
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-compat_8ipf.html">pearl-compat.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-data-explorer_8ipf.html b/doc/html/pearl-data-explorer_8ipf.html
index 1579749..c91517f 100644
--- a/doc/html/pearl-data-explorer_8ipf.html
+++ b/doc/html/pearl-data-explorer_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -2000,7 +2000,7 @@ Variables</h2></td></tr>
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-data-explorer_8ipf.html">pearl-data-explorer.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-data-explorer_8ipf_source.html b/doc/html/pearl-data-explorer_8ipf_source.html
index 8b4833e..452ea17 100644
--- a/doc/html/pearl-data-explorer_8ipf_source.html
+++ b/doc/html/pearl-data-explorer_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -165,7 +165,7 @@ $(document).ready(function(){initNavTree('pearl-data-explorer_8ipf_source.html',
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-data-explorer_8ipf.html">pearl-data-explorer.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-elog_8ipf.html b/doc/html/pearl-elog_8ipf.html
index e68110b..7877fc8 100644
--- a/doc/html/pearl-elog_8ipf.html
+++ b/doc/html/pearl-elog_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -2379,7 +2379,7 @@ Variables</h2></td></tr>
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-elog_8ipf.html">pearl-elog.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-elog_8ipf_source.html b/doc/html/pearl-elog_8ipf_source.html
index e2e4314..595137f 100644
--- a/doc/html/pearl-elog_8ipf_source.html
+++ b/doc/html/pearl-elog_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -153,7 +153,7 @@ $(document).ready(function(){initNavTree('pearl-elog_8ipf_source.html','');});
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-elog_8ipf.html">pearl-elog.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-fitfuncs_8ipf.html b/doc/html/pearl-fitfuncs_8ipf.html
index 51697a4..0e3fd44 100644
--- a/doc/html/pearl-fitfuncs_8ipf.html
+++ b/doc/html/pearl-fitfuncs_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -980,7 +980,7 @@ Licensed under the Apache License, Version 2.0 (the "License"); <br />
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-fitfuncs_8ipf.html">pearl-fitfuncs.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-fitfuncs_8ipf_source.html b/doc/html/pearl-fitfuncs_8ipf_source.html
index b0d8d32..5e1916a 100644
--- a/doc/html/pearl-fitfuncs_8ipf_source.html
+++ b/doc/html/pearl-fitfuncs_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -113,7 +113,7 @@ $(document).ready(function(){initNavTree('pearl-fitfuncs_8ipf_source.html','');}
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-fitfuncs_8ipf.html">pearl-fitfuncs.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-gui-tools_8ipf.html b/doc/html/pearl-gui-tools_8ipf.html
index 6b3e180..7b1ba67 100644
--- a/doc/html/pearl-gui-tools_8ipf.html
+++ b/doc/html/pearl-gui-tools_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -197,7 +197,7 @@ Functions</h2></td></tr>
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-gui-tools_8ipf.html">pearl-gui-tools.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-gui-tools_8ipf_source.html b/doc/html/pearl-gui-tools_8ipf_source.html
index 304e54e..e64b1ca 100644
--- a/doc/html/pearl-gui-tools_8ipf_source.html
+++ b/doc/html/pearl-gui-tools_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -94,7 +94,7 @@ $(document).ready(function(){initNavTree('pearl-gui-tools_8ipf_source.html','');
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-gui-tools_8ipf.html">pearl-gui-tools.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-matrix-import_8ipf.html b/doc/html/pearl-matrix-import_8ipf.html
index beaedee..42bf875 100644
--- a/doc/html/pearl-matrix-import_8ipf.html
+++ b/doc/html/pearl-matrix-import_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -1105,7 +1105,7 @@ result file names look like: default_2015Apr20-124353_STM-STM_AtomManipulation_0
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-matrix-import_8ipf.html">pearl-matrix-import.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-matrix-import_8ipf_source.html b/doc/html/pearl-matrix-import_8ipf_source.html
index e54dc8e..2025116 100644
--- a/doc/html/pearl-matrix-import_8ipf_source.html
+++ b/doc/html/pearl-matrix-import_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -112,7 +112,7 @@ $(document).ready(function(){initNavTree('pearl-matrix-import_8ipf_source.html',
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-matrix-import_8ipf.html">pearl-matrix-import.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-menu_8ipf.html b/doc/html/pearl-menu_8ipf.html
index 966e3e2..4afcf93 100644
--- a/doc/html/pearl-menu_8ipf.html
+++ b/doc/html/pearl-menu_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -426,7 +426,7 @@ Functions</h2></td></tr>
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-menu_8ipf.html">pearl-menu.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-menu_8ipf_source.html b/doc/html/pearl-menu_8ipf_source.html
index 7492bfe..491133a 100644
--- a/doc/html/pearl-menu_8ipf_source.html
+++ b/doc/html/pearl-menu_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -113,7 +113,7 @@ $(document).ready(function(){initNavTree('pearl-menu_8ipf_source.html','');});
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-menu_8ipf.html">pearl-menu.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-otf-import_8ipf.html b/doc/html/pearl-otf-import_8ipf.html
index 06950c5..2624645 100644
--- a/doc/html/pearl-otf-import_8ipf.html
+++ b/doc/html/pearl-otf-import_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -464,7 +464,7 @@ Functions</h2></td></tr>
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-otf-import_8ipf.html">pearl-otf-import.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-otf-import_8ipf_source.html b/doc/html/pearl-otf-import_8ipf_source.html
index 7bbe85f..ac78ca0 100644
--- a/doc/html/pearl-otf-import_8ipf_source.html
+++ b/doc/html/pearl-otf-import_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -102,7 +102,7 @@ $(document).ready(function(){initNavTree('pearl-otf-import_8ipf_source.html','')
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-otf-import_8ipf.html">pearl-otf-import.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-pmsco-import_8ipf.html b/doc/html/pearl-pmsco-import_8ipf.html
index 67d7b28..66b1682 100644
--- a/doc/html/pearl-pmsco-import_8ipf.html
+++ b/doc/html/pearl-pmsco-import_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -337,7 +337,7 @@ Licensed under the Apache License, Version 2.0 (the "License"); <br />
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-pmsco-import_8ipf.html">pearl-pmsco-import.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-pmsco-import_8ipf_source.html b/doc/html/pearl-pmsco-import_8ipf_source.html
index d89c650..80eb518 100644
--- a/doc/html/pearl-pmsco-import_8ipf_source.html
+++ b/doc/html/pearl-pmsco-import_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -94,7 +94,7 @@ $(document).ready(function(){initNavTree('pearl-pmsco-import_8ipf_source.html','
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-pmsco-import_8ipf.html">pearl-pmsco-import.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-polar-coordinates_8ipf.html b/doc/html/pearl-polar-coordinates_8ipf.html
index 6109076..3c366c3 100644
--- a/doc/html/pearl-polar-coordinates_8ipf.html
+++ b/doc/html/pearl-polar-coordinates_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -320,7 +320,7 @@ Functions</h2></td></tr>
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-polar-coordinates_8ipf.html">pearl-polar-coordinates.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-polar-coordinates_8ipf_source.html b/doc/html/pearl-polar-coordinates_8ipf_source.html
index 2f069da..4a80f72 100644
--- a/doc/html/pearl-polar-coordinates_8ipf_source.html
+++ b/doc/html/pearl-polar-coordinates_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -96,7 +96,7 @@ $(document).ready(function(){initNavTree('pearl-polar-coordinates_8ipf_source.ht
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-polar-coordinates_8ipf.html">pearl-polar-coordinates.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-pshell-import_8ipf.html b/doc/html/pearl-pshell-import_8ipf.html
index c3feca4..27d5ba5 100644
--- a/doc/html/pearl-pshell-import_8ipf.html
+++ b/doc/html/pearl-pshell-import_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -2230,7 +2230,7 @@ global string s_scanpaths in new data folder contains a list of scan groups insi
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-pshell-import_8ipf.html">pearl-pshell-import.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-pshell-import_8ipf_source.html b/doc/html/pearl-pshell-import_8ipf_source.html
index ad4159f..4f67627 100644
--- a/doc/html/pearl-pshell-import_8ipf_source.html
+++ b/doc/html/pearl-pshell-import_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -112,7 +112,7 @@ $(document).ready(function(){initNavTree('pearl-pshell-import_8ipf_source.html',
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-pshell-import_8ipf.html">pearl-pshell-import.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-scienta-countrate_8ipf.html b/doc/html/pearl-scienta-countrate_8ipf.html
index 49d8ae7..260edb9 100644
--- a/doc/html/pearl-scienta-countrate_8ipf.html
+++ b/doc/html/pearl-scienta-countrate_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -226,7 +226,7 @@ Licensed under the Apache License, Version 2.0 (the "License"); <br />
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-scienta-countrate_8ipf.html">pearl-scienta-countrate.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-scienta-countrate_8ipf_source.html b/doc/html/pearl-scienta-countrate_8ipf_source.html
index 992f209..c16ae9b 100644
--- a/doc/html/pearl-scienta-countrate_8ipf_source.html
+++ b/doc/html/pearl-scienta-countrate_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -96,7 +96,7 @@ $(document).ready(function(){initNavTree('pearl-scienta-countrate_8ipf_source.ht
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-scienta-countrate_8ipf.html">pearl-scienta-countrate.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-scienta-preprocess_8ipf.html b/doc/html/pearl-scienta-preprocess_8ipf.html
index 7c64daf..724e608 100644
--- a/doc/html/pearl-scienta-preprocess_8ipf.html
+++ b/doc/html/pearl-scienta-preprocess_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -547,7 +547,7 @@ Licensed under the Apache License, Version 2.0 (the "License"); <br />
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-scienta-preprocess_8ipf.html">pearl-scienta-preprocess.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-scienta-preprocess_8ipf_source.html b/doc/html/pearl-scienta-preprocess_8ipf_source.html
index ddc02af..8c915c1 100644
--- a/doc/html/pearl-scienta-preprocess_8ipf_source.html
+++ b/doc/html/pearl-scienta-preprocess_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -107,7 +107,7 @@ $(document).ready(function(){initNavTree('pearl-scienta-preprocess_8ipf_source.h
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-scienta-preprocess_8ipf.html">pearl-scienta-preprocess.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-tools_8ipf.html b/doc/html/pearl-tools_8ipf.html
index 66d0d4d..68022e8 100644
--- a/doc/html/pearl-tools_8ipf.html
+++ b/doc/html/pearl-tools_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -311,7 +311,7 @@ Functions</h2></td></tr>
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-tools_8ipf.html">pearl-tools.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-tools_8ipf_source.html b/doc/html/pearl-tools_8ipf_source.html
index fb4365f..da3cecb 100644
--- a/doc/html/pearl-tools_8ipf_source.html
+++ b/doc/html/pearl-tools_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -100,7 +100,7 @@ $(document).ready(function(){initNavTree('pearl-tools_8ipf_source.html','');});
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-tools_8ipf.html">pearl-tools.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-vector-operations_8ipf.html b/doc/html/pearl-vector-operations_8ipf.html
index 9f219cb..f53afcd 100644
--- a/doc/html/pearl-vector-operations_8ipf.html
+++ b/doc/html/pearl-vector-operations_8ipf.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -510,7 +510,7 @@ Licensed under the Apache License, Version 2.0 (the "License"); <br />
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-vector-operations_8ipf.html">pearl-vector-operations.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/pearl-vector-operations_8ipf_source.html b/doc/html/pearl-vector-operations_8ipf_source.html
index d56f4e4..9f92910 100644
--- a/doc/html/pearl-vector-operations_8ipf_source.html
+++ b/doc/html/pearl-vector-operations_8ipf_source.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -100,7 +100,7 @@ $(document).ready(function(){initNavTree('pearl-vector-operations_8ipf_source.ht
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="dir_fe5dc42579d4b99403482a3a637d9f7d.html">pearl</a></li><li class="navelem"><a class="el" href="pearl-vector-operations_8ipf.html">pearl-vector-operations.ipf</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/struct_doniach_sunjic_struct.html b/doc/html/struct_doniach_sunjic_struct.html
index e6e4939..cbe169c 100644
--- a/doc/html/struct_doniach_sunjic_struct.html
+++ b/doc/html/struct_doniach_sunjic_struct.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -266,7 +266,7 @@ Data Fields</h2></td></tr>
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="struct_doniach_sunjic_struct.html">DoniachSunjicStruct</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/structerror_code.html b/doc/html/structerror_code.html
index e64b6aa..5b320ae 100644
--- a/doc/html/structerror_code.html
+++ b/doc/html/structerror_code.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -306,7 +306,7 @@ Data Fields</h2></td></tr>
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
     <li class="navelem"><a class="el" href="structerror_code.html">errorCode</a></li>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/html/todo.html b/doc/html/todo.html
index 9abe27b..2b90bbd 100644
--- a/doc/html/todo.html
+++ b/doc/html/todo.html
@@ -29,7 +29,7 @@
  <tr style="height: 56px;">
   <td id="projectalign" style="padding-left: 0.5em;">
    <div id="projectname">PEARL Procedures
-   &#160;<span id="projectnumber">rev-distro-2.1.0-1-gb7390cb-dirty</span>
+   &#160;<span id="projectnumber">rev-distro-2.1.1-1-gf419e92-dirty</span>
    </div>
    <div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
   </td>
@@ -102,7 +102,7 @@ $(document).ready(function(){initNavTree('todo.html','');});
 <!-- start footer part -->
 <div id="nav-path" class="navpath"><!-- id is needed for treeview function! -->
   <ul>
-    <li class="footer">Generated on Tue Jun 9 2020 12:30:01 for PEARL Procedures by
+    <li class="footer">Generated on Tue Jun 16 2020 14:32:36 for PEARL Procedures by
     <a href="http://www.doxygen.org/index.html">
     <img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.13 </li>
   </ul>
diff --git a/doc/latex/refman.pdf b/doc/latex/refman.pdf
index 411e78d..593f33f 100644
Binary files a/doc/latex/refman.pdf and b/doc/latex/refman.pdf differ