[daip] A-band opacity

[Eric Greisen]

Rick Perley wrote:
>    Eric:
> 
>    In testing 'A'-band this morning, I noted a message from FILLM, which 
> says:
> 
>> FILLM1: OPACTY: HAS A BAND BEEN MEASURED YET?  USING U BAND
> 
>    Of course, we haven't measured any opacity yet -- I thought Bryan's 
> model was used for estimating the opacity from the weather conditions.  
> In any event, using 'U'-band as a surrogate is not a good default.    In 
> general, due to the very wide frequency coverage of the EVLA, we'll have 
> to come up with a much more sophisticated model for estimation of 
> opacity ...
>    Rick

Brian's routine OPACTY uses measured parameters for each band:


C                                       4-band
       DATA C /  0.0,  0.0,  0.0,
C                                       P-band
      *          0.0,  0.0,  0.0,
C                                       L-band
      *          1.0,  0.0,  0.0,
C                                       S-band
      *          1.0,  0.0,  0.0,
C                                       C-band
      *          1.0,  0.0,  0.0,
C                                       X-band
      *          1.0,  0.0,  0.0,
C                                       U-band
      *          1.19, 0.0578, -2.486E-4,
C                                       K-band
      *          1.77, 0.9060, -1.385E-4,
C                                       A-band   copy U for now
      *          1.19, 0.0578, -2.486E-4,
C                                       Q-band
      *          5.86, 0.1712,  9.201E-4 /
C                                       4-band
       DATA D /  0.0,  0.0,  0.0,
C                                       P-band
      *          0.0,  0.0,  0.0,
C                                       L-band
      *          1.0,  0.0,  0.0,
C                                       S-band
      *          1.0,  0.0,  0.0,
C                                       C-band
      *          1.0,  0.0,  0.0,
C                                       X-band
      *          1.0,  0.0,  0.0,
C                                       U-band
      *          2.19, -0.0085, 2.010E-5,
C                                       K-band
      *         22.12, -0.1783, 4.402E-4,
C                                       A-band   copy U for now
      *          2.19, -0.0085, 2.010E-5,
C                                       Q-band
      *          9.70, -0.0357, 9.402E-5 /
C-----------------------------------------------------------------------
       IF (IBAND.EQ.9) THEN
          MSGTXT = 'OPACTY: HAS A BAND BEEN MEASURED YET?  USING U BAND'
          IF (FIRST) CALL MSGWRT (7)
          FIRST = .FALSE.

I suppose one should copy K or average K and Q or something....

Eric