Commit d520ef28 authored by Lore, Jeremy's avatar Lore, Jeremy
Browse files

Create pappus.m

parent 312993a9

matlab/bfield_library_jdl/geometry/pappus.m

0 → 100644
+12 −0
Original line number Diff line number Diff line 
clearvars;



R1 = 1.939;

R2 = 1.872;

Z1 = -1.124;

Z2 = -1.106;





% Pappus



puffArea = 2*pi*sqrt( (R2 - R1)^2 + (Z2 - Z1)^2 )*mean([R1,R2])