課題１：
thm_init

timespan, '2012-01-01', 31 ,/day
iug_load_meteor_rish, site = 'ktb', parameter = 'h2t60min00'
tplot_names
tplot, ['iug_meteor_ktb_uwnd_h2t60min00','iug_meteor_ktb_vwnd_h2t60min00','iug_meteor_ktb_uwndsig_h2t60min00','iug_meteor_ktb_vwndsig_h2t60min00','iug_meteor_ktb_mwnum_h2t60min00']

-必要であれば-
zlim,['iug_meteor_ktb_uwnd_h2t60min00','iug_meteor_ktb_vwnd_h2t60min00'],-100,100
ylim,['iug_meteor_ktb_uwnd_h2t60min00','iug_meteor_ktb_vwnd_h2t60min00'],80,100
tlimit,'2012-01-17','2012-01-27'

popen, 'exmple.ps'
tplot
pclose

課題2：
timespan, '2012-01-01', 31 ,/day
iug_load_mf_rish, site = 'pam'
tplot_names
tplot, ['iug_meteor_ktb_uwnd_h2t60min00','iug_meteor_ktb_vwnd_h2t60min00','iug_mf_pam_uwnd','iug_mf_pam_vwnd','iug_mf_pam_wwnd']

avg_data,'iug_mf_pam_uwnd',3600
avg_data,'iug_mf_pam_vwnd',3600
avg_data,'iug_mf_pam_wwnd',3600

tplot, ['iug_meteor_ktb_uwnd_h2t60min00','iug_meteor_ktb_vwnd_h2t60min00','iug_mf_pam_uwnd_avg','iug_mf_pam_vwnd_avg','iug_mf_pam_wwnd_avg']

ylim,['iug_mf_pam_uwnd_avg','iug_mf_pam_vwnd_avg','iug_mf_pam_wwnd_avg'],80,100
zlim,['iug_mf_pam_uwnd_avg','iug_mf_pam_vwnd_avg','iug_mf_pam_wwnd_avg'],-100,100
tplot

応用課題1：
kyoto_load_dst
tplot,['kyoto_dst','iug_meteor_ktb_uwnd_h2t60min00','iug_meteor_ktb_vwnd_h2t60min00','iug_mf_pam_uwnd_avg','iug_mf_pam_vwnd_avg','iug_mf_pam_wwnd_avg']
tlimit, '2012-01-17', '2012-01-27'

応用課題2：
timespan, '2012-01-01', 31 ,/day
 iug_load_mu
iug_load_wpr_rish, site = 'sgk', parameter =['uwnd', 'vwnd']
iug_load_ear, datatype = 'troposphere'
iug_load_gmag_mm210, site = 'ktb', datatype = '1h'
tplot_names
tplot,['kyoto_dst','mm210_mag_ktb_1h_hdz','iug_mf_pam_uwnd_avg','iug_meteor_ktb_uwnd_h2t60min00','iug_ear_trop_uwnd','iug_mu_trop_uwnd','iug_wpr_sgk_uwnd']
zlim,['iug_wpr_sgk_uwnd'],-20,20

tplot,['kyoto_dst','mm210_mag_ktb_1h_hdz','iug_mf_pam_vwnd_avg','iug_meteor_ktb_vwnd_h2t60min00','iug_ear_trop_vwnd','iug_mu_trop_vwnd','iug_wpr_sgk_vwnd']
zlim,['iug_wpr_sgk_vwnd'],-20,20