Regular Hexagon Shaped Loop

%% Regular Hexagon Shaped Loop
% Determines the size of the magnetic field at the center and at one of the
%    corners of a regular hexagon

% Constants
muNaught = (4*pi)*10^-7 ;                %[T*m/A] Vacuum Permeability
arb = (2*sqrt(3)-1)/12;

% Inputs and Variables
a = input('What is the length of the side?\n');
I = input('What is the current of the loop\n');

% Outputs and Equations
Bcent = sqrt(3)*muNaught*I/(pi*a);
Bcorn = Bcent*arb;
fprintf(['The magnitude at the center of the regular hexagon and at one of the corners are:\n'...
        '%4e T and %.4e T\n'], Bcent, Bcorn)

%{
The variable 'arb' in the constants section is just a placeholder. It is
    not an actual constant. It just makes the line in the outputs and equations
    section less crowded
%}