function [B] = calcDistanceSprayBOG(B,s,prof)
%CALCDISTANCESPRAYBOG Calculate distance between Spray profile and BOG

BOGLat = B.DEC_LAT;
BOGLon = B.DEC_LONG;

% Define the target coordinates
SprayLat = s.lat(prof); % target latitude
SprayLon = s.lon(prof); % target longitude
wgs84 = wgs84Ellipsoid("m");
B.distance2spray = distance(BOGLat,BOGLon,SprayLat,SprayLon,wgs84) / 1000; % km

end