// xcas version=0.6.0 fontsize=16 // fltk 7Fl_Tile 33 -693 1627 27 16 [ // fltk N4xcas23Comment_Multiline_InputE 33 -693 1627 26 16 Noyau et image , // fltk N4xcas10Log_OutputE 33 -667 1627 1 16 ] , // fltk 7Fl_Tile 33 -664 1627 134 16 [ // fltk N4xcas19Multiline_Input_tabE 33 -664 1627 26 16 A:=[[-1/5,-2/5],[3/5,6/5]] , // fltk N4xcas10Log_OutputE 33 -638 1627 1 16 , // fltk N4xcas8EquationE 33 -637 1627 107 16 [[(-1)/5,(-2)/5],[3/5,6/5]] ] , // fltk 7Fl_Tile 33 -528 1627 134 16 [ // fltk N4xcas19Multiline_Input_tabE 33 -528 1627 26 16 A^2 , // fltk N4xcas10Log_OutputE 33 -502 1627 1 16 , // fltk N4xcas8EquationE 33 -501 1627 107 16 [[(-1)/5,(-2)/5],[3/5,6/5]] ] , // fltk 7Fl_Tile 33 -392 1627 62 16 [ // fltk N4xcas19Multiline_Input_tabE 33 -392 1627 26 16 ker(A) , // fltk N4xcas10Log_OutputE 33 -366 1627 1 16 , // fltk N4xcas8EquationE 33 -365 1627 35 16 [[2,-1]] ] , // fltk 7Fl_Tile 33 -328 1627 62 16 [ // fltk N4xcas19Multiline_Input_tabE 33 -328 1627 26 16 image(A) , // fltk N4xcas10Log_OutputE 33 -302 1627 1 16 , // fltk N4xcas8EquationE 33 -301 1627 35 16 [[-1,3]] ] , // fltk 7Fl_Tile 33 -264 1627 27 16 [ // fltk N4xcas23Comment_Multiline_InputE 33 -264 1627 26 16 Puissances de matrices , // fltk N4xcas10Log_OutputE 33 -238 1627 1 16 ] , // fltk 7Fl_Tile 33 -235 1627 186 16 [ // fltk N4xcas19Multiline_Input_tabE 33 -235 1627 26 16 A:=(1/3)*[[0,-2,-2],[2,0,-1],[2,1,0]] , // fltk N4xcas10Log_OutputE 33 -209 1627 1 16 , // fltk N4xcas8EquationE 33 -208 1627 159 16 [[0,(-2)/3,(-2)/3],[2/3,0,(-1)/3],[2/3,1/3,0]] ] , // fltk 7Fl_Tile 33 -47 1627 186 16 [ // fltk N4xcas19Multiline_Input_tabE 33 -47 1627 26 16 A^2;A^3;A^4;A^5 , // fltk N4xcas10Log_OutputE 33 -21 1627 1 16 , // fltk N4xcas8EquationE 33 -20 1627 159 16 [[(-8)/9,(-2)/9,2/9],[(-2)/9,(-5)/9,(-4)/9],[2/9,(-4)/9,(-5)/9]],[[0,2/3,2/3],[(-2)/3,0,1/3],[(-2)/3,(-1)/3,0]],[[8/9,2/9,(-2)/9],[2/9,5/9,4/9],[(-2)/9,4/9,5/9]],[[0,(-2)/3,(-2)/3],[2/3,0,(-1)/3],[2/3,1/3,0]] ] , // fltk 7Fl_Tile 33 141 1627 94 16 [ // fltk N4xcas19Multiline_Input_tabE 33 141 1627 26 16 B:=[[1,a],[0,1]] , // fltk N4xcas10Log_OutputE 33 167 1627 1 16 , // fltk N4xcas8EquationE 33 168 1627 67 16 [[1,a],[0,1]] ] , // fltk 7Fl_Tile 33 237 1627 94 16 [ // fltk N4xcas19Multiline_Input_tabE 33 237 1627 26 16 simplify(B^2);simplify(B^3);simplify(B^4); , // fltk N4xcas10Log_OutputE 33 263 1627 1 16 , // fltk N4xcas8EquationE 33 264 1627 67 16 [[1,2*a],[0,1]],[[1,3*a],[0,1]],[[1,4*a],[0,1]] ] , // fltk 7Fl_Tile 33 333 1627 158 16 [ // fltk N4xcas19Multiline_Input_tabE 33 333 1627 26 16 J:=[[1$4]$4] , // fltk N4xcas10Log_OutputE 33 359 1627 1 16 , // fltk N4xcas8EquationE 33 360 1627 131 16 [[1,1,1,1],[1,1,1,1],[1,1,1,1],[1,1,1,1]] ] , // fltk 7Fl_Tile 33 493 1627 158 16 [ // fltk N4xcas19Multiline_Input_tabE 33 493 1627 26 16 J^2;J^3;J^4; , // fltk N4xcas10Log_OutputE 33 519 1627 1 16 , // fltk N4xcas8EquationE 33 520 1627 131 16 [[4,4,4,4],[4,4,4,4],[4,4,4,4],[4,4,4,4]],[[16,16,16,16],[16,16,16,16],[16,16,16,16],[16,16,16,16]],[[64,64,64,64],[64,64,64,64],[64,64,64,64],[64,64,64,64]] ] , // fltk 7Fl_Tile 33 653 1627 126 16 [ // fltk N4xcas19Multiline_Input_tabE 33 653 1627 26 16 A:=[[1,0,a],[1,a,-1],[a,0,1]] , // fltk N4xcas10Log_OutputE 33 679 1627 1 16 , // fltk N4xcas8EquationE 33 680 1627 99 16 [[1,0,a],[1,a,-1],[a,0,1]] ] , // fltk 7Fl_Tile 33 781 1627 62 16 [ // fltk N4xcas19Multiline_Input_tabE 33 781 1627 26 16 solve(det(A)=0,a); , // fltk N4xcas10Log_OutputE 33 807 1627 1 16 , // fltk N4xcas8EquationE 33 808 1627 35 16 [-1,0,1] ] , // fltk 7Fl_Tile 33 845 1627 234 16 [ // fltk N4xcas19Multiline_Input_tabE 33 845 1627 26 16 A^(-1) , // fltk N4xcas10Log_OutputE 33 871 1627 1 16 , // fltk N4xcas8EquationE 33 872 1627 207 16 [[a/(-a^3+a),0,(-(a^2))/(-a^3+a)],[(-a-1)/(-a^3+a),(-a^2+1)/(-a^3+a),(a+1)/(-a^3+a)],[(-(a^2))/(-a^3+a),0,a/(-a^3+a)]] ] , // fltk 7Fl_Tile 33 1081 1627 27 16 [ // fltk N4xcas23Comment_Multiline_InputE 33 1081 1627 26 16 MARKOV , // fltk N4xcas10Log_OutputE 33 1107 1627 1 16 ] , // fltk 7Fl_Tile 33 1110 1627 126 16 [ // fltk N4xcas19Multiline_Input_tabE 33 1110 1627 26 16 P:=[[.8,.3,.2],[.1,.2,.6],[.1,.5,.2]] , // fltk N4xcas10Log_OutputE 33 1136 1627 1 16 , // fltk N4xcas8EquationE 33 1137 1627 99 16 [[0.8,0.3,0.2],[0.1,0.2,0.6],[0.1,0.5,0.2]] ] , // fltk 7Fl_Tile 33 1238 1627 126 16 [ // fltk N4xcas19Multiline_Input_tabE 33 1238 1627 26 16 X:=[[1000],[0],[0]] , // fltk N4xcas10Log_OutputE 33 1264 1627 1 16 , // fltk N4xcas8EquationE 33 1265 1627 99 16 [[1000],[0],[0]] ] , // fltk 7Fl_Tile 33 1366 1627 126 16 [ // fltk N4xcas19Multiline_Input_tabE 33 1366 1627 26 16 P^7*X , // fltk N4xcas10Log_OutputE 33 1392 1627 1 16 , // fltk N4xcas8EquationE 33 1393 1627 99 16 [[563.8874],[226.0691],[210.0435]] ] , // fltk 7Fl_Tile 33 1494 1627 126 16 [ // fltk N4xcas19Multiline_Input_tabE 33 1494 1627 26 16 O3:=[[0]$3] , // fltk N4xcas10Log_OutputE 33 1520 1627 1 16 , // fltk N4xcas8EquationE 33 1521 1627 99 16 [[0],[0],[0]] ] , // fltk 7Fl_Tile 33 1622 1627 126 16 [ // fltk N4xcas19Multiline_Input_tabE 33 1622 1627 26 16 idn(3) , // fltk N4xcas10Log_OutputE 33 1648 1627 1 16 , // fltk N4xcas8EquationE 33 1649 1627 99 16 [[1,0,0],[0,1,0],[0,0,1]] ] , // fltk 7Fl_Tile 33 1750 1627 62 16 [ // fltk N4xcas19Multiline_Input_tabE 33 1750 1627 26 16 v:=ker(P-idn(3)) , // fltk N4xcas10Log_OutputE 33 1776 1627 1 16 , // fltk N4xcas8EquationE 33 1777 1627 35 16 [[-2.61538461538,-1.07692307692,-1]] ] , // fltk 7Fl_Tile 33 1814 1627 62 16 [ // fltk N4xcas19Multiline_Input_tabE 33 1814 1627 26 16 normalize(v) , // fltk N4xcas10Log_OutputE 33 1840 1627 1 16 , // fltk N4xcas8EquationE 33 1841 1627 35 16 [[-1.0,-0.411764705882,-0.382352941176]] ] , // fltk 7Fl_Tile 33 1878 1627 27 16 [ // fltk N4xcas19Multiline_Input_tabE 33 1878 1627 26 16 , // fltk N4xcas10Log_OutputE 33 1904 1627 1 16 ]