Aggiunto gauss naif e implementato alcuni script come funzioni.

functions/float2bin.m

@@ -0,0 +1,28 @@
+
+function b = float2bin(f)
+%This function converts a floating point number to its binary form.
+
+%Input error handling
+if ~isfloat(f)
+  disp('Input must be a floating point number.');
+  return;
+end
+
+%Hex characters
+hex = '0123456789abcdef'; 
+
+%Convert from float to hex
+h = num2hex(f); 
+
+%Convert to cell array of chars
+hc = num2cell(h); 
+
+%Convert to array of numbers
+nums =  cellfun(@(x) find(hex == x) - 1, hc); 
+
+%Convert to array of binary numbers
+bins = dec2bin(nums, 4); 
+
+%Reshape into horizontal vector
+b = reshape(bins.', 1, numel(bins));
+end