Root/usrp/sps/norm

Source at commit 0ff0c31c3ff24d40c5ee4d2391cb63f83e2b6e7f created 7 years 3 months ago.
By Werner Almesberger, atusb/Makefile (f, b, upload): convenience targets
1#!/usr/bin/perl
2
3for ($n = 0; <>; $n++) {
4    if ($_ > $ym || !defined $ym) {
5        $xm = $n;
6        chop($ym = $_);
7    }
8}
9
10print "$xm $ym $n\n";
11

Archive Download this file



interactive