Chronicle/TimeLine/0709FirstPlasma/Shot17withPhotodiode/rsrc/basicdiagn/Failures.pl

#!/bin/perl

do "parameters.pl";

unless ( -e 'PlasmaStart' ) {system ("echo '0'>Plasma")};
unless ( -e 'PlasmaEnd' ) {system ("echo '0'>Plasma")};
if ( `cat UloopMax` < 1.0 ){system ("echo 'Failure (UloopMax < 1V)'>Plasma");exit;};
if ( `cat MeanUloop` < 0.3 ){system ("echo 'Failure(MeanUloop) < 0.3V)'>Plasma");exit;};
if ( `cat BtMax` < 0.01 ){system ("echo 'Failure(BtMax< 0.01T)'>Plasma");exit;};
if ( `cat MeanBt` < 0.01 ){system ("echo 'Failure(MeanBt< 0.01T)'>Plasma");exit;};
#if ( `cat TotalCharge` < 0.0 ){system ("echo 'Failure(TotalCharge < 0 C)'>Plasma");exit;};