matthias muntwiler
70207096d5
Some checks failed
build and deploy documentation / build-and-deploy (push) Failing after 0s
361 lines
39 KiB
HTML
361 lines
39 KiB
HTML
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "https://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
|
<html xmlns="http://www.w3.org/1999/xhtml" lang="en-US">
|
|
<head>
|
|
<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
|
|
<meta http-equiv="X-UA-Compatible" content="IE=11"/>
|
|
<meta name="generator" content="Doxygen 1.9.8"/>
|
|
<meta name="viewport" content="width=device-width, initial-scale=1"/>
|
|
<title>PEARL Procedures: pearl-pmsco-import.ipf Source File</title>
|
|
<link href="tabs.css" rel="stylesheet" type="text/css"/>
|
|
<script type="text/javascript" src="jquery.js"></script>
|
|
<script type="text/javascript" src="dynsections.js"></script>
|
|
<link href="navtree.css" rel="stylesheet" type="text/css"/>
|
|
<script type="text/javascript" src="resize.js"></script>
|
|
<script type="text/javascript" src="navtreedata.js"></script>
|
|
<script type="text/javascript" src="navtree.js"></script>
|
|
<link href="search/search.css" rel="stylesheet" type="text/css"/>
|
|
<script type="text/javascript" src="search/searchdata.js"></script>
|
|
<script type="text/javascript" src="search/search.js"></script>
|
|
<link href="doxygen.css" rel="stylesheet" type="text/css" />
|
|
</head>
|
|
<body>
|
|
<div id="top"><!-- do not remove this div, it is closed by doxygen! -->
|
|
<div id="titlearea">
|
|
<table cellspacing="0" cellpadding="0">
|
|
<tbody>
|
|
<tr id="projectrow">
|
|
<td id="projectalign">
|
|
<div id="projectname">PEARL Procedures<span id="projectnumber"> rev-distro-3.1.0-0-gea838b3-dirty</span>
|
|
</div>
|
|
<div id="projectbrief">Igor procedures for the analysis of PEARL data</div>
|
|
</td>
|
|
</tr>
|
|
</tbody>
|
|
</table>
|
|
</div>
|
|
<!-- end header part -->
|
|
<!-- Generated by Doxygen 1.9.8 -->
|
|
<script type="text/javascript">
|
|
/* @license magnet:?xt=urn:btih:d3d9a9a6595521f9666a5e94cc830dab83b65699&dn=expat.txt MIT */
|
|
var searchBox = new SearchBox("searchBox", "search/",'.html');
|
|
/* @license-end */
|
|
</script>
|
|
<script type="text/javascript" src="menudata.js"></script>
|
|
<script type="text/javascript" src="menu.js"></script>
|
|
<script type="text/javascript">
|
|
/* @license magnet:?xt=urn:btih:d3d9a9a6595521f9666a5e94cc830dab83b65699&dn=expat.txt MIT */
|
|
$(function() {
|
|
initMenu('',true,false,'search.php','Search');
|
|
$(document).ready(function() { init_search(); });
|
|
});
|
|
/* @license-end */
|
|
</script>
|
|
<div id="main-nav"></div>
|
|
<script type="text/javascript">
|
|
/* @license magnet:?xt=urn:btih:d3d9a9a6595521f9666a5e94cc830dab83b65699&dn=expat.txt MIT */
|
|
$(document).ready(function() { init_codefold(0); });
|
|
/* @license-end */
|
|
</script>
|
|
</div><!-- top -->
|
|
<div id="side-nav" class="ui-resizable side-nav-resizable">
|
|
<div id="nav-tree">
|
|
<div id="nav-tree-contents">
|
|
<div id="nav-sync" class="sync"></div>
|
|
</div>
|
|
</div>
|
|
<div id="splitbar" style="-moz-user-select:none;"
|
|
class="ui-resizable-handle">
|
|
</div>
|
|
</div>
|
|
<script type="text/javascript">
|
|
/* @license magnet:?xt=urn:btih:d3d9a9a6595521f9666a5e94cc830dab83b65699&dn=expat.txt MIT */
|
|
$(document).ready(function(){initNavTree('pearl-pmsco-import_8ipf_source.html',''); initResizable(); });
|
|
/* @license-end */
|
|
</script>
|
|
<div id="doc-content">
|
|
<!-- window showing the filter options -->
|
|
<div id="MSearchSelectWindow"
|
|
onmouseover="return searchBox.OnSearchSelectShow()"
|
|
onmouseout="return searchBox.OnSearchSelectHide()"
|
|
onkeydown="return searchBox.OnSearchSelectKey(event)">
|
|
</div>
|
|
|
|
<!-- iframe showing the search results (closed by default) -->
|
|
<div id="MSearchResultsWindow">
|
|
<div id="MSearchResults">
|
|
<div class="SRPage">
|
|
<div id="SRIndex">
|
|
<div id="SRResults"></div>
|
|
<div class="SRStatus" id="Loading">Loading...</div>
|
|
<div class="SRStatus" id="Searching">Searching...</div>
|
|
<div class="SRStatus" id="NoMatches">No Matches</div>
|
|
</div>
|
|
</div>
|
|
</div>
|
|
</div>
|
|
|
|
<div class="header">
|
|
<div class="headertitle"><div class="title">pearl-pmsco-import.ipf</div></div>
|
|
</div><!--header-->
|
|
<div class="contents">
|
|
<a href="pearl-pmsco-import_8ipf.html">Go to the documentation of this file.</a><div class="fragment"><div class="line"><a id="l00001" name="l00001"></a><span class="lineno"> 1</span><span class="preprocessor">#pragma TextEncoding = "UTF-8"</span></div>
|
|
<div class="line"><a id="l00002" name="l00002"></a><span class="lineno"> 2</span><span class="preprocessor">#pragma rtGlobals=3 </span><span class="comment">// Use modern global access method and strict wave access.</span></div>
|
|
<div class="line"><a id="l00003" name="l00003"></a><span class="lineno"> 3</span><span class="preprocessor">#pragma IgorVersion = 6.2</span></div>
|
|
<div class="line"><a id="l00004" name="l00004"></a><span class="lineno"> 4</span><span class="preprocessor">#pragma ModuleName = PearlPmscoImport</span></div>
|
|
<div class="line"><a id="l00005" name="l00005"></a><span class="lineno"> 5</span> </div>
|
|
<div class="line"><a id="l00006" name="l00006"></a><span class="lineno"> 6</span><span class="comment">// copyright (c) 2018-25 Paul Scherrer Institut</span></div>
|
|
<div class="line"><a id="l00007" name="l00007"></a><span class="lineno"> 7</span><span class="comment">//</span></div>
|
|
<div class="line"><a id="l00008" name="l00008"></a><span class="lineno"> 8</span><span class="comment">// Licensed under the Apache License, Version 2.0 (the "License");</span></div>
|
|
<div class="line"><a id="l00009" name="l00009"></a><span class="lineno"> 9</span><span class="comment">// you may not use this file except in compliance with the License.</span></div>
|
|
<div class="line"><a id="l00010" name="l00010"></a><span class="lineno"> 10</span><span class="comment">// You may obtain a copy of the License at</span></div>
|
|
<div class="line"><a id="l00011" name="l00011"></a><span class="lineno"> 11</span><span class="comment">// http:///www.apache.org/licenses/LICENSE-2.0</span></div>
|
|
<div class="line"><a id="l00012" name="l00012"></a><span class="lineno"> 12</span><span class="comment">//</span></div>
|
|
<div class="line"><a id="l00013" name="l00013"></a><span class="lineno"> 13</span><span class="comment">// Please acknowledge the use of this code.</span></div>
|
|
<div class="line"><a id="l00014" name="l00014"></a><span class="lineno"> 14</span> </div>
|
|
<div class="line"><a id="l00029" name="l00029"></a><span class="lineno"> 29</span> </div>
|
|
<div class="line"><a id="l00034" name="l00034"></a><span class="lineno"> 34</span> </div>
|
|
<div class="line"><a id="l00035" name="l00035"></a><span class="lineno"> 35</span> </div>
|
|
<div class="foldopen" id="foldopen00089" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00089" name="l00089"></a><span class="lineno"><a class="line" href="pearl-pmsco-import_8ipf.html#aa31bbaa2fc77b447e6c6f386b23abdd9"> 89</a></span>function /s <a class="code hl_function" href="pearl-pmsco-import_8ipf.html#aa31bbaa2fc77b447e6c6f386b23abdd9">pmsco_save_scan</a>(pathname, filename, energy, theta, phi, alpha, intensity, sigma, [sdfr])</div>
|
|
<div class="line"><a id="l00090" name="l00090"></a><span class="lineno"> 90</span> <span class="keywordtype">string</span> pathname</div>
|
|
<div class="line"><a id="l00091" name="l00091"></a><span class="lineno"> 91</span> <span class="keywordtype">string</span> filename</div>
|
|
<div class="line"><a id="l00092" name="l00092"></a><span class="lineno"> 92</span> <span class="keywordtype">string</span> energy</div>
|
|
<div class="line"><a id="l00093" name="l00093"></a><span class="lineno"> 93</span> <span class="keywordtype">string</span> theta</div>
|
|
<div class="line"><a id="l00094" name="l00094"></a><span class="lineno"> 94</span> <span class="keywordtype">string</span> phi</div>
|
|
<div class="line"><a id="l00095" name="l00095"></a><span class="lineno"> 95</span> <span class="keywordtype">string</span> alpha</div>
|
|
<div class="line"><a id="l00096" name="l00096"></a><span class="lineno"> 96</span> <span class="keywordtype">string</span> intensity</div>
|
|
<div class="line"><a id="l00097" name="l00097"></a><span class="lineno"> 97</span> <span class="keywordtype">string</span> sigma</div>
|
|
<div class="line"><a id="l00098" name="l00098"></a><span class="lineno"> 98</span> dfref sdfr</div>
|
|
<div class="line"><a id="l00099" name="l00099"></a><span class="lineno"> 99</span> </div>
|
|
<div class="line"><a id="l00100" name="l00100"></a><span class="lineno"> 100</span> <span class="comment">//string fileext</span></div>
|
|
<div class="line"><a id="l00101" name="l00101"></a><span class="lineno"> 101</span> <span class="comment">//fileext = StringFromList(ItemsInList(filename, ".") - 1, filename, ".")</span></div>
|
|
<div class="line"><a id="l00102" name="l00102"></a><span class="lineno"> 102</span> </div>
|
|
<div class="line"><a id="l00103" name="l00103"></a><span class="lineno"> 103</span> dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a id="l00104" name="l00104"></a><span class="lineno"> 104</span> dfref tempdf = NewFreeDataFolder()</div>
|
|
<div class="line"><a id="l00105" name="l00105"></a><span class="lineno"> 105</span> </div>
|
|
<div class="line"><a id="l00106" name="l00106"></a><span class="lineno"> 106</span> if (ParamIsDefault(sdfr))</div>
|
|
<div class="line"><a id="l00107" name="l00107"></a><span class="lineno"> 107</span> dfref sdfr = savedf</div>
|
|
<div class="line"><a id="l00108" name="l00108"></a><span class="lineno"> 108</span> endif</div>
|
|
<div class="line"><a id="l00109" name="l00109"></a><span class="lineno"> 109</span> SetDataFolder sdfr</div>
|
|
<div class="line"><a id="l00110" name="l00110"></a><span class="lineno"> 110</span> wave w_intensity = $intensity</div>
|
|
<div class="line"><a id="l00111" name="l00111"></a><span class="lineno"> 111</span> <span class="keywordtype">string</span> wavenames = ""</div>
|
|
<div class="line"><a id="l00112" name="l00112"></a><span class="lineno"> 112</span> </div>
|
|
<div class="line"><a id="l00113" name="l00113"></a><span class="lineno"> 113</span> wavenames = <a class="code hl_function" href="pearl-pmsco-import_8ipf.html#a0a53a4686b482d62fe1797932a1708db">save_scan_helper</a>("w_energy", energy, w_intensity, tempdf, wavenames)</div>
|
|
<div class="line"><a id="l00114" name="l00114"></a><span class="lineno"> 114</span> wavenames = <a class="code hl_function" href="pearl-pmsco-import_8ipf.html#a0a53a4686b482d62fe1797932a1708db">save_scan_helper</a>("w_theta", theta, w_intensity, tempdf, wavenames)</div>
|
|
<div class="line"><a id="l00115" name="l00115"></a><span class="lineno"> 115</span> wavenames = <a class="code hl_function" href="pearl-pmsco-import_8ipf.html#a0a53a4686b482d62fe1797932a1708db">save_scan_helper</a>("w_phi", phi, w_intensity, tempdf, wavenames)</div>
|
|
<div class="line"><a id="l00116" name="l00116"></a><span class="lineno"> 116</span> wavenames = <a class="code hl_function" href="pearl-pmsco-import_8ipf.html#a0a53a4686b482d62fe1797932a1708db">save_scan_helper</a>("w_alpha", alpha, w_intensity, tempdf, wavenames)</div>
|
|
<div class="line"><a id="l00117" name="l00117"></a><span class="lineno"> 117</span> wavenames = <a class="code hl_function" href="pearl-pmsco-import_8ipf.html#a0a53a4686b482d62fe1797932a1708db">save_scan_helper</a>("w_intensity", intensity, w_intensity, tempdf, wavenames)</div>
|
|
<div class="line"><a id="l00118" name="l00118"></a><span class="lineno"> 118</span> wavenames = <a class="code hl_function" href="pearl-pmsco-import_8ipf.html#a0a53a4686b482d62fe1797932a1708db">save_scan_helper</a>("w_sigma", sigma, w_intensity, tempdf, wavenames)</div>
|
|
<div class="line"><a id="l00119" name="l00119"></a><span class="lineno"> 119</span> </div>
|
|
<div class="line"><a id="l00120" name="l00120"></a><span class="lineno"> 120</span> setdatafolder tempdf</div>
|
|
<div class="line"><a id="l00121" name="l00121"></a><span class="lineno"> 121</span> save /b /g /m="\n" /p=$pathname wavenames as filename</div>
|
|
<div class="line"><a id="l00122" name="l00122"></a><span class="lineno"> 122</span> setdatafolder savedf</div>
|
|
<div class="line"><a id="l00123" name="l00123"></a><span class="lineno"> 123</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00124" name="l00124"></a><span class="lineno"> 124</span> </div>
|
|
<div class="foldopen" id="foldopen00127" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00127" name="l00127"></a><span class="lineno"><a class="line" href="pearl-pmsco-import_8ipf.html#a0a53a4686b482d62fe1797932a1708db"> 127</a></span>static function /s <a class="code hl_function" href="pearl-pmsco-import_8ipf.html#a0a53a4686b482d62fe1797932a1708db">save_scan_helper</a>(destname, value, template, destdfr, wavenames)</div>
|
|
<div class="line"><a id="l00128" name="l00128"></a><span class="lineno"> 128</span> <span class="keywordtype">string</span> destname</div>
|
|
<div class="line"><a id="l00129" name="l00129"></a><span class="lineno"> 129</span> <span class="keywordtype">string</span> value</div>
|
|
<div class="line"><a id="l00130" name="l00130"></a><span class="lineno"> 130</span> wave template</div>
|
|
<div class="line"><a id="l00131" name="l00131"></a><span class="lineno"> 131</span> dfref destdfr</div>
|
|
<div class="line"><a id="l00132" name="l00132"></a><span class="lineno"> 132</span> <span class="keywordtype">string</span> wavenames</div>
|
|
<div class="line"><a id="l00133" name="l00133"></a><span class="lineno"> 133</span> </div>
|
|
<div class="line"><a id="l00134" name="l00134"></a><span class="lineno"> 134</span> variable err = 0</div>
|
|
<div class="line"><a id="l00135" name="l00135"></a><span class="lineno"> 135</span> if (strlen(value) > 0)</div>
|
|
<div class="line"><a id="l00136" name="l00136"></a><span class="lineno"> 136</span> if (exists(value) == 1)</div>
|
|
<div class="line"><a id="l00137" name="l00137"></a><span class="lineno"> 137</span> duplicate $value, destdfr:$destname</div>
|
|
<div class="line"><a id="l00138" name="l00138"></a><span class="lineno"> 138</span> wave /sdfr=destdfr w=$destname</div>
|
|
<div class="line"><a id="l00139" name="l00139"></a><span class="lineno"> 139</span> else</div>
|
|
<div class="line"><a id="l00140" name="l00140"></a><span class="lineno"> 140</span> duplicate template, destdfr:$destname</div>
|
|
<div class="line"><a id="l00141" name="l00141"></a><span class="lineno"> 141</span> wave /sdfr=destdfr w=$destname</div>
|
|
<div class="line"><a id="l00142" name="l00142"></a><span class="lineno"> 142</span> variable numval = str2num(value)</div>
|
|
<div class="line"><a id="l00143" name="l00143"></a><span class="lineno"> 143</span> <span class="keywordtype">string</span> msg</div>
|
|
<div class="line"><a id="l00144" name="l00144"></a><span class="lineno"> 144</span> if (numtype(numval) == 0)</div>
|
|
<div class="line"><a id="l00145" name="l00145"></a><span class="lineno"> 145</span> w = numval</div>
|
|
<div class="line"><a id="l00146" name="l00146"></a><span class="lineno"> 146</span> <span class="comment">//elseif (cmpstr(value[0,0], "%") == 0)</span></div>
|
|
<div class="line"><a id="l00147" name="l00147"></a><span class="lineno"> 147</span> else</div>
|
|
<div class="line"><a id="l00148" name="l00148"></a><span class="lineno"> 148</span> strswitch(value)</div>
|
|
<div class="line"><a id="l00149" name="l00149"></a><span class="lineno"> 149</span> case "x":</div>
|
|
<div class="line"><a id="l00150" name="l00150"></a><span class="lineno"> 150</span> w = DimOffset(template, 0) + DimDelta(template, 0) * p</div>
|
|
<div class="line"><a id="l00151" name="l00151"></a><span class="lineno"> 151</span> break</div>
|
|
<div class="line"><a id="l00152" name="l00152"></a><span class="lineno"> 152</span> case "y":</div>
|
|
<div class="line"><a id="l00153" name="l00153"></a><span class="lineno"> 153</span> w = DimOffset(template, 1) + DimDelta(template, 1) * q</div>
|
|
<div class="line"><a id="l00154" name="l00154"></a><span class="lineno"> 154</span> break</div>
|
|
<div class="line"><a id="l00155" name="l00155"></a><span class="lineno"> 155</span> case "z":</div>
|
|
<div class="line"><a id="l00156" name="l00156"></a><span class="lineno"> 156</span> w = DimOffset(template, 2) + DimDelta(template, 2) * r</div>
|
|
<div class="line"><a id="l00157" name="l00157"></a><span class="lineno"> 157</span> break</div>
|
|
<div class="line"><a id="l00158" name="l00158"></a><span class="lineno"> 158</span> case "t":</div>
|
|
<div class="line"><a id="l00159" name="l00159"></a><span class="lineno"> 159</span> w = DimOffset(template, 3) + DimDelta(template, 3) * s</div>
|
|
<div class="line"><a id="l00160" name="l00160"></a><span class="lineno"> 160</span> break</div>
|
|
<div class="line"><a id="l00161" name="l00161"></a><span class="lineno"> 161</span> default:</div>
|
|
<div class="line"><a id="l00162" name="l00162"></a><span class="lineno"> 162</span> err = 1</div>
|
|
<div class="line"><a id="l00163" name="l00163"></a><span class="lineno"> 163</span> sprintf msg, "invalid %s argument", StringFromList(1, destname, "_")</div>
|
|
<div class="line"><a id="l00164" name="l00164"></a><span class="lineno"> 164</span> endswitch</div>
|
|
<div class="line"><a id="l00165" name="l00165"></a><span class="lineno"> 165</span> endif</div>
|
|
<div class="line"><a id="l00166" name="l00166"></a><span class="lineno"> 166</span> endif</div>
|
|
<div class="line"><a id="l00167" name="l00167"></a><span class="lineno"> 167</span> if (err == 0)</div>
|
|
<div class="line"><a id="l00168" name="l00168"></a><span class="lineno"> 168</span> wavenames = AddListItem(destname, wavenames, ";", inf)</div>
|
|
<div class="line"><a id="l00169" name="l00169"></a><span class="lineno"> 169</span> variable npts = DimSize(w, 0) * max(DimSize(w, 1), 1) * max(DimSize(w, 2), 1) * max(DimSize(w, 3), 1)</div>
|
|
<div class="line"><a id="l00170" name="l00170"></a><span class="lineno"> 170</span> Redimension /n=(npts) w</div>
|
|
<div class="line"><a id="l00171" name="l00171"></a><span class="lineno"> 171</span> else</div>
|
|
<div class="line"><a id="l00172" name="l00172"></a><span class="lineno"> 172</span> abort msg </div>
|
|
<div class="line"><a id="l00173" name="l00173"></a><span class="lineno"> 173</span> endif</div>
|
|
<div class="line"><a id="l00174" name="l00174"></a><span class="lineno"> 174</span> endif</div>
|
|
<div class="line"><a id="l00175" name="l00175"></a><span class="lineno"> 175</span> return wavenames</div>
|
|
<div class="line"><a id="l00176" name="l00176"></a><span class="lineno"> 176</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00177" name="l00177"></a><span class="lineno"> 177</span> </div>
|
|
<div class="foldopen" id="foldopen00207" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00207" name="l00207"></a><span class="lineno"><a class="line" href="pearl-pmsco-import_8ipf.html#a98bbe8db14dba5aea9588a1b433baca7"> 207</a></span>function /s <a class="code hl_function" href="pearl-pmsco-import_8ipf.html#a98bbe8db14dba5aea9588a1b433baca7">load_pmsco_scan</a>(pathname, filename, [is_modulation, quiet])</div>
|
|
<div class="line"><a id="l00208" name="l00208"></a><span class="lineno"> 208</span> <span class="keywordtype">string</span> pathname <span class="comment">// name of a symbolic path</span></div>
|
|
<div class="line"><a id="l00209" name="l00209"></a><span class="lineno"> 209</span> <span class="keywordtype">string</span> filename</div>
|
|
<div class="line"><a id="l00210" name="l00210"></a><span class="lineno"> 210</span> variable is_modulation</div>
|
|
<div class="line"><a id="l00211" name="l00211"></a><span class="lineno"> 211</span> variable quiet</div>
|
|
<div class="line"><a id="l00212" name="l00212"></a><span class="lineno"> 212</span> </div>
|
|
<div class="line"><a id="l00213" name="l00213"></a><span class="lineno"> 213</span> if (ParamIsDefault(quiet))</div>
|
|
<div class="line"><a id="l00214" name="l00214"></a><span class="lineno"> 214</span> quiet = 0</div>
|
|
<div class="line"><a id="l00215" name="l00215"></a><span class="lineno"> 215</span> endif</div>
|
|
<div class="line"><a id="l00216" name="l00216"></a><span class="lineno"> 216</span> </div>
|
|
<div class="line"><a id="l00217" name="l00217"></a><span class="lineno"> 217</span> loadwave /p=$pathname /a /g /o /q filename</div>
|
|
<div class="line"><a id="l00218" name="l00218"></a><span class="lineno"> 218</span> </div>
|
|
<div class="line"><a id="l00219" name="l00219"></a><span class="lineno"> 219</span> if (ParamIsDefault(is_modulation))</div>
|
|
<div class="line"><a id="l00220" name="l00220"></a><span class="lineno"> 220</span> is_modulation = StringMatch(s_filename, "*.modf.*")</div>
|
|
<div class="line"><a id="l00221" name="l00221"></a><span class="lineno"> 221</span> else</div>
|
|
<div class="line"><a id="l00222" name="l00222"></a><span class="lineno"> 222</span> is_modulation = is_modulation > 0</div>
|
|
<div class="line"><a id="l00223" name="l00223"></a><span class="lineno"> 223</span> endif</div>
|
|
<div class="line"><a id="l00224" name="l00224"></a><span class="lineno"> 224</span> </div>
|
|
<div class="line"><a id="l00225" name="l00225"></a><span class="lineno"> 225</span> <span class="keywordtype">string</span> fileext</div>
|
|
<div class="line"><a id="l00226" name="l00226"></a><span class="lineno"> 226</span> <span class="keywordtype">string</span> waves = ""</div>
|
|
<div class="line"><a id="l00227" name="l00227"></a><span class="lineno"> 227</span> if (v_flag > 0)</div>
|
|
<div class="line"><a id="l00228" name="l00228"></a><span class="lineno"> 228</span> fileext = StringFromList(ItemsInList(s_filename, ".") - 1, s_filename, ".")</div>
|
|
<div class="line"><a id="l00229" name="l00229"></a><span class="lineno"> 229</span> variable nw = ItemsInList(s_wavenames)</div>
|
|
<div class="line"><a id="l00230" name="l00230"></a><span class="lineno"> 230</span> variable iw</div>
|
|
<div class="line"><a id="l00231" name="l00231"></a><span class="lineno"> 231</span> <span class="keywordtype">string</span> sw1, sw2</div>
|
|
<div class="line"><a id="l00232" name="l00232"></a><span class="lineno"> 232</span> for (iw = 0; iw < nw; iw += 1)</div>
|
|
<div class="line"><a id="l00233" name="l00233"></a><span class="lineno"> 233</span> sw1 = StringFromlist(iw, s_wavenames)</div>
|
|
<div class="line"><a id="l00234" name="l00234"></a><span class="lineno"> 234</span> strswitch(fileext[iw])</div>
|
|
<div class="line"><a id="l00235" name="l00235"></a><span class="lineno"> 235</span> case "e":</div>
|
|
<div class="line"><a id="l00236" name="l00236"></a><span class="lineno"> 236</span> sw2 = "en"</div>
|
|
<div class="line"><a id="l00237" name="l00237"></a><span class="lineno"> 237</span> break</div>
|
|
<div class="line"><a id="l00238" name="l00238"></a><span class="lineno"> 238</span> case "t":</div>
|
|
<div class="line"><a id="l00239" name="l00239"></a><span class="lineno"> 239</span> sw2 = "th"</div>
|
|
<div class="line"><a id="l00240" name="l00240"></a><span class="lineno"> 240</span> break</div>
|
|
<div class="line"><a id="l00241" name="l00241"></a><span class="lineno"> 241</span> case "p":</div>
|
|
<div class="line"><a id="l00242" name="l00242"></a><span class="lineno"> 242</span> sw2 = "ph"</div>
|
|
<div class="line"><a id="l00243" name="l00243"></a><span class="lineno"> 243</span> break</div>
|
|
<div class="line"><a id="l00244" name="l00244"></a><span class="lineno"> 244</span> case "a":</div>
|
|
<div class="line"><a id="l00245" name="l00245"></a><span class="lineno"> 245</span> sw2 = "al"</div>
|
|
<div class="line"><a id="l00246" name="l00246"></a><span class="lineno"> 246</span> break</div>
|
|
<div class="line"><a id="l00247" name="l00247"></a><span class="lineno"> 247</span> case "i":</div>
|
|
<div class="line"><a id="l00248" name="l00248"></a><span class="lineno"> 248</span> if (is_modulation)</div>
|
|
<div class="line"><a id="l00249" name="l00249"></a><span class="lineno"> 249</span> sw2 = "mo"</div>
|
|
<div class="line"><a id="l00250" name="l00250"></a><span class="lineno"> 250</span> else</div>
|
|
<div class="line"><a id="l00251" name="l00251"></a><span class="lineno"> 251</span> sw2 = "in"</div>
|
|
<div class="line"><a id="l00252" name="l00252"></a><span class="lineno"> 252</span> endif</div>
|
|
<div class="line"><a id="l00253" name="l00253"></a><span class="lineno"> 253</span> break</div>
|
|
<div class="line"><a id="l00254" name="l00254"></a><span class="lineno"> 254</span> case "s":</div>
|
|
<div class="line"><a id="l00255" name="l00255"></a><span class="lineno"> 255</span> sw2 = "si"</div>
|
|
<div class="line"><a id="l00256" name="l00256"></a><span class="lineno"> 256</span> break</div>
|
|
<div class="line"><a id="l00257" name="l00257"></a><span class="lineno"> 257</span> endswitch</div>
|
|
<div class="line"><a id="l00258" name="l00258"></a><span class="lineno"> 258</span> duplicate /o $sw1, $sw2</div>
|
|
<div class="line"><a id="l00259" name="l00259"></a><span class="lineno"> 259</span> killwaves /z $sw1</div>
|
|
<div class="line"><a id="l00260" name="l00260"></a><span class="lineno"> 260</span> waves = AddListItem(sw2, waves, ",", inf)</div>
|
|
<div class="line"><a id="l00261" name="l00261"></a><span class="lineno"> 261</span> endfor</div>
|
|
<div class="line"><a id="l00262" name="l00262"></a><span class="lineno"> 262</span> </div>
|
|
<div class="line"><a id="l00263" name="l00263"></a><span class="lineno"> 263</span> <span class="comment">// Sort {en,th,ph, al} en,th,ph,al,int,sig</span></div>
|
|
<div class="line"><a id="l00264" name="l00264"></a><span class="lineno"> 264</span> </div>
|
|
<div class="line"><a id="l00265" name="l00265"></a><span class="lineno"> 265</span> if (!quiet)</div>
|
|
<div class="line"><a id="l00266" name="l00266"></a><span class="lineno"> 266</span> print "<a class="code hl_function" href="pearl-pmsco-import_8ipf.html#a98bbe8db14dba5aea9588a1b433baca7">load_pmsco_scan</a> ", s_filename, ": ", waves</div>
|
|
<div class="line"><a id="l00267" name="l00267"></a><span class="lineno"> 267</span> endif</div>
|
|
<div class="line"><a id="l00268" name="l00268"></a><span class="lineno"> 268</span> </div>
|
|
<div class="line"><a id="l00269" name="l00269"></a><span class="lineno"> 269</span> return s_filename</div>
|
|
<div class="line"><a id="l00270" name="l00270"></a><span class="lineno"> 270</span> else</div>
|
|
<div class="line"><a id="l00271" name="l00271"></a><span class="lineno"> 271</span> return ""</div>
|
|
<div class="line"><a id="l00272" name="l00272"></a><span class="lineno"> 272</span> endif</div>
|
|
<div class="line"><a id="l00273" name="l00273"></a><span class="lineno"> 273</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00274" name="l00274"></a><span class="lineno"> 274</span> </div>
|
|
<div class="foldopen" id="foldopen00286" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00286" name="l00286"></a><span class="lineno"><a class="line" href="pearl-pmsco-import_8ipf.html#afae0650a37e89f18c9c54f8adc9eafb2"> 286</a></span>function /s <a class="code hl_function" href="pearl-pmsco-import_8ipf.html#afae0650a37e89f18c9c54f8adc9eafb2">load_pmsco_result</a>(pathname, filename, [quiet])</div>
|
|
<div class="line"><a id="l00287" name="l00287"></a><span class="lineno"> 287</span> <span class="keywordtype">string</span> pathname <span class="comment">// name of a symbolic path</span></div>
|
|
<div class="line"><a id="l00288" name="l00288"></a><span class="lineno"> 288</span> <span class="keywordtype">string</span> filename</div>
|
|
<div class="line"><a id="l00289" name="l00289"></a><span class="lineno"> 289</span> variable quiet</div>
|
|
<div class="line"><a id="l00290" name="l00290"></a><span class="lineno"> 290</span> </div>
|
|
<div class="line"><a id="l00291" name="l00291"></a><span class="lineno"> 291</span> if (ParamIsDefault(quiet))</div>
|
|
<div class="line"><a id="l00292" name="l00292"></a><span class="lineno"> 292</span> quiet = 0</div>
|
|
<div class="line"><a id="l00293" name="l00293"></a><span class="lineno"> 293</span> endif</div>
|
|
<div class="line"><a id="l00294" name="l00294"></a><span class="lineno"> 294</span> </div>
|
|
<div class="line"><a id="l00295" name="l00295"></a><span class="lineno"> 295</span> if (quiet)</div>
|
|
<div class="line"><a id="l00296" name="l00296"></a><span class="lineno"> 296</span> loadwave /p=$pathname /a /w /g /o /q filename</div>
|
|
<div class="line"><a id="l00297" name="l00297"></a><span class="lineno"> 297</span> else</div>
|
|
<div class="line"><a id="l00298" name="l00298"></a><span class="lineno"> 298</span> loadwave /p=$pathname /a /w /g /o filename</div>
|
|
<div class="line"><a id="l00299" name="l00299"></a><span class="lineno"> 299</span> endif</div>
|
|
<div class="line"><a id="l00300" name="l00300"></a><span class="lineno"> 300</span> </div>
|
|
<div class="line"><a id="l00301" name="l00301"></a><span class="lineno"> 301</span> if (v_flag > 0)</div>
|
|
<div class="line"><a id="l00302" name="l00302"></a><span class="lineno"> 302</span> return s_filename</div>
|
|
<div class="line"><a id="l00303" name="l00303"></a><span class="lineno"> 303</span> else</div>
|
|
<div class="line"><a id="l00304" name="l00304"></a><span class="lineno"> 304</span> return ""</div>
|
|
<div class="line"><a id="l00305" name="l00305"></a><span class="lineno"> 305</span> endif</div>
|
|
<div class="line"><a id="l00306" name="l00306"></a><span class="lineno"> 306</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00307" name="l00307"></a><span class="lineno"> 307</span> </div>
|
|
<div class="line"><a id="l00308" name="l00308"></a><span class="lineno"> 308</span> </div>
|
|
<div class="foldopen" id="foldopen00320" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00320" name="l00320"></a><span class="lineno"><a class="line" href="pearl-pmsco-import_8ipf.html#ab3421c7f54aa64e5e493b267d700c0c8"> 320</a></span>function /s <a class="code hl_function" href="pearl-pmsco-import_8ipf.html#ab3421c7f54aa64e5e493b267d700c0c8">pmsco_load_xyz</a>(pathname, filename)</div>
|
|
<div class="line"><a id="l00321" name="l00321"></a><span class="lineno"> 321</span> <span class="keywordtype">string</span> pathname</div>
|
|
<div class="line"><a id="l00322" name="l00322"></a><span class="lineno"> 322</span> <span class="keywordtype">string</span> filename</div>
|
|
<div class="line"><a id="l00323" name="l00323"></a><span class="lineno"> 323</span> </div>
|
|
<div class="line"><a id="l00324" name="l00324"></a><span class="lineno"> 324</span> <span class="keywordtype">string</span> cis = "N=at;N=xx;N=yy;N=zz;"</div>
|
|
<div class="line"><a id="l00325" name="l00325"></a><span class="lineno"> 325</span> LoadWave /A /B=cis /J /K=0 /L={0, 2, 0, 0, 0} /V={<span class="stringliteral">" "</span>, <span class="stringliteral">" "</span>, 0, 0} /O /P=$pathname filename</div>
|
|
<div class="line"><a id="l00326" name="l00326"></a><span class="lineno"> 326</span> wave /t at</div>
|
|
<div class="line"><a id="l00327" name="l00327"></a><span class="lineno"> 327</span> at = unpadstring(at, 32)</div>
|
|
<div class="line"><a id="l00328" name="l00328"></a><span class="lineno"> 328</span>end</div>
|
|
</div>
|
|
<div class="line"><a id="l00329" name="l00329"></a><span class="lineno"> 329</span> </div>
|
|
<div class="foldopen" id="foldopen00330" data-start="{" data-end="}">
|
|
<div class="line"><a id="l00330" name="l00330"></a><span class="lineno"><a class="line" href="pearl-pmsco-import_8ipf.html#a0e2e3506f79bf2cb68a74f8173590099"> 330</a></span>function <a class="code hl_function" href="pearl-pmsco-import_8ipf.html#a0e2e3506f79bf2cb68a74f8173590099">pmsco_load_alm</a>(pathname, filename, wname)</div>
|
|
<div class="line"><a id="l00331" name="l00331"></a><span class="lineno"> 331</span> <span class="keywordtype">string</span> pathname</div>
|
|
<div class="line"><a id="l00332" name="l00332"></a><span class="lineno"> 332</span> <span class="keywordtype">string</span> filename</div>
|
|
<div class="line"><a id="l00333" name="l00333"></a><span class="lineno"> 333</span> <span class="keywordtype">string</span> wname</div>
|
|
<div class="line"><a id="l00334" name="l00334"></a><span class="lineno"> 334</span> </div>
|
|
<div class="line"><a id="l00335" name="l00335"></a><span class="lineno"> 335</span> variable fid</div>
|
|
<div class="line"><a id="l00336" name="l00336"></a><span class="lineno"> 336</span> if (strlen(pathname) > 0)</div>
|
|
<div class="line"><a id="l00337" name="l00337"></a><span class="lineno"> 337</span> HDF5OpenFile /P=pathname /R /Z fid as filename</div>
|
|
<div class="line"><a id="l00338" name="l00338"></a><span class="lineno"> 338</span> else</div>
|
|
<div class="line"><a id="l00339" name="l00339"></a><span class="lineno"> 339</span> HDF5OpenFile /R /Z fid as filename</div>
|
|
<div class="line"><a id="l00340" name="l00340"></a><span class="lineno"> 340</span> endif</div>
|
|
<div class="line"><a id="l00341" name="l00341"></a><span class="lineno"> 341</span> </div>
|
|
<div class="line"><a id="l00342" name="l00342"></a><span class="lineno"> 342</span> if (v_flag == 0)</div>
|
|
<div class="line"><a id="l00343" name="l00343"></a><span class="lineno"> 343</span> HDF5LoadData /N=$wname /O /Q /Z fid, "alm"</div>
|
|
<div class="line"><a id="l00344" name="l00344"></a><span class="lineno"> 344</span> HDF5CloseFile fid</div>
|
|
<div class="line"><a id="l00345" name="l00345"></a><span class="lineno"> 345</span> </div>
|
|
<div class="line"><a id="l00346" name="l00346"></a><span class="lineno"> 346</span> wave alm_r = $(wname + "_r")</div>
|
|
<div class="line"><a id="l00347" name="l00347"></a><span class="lineno"> 347</span> wave alm_i = $(wname + "_i")</div>
|
|
<div class="line"><a id="l00348" name="l00348"></a><span class="lineno"> 348</span> make /c /n=(dimsize(alm_r, 0), dimsize(alm_r, 1)) /o $wname</div>
|
|
<div class="line"><a id="l00349" name="l00349"></a><span class="lineno"> 349</span> wave /c alm = $wname</div>
|
|
<div class="line"><a id="l00350" name="l00350"></a><span class="lineno"> 350</span> alm = cmplx(alm_r, alm_i)</div>
|
|
<div class="line"><a id="l00351" name="l00351"></a><span class="lineno"> 351</span> variable lmax = (dimsize(alm, 0) - 1) * 2</div>
|
|
<div class="line"><a id="l00352" name="l00352"></a><span class="lineno"> 352</span> setscale /i x 0, lmax, "l", alm, alm_r, alm_i</div>
|
|
<div class="line"><a id="l00353" name="l00353"></a><span class="lineno"> 353</span> setscale /i y -lmax, lmax, "m", alm, alm_r, alm_i</div>
|
|
<div class="line"><a id="l00354" name="l00354"></a><span class="lineno"> 354</span> endif</div>
|
|
<div class="line"><a id="l00355" name="l00355"></a><span class="lineno"> 355</span>end</div>
|
|
</div>
|
|
<div class="ttc" id="apearl-pmsco-import_8ipf_html_a0a53a4686b482d62fe1797932a1708db"><div class="ttname"><a href="pearl-pmsco-import_8ipf.html#a0a53a4686b482d62fe1797932a1708db">save_scan_helper</a></div><div class="ttdeci">static string save_scan_helper(string destname, string value, wave template, dfref destdfr, string wavenames)</div><div class="ttdoc">helper function for save_pmsco_scan()</div><div class="ttdef"><b>Definition</b> <a href="pearl-pmsco-import_8ipf_source.html#l00127">pearl-pmsco-import.ipf:127</a></div></div>
|
|
<div class="ttc" id="apearl-pmsco-import_8ipf_html_a0e2e3506f79bf2cb68a74f8173590099"><div class="ttname"><a href="pearl-pmsco-import_8ipf.html#a0e2e3506f79bf2cb68a74f8173590099">pmsco_load_alm</a></div><div class="ttdeci">variable pmsco_load_alm(string pathname, string filename, string wname)</div><div class="ttdef"><b>Definition</b> <a href="pearl-pmsco-import_8ipf_source.html#l00330">pearl-pmsco-import.ipf:330</a></div></div>
|
|
<div class="ttc" id="apearl-pmsco-import_8ipf_html_a98bbe8db14dba5aea9588a1b433baca7"><div class="ttname"><a href="pearl-pmsco-import_8ipf.html#a98bbe8db14dba5aea9588a1b433baca7">load_pmsco_scan</a></div><div class="ttdeci">string load_pmsco_scan(string pathname, string filename, variable is_modulation=defaultValue, variable quiet=defaultValue)</div><div class="ttdoc">load a PMSCO scan file into the current data folder.</div><div class="ttdef"><b>Definition</b> <a href="pearl-pmsco-import_8ipf_source.html#l00207">pearl-pmsco-import.ipf:207</a></div></div>
|
|
<div class="ttc" id="apearl-pmsco-import_8ipf_html_aa31bbaa2fc77b447e6c6f386b23abdd9"><div class="ttname"><a href="pearl-pmsco-import_8ipf.html#aa31bbaa2fc77b447e6c6f386b23abdd9">pmsco_save_scan</a></div><div class="ttdeci">string pmsco_save_scan(string pathname, string filename, string energy, string theta, string phi, string alpha, string intensity, string sigma, dfref sdfr=defaultValue)</div><div class="ttdoc">save waves in a PMSCO scan data file.</div><div class="ttdef"><b>Definition</b> <a href="pearl-pmsco-import_8ipf_source.html#l00089">pearl-pmsco-import.ipf:89</a></div></div>
|
|
<div class="ttc" id="apearl-pmsco-import_8ipf_html_ab3421c7f54aa64e5e493b267d700c0c8"><div class="ttname"><a href="pearl-pmsco-import_8ipf.html#ab3421c7f54aa64e5e493b267d700c0c8">pmsco_load_xyz</a></div><div class="ttdeci">string pmsco_load_xyz(string pathname, string filename)</div><div class="ttdoc">load an xyz cluster file</div><div class="ttdef"><b>Definition</b> <a href="pearl-pmsco-import_8ipf_source.html#l00320">pearl-pmsco-import.ipf:320</a></div></div>
|
|
<div class="ttc" id="apearl-pmsco-import_8ipf_html_afae0650a37e89f18c9c54f8adc9eafb2"><div class="ttname"><a href="pearl-pmsco-import_8ipf.html#afae0650a37e89f18c9c54f8adc9eafb2">load_pmsco_result</a></div><div class="ttdeci">string load_pmsco_result(string pathname, string filename, variable quiet=defaultValue)</div><div class="ttdoc">load a PMSCO result file into the current data folder.</div><div class="ttdef"><b>Definition</b> <a href="pearl-pmsco-import_8ipf_source.html#l00286">pearl-pmsco-import.ipf:286</a></div></div>
|
|
</div><!-- fragment --></div><!-- contents -->
|
|
</div><!-- doc-content -->
|
|
<!-- start footer part -->
|
|
<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 Mon Dec 22 2025 17:26:40 for PEARL Procedures by <a href="https://www.doxygen.org/index.html"><img class="footer" src="doxygen.svg" width="104" height="31" alt="doxygen"/></a> 1.9.8 </li>
|
|
</ul>
|
|
</div>
|
|
</body>
|
|
</html>
|