X-Git-Url: http://git.kpe.io/?p=ctsim.git;a=blobdiff_plain;f=cgi-bin%2Fctsim.cgi.in;h=06d16e88044ed6bdd91da3ec1c879e3c37f94453;hp=898aa89f1450186bc5c291fe714225929ed038d0;hb=2f3d6e2580db607105bb072b13e4aff453ae4495;hpb=f4a23943110823118f35756dd41fbd6707f04511 diff --git a/cgi-bin/ctsim.cgi.in b/cgi-bin/ctsim.cgi.in index 898aa89..06d16e8 100755 --- a/cgi-bin/ctsim.cgi.in +++ b/cgi-bin/ctsim.cgi.in @@ -94,19 +94,22 @@ my $ir_png_url = "$::url_datadir/ir-$tmpid.png"; my $pj_png_url = "$::url_datadir/pj-$tmpid.png"; my $diff_png_url = "$::url_datadir/diff-$tmpid.png"; -my $ctrec_ver = "$::bindir/ctrec"; +my $pjrec_ver = "$::bindir/pjrec"; my $phm2pj_ver = "$::bindir/phm2pj"; my $phm2if_ver = "$::bindir/phm2if"; my $diff_ver = "$::bindir/if-2"; -$ctrec_ver = "/opt/lam/bin/mpirun N N $::lamrundir/ctrec-lam" if $MPI; +my $ifinfo_ver = "$::bindir/ifinfo"; + +$pjrec_ver = "/opt/lam/bin/mpirun N N $::lamrundir/pjrec-lam" if $MPI; $phm2pj_ver = "/opt/lam/bin/mpirun N N $::lamrundir/phm2pj-lam" if $MPI; $phm2if_ver = "/opt/lam/bin/mpirun N N $::lamrundir/phm2if-lam" if $MPI; my $gp_cmd = "$phm2if_ver $phantom_fname $Phantom_Nx $Phantom_Ny --phantom $Phantom_Name --nsample $Phantom_NSample"; my $pj_cmd = "$phm2pj_ver $pj_fname $PJ_NDet $PJ_NRot --phantom $Phantom_Name --nray $PJ_NRay --rotangle $PJ_RotAngle"; my $pj_if_cmd = "$::bindir/pj2if $pj_fname $pj_if_fname"; -my $ir_cmd = "$ctrec_ver $pj_fname $ir_fname $IR_Nx $IR_Ny --filter $IR_Filter --filter-param $IR_Filter_Param --interp $IR_Interp --backproj $IR_Backproj"; +my $pjrec_cmd = "$pjrec_ver $pj_fname $ir_fname $IR_Nx $IR_Ny --filter $IR_Filter --filter-param $IR_Filter_Param --interp $IR_Interp --backproj $IR_Backproj"; my $diff_cmd = "$diff_ver $phantom_fname $ir_fname $diff_fname --comp"; +my $compare_cmd = "$ifinfo_ver $phantom_fname $ir_fname"; my $window_options = "--auto $auto_window_img"; if ($Disp_Min ne 'auto') { @@ -130,7 +133,7 @@ $out .= "
Phantom Image | Reconstructed Image |
$png_gp_out | \n";
- $out .= "$png_ir_out | $png_pjrec_out | \n";
$out .= "
Projection Sinusoid | Phantom/Reconst Error |
$png_pj_out | \n";
$out .= "$diff_out $png_diff_out |
\nStatistics
";
+ $out .= "$compare_out";
}
$out .= "