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