Exemple de sortie écran :
 Copy/Past into the octave windows 
 A=[
-1.00,+2.00,-5.00,-5.00,+6.00,-9.00;
-1.00,+2.00,+4.00,+4.00,+2.00,-1.00;
+8.00,+2.00,+8.00,-7.00,+2.00,+6.00;
+4.00,+2.00,-1.00,-5.00,+8.00,-3.00]
 [U, S, V] =svd (A,10)
 Press return to continue. 
 ------------------------------------ 
 U :
+0.80158 +0.14441 -0.03425 -0.57918 
-0.05888 -0.03027 +0.98686 -0.14741 
-0.40403 +0.84556 -0.04976 -0.34541 
+0.43677 +0.51308 +0.14988 +0.72355 
 S :
+15.99836 
+15.79164 
+6.46741 
+2.61706 
 V:
+0.13926 -0.55109 -0.11615 +0.32766 +0.74458 -0.00000 
-0.09694 -0.18653 +0.32555 -0.26629 +0.00000 +0.88126 
+0.49458 -0.34248 +0.55211 -0.45110 -0.04187 -0.35501 
+0.22496 +0.59066 +0.57483 +0.42275 +0.29518 +0.04892 
-0.46116 -0.41805 +0.44341 +0.50731 -0.36911 -0.12921 
+0.68068 -0.14341 -0.22061 +0.42679 -0.46954 +0.27975 
 Press return to continue. 
 ------------------------------------ 
 S :
+15.99836 
+15.79164 
+6.46741 
+2.61706 
 S = U_T * A * V :
 -15.99836 +0.00000 +0.00000 +0.00000 -0.00000 -0.00000 
 -0.00000 -15.79164 -0.00000 -0.00000 -0.00000 -0.00000 
 +0.00000 +0.00000 +6.46741 +0.00000 -0.00000 -0.00000 
 +0.00000 +0.00000 -0.00000 +2.61706 +0.00000 +0.00000 
 Press return to continue
 Press X to stop

Mathc matrices/e12c
Application
Installer et compiler ce fichier dans votre répertoire de travail.
/* Save as : c00b.c */
void fun(int r,int c)
double **A = rE_mR(i_mR(r,c),999,1E-1);
double **B = rE_mR(i_mR(r,c),999,1E-1);
 clrscrn();
 printf(" See the files \"a.txt\" \n\n");
 fpE_mR(A,"a.txt","\n\n\nA :", S5,P4, C6);
 fpE_mR(B,"a.txt", "B :", S5,P4, C6);

f_mR(A);
 f_mR(B);
/* ------------------------------------ */
int main(void)
time_t t;
 srand(time(&t));
 do 
 fun(rp_I(R4)+R3,rp_I(C6)+R4);
 while(stop_w());
 return 0;
/* ------------------------------------ */
La fonction fpE_mR(); est identique à la fonction pE_mR(); mais elle écrit les matrices dans un fichier texte.

Pathologie cutanée/Anomalies morphologiques/Anomalies dermiques/Calcifications dermiques

Calcifications dermiques
Les dépôts de sels calciques apparaissent bleu fonce, brillants à la coloralion par T'H et E. Ils peuvent aussi être colorés par le rouge d'alizasine et la méthode de Von Kossa. 
= Etiologie =

Pathologie cutanée/Anomalies morphologiques/Anomalies dermiques/Dépôts d'hémosidérine

L'hémosiderine est un pigment brun contenant du fer, qui provient de la lyse des globules rouges. Par rapport á la mélanine. T'hémosidérine parait plus dorée. plus refningente et plus regroupée en amas. 
Toutefois, la distinction entre les deux pigments est parfois difficile á faire sans coloration spéciale du fer ou de la mélanine. 
Etiologie

Pathologie cutanée/Anomalies morphologiques/Anomalies dermiques/Dépôts bruns

Dépôts bruns
Pathologie cutanée/Anomalies morphologiques/Anomalies dermiques/Dépôts noirs

Dépôts noirs
Pathologie cutanée/Anomalies morphologiques/Anomalies dermiques/Thrombus fibrineux

Thrombus fibrineux 
Pathologie cutanée/Anomalies morphologiques/Anomalies dermiques/Tissu élastique

Modifications du tissu élastique
Les altérations du tissu élastique peuvent n'être pas Visibles a la coloration par l'H et E. 
Il faut savoir les suspecter et pratiquer une coloration particulière, comme celle de Verhoet-Van Gieson. 
= Etiologie =

Pathologie cutanée/Anomalies morphologiques/Anomalies dermiques/Infiltrat neutrophilique

Neutrophiles dermiques
Pathologie cutanée/Anomalies morphologiques/Anomalies dermiques/Infiltrat éosinophilique

=Eosinophiles dans l'épidernme= 
La présence d'éosinophiles et de spongiose dans l'épiderme est appelée "spongiose à éosinophiles". 
=Eosinophiles dans le derme =

Pathologie cutanée/Anomalies morphologiques/Anomalies épidermiques/Eosinophiles dans l'épiderme

=Eosinophiles dans l'épiderme= 
La présence d'éosinophiles et de spongiose dans l'épiderme est appelée "spongiose à éosinophiles".

Pathologie cutanée/Anomalies morphologiques/Anomalies épidermiques/Hyperkératose

Pathologie cutanée/Anomalies morphologiques/Anomalies dermiques/Infiltrat plasmocytaire

Les corps de Rüssel, formations intensément éosinophiles présentes dans les plasmocytes très actifs. Ils peuvent être observés au cours de toutes les affections citées ci-dessous, mais sont particulièrement fréquents dans le rhinosclérome.
=Étiologie=

Pathologie cutanée/Anomalies morphologiques/Anomalies dermiques/Infiltrat lymphocytaire

Lymphocytes
Pathologie cutanée/Anomalies morphologiques/Anomalies dermiques/Infiltrat mononucléé

Bien qu'il existe d'autres cellules mononuclées, on réserve traditionnellement le qualificatif de "mononucléé" pour désigner les lymphocytes et les histiocytes, par opposition aux neutrophiles et aux éosinophiles, dont les noyaux sont segmentés.
Les infiltrats mononuclées (lymphohistiocytaires) du derme sont trop fréquents pour qu'on puisse établir une liste des affections où ils sont rencontrés. 
On les rencontre dans toutes les dermatoses inflammatoires. 
Contrairement à ce qui est couramment enseigné en anatomopathologie générale. il faut bien noter que les infiltrats lymphohistiocytaires de la peau ne témoignent pas plus d'un processus chronique que les neutrophiles n'y sont synonymes d'inflammation aigue : de nombreuses dermatoses aigués (par exemple, eczéma de contact, érythème polymorphe) sont en premier lieu lymphohistiocytaires, tandis que certaines affections chroniques (comme par exemple le psoriasis) peuvent attirer de nombreux neutrophiles.

Pathologie cutanée/Anomalies morphologiques/Anomalies dermiques/Collagène

Anomalies du collagène dermique
Mathc matrices/c12an2
Application
Installer et compiler ces fichiers dans votre répertoire de travail.
/* ------------------------------------ */
/* Save as : cgn0a.c */
/* ------------------------------------ */
void fun(int r,int c)
double **B = r_mR(i_mR(c,r),9.);
double **B_T = transpose_mR(B,i_mR(r,c));
double **S = i_mR(r,C1);
double **U = i_mR(c,r);
double **V = i_mR(r,r);
double **U_T = i_mR(r,c);
double **U_TB = i_mR(r,r); /* rc cr U_T*B */
double **S_2 = i_mR(r,r); /* rc cr rr S = U_T*B*V */
 clrscrn(); 
 printf(" Copy/Past into the octave windows \n\n\n");
 p_Octave_mR(B,"B",P2);
 printf(" [U, S, V] =svd (B,10)\n\n\n");
 stop();
 clrscrn(); 
 svd_U_Rn_uv_mR(B_T,U); 
 svd_V_Rn_uv_mR(B_T,V); 
 svd_value_uv_mR(B,S);
 printf(" U :");
 p_mR(U,S5,P5,C10); 
 printf(" S :");
 p_mR(S,S5,P5,C10);
 printf(" V:");
 p_mR(V,S5,P5,C10); 
 stop();
 clrscrn(); 
/* S = U_T * B * V : */
 transpose_mR( U,U_T);
 mul_mR(U_T,B,U_TB);
 mul_mR(U_TB,V,S_2);
 printf(" S :");
 p_mR(S,S5,P5,C10);
 printf(" S = U_T * B * V :");
 p_mR(S_2,S10,P5,C10); 
 f_mR(B);
 f_mR(B_T);
 f_mR(S); 
 f_mR(U);
 f_mR(V); 
 f_mR(U_T);
 f_mR(U_TB);
 f_mR(S_2); 
/* ------------------------------------ */
int main(void)
time_t t;
 srand(time(&t));
int i;
do
 i = rp_I(R3)+R1;
 fun(i,i+R0);
} while(stop_w());
 return 0;
/* ------------------------------------ */

Exemple de sortie écran :
 Copy/Past into the octave windows 
 B=[
+4.00,-9.00,+6.00,+6.00;
-5.00,+8.00,-5.00,-9.00;
+4.00,-7.00,-3.00,+8.00;
-9.00,+6.00,+4.00,-7.00]
 [U, S, V] =svd (B,10)
 Press return to continue. 
 ------------------------------------
 U :
-0.49076 +0.55217 -0.16100 +0.65448 
+0.55771 -0.38132 -0.01109 +0.73718 
-0.45346 -0.36696 +0.79525 +0.16520 
+0.49244 +0.64423 +0.58441 -0.03052 
 S :
+24.04363 
+9.59674 
+3.23992 
+1.81920 
 V:
+0.45739 -0.32830 +0.82323 +0.07284 
-0.62417 -0.16527 +0.21608 +0.73240 
+0.09994 +0.92713 +0.29589 +0.20708 
+0.62547 -0.07298 -0.43365 +0.64452 
 Press return to continue. 
 ------------------------------------
 S :
+24.04363 
+9.59674 
+3.23992 
+1.81920 
 S = U_T * B * V :
 -24.04363 -0.00000 -0.00000 -0.00000 
 +0.00000 +9.59674 +0.00000 -0.00000 
 -0.00000 +0.00000 -3.23992 +0.00000 
 +0.00000 +0.00000 +0.00000 -1.81920 
 Press return to continue
 Press X to stop