1 2 #include <math.h> 3 #include <stdlib.h> 4 #include <stdio.h> 5 #include <string.h> 6 #include <fcntl.h> 7 8 v_betrag(double * a)9double v_betrag(double *a) 10 /* ********************************************************* */ 11 /* laenge von Vektor a */ 12 /* ********************************************************* */ 13 { 14 return sqrt(a[0]*a[0]+a[1]*a[1]+a[2]*a[2]); 15 } 16 17 18