unit uHCGlobals;

{$IFDEF fpc}
{$mode objfpc}{$H+}
{$ENDIF}

interface

uses
  Classes, SysUtils, uHCTypeDefs;

//var

const
  // based on max 256 and indexed on local severity of precipitation:
  // 0)no precip, 1)light rain/fog, 2)moderate rain/fog, 3)heavy rain/fog
  // modifiers (multipliers)
  VisTable: array[0..3]   of ushort = (256, 154,  51,  13); // 1.0  0.6  0.2  0.05
  irTable:  array[0..3]   of ushort = (256, 128,  26,   0); // 1.0  0.5  0.1  0.0
  esmTable: array[0..3]   of ushort = (282, 282, 282, 197); // 1.1  1.1  1.1  1.1*0.7
  RadarTable: array[0..3] of ushort = (256, 256, 256, 180); // 1.0  1.0  1.0  0.7


implementation

end.