Mr8Manhattan

function [p0,pF,numPts,dp,vector] = MakeVector(p0,pF,type,def)
% Author: Nathan Eckert
% Date Created : 03 - 28 - 2017
% Date Edited  : 03 - 28 - 2017
% Title: MakeVector
% Inputs: 
% Outputs:
% Purpose:

if type == 'num'

Mr8Manhattan

%% Header
% Author: Nathan Eckert
% Date Created : 03 - 28 - 2017
% Date Edited  : 03 - 28 - 2017
% Title: MagneticFieldFunctionTest
clear all; close all; clc;
%%%%%%%%%%%% Constants / Inputs / Initial Conditions %%%%%%%%%%%%
%% Physical Parameters
% Rail Length assumed infinite
w = 0.01; %     [m] - Rail Width

Mr8Manhattan

Analytic Force Computation Comparison Code

Define Constants

In[15]:= ClearAll[F, Lp, Ic, I0, I1, I2, I3, \[Omega], \[Tau], t, t1, t2, t3, m, V0, \
V2, imp, d, w, x]
\[Mu]0 = 4*\[Pi] *10^(-7);

r = 0.005;
wR = r * 2;

Mr8Manhattan

%% Header
% Author: Nathan Eckert
% Date Created : 03 - 28 - 2017
% Date Edited  : 05 - 23 - 2017
% Title: MagneticFieldFunctionTest
clear all; close all; clc;
%%%%%%%%%%%% Constants / Inputs / Initial Conditions %%%%%%%%%%%%
%% Physical Parameters
% Rail Length assumed infinite
w = 0.01; %     [m] - Rail Width