beautypg.com

Campbell Scientific CNR4 Net Radiometer User Manual

Page 62

background image

Appendix C. CR3000 Program for Measuring Pt-100 Temperature Sensor

C-4

easurement

'PRT (Pt-100) temperature m
Resistance (cnr4_prt_R,1,mV200,8,Ix1,1,1500,True,True,0,_60Hz,1,0)

Rs_R0 = cnr4_prt_R/100
PRT (cnr4_T_C,1,Rs_R0,1,0)

'Convert CNR4 temperature to Kelvin
cnr4_T_K = cnr4_T_C+273.15

'Correct the long-wave radiation values from pyrgeometers
long_up_corr = long_up+5.67e-8*cnr4_T_K^4
long_dn_corr = long_dn+5.67e-8*cnr4_T_K^4


'Compute short-wave net radiation

Rs_net = short_up - short_dn

'Compute long-wave net radiation

Rl_net = long_up - long_dn

'Compute albedo

albedo = short_dn/short_up

'Compute net radiation

Rn = Rs_net + Rl_net

CallTable cnr4_data

CallTable cnr4_ts

NextScan
EndProg