Campbell Scientific CNR4 Net Radiometer User Manual

Page 37

CNR4 Net Radiometer

Units cnr4_T_K = K
Units long_up_corr = W/m^2

Units long_dn_corr = W/m^2
Units Rs_net = W/m^2
Units Rl_net = W/m^2

Units albedo = W/m^2
Units Rn = W/m^2

Dim Rs, Vs_Vx

'CNR4 sensitivities: refer to the Certificate of Calibration from Kipp & Zonen for sensitivity values

'for each probes, and enter them below.
Const pyra_up_sensitiv = 15.35 'unique sensitivity for upper pyranometer (microV/W/m^2)

Const pyra_dn_sensitiv = 15.41 'unique sensitivity for lower pyranometer (microV/W/m^2)
Const pyrg_up_sensitiv = 8.50 'unique sensitivity for upper pyrgeometer (microV/W/m^2)
Const pyrg_dn_sensitiv = 7.09 'unique sensitivity for lower pyrgeometer (microV/W/m^2)

'CNR4 multipliers
Public cnr4_mult(4)

Const pyra_up_mult = 1000/pyra_up_sensitiv

'(W/m^2/mV)

Const pyra_dn_mult = 1000/pyra_dn_sensitiv

'(W/m^2/mV)

Const pyrg_up_mult = 1000/pyrg_up_sensitiv

'(W/m^2/mV)

Const pyrg_dn_mult = 1000/pyrg_dn_sensitiv

'(W/m^2/mV)

DataTable (cnr4_dat,True,-1)

DataInterval (0,60,Min,10)
CardOut (1,-1)

Minimum (1,batt_volt,FP2,0,False)
Sample (1,logger_temp,FP2)
Average (4,cnr4(1),IEEE4,False)

Average (1,cnr4_T_C,IEEE4,False)
Average (1,cnr4_T_K,IEEE4,False)
Average (1,long_up_corr,IEEE4,False)

Average (1,long_dn_corr,IEEE4,False)
Average (1,Rs_net,IEEE4,False)
Average (1,Rl_net,IEEE4,False)

Average (1,albedo,IEEE4,False)
Average (1,Rn,IEEE4,False)
EndTable

DataTable (cnr4_ts,True,-1)

DataInterval (0,1,Sec,10)
CardOut (1,-1)
Sample (4,cnr4(1),IEEE4)

Sample (1,cnr4_T_K,IEEE4)
EndTable

BeginProg
'Load the multiplier values for the CNR4
cnr4_mult(1) = pyra_up_mult

cnr4_mult(2) = pyra_dn_mult
cnr4_mult(3) = pyrg_up_mult

cnr4_mu

4) = pyrg_dn_mult

lt(

Scan (1,Sec,3,0)

PanelTemp (logger_temp,250)
Battery (ba

)

tt_volt

'CNR4 radiation

ements

measur

Volt

(),4,mV20C,1,True ,0,_60

Diff (cnr4

Hz,cnr4_mult(),0)

'CNR4 thermistor measurement
BrHalf (Vs_Vx,1,mv5000,21,Vx1,1,2500,True ,0,250,1.0,0)
Rs = 1000*(Vs_Vx/(1-Vs_Vx))

cnr4_T_C = 1/(1.0295e-3+2.391e-4*LN(Rs)+1.568e-7*(LN(Rs))^3)-273.15