diff options
Diffstat (limited to 'libcrystfel/src/cell.c')
-rw-r--r-- | libcrystfel/src/cell.c | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/libcrystfel/src/cell.c b/libcrystfel/src/cell.c index e7c9dace..11aa83fa 100644 --- a/libcrystfel/src/cell.c +++ b/libcrystfel/src/cell.c @@ -784,6 +784,32 @@ UnitCellTransformation *tfn_identity() } + +/** + * tfn_from_intmat: + * @m: An %IntegerMatrix + * + * Returns: A %UnitCellTransformation corresponding to @m. + * + */ +UnitCellTransformation *tfn_from_intmat(IntegerMatrix *m) +{ + UnitCellTransformation *tfn; + int i, j; + + tfn = tfn_identity(); + if ( tfn == NULL ) return NULL; + + for ( i=0; i<3; i++ ) { + for ( j=0; j<3; j++ ) { + gsl_matrix_set(tfn->m, i, j, intmat_get(m, i, j)); + } + } + + return tfn; +} + + /** * tfn_combine: * @t: A %UnitCellTransformation |