33 REAL,
DIMENSION(3),
PARAMETER :: XWGT_0 = (/0.561651794427011,-1.62075908632141,-0.21261983875851/)
34 REAL,
DIMENSION(3),
PARAMETER :: XWGT_TG_S = (/-0.48932473825312,0.638173941854311,0.901773966331639/)
35 REAL,
DIMENSION(3),
PARAMETER :: XWGT_WFPS_S = (/-0.73521035872982,3.88469485689393,-5.18779902340853/)
37 REAL,
DIMENSION(3),
PARAMETER :: XWGT_TG_D = (/0.506600069632212,-0.942985468044301,1.23132977162784/)
38 REAL,
DIMENSION(3),
PARAMETER :: XWGT_FERT = (/-0.784867014304196,-0.862455616914003,-2.62451302093078/)
39 REAL,
DIMENSION(3),
PARAMETER :: XWGT_SAND = (/-0.283241716518431,-2.68040193699105,-0.27778477919531/)
41 REAL,
DIMENSION(3),
PARAMETER :: XWGT_PH = (/0.132539461337082,1.61126351888328,0.413060247967231/)
42 REAL,
DIMENSION(3),
PARAMETER :: XWGT_WIND = (/-0.00839661549597702,0.134088164903734,-0.560462552556124/)
44 REAL,
DIMENSION(4),
PARAMETER :: XWGT_TOT = (/0.499562769416134,-1.23876483956298,-1.41295235373665,-1.20659105237301/)
48 REAL,
DIMENSION(2),
PARAMETER :: XCOEF_TG_S = (/-2.453992,0.142680/)
49 REAL,
DIMENSION(2),
PARAMETER :: XCOEF_WFPS_S = (/-4.609693,0.115964/)
50 REAL,
DIMENSION(2),
PARAMETER :: XCOEF_TG_D = (/-2.717366,0.163039/)
51 REAL,
DIMENSION(2),
PARAMETER :: XCOEF_FERT = (/-0.364632,5.577532/)
52 REAL,
DIMENSION(2),
PARAMETER :: XCOEF_SAND = (/-1.535199,0.054909/)
53 REAL,
DIMENSION(2),
PARAMETER :: XCOEF_PH = (/-25.554238,3.158129/)
54 REAL,
DIMENSION(2),
PARAMETER :: XCOEF_WIND = (/-1.182905,0.614317/)
57 REAL,
PARAMETER :: XCOEF_NO0 = 3.403007
60 REAL,
PARAMETER :: XCOEF_NO1_s = 7.205080
61 REAL,
PARAMETER :: XCOEF_NO1_l = 2.205080