ST_phi2d.m 834 Bytes
Newer Older
Pierre Cazenave's avatar
Pierre Cazenave committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36
function [d] = ST_phi2d(phi)
% Convert sediment grain size from phi to d (m)
%
% function [d] = ST_phi2d(phi)
%
% DESCRIPTION:
%    Convert a sediment grain size from phi to d (m)
%
% INPUT:
%    phi: sediment grain size in phi scale
%
% OUTPUT:
%    d: sediment grain size in m
%
% EXAMPLE USAGE
%    d = ST_phi2d(2.5)
%
% Author(s):  
%    Geoff Cowles (University of Massachusetts Dartmouth)
%
% Revision history
%   
%==============================================================================

%subname = 'ST_phid2';  
%fprintf('\n')
%fprintf(['begin : ' subname '\n'])

%------------------------------------------------------------------------------
% calculate d and convert to m
%------------------------------------------------------------------------------

d = 2^(-phi);
d = d*.001;

%fprintf(['end   : ' subname '\n'])