Campbell CVF4 Specifiche Pagina 58

  • Scaricare
  • Aggiungi ai miei manuali
  • Stampa
Vedere la pagina 57
Appendix C. CR3000 Program for Measuring Pt-100 Temperature Sensor
C-4
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) = pyranometer_up_mult
cnr4_mult(2) = pyranometer_dn_mult
cnr4_mult(3) = pyrgeometer_up_mult
cnr4_mult(4) = pyrgeometer_dn_mult
Scan (1,Sec,3,0)
PanelTemp (logger_temp,250)
Battery (batt_volt)
'CNR4 radiation measurements
VoltDiff (cnr4(1),4,mV20C,1,True ,0,_60Hz,cnr4_mult(1),0)
'PRT (Pt-100) temperature measurement
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
Vedere la pagina 57
1 2 ... 53 54 55 56 57 58 59 60

Commenti su questo manuale

Nessun commento