312 lines
33 KiB
HTML
312 lines
33 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">
|
|
<head>
|
|
<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
|
|
<meta http-equiv="X-UA-Compatible" content="IE=9"/>
|
|
<meta name="generator" content="Doxygen 1.8.17"/>
|
|
<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 style="height: 56px;">
|
|
<td id="projectalign" style="padding-left: 0.5em;">
|
|
<div id="projectname">PEARL Procedures
|
|
 <span id="projectnumber">rev-distro-3.0.0-0-gfa24916-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.8.17 -->
|
|
<script type="text/javascript">
|
|
/* @license magnet:?xt=urn:btih:cf05388f2679ee054f2beb29a391d25f4e673ac3&dn=gpl-2.0.txt GPL-v2 */
|
|
var searchBox = new SearchBox("searchBox", "search",false,'Search');
|
|
/* @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:cf05388f2679ee054f2beb29a391d25f4e673ac3&dn=gpl-2.0.txt GPL-v2 */
|
|
$(function() {
|
|
initMenu('',true,false,'search.php','Search');
|
|
$(document).ready(function() { init_search(); });
|
|
});
|
|
/* @license-end */</script>
|
|
<div id="main-nav"></div>
|
|
</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:cf05388f2679ee054f2beb29a391d25f4e673ac3&dn=gpl-2.0.txt GPL-v2 */
|
|
$(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">
|
|
<iframe src="javascript:void(0)" frameborder="0"
|
|
name="MSearchResults" id="MSearchResults">
|
|
</iframe>
|
|
</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 name="l00001"></a><span class="lineno"> 1</span> <span class="preprocessor">#pragma TextEncoding = "UTF-8"</span></div>
|
|
<div class="line"><a name="l00002"></a><span class="lineno"> 2</span> <span class="preprocessor">#pragma rtGlobals=3 // Use modern global access method and strict wave access.</span></div>
|
|
<div class="line"><a name="l00003"></a><span class="lineno"> 3</span> <span class="preprocessor">#pragma IgorVersion = 6.2</span></div>
|
|
<div class="line"><a name="l00004"></a><span class="lineno"> 4</span> <span class="preprocessor">#pragma ModuleName = PearlPmscoImport</span></div>
|
|
<div class="line"><a name="l00005"></a><span class="lineno"> 5</span>  </div>
|
|
<div class="line"><a name="l00006"></a><span class="lineno"> 6</span> <span class="comment">// copyright (c) 2018 Paul Scherrer Institut</span></div>
|
|
<div class="line"><a name="l00007"></a><span class="lineno"> 7</span> <span class="comment">//</span></div>
|
|
<div class="line"><a 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 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 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 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 name="l00012"></a><span class="lineno"> 12</span> <span class="comment">//</span></div>
|
|
<div class="line"><a name="l00013"></a><span class="lineno"> 13</span> <span class="comment">// Please acknowledge the use of this code.</span></div>
|
|
<div class="line"><a name="l00014"></a><span class="lineno"> 14</span>  </div>
|
|
<div class="line"><a name="l00029"></a><span class="lineno"> 29</span>  </div>
|
|
<div class="line"><a name="l00034"></a><span class="lineno"> 34</span>  </div>
|
|
<div class="line"><a name="l00035"></a><span class="lineno"> 35</span>  </div>
|
|
<div class="line"><a name="l00089"></a><span class="lineno"><a class="line" href="pearl-pmsco-import_8ipf.html#aa31bbaa2fc77b447e6c6f386b23abdd9"> 89</a></span> <span class="keyword">function</span> /s <a class="code" 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 name="l00090"></a><span class="lineno"> 90</span>  <span class="keywordtype">string</span> pathname</div>
|
|
<div class="line"><a name="l00091"></a><span class="lineno"> 91</span>  <span class="keywordtype">string</span> filename</div>
|
|
<div class="line"><a name="l00092"></a><span class="lineno"> 92</span>  <span class="keywordtype">string</span> energy</div>
|
|
<div class="line"><a name="l00093"></a><span class="lineno"> 93</span>  <span class="keywordtype">string</span> theta</div>
|
|
<div class="line"><a name="l00094"></a><span class="lineno"> 94</span>  <span class="keywordtype">string</span> phi</div>
|
|
<div class="line"><a name="l00095"></a><span class="lineno"> 95</span>  <span class="keywordtype">string</span> alpha</div>
|
|
<div class="line"><a name="l00096"></a><span class="lineno"> 96</span>  <span class="keywordtype">string</span> intensity</div>
|
|
<div class="line"><a name="l00097"></a><span class="lineno"> 97</span>  <span class="keywordtype">string</span> sigma</div>
|
|
<div class="line"><a name="l00098"></a><span class="lineno"> 98</span>  dfref sdfr</div>
|
|
<div class="line"><a name="l00099"></a><span class="lineno"> 99</span>  </div>
|
|
<div class="line"><a name="l00100"></a><span class="lineno"> 100</span>  <span class="comment">//string fileext</span></div>
|
|
<div class="line"><a name="l00101"></a><span class="lineno"> 101</span>  <span class="comment">//fileext = StringFromList(ItemsInList(filename, ".") - 1, filename, ".")</span></div>
|
|
<div class="line"><a name="l00102"></a><span class="lineno"> 102</span>  </div>
|
|
<div class="line"><a name="l00103"></a><span class="lineno"> 103</span>  dfref savedf = GetDataFolderDFR()</div>
|
|
<div class="line"><a name="l00104"></a><span class="lineno"> 104</span>  dfref tempdf = NewFreeDataFolder()</div>
|
|
<div class="line"><a name="l00105"></a><span class="lineno"> 105</span>  </div>
|
|
<div class="line"><a name="l00106"></a><span class="lineno"> 106</span>  if (ParamIsDefault(sdfr))</div>
|
|
<div class="line"><a name="l00107"></a><span class="lineno"> 107</span>  dfref sdfr = savedf</div>
|
|
<div class="line"><a name="l00108"></a><span class="lineno"> 108</span>  endif</div>
|
|
<div class="line"><a name="l00109"></a><span class="lineno"> 109</span>  SetDataFolder sdfr</div>
|
|
<div class="line"><a name="l00110"></a><span class="lineno"> 110</span>  wave w_intensity = $intensity</div>
|
|
<div class="line"><a name="l00111"></a><span class="lineno"> 111</span>  <span class="keywordtype">string</span> wavenames = ""</div>
|
|
<div class="line"><a name="l00112"></a><span class="lineno"> 112</span>  </div>
|
|
<div class="line"><a name="l00113"></a><span class="lineno"> 113</span>  wavenames = <a class="code" href="pearl-pmsco-import_8ipf.html#a0a53a4686b482d62fe1797932a1708db">save_scan_helper</a>("w_energy", energy, w_intensity, tempdf, wavenames)</div>
|
|
<div class="line"><a name="l00114"></a><span class="lineno"> 114</span>  wavenames = <a class="code" href="pearl-pmsco-import_8ipf.html#a0a53a4686b482d62fe1797932a1708db">save_scan_helper</a>("w_theta", theta, w_intensity, tempdf, wavenames)</div>
|
|
<div class="line"><a name="l00115"></a><span class="lineno"> 115</span>  wavenames = <a class="code" href="pearl-pmsco-import_8ipf.html#a0a53a4686b482d62fe1797932a1708db">save_scan_helper</a>("w_phi", phi, w_intensity, tempdf, wavenames)</div>
|
|
<div class="line"><a name="l00116"></a><span class="lineno"> 116</span>  wavenames = <a class="code" href="pearl-pmsco-import_8ipf.html#a0a53a4686b482d62fe1797932a1708db">save_scan_helper</a>("w_alpha", alpha, w_intensity, tempdf, wavenames)</div>
|
|
<div class="line"><a name="l00117"></a><span class="lineno"> 117</span>  wavenames = <a class="code" href="pearl-pmsco-import_8ipf.html#a0a53a4686b482d62fe1797932a1708db">save_scan_helper</a>("w_intensity", intensity, w_intensity, tempdf, wavenames)</div>
|
|
<div class="line"><a name="l00118"></a><span class="lineno"> 118</span>  wavenames = <a class="code" href="pearl-pmsco-import_8ipf.html#a0a53a4686b482d62fe1797932a1708db">save_scan_helper</a>("w_sigma", sigma, w_intensity, tempdf, wavenames)</div>
|
|
<div class="line"><a name="l00119"></a><span class="lineno"> 119</span>  </div>
|
|
<div class="line"><a name="l00120"></a><span class="lineno"> 120</span>  setdatafolder tempdf</div>
|
|
<div class="line"><a name="l00121"></a><span class="lineno"> 121</span>  save /b /g /m="\n" /p=$pathname wavenames as filename</div>
|
|
<div class="line"><a name="l00122"></a><span class="lineno"> 122</span>  setdatafolder savedf</div>
|
|
<div class="line"><a name="l00123"></a><span class="lineno"> 123</span> end</div>
|
|
<div class="line"><a name="l00124"></a><span class="lineno"> 124</span>  </div>
|
|
<div class="line"><a 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" href="pearl-pmsco-import_8ipf.html#a0a53a4686b482d62fe1797932a1708db">save_scan_helper</a>(destname, value, template, destdfr, wavenames)</div>
|
|
<div class="line"><a name="l00128"></a><span class="lineno"> 128</span>  <span class="keywordtype">string</span> destname</div>
|
|
<div class="line"><a name="l00129"></a><span class="lineno"> 129</span>  <span class="keywordtype">string</span> value</div>
|
|
<div class="line"><a name="l00130"></a><span class="lineno"> 130</span>  wave template</div>
|
|
<div class="line"><a name="l00131"></a><span class="lineno"> 131</span>  dfref destdfr</div>
|
|
<div class="line"><a name="l00132"></a><span class="lineno"> 132</span>  <span class="keywordtype">string</span> wavenames</div>
|
|
<div class="line"><a name="l00133"></a><span class="lineno"> 133</span>  </div>
|
|
<div class="line"><a name="l00134"></a><span class="lineno"> 134</span>  variable err = 0</div>
|
|
<div class="line"><a name="l00135"></a><span class="lineno"> 135</span>  if (strlen(value) > 0)</div>
|
|
<div class="line"><a name="l00136"></a><span class="lineno"> 136</span>  if (exists(value) == 1)</div>
|
|
<div class="line"><a name="l00137"></a><span class="lineno"> 137</span>  duplicate $value, destdfr:$destname</div>
|
|
<div class="line"><a name="l00138"></a><span class="lineno"> 138</span>  wave /sdfr=destdfr w=$destname</div>
|
|
<div class="line"><a name="l00139"></a><span class="lineno"> 139</span>  else</div>
|
|
<div class="line"><a name="l00140"></a><span class="lineno"> 140</span>  duplicate template, destdfr:$destname</div>
|
|
<div class="line"><a name="l00141"></a><span class="lineno"> 141</span>  wave /sdfr=destdfr w=$destname</div>
|
|
<div class="line"><a name="l00142"></a><span class="lineno"> 142</span>  variable numval = str2num(value)</div>
|
|
<div class="line"><a name="l00143"></a><span class="lineno"> 143</span>  <span class="keywordtype">string</span> msg</div>
|
|
<div class="line"><a name="l00144"></a><span class="lineno"> 144</span>  if (numtype(numval) == 0)</div>
|
|
<div class="line"><a name="l00145"></a><span class="lineno"> 145</span>  w = numval</div>
|
|
<div class="line"><a name="l00146"></a><span class="lineno"> 146</span>  <span class="comment">//elseif (cmpstr(value[0,0], "%") == 0)</span></div>
|
|
<div class="line"><a name="l00147"></a><span class="lineno"> 147</span>  else</div>
|
|
<div class="line"><a name="l00148"></a><span class="lineno"> 148</span>  strswitch(value)</div>
|
|
<div class="line"><a name="l00149"></a><span class="lineno"> 149</span>  case "x":</div>
|
|
<div class="line"><a name="l00150"></a><span class="lineno"> 150</span>  w = DimOffset(template, 0) + DimDelta(template, 0) * p</div>
|
|
<div class="line"><a name="l00151"></a><span class="lineno"> 151</span>  break</div>
|
|
<div class="line"><a name="l00152"></a><span class="lineno"> 152</span>  case "y":</div>
|
|
<div class="line"><a name="l00153"></a><span class="lineno"> 153</span>  w = DimOffset(template, 1) + DimDelta(template, 1) * q</div>
|
|
<div class="line"><a name="l00154"></a><span class="lineno"> 154</span>  break</div>
|
|
<div class="line"><a name="l00155"></a><span class="lineno"> 155</span>  case "z":</div>
|
|
<div class="line"><a name="l00156"></a><span class="lineno"> 156</span>  w = DimOffset(template, 2) + DimDelta(template, 2) * r</div>
|
|
<div class="line"><a name="l00157"></a><span class="lineno"> 157</span>  break</div>
|
|
<div class="line"><a name="l00158"></a><span class="lineno"> 158</span>  case "t":</div>
|
|
<div class="line"><a name="l00159"></a><span class="lineno"> 159</span>  w = DimOffset(template, 3) + DimDelta(template, 3) * s</div>
|
|
<div class="line"><a name="l00160"></a><span class="lineno"> 160</span>  break</div>
|
|
<div class="line"><a name="l00161"></a><span class="lineno"> 161</span>  default:</div>
|
|
<div class="line"><a name="l00162"></a><span class="lineno"> 162</span>  err = 1</div>
|
|
<div class="line"><a name="l00163"></a><span class="lineno"> 163</span>  sprintf msg, "invalid %s argument", StringFromList(1, destname, "_")</div>
|
|
<div class="line"><a name="l00164"></a><span class="lineno"> 164</span>  endswitch</div>
|
|
<div class="line"><a name="l00165"></a><span class="lineno"> 165</span>  endif</div>
|
|
<div class="line"><a name="l00166"></a><span class="lineno"> 166</span>  endif</div>
|
|
<div class="line"><a name="l00167"></a><span class="lineno"> 167</span>  if (err == 0)</div>
|
|
<div class="line"><a name="l00168"></a><span class="lineno"> 168</span>  wavenames = AddListItem(destname, wavenames, ";", inf)</div>
|
|
<div class="line"><a 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 name="l00170"></a><span class="lineno"> 170</span>  Redimension /n=(npts) w</div>
|
|
<div class="line"><a name="l00171"></a><span class="lineno"> 171</span>  else</div>
|
|
<div class="line"><a name="l00172"></a><span class="lineno"> 172</span>  abort msg </div>
|
|
<div class="line"><a name="l00173"></a><span class="lineno"> 173</span>  endif</div>
|
|
<div class="line"><a name="l00174"></a><span class="lineno"> 174</span>  endif</div>
|
|
<div class="line"><a name="l00175"></a><span class="lineno"> 175</span>  return wavenames</div>
|
|
<div class="line"><a name="l00176"></a><span class="lineno"> 176</span> end</div>
|
|
<div class="line"><a name="l00177"></a><span class="lineno"> 177</span>  </div>
|
|
<div class="line"><a name="l00207"></a><span class="lineno"><a class="line" href="pearl-pmsco-import_8ipf.html#a98bbe8db14dba5aea9588a1b433baca7"> 207</a></span> function /s <a class="code" href="pearl-pmsco-import_8ipf.html#a98bbe8db14dba5aea9588a1b433baca7">load_pmsco_scan</a>(pathname, filename, [is_modulation, quiet])</div>
|
|
<div class="line"><a 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 name="l00209"></a><span class="lineno"> 209</span>  <span class="keywordtype">string</span> filename</div>
|
|
<div class="line"><a name="l00210"></a><span class="lineno"> 210</span>  variable is_modulation</div>
|
|
<div class="line"><a name="l00211"></a><span class="lineno"> 211</span>  variable quiet</div>
|
|
<div class="line"><a name="l00212"></a><span class="lineno"> 212</span>  </div>
|
|
<div class="line"><a name="l00213"></a><span class="lineno"> 213</span>  if (ParamIsDefault(quiet))</div>
|
|
<div class="line"><a name="l00214"></a><span class="lineno"> 214</span>  quiet = 0</div>
|
|
<div class="line"><a name="l00215"></a><span class="lineno"> 215</span>  endif</div>
|
|
<div class="line"><a name="l00216"></a><span class="lineno"> 216</span>  </div>
|
|
<div class="line"><a name="l00217"></a><span class="lineno"> 217</span>  loadwave /p=$pathname /a /g /o /q filename</div>
|
|
<div class="line"><a name="l00218"></a><span class="lineno"> 218</span>  </div>
|
|
<div class="line"><a name="l00219"></a><span class="lineno"> 219</span>  if (ParamIsDefault(is_modulation))</div>
|
|
<div class="line"><a name="l00220"></a><span class="lineno"> 220</span>  is_modulation = StringMatch(s_filename, "*.modf.*")</div>
|
|
<div class="line"><a name="l00221"></a><span class="lineno"> 221</span>  else</div>
|
|
<div class="line"><a name="l00222"></a><span class="lineno"> 222</span>  is_modulation = is_modulation > 0</div>
|
|
<div class="line"><a name="l00223"></a><span class="lineno"> 223</span>  endif</div>
|
|
<div class="line"><a name="l00224"></a><span class="lineno"> 224</span>  </div>
|
|
<div class="line"><a name="l00225"></a><span class="lineno"> 225</span>  <span class="keywordtype">string</span> fileext</div>
|
|
<div class="line"><a name="l00226"></a><span class="lineno"> 226</span>  <span class="keywordtype">string</span> waves = ""</div>
|
|
<div class="line"><a name="l00227"></a><span class="lineno"> 227</span>  if (v_flag > 0)</div>
|
|
<div class="line"><a name="l00228"></a><span class="lineno"> 228</span>  fileext = StringFromList(ItemsInList(s_filename, ".") - 1, s_filename, ".")</div>
|
|
<div class="line"><a name="l00229"></a><span class="lineno"> 229</span>  variable nw = ItemsInList(s_wavenames)</div>
|
|
<div class="line"><a name="l00230"></a><span class="lineno"> 230</span>  variable iw</div>
|
|
<div class="line"><a name="l00231"></a><span class="lineno"> 231</span>  <span class="keywordtype">string</span> sw1, sw2</div>
|
|
<div class="line"><a name="l00232"></a><span class="lineno"> 232</span>  for (iw = 0; iw < nw; iw += 1)</div>
|
|
<div class="line"><a name="l00233"></a><span class="lineno"> 233</span>  sw1 = StringFromlist(iw, s_wavenames)</div>
|
|
<div class="line"><a name="l00234"></a><span class="lineno"> 234</span>  strswitch(fileext[iw])</div>
|
|
<div class="line"><a name="l00235"></a><span class="lineno"> 235</span>  case "e":</div>
|
|
<div class="line"><a name="l00236"></a><span class="lineno"> 236</span>  sw2 = "en"</div>
|
|
<div class="line"><a name="l00237"></a><span class="lineno"> 237</span>  break</div>
|
|
<div class="line"><a name="l00238"></a><span class="lineno"> 238</span>  case "t":</div>
|
|
<div class="line"><a name="l00239"></a><span class="lineno"> 239</span>  sw2 = "th"</div>
|
|
<div class="line"><a name="l00240"></a><span class="lineno"> 240</span>  break</div>
|
|
<div class="line"><a name="l00241"></a><span class="lineno"> 241</span>  case "p":</div>
|
|
<div class="line"><a name="l00242"></a><span class="lineno"> 242</span>  sw2 = "ph"</div>
|
|
<div class="line"><a name="l00243"></a><span class="lineno"> 243</span>  break</div>
|
|
<div class="line"><a name="l00244"></a><span class="lineno"> 244</span>  case "a":</div>
|
|
<div class="line"><a name="l00245"></a><span class="lineno"> 245</span>  sw2 = "al"</div>
|
|
<div class="line"><a name="l00246"></a><span class="lineno"> 246</span>  break</div>
|
|
<div class="line"><a name="l00247"></a><span class="lineno"> 247</span>  case "i":</div>
|
|
<div class="line"><a name="l00248"></a><span class="lineno"> 248</span>  if (is_modulation)</div>
|
|
<div class="line"><a name="l00249"></a><span class="lineno"> 249</span>  sw2 = "mo"</div>
|
|
<div class="line"><a name="l00250"></a><span class="lineno"> 250</span>  else</div>
|
|
<div class="line"><a name="l00251"></a><span class="lineno"> 251</span>  sw2 = "in"</div>
|
|
<div class="line"><a name="l00252"></a><span class="lineno"> 252</span>  endif</div>
|
|
<div class="line"><a name="l00253"></a><span class="lineno"> 253</span>  break</div>
|
|
<div class="line"><a name="l00254"></a><span class="lineno"> 254</span>  case "s":</div>
|
|
<div class="line"><a name="l00255"></a><span class="lineno"> 255</span>  sw2 = "si"</div>
|
|
<div class="line"><a name="l00256"></a><span class="lineno"> 256</span>  break</div>
|
|
<div class="line"><a name="l00257"></a><span class="lineno"> 257</span>  endswitch</div>
|
|
<div class="line"><a name="l00258"></a><span class="lineno"> 258</span>  duplicate /o $sw1, $sw2</div>
|
|
<div class="line"><a name="l00259"></a><span class="lineno"> 259</span>  killwaves /z $sw1</div>
|
|
<div class="line"><a name="l00260"></a><span class="lineno"> 260</span>  waves = AddListItem(sw2, waves, ",", inf)</div>
|
|
<div class="line"><a name="l00261"></a><span class="lineno"> 261</span>  endfor</div>
|
|
<div class="line"><a name="l00262"></a><span class="lineno"> 262</span>  </div>
|
|
<div class="line"><a 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 name="l00264"></a><span class="lineno"> 264</span>  </div>
|
|
<div class="line"><a name="l00265"></a><span class="lineno"> 265</span>  if (!quiet)</div>
|
|
<div class="line"><a name="l00266"></a><span class="lineno"> 266</span>  print "<a class="code" href="pearl-pmsco-import_8ipf.html#a98bbe8db14dba5aea9588a1b433baca7">load_pmsco_scan</a> ", s_filename, ": ", waves</div>
|
|
<div class="line"><a name="l00267"></a><span class="lineno"> 267</span>  endif</div>
|
|
<div class="line"><a name="l00268"></a><span class="lineno"> 268</span>  </div>
|
|
<div class="line"><a name="l00269"></a><span class="lineno"> 269</span>  return s_filename</div>
|
|
<div class="line"><a name="l00270"></a><span class="lineno"> 270</span>  else</div>
|
|
<div class="line"><a name="l00271"></a><span class="lineno"> 271</span>  return ""</div>
|
|
<div class="line"><a name="l00272"></a><span class="lineno"> 272</span>  endif</div>
|
|
<div class="line"><a name="l00273"></a><span class="lineno"> 273</span> end</div>
|
|
<div class="line"><a name="l00274"></a><span class="lineno"> 274</span>  </div>
|
|
<div class="line"><a name="l00286"></a><span class="lineno"><a class="line" href="pearl-pmsco-import_8ipf.html#afae0650a37e89f18c9c54f8adc9eafb2"> 286</a></span> function /s <a class="code" href="pearl-pmsco-import_8ipf.html#afae0650a37e89f18c9c54f8adc9eafb2">load_pmsco_result</a>(pathname, filename, [quiet])</div>
|
|
<div class="line"><a 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 name="l00288"></a><span class="lineno"> 288</span>  <span class="keywordtype">string</span> filename</div>
|
|
<div class="line"><a name="l00289"></a><span class="lineno"> 289</span>  variable quiet</div>
|
|
<div class="line"><a name="l00290"></a><span class="lineno"> 290</span>  </div>
|
|
<div class="line"><a name="l00291"></a><span class="lineno"> 291</span>  if (ParamIsDefault(quiet))</div>
|
|
<div class="line"><a name="l00292"></a><span class="lineno"> 292</span>  quiet = 0</div>
|
|
<div class="line"><a name="l00293"></a><span class="lineno"> 293</span>  endif</div>
|
|
<div class="line"><a name="l00294"></a><span class="lineno"> 294</span>  </div>
|
|
<div class="line"><a name="l00295"></a><span class="lineno"> 295</span>  if (quiet)</div>
|
|
<div class="line"><a name="l00296"></a><span class="lineno"> 296</span>  loadwave /p=$pathname /a /w /g /o /q filename</div>
|
|
<div class="line"><a name="l00297"></a><span class="lineno"> 297</span>  else</div>
|
|
<div class="line"><a name="l00298"></a><span class="lineno"> 298</span>  loadwave /p=$pathname /a /w /g /o filename</div>
|
|
<div class="line"><a name="l00299"></a><span class="lineno"> 299</span>  endif</div>
|
|
<div class="line"><a name="l00300"></a><span class="lineno"> 300</span>  </div>
|
|
<div class="line"><a name="l00301"></a><span class="lineno"> 301</span>  if (v_flag > 0)</div>
|
|
<div class="line"><a name="l00302"></a><span class="lineno"> 302</span>  return s_filename</div>
|
|
<div class="line"><a name="l00303"></a><span class="lineno"> 303</span>  else</div>
|
|
<div class="line"><a name="l00304"></a><span class="lineno"> 304</span>  return ""</div>
|
|
<div class="line"><a name="l00305"></a><span class="lineno"> 305</span>  endif</div>
|
|
<div class="line"><a name="l00306"></a><span class="lineno"> 306</span> end</div>
|
|
<div class="line"><a name="l00307"></a><span class="lineno"> 307</span>  </div>
|
|
<div class="line"><a name="l00308"></a><span class="lineno"> 308</span>  </div>
|
|
<div class="line"><a name="l00320"></a><span class="lineno"><a class="line" href="pearl-pmsco-import_8ipf.html#ab3421c7f54aa64e5e493b267d700c0c8"> 320</a></span> function /s <a class="code" href="pearl-pmsco-import_8ipf.html#ab3421c7f54aa64e5e493b267d700c0c8">pmsco_load_xyz</a>(pathname, filename)</div>
|
|
<div class="line"><a name="l00321"></a><span class="lineno"> 321</span>  <span class="keywordtype">string</span> pathname</div>
|
|
<div class="line"><a name="l00322"></a><span class="lineno"> 322</span>  <span class="keywordtype">string</span> filename</div>
|
|
<div class="line"><a name="l00323"></a><span class="lineno"> 323</span>  </div>
|
|
<div class="line"><a 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 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 name="l00326"></a><span class="lineno"> 326</span>  wave /t at</div>
|
|
<div class="line"><a name="l00327"></a><span class="lineno"> 327</span>  at = unpadstring(at, 32)</div>
|
|
<div class="line"><a name="l00328"></a><span class="lineno"> 328</span> end</div>
|
|
</div><!-- fragment --></div><!-- contents -->
|
|
</div><!-- doc-content -->
|
|
<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_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 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_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_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>
|
|
<!-- 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 Tue Mar 1 2022 15:31:30 for PEARL Procedures by
|
|
<a href="http://www.doxygen.org/index.html">
|
|
<img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.8.17 </li>
|
|
</ul>
|
|
</div>
|
|
</body>
|
|
</html>
|