subplot( 4, 1, 1 )
cla
plot( data(:,m_present_time), data(:,m_copley_voltage), 'r' );
title( ['Copley Controller: ' run_name ], 'FontSize', 11 );
ylabel( 'voltage (V)' )
zoom on

subplot( 4, 1, 2 )
cla
plot( data(:,m_present_time), data(:,m_copley_current), [0 .7 0] );
ylabel( 'current (A)' )
zoom on

subplot( 2, 1, 2 )
cla
plot( data(:,m_present_time), ...
    data(:,m_copley_current).*data(:,m_copley_voltage) );
ylabel( 'power (W)' )
xlabel( 'mission time (s)' )
zoom on
