;
;Copyright 1996-2013 United States Government as represented by the
;Administrator of the National Aeronautics and Space Administration.
;All Rights Reserved.
; This software may be used, copied, or redistributed as long as it is not
; sold and this copyright notice is reproduced on each copy made.  This
; routine is provided as is without any express or implied warranties
; whatsoever.
;
function cmb_cdf_get_dependencies_dimensionandsize,d
; z = cmb_cdf_get_dependencies_dimensionandsize(d)
;input
; d is a structure created by read_mycdf or spdfgetdata
;output
; structure whose tag names are the dependencies with ndimensions and sizes.

depends = cmb_cdf_get_dependencies(d)
tnames = tag_names(d)
for i=0,n_elements(depends)-1 do begin
    iv =where( strlowcase(depends[i]) eq strlowcase(tnames))
    si = size(cmb_dat(d.(iv)),/structure)
    if n_elements(z) eq 0 then z = create_struct(depends[i], si) else  z = create_struct(z,depends[i], si)  
endfor
return,z
end