Mercurial > hg > minc-tools

changeset 1004:5edbb9418d51

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Improved handling of image size (which must be derived from file size).
author neelin <neelin>
date Wed, 05 Jun 1996 12:49:21 +0000
parents 1980b6b38dc8
children aead02a010c1
files conversion/mri_to_minc/siemens_magnetom_vision_to_minc.pl
diffstat 1 files changed, 4 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/conversion/mri_to_minc/siemens_magnetom_vision_to_minc.pl
+++ b/conversion/mri_to_minc/siemens_magnetom_vision_to_minc.pl
@@ -51,7 +51,7 @@
    local($filename, *file_info, *specific_file_info) = @_;
 
    # Constant
-   local($min_header_length) = 6144;
+   local($imageoffset) = 6144;
 
    # Get header
    local($header);
@@ -59,12 +59,11 @@
       return 1;
    }
 
-   # Get image size and offset
-   local($imagewidth) = 256;
+   # Get image size
    local($pixelsize) = 2;
+   local($imagewidth) = 
+      int(sqrt(((-s $filename) - $imageoffset) / $pixelsize));
    local($imagesize) = $imagewidth * $imagewidth * $pixelsize;
-   local($imageoffset) = (-s $filename) - $imagesize;
-   $imageoffset = $min_header_length if ($imageoffset < $min_header_length);
 
    # Get interesting values
    $file_info{'numechos'} = 100;