IEEE 802.15.4 subsystem
Sign in or create your account | Project List | Help
IEEE 802.15.4 subsystem Git Source Tree
Root/
| Source at commit cec05a0f5ea2fb4ff5637d418c7f5dae196abda8 created 6 years 9 months ago. By Werner Almesberger, atusb/atusb.pro: we don't use power.lib anymore | |
|---|---|
| 1 | #!/usr/bin/perl |
| 2 | |
| 3 | for ($n = 0; <>; $n++) { |
| 4 | if ($_ > $ym || !defined $ym) { |
| 5 | $xm = $n; |
| 6 | chop($ym = $_); |
| 7 | } |
| 8 | } |
| 9 | |
| 10 | print "$xm $ym $n\n"; |
| 11 | |
