% GG450 Logging Lab
% 27 April 2010

format long g
clear

C = load('log_data_AAPG.txt');
depth = C(:,1); % in feet
cild = C(:,2); % conduction log
dt = C(:,3); % transit time (sonic)
il = C(:,4); % induction log
sn = C(:,5); % resistivity
sp = C(:,6); % spontaneous potential


clf
subplot(1,5,1); plot (cild,depth)
ylabel ('Depth in feet');
xlabel ('CILD (S/m)')
axis('ij')
hold on
subplot(1,5,2);plot (dt, depth)
axis('ij')
xlabel ('DT (us/ft)')
subplot(1,5,3);plot (il, depth)
axis('ij')
xlabel ('IL (ohm-m)')
subplot(1,5,4);plot (sn, depth)
axis('ij')
xlabel ('SN (ohm-m)')
subplot(1,5,5);plot (sp, depth)
axis('ij')
xlabel ('SP (mV)')


