C
C******************* TOP OF COMMON BLOCK - CLDRES *******************
C
C NAME- CLDRES
C
C LANGUAGE- VS FORTRAN TYPE- COMMON BLOCK COMPUTER- CRAY J916
C
C VERSION- 1.0 DATE- 1/27/93 PROGRAMMER- CARLA NEIGH, SMSRC
C VERSION- 2.0 DATE- 08/22/94 PROGRAMMER- SURYA JANDHYLA (SMSRC)
C XATOV-34 GENERALISED THE DESCRIPTIONS FOR THE CLOUD TESTS.
C
C FUNCTION- THIS COMMON BLOCK CONTAINS THE BUFFERS WITH THE RESULTS
C OF THE CLOUD TESTS FOR EACH OF THE HIRS SPOTS IN A DATA
C FRAME.
C
C SHARED PARAMETERS-
C VARIABLE TYPE DESCRIPTION
C -------- ---- -----------
C RTRSLT I*4 ARRAY (DIM BUFFER:HNSPOT X BUFFER:HTOTLN)
C CONTAINING THE RESULTS FOR EACH OF THE
C RESTORAL CLOUD TESTS FOR EACH HIRS
C SPOT IN AN EXTENDED DATA FRAME. THE
C TEST RESULT IS ONE OF THE FOLLOWING VALUES:
C 0 = TEST DETERMINED SPOT TO BE CLOUDY
C 1 = TEST DETERMINED SPOT TO BE NOT CLOUDY
C 2 = TEST WAS NOT PERFORMED ON SPOT.
C AT THIS TIME THE ONLY RESTORAL TEST
C PERFORMED IS THE HOT SURFACE TEST.
C
C CTRSLT I*4 ARRAY (DIM 20 X BUFFER:HNSPOT X
C BUFFER:HTOTLN) CONTAINING THE RESULTS
C FOR EACH OF THE CLOUD TESTS FOR EACH
C HIRS SPOT IN AN EXTENDED DATA FRAME. THE
C TEST RESULT IS ONE OF THE FOLLOWING VALUES:
C 0 = TEST DETERMINED SPOT TO BE CLOUDY
C 1 = TEST DETERMINED SPOT TO BE NOT CLOUDY
C 2 = TEST WAS NOT PERFORMED ON SPOT.
C
C THE ELEMENTS OF THE ARRAY AND THEIR ASSOCIATED TESTS ARE AS
C FOLLOWS:
C
C ELEMENT TEST DESCRIPTION
C ------ -------------------------------------------
C 1 COLD SEA TEST.
C 2 ALBEDO TEST.
C 3 WINDOW CHANNEL TEST.
C 4 SURFACE TEMPERATURE TEST.
C 5 NEW AVHRR TEST - DIFFERENCE BETWEEN AVHRR 4 & 3.
C 6 NEW AVHRR TEST - ESTIMATION OF AVHRR CHANNEL 3 FROM
C AVHRR CHANNEL 4.
C 7 RESERVED.
C 8 NEW AVHRR TEST - PERCENTAGE OF AVHRR CHANNEL 4
C VALUES > 268.16.
C 9 NEW AVHRR TEST - STANDARD DEVIATION OF AVHRR CHANNEL
C 4 EXCEEDING THRESHOLD VALUE.
C 10 NEW AVHRR TEST - ESTIMATION OF AVHRR CHANNEL 4 FROM
C CHANNEL 5.
C 11 RESERVED.
C 12 RESERVED.
C 13 INTERCHANNEL REGRESSION TEST 1.
C 14 INTERCHANNEL REGRESSION TEST 2.
C 15 INTERCHANNEL REGRESSION TEST 3.
C 16 INTERCHANNEL REGRESSION TEST 4.
C 17 INTERCHANNEL REGRESSION TEST 5.
C 18 ADJACENT SPOT TEST- CENTER SPOT CLOUDY IF ALL
C SURROUNDING SPOTS ARE CLOUDY.
C 19 ADJACENT SPOT TEST- ADJACENT SPOT MINUS CENTER
C SPOT VALUE GREATER THAN LIMIT FOR AT LEAST ONE
C SPOT.
C 20 ADJACENT SPOT TEST- ABSOLUTE VALUE OF ADJACENT
C SPOT MINUS CENTER SPOT VALUE GREATER THAN OR
C EQUAL TO LIMIT FOR ALL SPOTS.
C
C
C CNRSLT I*4 ARRAY (DIM 6 X BUFFER:HNSPOT X
C BUFFER:HTOTLN) CONTAINING THE RESULTS
C FOR OF THE CLOUD TESTS ON THE COMBINED N*
C VALUE FOR EACH HIRS SPOT IN AN EXTENDED
C DATA FRAME. THE TEST RESULT IS ONE OF
C THE FOLLOWING VALUES:
C 0 = TEST DETERMINED SPOT TO BE CLOUDY
C 1 = TEST DETERMINED SPOT TO BE NOT CLOUDY
C 2 = TEST WAS NOT PERFORMED ON SPOT
C
C THE ELEMENTS OF THE ARRAY AND THEIR ASSOCIATED TESTS ARE AS
C FOLLOWS:
C
C ELEMENT TEST DESCRIPTION
C ------ -------------------------------------------
C 1 WINDOW CHANNEL TEST.
C 2 INTERCHANNEL REGRESSION TEST 1.
C 3 INTERCHANNEL REGRESSION TEST 2.
C 4 INTERCHANNEL REGRESSION TEST 3.
C 5 INTERCHANNEL REGRESSION TEST 4.
C 6 INTERCHANNEL REGRESSION TEST 5.
C
C
C BLOCK DATA- NONE
C
C COMMENTS- THIS COMMON BLOCK MUST BE PRECEDED BY THE INCLUDE
C MEMBER BUFFER.
C
C THE VALUES IN THIS COMMON BLOCK ARE INITIALIZED TO 2
C IN THE ROUTINE CONDVR BEFORE ANY CLOUD TESTS ARE PERFORMED
C ON THE DATA FRAME.
C
C********************************************************************
C
INTEGER CTRSLT(20,HNSPOT,HTOTLN), RTRSLT(HNSPOT,HTOTLN)
INTEGER CNRSLT(6,HNSPOT,HTOTLN)
C
COMMON /CLDRES/ CTRSLT, RTRSLT, CNRSLT
C
C******************* BOTTOM OF COMMON BLOCK - CLDRES ****************
C