; IDL Version 8.0, Microsoft Windows (Win32 x86 m32) ; Journal File for nemef1am@HLX01 ; Working directory: c:\temp ; Date: Wed Oct 09 18:40:22 2013 help,a,b restore,'nazev.sav' help,a,b a = [2,3,4,5,6,5,5] b = a[sort(a)] print,b ; 2 3 4 5 5 5 6 print,b[uniq(b)] ; 2 3 4 5 6 print,a[uniq(a,sort(a))] ; 2 3 4 5 6 a = indgen(100) help,a b = reform(20,5) ; % REFORM: New subscripts must not change the number elements in . b = reform(a,20,5) help,b print,b ; 0 1 2 3 4 5 6 7 8 9 10 11 12 13 ; 14 15 16 17 18 19 ; 20 21 22 23 24 25 26 27 28 29 30 31 32 33 ; 34 35 36 37 38 39 ; 40 41 42 43 44 45 46 47 48 49 50 51 52 53 ; 54 55 56 57 58 59 ; 60 61 62 63 64 65 66 67 68 69 70 71 72 73 ; 74 75 76 77 78 79 ; 80 81 82 83 84 85 86 87 88 89 90 91 92 93 ; 94 95 96 97 98 99 help,b b = reform(2,5,10) ; % REFORM: New subscripts must not change the number elements in . b = reform(b,2,5,10) help,b a = indgen(10) print,a ; 0 1 2 3 4 5 6 7 8 9 print,reverse(a) ; 9 8 7 6 5 4 3 2 1 0 a = indgen(5,5) print,a ; 0 1 2 3 4 ; 5 6 7 8 9 ; 10 11 12 13 14 ; 15 16 17 18 19 ; 20 21 22 23 24 print,reverse(a) ; 4 3 2 1 0 ; 9 8 7 6 5 ; 14 13 12 11 10 ; 19 18 17 16 15 ; 24 23 22 21 20 print,reverse(a,1) ; 4 3 2 1 0 ; 9 8 7 6 5 ; 14 13 12 11 10 ; 19 18 17 16 15 ; 24 23 22 21 20 print,reverse(a,2) ; 20 21 22 23 24 ; 15 16 17 18 19 ; 10 11 12 13 14 ; 5 6 7 8 9 ; 0 1 2 3 4 print,reverse(a,0) ; % Case statement found no matches. print,reverse(reform(a,25)) ; 24 23 22 21 20 19 18 17 16 15 14 13 12 11 ; 10 9 8 7 6 5 4 3 2 1 0 print,reform(reverse(reform(a,25)),5,5) ; 24 23 22 21 20 ; 19 18 17 16 15 ; 14 13 12 11 10 ; 9 8 7 6 5 ; 4 3 2 1 0 print,a ; 0 1 2 3 4 ; 5 6 7 8 9 ; 10 11 12 13 14 ; 15 16 17 18 19 ; 20 21 22 23 24 b = indgen(10) print,b ; 0 1 2 3 4 5 6 7 8 9 print,shift(b,1) ; 9 0 1 2 3 4 5 6 7 8 print,shift(b,3) ; 7 8 9 0 1 2 3 4 5 6 print,shift(b,-3) ; 3 4 5 6 7 8 9 0 1 2 print,a ; 0 1 2 3 4 ; 5 6 7 8 9 ; 10 11 12 13 14 ; 15 16 17 18 19 ; 20 21 22 23 24 print,shift(a,2) ; 23 24 0 1 2 ; 3 4 5 6 7 ; 8 9 10 11 12 ; 13 14 15 16 17 ; 18 19 20 21 22 print,shift(a,1,0) ; 4 0 1 2 3 ; 9 5 6 7 8 ; 14 10 11 12 13 ; 19 15 16 17 18 ; 24 20 21 22 23 print,a ; 0 1 2 3 4 ; 5 6 7 8 9 ; 10 11 12 13 14 ; 15 16 17 18 19 ; 20 21 22 23 24 print,shift(a,1,0) ; 4 0 1 2 3 ; 9 5 6 7 8 ; 14 10 11 12 13 ; 19 15 16 17 18 ; 24 20 21 22 23 print,shift(a,1,1) ; 24 20 21 22 23 ; 4 0 1 2 3 ; 9 5 6 7 8 ; 14 10 11 12 13 ; 19 15 16 17 18 print,a ; 0 1 2 3 4 ; 5 6 7 8 9 ; 10 11 12 13 14 ; 15 16 17 18 19 ; 20 21 22 23 24 print,shift(a,1,2) ; 19 15 16 17 18 ; 24 20 21 22 23 ; 4 0 1 2 3 ; 9 5 6 7 8 ; 14 10 11 12 13 print,a ; 0 1 2 3 4 ; 5 6 7 8 9 ; 10 11 12 13 14 ; 15 16 17 18 19 ; 20 21 22 23 24 print,rotate(a,1) ; 20 15 10 5 0 ; 21 16 11 6 1 ; 22 17 12 7 2 ; 23 18 13 8 3 ; 24 19 14 9 4 print,rotate(a,2) ; 24 23 22 21 20 ; 19 18 17 16 15 ; 14 13 12 11 10 ; 9 8 7 6 5 ; 4 3 2 1 0