f =     [0.5  1 1.5    2  2.5].*1000;
T=1./f

%Max ström går att bestämma från max spänning över en känd resistor.
URtop = [2.48 2.48 2.48 2.48 2.44];
IRtop=URtop./995

%Due to the ramp-like nature of the timevariant voltage over the coil
%(due to internal resistance) the signal has both a min and max in both
%polarities. It is in the middle of this range that the inductance is alone
%causing the voltage (but due to the linear variance in current throught
%the coil)
ULtop=[52 86 122 158 196]./1000;
ULbot=[22 58 92 126 156]./1000;
ULmid = ULbot + ((ULtop - ULbot)./ 2);

ULmid2=[38 71 107 142 178]./1000;
%Derivatan är (IRtop./(T./4) eftersom det är under just 1/4 period som triangelvågen går från 0 till max.
%Den uppmätta derivatan går att använda i alla beräkningar eftersom den är
%konstant över hela triangelvågen, bortsett från ombytt tecken.
L = ULmid2./(IRtop./(T./4))

%ULmid är där i=0 och den uppmäta spänningen orsakas därmed enbart av
%spolens induktans.

%Resistansen i spolen kan beräknas genom att ta den maximala spänningen den
%orsakar (ULtop - ULmid, största spänning minus spänning orsakad av enbart
%induktans) och sedan dela med den maximala strömmen genom spolen (vilket
%sker vid samma tidpunkt som max spänning).
Rinre = (ULtop - ULmid2)./IRtop
