File: mx.pcm

package info (click to toggle)
extrema 4.4.4.dfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: squeeze
  • size: 19,416 kB
  • ctags: 6,689
  • sloc: cpp: 88,991; sh: 8,229; makefile: 480
file content (8 lines) | stat: -rw-r--r-- 202 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
 
r = mod([1:1000]-1,5)+1
sort\up r
generate t 0,1.8,,200
t[201:400] = t[1:200]
t[401:800] = t[1:400]
t[801:1000] = t[1:200]
z = exp(-r/2)*cosd(180*(r-1))
grid\xyout\size 30 r*cosd(t) r*sind(t) z m xo yo