beautypg.com

Campbell Scientific CNR1 Net Radiometer User Manual

Page 35

background image

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