#load std
load itk

description "Gives information on the input image (pixel type, dimension, size, spacing)"
author "laurent.guigues@creatis.insa-lyon.fr"
category "application;image"

new ImageReader reader

# Make File name Using Black Box 'PrependDataPath'
#----------------------------------------------------
#note : .bbs not mandatory
include std/boxes/bbPrependDataPath
new PrependDataPath pdp
set pdp.In "thorax.hdr"
#connect pdp.Out reader.Filename

# Allow user to specify his own image, in GUI mode (-g option)
#---------------------------------------------------------------
set reader.Filename "thorax.hdr"
input In reader.Filename "Input file"

new ImageProperties P
connect reader.Out P.In

print "Type      = $P.TypeName$\n"
print "Dimension = $P.Dimension$\n"
print "Size      = $P.Size$\n"
print "Spacing   = $P.Spacing$\n"

#graph