/*GrnVryDpth set grains abundance as a function of depth into cloud*/
double GrnVryDpth(long int nd);