save$bdn = {{True, "g"}, {False, "F0"}, {False, "PL"}, {True, "g2"}, 
     {False, "MD"}}
 
save$bodypos = {{x$g, y$g, z$g, pitch$g, yaw$g, roll$g}, 
     {x$F0, 0.5 + y$g, z$F0, pitch$g, yaw$F0, roll$g}, 
     {x$PL, y$PL, z$PL, pitch$PL, yaw$PL, roll$PL}, 
     {x$g2, y$g2, z$g2, pitch$g2, yaw$g2, roll$g2}, 
     {x$MD, y$MD, z$MD, pitch$MD, yaw$MD, roll$MD}}
 
save$damp = {{"MagD", 5, 3, {0., -0.005, 0.}, {0., 0.005, 0.}, 
      {{20, 0, 0, 0, 0, 0}, {0, 40, 0, 0, 0, 0}, {0, 0, 20, 0, 0, 0}, 
       {0, 0, 0, 5, 0, 0}, {0, 0, 0, 0, 5, 0}, {0, 0, 0, 0, 0, 5}}}}
 
save$FileName = "exam"
 
save$HL = {{4, 3, {0., 0., 0.}, {-0.4, 0., 0.}, {0.6, 0.3, 0.}, 1, 100., 
      {{0.8, 0, 0, 0, 0, 0}, {0, 0.5, 0, 0, 0, 0}, {0, 0, 0.3, 0, 0, 0}, 
       {0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0}}, 
      {{"", "", "", "", "", ""}, {"", "", "", "", "", ""}, 
       {"", "", "", "", "", ""}, {"", "", "", "", "", ""}, 
       {"", "", "", "", "", ""}, {"", "", "", "", "", ""}}, "HL1"}}
 
save$initpos = {{0, 0, 0}, {0, 0.5, 0}, {0, -1.5, 0}, {-1., -1.5, 0}, 
     {0, -1.485, 0}}
 
save$IP = {{1, 2, {{0.6, 0.}, {-0.2999999999999999, -0.5196152422706632}, 
       {-0.30000000000000027, 0.519615242270663}}, {11.251349017241866, 
       11.251349017241866, 11.251349017241866}, {10, 10, 10}, "IP", 0.5, -80, 
      False, 950, True}}
 
save$mass = {{0, {{0, 0, 0}, {0, 0, 0}, {0, 0, 0}}}, 
     {600, {{20, 0, 0}, {0, 40, 0}, {0, 0, 20}}}, {300, {{10, 0, 0}, {0, 20, 
      0}, {0, 0, 10}}}, {0, {{0, 0, 0}, {0, 0, 0}, {0, 0, 0}}}, 
     {50, {{4, 0, 0}, {0, 8, 0}, {0, 0, 4}}}}
 
save$mat = {{"Maraging Steel", 8., 195, 0.3, 1., -3, "Virgo Data"}, 
     {"C-70 Steel", 7.8, 200, 0.3, 3., -4, "LIGO-G050087-00"}, 
     {"Tungsten", 19.3, 411, 0.28, 1., -4, "Wikipedia"}, 
     {"Copper Beryllium", 8.4, 134, 0.3, 5., -6, "www.alb-copperalloys.com"}, 
     {"Sapphire", 3.98, 345, 0.3, 2., -7, "www.crystalsystems.com"}, 
     {"Bolfur", 7.6, 157, 0.3, 1., -3, "www.alb-copperalloys.com"}}
 
save$shape = {{"Doughnut[y]", {1.5, 1, 0.2, 0.2, 0.2}}, 
     {"Cylinder[y]", {1.4, 0.2, 0.2, 0.2, 0.2}}, 
     {"Circle[y]", {0.8, 0.2, 0.2, 0.2, 0.2}}, 
     {"Cuboid", {0.05, 0.05, 0.05, 0.2, 0.2}}, {"Doughnut[y]", 
      {0.8, 0.6, 0.2, 0.2, 0.2}}}
 
save$vspr = {{1, 1, 473.7410112522892, 2943., True, -80, {0, 1, 0}, "GAS0", 
      20.}}
 
save$wire = {{2, {0, 0.02, 0}, 3, {0, 0.005, 0}, 1, 1.9975230417485024, 
      0.004, 0.02, 0.0025, 2943., {0, -1, 0}, {0, 1, 0}, "F0-PL-1", 
      1.1881508290341536*^6, 0.848259875216852}, 
     {2, {-0.35000000000000003, -0.01, -4.2862637970157366*^-17}, 5, 
      {-0.35000000000000003, 0, -4.2862637970157366*^-17}, 2, 
      1.8480743843435312, 0.001, 0, 0.001, 163.5, {0, -1, 0}, {0, 1, 0}, 
      "F0-MD-1", 84907.90955648088, 0.004082111036369275}, 
     {2, {0.1749999999999998, -0.01, 0.3031088913245537}, 5, 
      {0.1749999999999998, 0, 0.3031088913245537}, 2, 1.8480743843435312, 
      0.001, 0, 0.001, 163.5, {0, -1, 0}, {0, 1, 0}, "F0-MD-2", 
      84907.90955648088, 0.004082111036369275}, 
     {2, {0.1750000000000002, -0.01, -0.3031088913245535}, 5, 
      {0.1750000000000002, 0, -0.3031088913245535}, 2, 1.8480743843435312, 
      0.001, 0, 0.001, 163.5, {0, -1, 0}, {0, 1, 0}, "F0-MD-3", 
      84907.90955648088, 0.004082111036369275}}