Pu_Increased upper load limit for film thicknes pre calculation, needed for high load angles

@BearImp/calcLoad.m

@@ -34,7 +34,7 @@ if strcmp(B.method,'dynamic')
     B.m_RE = 4./3.*pi.*(L.D_RE/2).^3.*B.rhoRE; % mass in kg
     B.Q_centri = B.m_RE.*B.v_cage.^2./(G.d_m./2); % Zentripetalkraft
 
-    B.Q_intp1 = logspace(log10(1e-31),log10(1000*sqrt(F_r^2+F_a^2)),360);%15
+    B.Q_intp1 = logspace(log10(1e-31),log10(5000*sqrt(F_r^2+F_a^2)),360);%15
     
     B.delta_intp1 = nan(L.Z,length(B.Q_intp1));
     for IndBall = 1 : L.Z