Campbell Scientific CNR1 Net Radiometer User Manual
Page 35
Appendix C. CR3000/CR5000 Program that Controls the Heater
Alias nr01(3) = Rs_downwell
Alias nr01(4) = Rs_upwell
Alias nr01(5) = Rl_downwell
Alias nr01(6) = Rl_upwell
Alias nr01(7) = t_nr01
Alias nr01(8) = Rl_down_meas
Alias nr01(9) = Rl_up_meas
Units panel_temp = C
Units batt_volt = V
Units t_hmp = C
Units rh_hmp = percent
Units e_hmp = kPa
Units nr01 = W/m^2
Units albedo = unitless
Units t_nr01 = K
'Net radiometer heater control variables.
Public set_point_temperature
Public duty_cycle
'Working Variables
Dim scratch_out(3)
Alias scratch_out(1) = t_hmp_mean
Alias scratch_out(2) = e_hmp_mean
Alias scratch_out(3) = e_sat_hmp_mean
Dim rh_hmp_mean
'Mean HMP45C relative humidity.
Dim t_dew_hmp_mean
'Mean dew point temperature.
Dim
e_sat_hmp
'HMP45C saturation vapor pressure.
Units t_hmp_mean = C
Units e_hmp_mean = kPa
Units e_sat_hmp_mean = kPa
Units rh_hmp_mean = percent
Units t_dew_hmp_mean = C
DataTable (stats,TRUE,-1)
DataInterval
(0,5,Min,10)
Sample
(1,t_hmp_mean,IEEE4)
Sample
(1,e_hmp_mean,IEEE4)
Sample
(1,rh_hmp_mean,IEEE4)
Sample
(1,t_dew_hmp_mean,IEEE4)
Sample
(1,duty_cycle,IEEE4)
Average
(9,Rn,IEEE4,FALSE)
EndTable
DataTable (scratch,TRUE,1)
TableHide
DataInterval
(0,5,Min,10)
Average
(1,t_hmp,IEEE4,FALSE)
Average
(1,e_hmp,IEEE4,FALSE)
Average
(1,e_sat_hmp,IEEE4,FALSE)
EndTable
C-3