[Insight-users] More on : How to write the registration parameters in Tcl

[Luis Ibanez]

Hi Frank,

The Tcl examples of registration were
modified in order to print out the
values of the transform parameters.

Insight/Examples/Registration

   ImageRegistration3.tcl
   ImageRegistration4.tcl
   ImageRegistration5.tcl

Please let us know if you find any
problem.

Thanks


Luis


----------------------------------


Luis Ibanez wrote:
> 
> Hi Frank
> 
> You can use the operator() in the Array of parameters
> in order to print element by element.
> 
> For example
> 
> set t [ itk::create AffineTransform3 ]
> $t SetIdentity
> set p [$t GetParameters]
> 
> $p () 0
> $p () 1
> $p () 2
> $p () 3
> $p () 4
> 
> ... and so on..
> 
> This equivalent to invoke the operator() in the Array class.
> http://www.itk.org/Insight/Doxygen/html/classitk_1_1Array.html
> 
> You will find detailed descriptions of the parameters
> encoding for the transforms in the SoftwareGuide.pdf
> 
>    http://www.itk.org/ItkSoftwareGuide.pdf
> 
> Section 7.7 pdf-pages 214 to 221
> 
> 
> 
> Regards,
> 
> 
>    Luis
> 
> 
> 
> --------------------------------------
> 
> 
> 
> Frank Lindseth wrote:
> 
>> Hi all,
>>
>> Can somebody tell me how to write the content of the following objects 
>> (m,o,p)
>> to the command line in TCL: puts ?
>> (I wont to know the exact result of an registration for debugging 
>> purposes)
>>
>> % package require InsightToolkit
>> 1.2
>> % set t [ itk::create AffineTransform3 ]
>> % set m [$t GetMatrix]
>> % set o [$t GetOffset]
>> % set p [$t GetParameters]
>> % puts $o
>> _cxx0x3be9800
>>
>> thanks
>>
>> _______________________________________________
>> Insight-users mailing list
>> Insight-users@public.kitware.com
>> http://public.kitware.com/mailman/listinfo/insight-users
>>
> 
> 
> 
> _______________________________________________
> Insight-users mailing list
> Insight-users@public.kitware.com
> http://public.kitware.com/mailman/listinfo/insight-users
>