IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Ignore:
Timestamp:
Jun 3, 2015, 8:20:19 PM (11 years ago)
Author:
eugene
Message:

adding GZIP_2 and getting RICE_1 to work (mostly)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/eam_branches/ohana.20150429/src/libfits/test/compress.sh

    r38356 r38362  
    22macro test_image_all
    33
    4   foreach mode NONE GZIP_1 RICE_1
     4  # foreach mode NONE GZIP_1 RICE_1
     5  # foreach mode GZIP_1
     6  foreach mode GZIP_2
     7  # foreach mode RICE_1
    58    foreach bitpix 8 16 32 -32 -64
     9    # foreach bitpix 32
    610      echo ===== bitpix = $bitpix =====
    711      test_image_single $bitpix $mode
     
    3034 if ($cmpmode == NONE) return
    3135
    32  if ($bitpix == -64)
    33    echo "*** bitpix $bitpix fails fpack / funpack ***"
    34  else
    35    exec fpack -g -S test.raw.fits > test.fpk.fits
    36    echo "load fpack version"
    37    rd c test.fpk.fits -x 0
    38    set d = x - c
    39    stat d
    40  end
    41 
    42  if ($cmpmode == RICE_1)
     36 if ($cmpmode == GZIP_1)
     37   exec fpack -q 0 -g -S test.raw.fits > test.fpk.fits
     38 end
     39 if ($cmpmode == GZIP_2)
     40   exec fpack -q 0 -g2 -S test.raw.fits > test.fpk.fits
     41 end
     42 if ($cmpmode == RICE_1)
     43   exec fpack -r -S test.raw.fits > test.fpk.fits
     44 end
     45 echo "load fpack version"
     46 rd c test.fpk.fits -x 0
     47 set d = x - c
     48 stat d
     49
     50 if ($cmpmode == RICE_1_0)
    4351   echo "*** funpack fails on RICE_1 ****"
    4452   return
    4553 end
    4654
    47  if ($bitpix == -64)
    48    echo "*** bitpix $bitpix fails fpack / funpack ***"
    49  else
    50    echo "run funpack on our version"
    51    exec funpack -S test.cmp.fits > test.fun.fits
    52    rd e test.fun.fits
    53    set d = x - e
    54    stat d
    55  end
     55 echo "run funpack on our version"
     56 exec funpack -S test.cmp.fits > test.fun.fits
     57 rd e test.fun.fits
     58 set d = x - e
     59 stat d
    5660end
    5761
Note: See TracChangeset for help on using the changeset viewer.