Read the Data -- Toyokawa Radio Polarimeters

The Toyokawa Radio Polarimeters were observing in 4 frequencies, namely 1, 2, 3.75, and 9.4 GHz.

In order to read the data into IDL session, give the date (JST) as follows:
IDL> day='1992-11-02'
IDL> tykw_rd_dat,day,mvd,tim,fi,fv,freq $<$CR$>$
or give the file name as follows:
IDL> file='/archive/pub/norp/raw/1992/11/ty921102.01i' $<$CR$>$ ; 1GHz I-component
IDL> file0pa='/archive/pub/norp/raw/1992/11/ty921102.0pa' $<$CR$>$ ; 0PA calibration data
IDL> filestt='/archive/pub/norp/raw/1992/11/ty921102.stt' $<$CR$>$ ; status data
IDL> tykw_rd_dat,file,file0pa,filestt,mvd,tim,data $<$CR$>$
freq is observing frequencies in units of GHz, tim is observing time, fi,fv are I (R+L), V (R-L) comonents of flux density, respectively. mvd is an array including the values of unity (1) for valid data or zero (0) for non-valid data.
In order to read the data in specified duration:
IDL> timerange='1992-11-2 '+['1:00','2:00'] $<$CR$>$
IDL> tykw_rd_dat,day,mvd,tim,fi,fv,freq,timerange=timerange $<$CR$>$
In order to read the data of specified frequency, e.g. for 9 GHz,
IDL> rdfreq=[0,0,0,1] $<$CR$>$
IDL> tykw_rd_dat,day,mvd,tim,fi,fv,rdfreq=rdfreq $<$CR$>$
For 1GHz and 9.4 GHz,
IDL> rdfreq=[1,0,0,1] $<$CR$>$
IDL> tykw_rd_dat,day,mvd,tim,fi,fv,rdfreq=rdfreq $<$CR$>$
Each element in the array rdfreq corresponds to the data of one frequency among 1, 2, 3.75, and 9.4 GHz.