;***********************
; read.profiler.ncl
;***********************
load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_code.ncl"
load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_csm.ncl"
load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/contributed.ncl"
;***********************
begin

; code gets number of time steps and ranges and then loops through times.
; to see all variables, use ncdump -h from the command line
;
; this is sample code.  

  filein=      addfile ("sgpsbdprecipmomC1.a1.20110416.000000.mc3e.nc","r")

  precip_tda_index1=filein->precip_tda_index1
  dims=dimsizes( precip_tda_index1)
  ntimes=dims(0)
  nrange=dims(1)
  print("n times: "+ntimes+" n range: "+nrange)

  do itime=0,ntimes-1
    precip_in=precip_tda_index1(itime,:)
      if (itime.lt.10)then
	  print("printing 1st 10 time steps: precip value for time "+itime+" for range=0= "+precip_in(0))
      end if
   end do
 end