File: window.tmpl

package info (click to toggle)
libdemeter-perl 0.9.27%2Bds6-9
  • links: PTS, VCS
  • area: contrib
  • in suites: forky, sid, trixie
  • size: 74,028 kB
  • sloc: perl: 73,233; python: 2,196; makefile: 1,999; ansic: 1,368; lisp: 454; sh: 74
file content (11 lines) | stat: -rw-r--r-- 455 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
 
{ # -*- ifm -*-
  # template for overplotting window function
  #   {$D->group} returns the ifeffit group name
  #   {$D->parameter} returns the value of that parameter
  #   {$P->parameter} returns the value of a Plot parameter
  $suffix  = ($C->get("window_space") =~ m{\Ar}) ? 'rwin' : 'win';
  $string = $S->randomstring(6);
  q{}
}
set p___lot.{$string} = {$C->get("window_size")}*{$D->group}.{$suffix}+{$D->y_offset}
set $p___lot_string = {$string}