% Calculate stress intensity factors for crack at the edge of 3/4 plane
% following Churchman et al. 2006
% Evaluation of dislocation distribution along crack length
% and corresponding stress intensity factors
% Automating calculation of slip zone length
% Date: 03/06/21
% close all
% clear
% clc
function [Tol]=FindTolSeq(parameter,d)
%% Calculate dislocation density
[~,~,~,~,~,Tol] = CalculatePhiSeq(parameter,d);
end