Changeset 4831
- Timestamp:
- Aug 19, 2005, 5:12:12 PM (21 years ago)
- Location:
- trunk/Ohana/src/libfits
- Files:
-
- 5 edited
-
header/F_copy_H.c (modified) (1 diff)
-
matrix/F_copy_M.c (modified) (1 diff)
-
matrix/F_divide_M.c (modified) (1 diff)
-
matrix/F_insert_M.c (modified) (1 diff)
-
matrix/F_multiply_M.c (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Ohana/src/libfits/header/F_copy_H.c
r2415 r4831 2 2 3 3 /*********************** fits copy header ***********************************/ 4 int fits_copy_header (header1, header2) 5 Header *header1, *header2; 6 { 4 int fits_copy_header (Header *in, Header *out) { 7 5 8 6 int i; 9 7 10 header2[0].simple = header1[0].simple;11 header2[0].bitpix = header1[0].bitpix;12 header2[0].extend = header1[0].extend;13 header2[0].unsign = header1[0].unsign;14 header2[0].size = header1[0].size;15 header2[0].bscale = header1[0].bscale;16 header2[0].bzero = header1[0].bzero;17 header2[0].Naxes = header1[0].Naxes;8 out[0].simple = in[0].simple; 9 out[0].bitpix = in[0].bitpix; 10 out[0].extend = in[0].extend; 11 out[0].unsign = in[0].unsign; 12 out[0].size = in[0].size; 13 out[0].bscale = in[0].bscale; 14 out[0].bzero = in[0].bzero; 15 out[0].Naxes = in[0].Naxes; 18 16 for (i = 0; i < FT_MAX_NAXES; i++) 19 header2[0].Naxis[i] = header1[0].Naxis[i];17 out[0].Naxis[i] = in[0].Naxis[i]; 20 18 21 ALLOCATE ( header2[0].buffer, char, header2[0].size);19 ALLOCATE (out[0].buffer, char, out[0].size); 22 20 23 strncpy ( header2[0].buffer, header1[0].buffer, header2[0].size);21 strncpy (out[0].buffer, in[0].buffer, out[0].size); 24 22 25 23 return (TRUE); -
trunk/Ohana/src/libfits/matrix/F_copy_M.c
r2415 r4831 2 2 3 3 /*********************** fits copy header ***********************************/ 4 int fits_copy_matrix (matrix1, matrix2) 5 Matrix *matrix1, *matrix2; 6 { 4 int fits_copy_matrix (Matrix *matrix1, Matrix *matrix2) { 7 5 8 6 int i; -
trunk/Ohana/src/libfits/matrix/F_divide_M.c
r2415 r4831 2 2 3 3 /********************* fits divide matrix ***********************************/ 4 int fits_divide_matrix (M1, M2, M3) 5 Matrix *M1, *M2, *M3; 6 { 4 int fits_divide_matrix (Matrix *M1, Matrix *M2, Matrix *M3) { 7 5 8 6 int i,j; -
trunk/Ohana/src/libfits/matrix/F_insert_M.c
r2415 r4831 2 2 3 3 /*********************** fits insert array ***********************************/ 4 void fits_insert_matrix (matrix, array, x, y) 5 Matrix *matrix, *array; 6 int x, y; 7 { 4 void fits_insert_matrix (Matrix *matrix, Matrix *array, int x, int y) { 8 5 9 6 /* there is no check here to match BITPIX, BZERO, or BSCALE */ -
trunk/Ohana/src/libfits/matrix/F_multiply_M.c
r2415 r4831 2 2 3 3 /******************* fits multiply matrix ***********************************/ 4 int fits_multiply_matrix (M1, M2, M3) 5 Matrix *M1, *M2, *M3; 6 { 4 int fits_multiply_matrix (Matrix *M1, Matrix *M2, Matrix *M3) { 7 5 8 6 int i,j;
Note:
See TracChangeset
for help on using the changeset viewer.
