Symbol Description Uses
wght1 linear interpolation weight (applies to 1rst record) 29



File Line number Procedure Code
./pkg/atm2d/atm2ocn_main.F 36 ATM2OCN_MAIN
      _RL wght0,wght1
./pkg/atm2d/atm2ocn_main.F 44 ATM2OCN_MAIN
      CALL CALC_FILELOAD( curTime, iloop, aloop, wght0, wght1,
./pkg/atm2d/atm2ocn_main.F 51 ATM2OCN_MAIN
        CALL SUBTRACT_MEANS( wght0, wght1,
./pkg/atm2d/atm2ocn_main.F 57 ATM2OCN_MAIN
      CALL FIXED_FLUX_ADD( inMonth, wght0,wght1,
./pkg/atm2d/atm2ocn_main.F 60 ATM2OCN_MAIN
      CALL RELAX_ADD( wght0,wght1,
./pkg/atm2d/calc_fileload.F 37 CALC_FILELOAD
      _RL  wght1
./pkg/atm2d/calc_fileload.F 75 CALC_FILELOAD
      wght1=(ifcyc - dmonth(intime0)) /
./pkg/atm2d/calc_fileload.F 77 CALC_FILELOAD
      wght0= 1. _d 0-wght1
./pkg/atm2d/calc_fileload.F 8 CALC_FILELOAD
     &                        wght0, wght1,
./pkg/atm2d/fixed_flux_add.F 130 FIXED_FLUX_ADD
     &                (wght0*tau0(i,j,1,1) + wght1*tau1(i,j,1,1))
./pkg/atm2d/fixed_flux_add.F 132 FIXED_FLUX_ADD
     &                (wght0*tav0(i,j,1,1) + wght1*tav1(i,j,1,1))
./pkg/atm2d/fixed_flux_add.F 134 FIXED_FLUX_ADD
     &                (wght0*wind0(i,j,1,1) + wght1*wind1(i,j,1,1))
./pkg/atm2d/fixed_flux_add.F 136 FIXED_FLUX_ADD
          qfadj = (wght0*qnet0(i,j,1,1) + wght1*qnet1(i,j,1,1))
./pkg/atm2d/fixed_flux_add.F 34 FIXED_FLUX_ADD
      _RL  wght1
./pkg/atm2d/fixed_flux_add.F 8 FIXED_FLUX_ADD
      SUBROUTINE FIXED_FLUX_ADD( inMonth, wght0, wght1,
./pkg/atm2d/relax_add.F 103 RELAX_ADD
            sstRelax(i,j)= (wght0*sst0(i,j,1,1) + wght1*sst1(i,j,1,1))
./pkg/atm2d/relax_add.F 109 RELAX_ADD
            sssRelax(i,j)= (wght0*sss0(i,j,1,1) + wght1*sss1(i,j,1,1))
./pkg/atm2d/relax_add.F 36 RELAX_ADD
      _RL  wght1
./pkg/atm2d/relax_add.F 8 RELAX_ADD
      SUBROUTINE RELAX_ADD( wght0, wght1,
./pkg/atm2d/subtract_means.F 25 SUBTRACT_MEANS
      _RL  wght1
./pkg/atm2d/subtract_means.F 37 SUBTRACT_MEANS
     &       (wght0*atau(j_atm,intime0) + wght1*atau(j_atm,intime1))
./pkg/atm2d/subtract_means.F 39 SUBTRACT_MEANS
     &       (wght0*atav(j_atm,intime0) + wght1*atav(j_atm,intime1))
./pkg/atm2d/subtract_means.F 41 SUBTRACT_MEANS
     &       (wght0*awind(j_atm,intime0) + wght1*awind(j_atm,intime1))
./pkg/atm2d/subtract_means.F 8 SUBTRACT_MEANS
      SUBROUTINE SUBTRACT_MEANS( wght0, wght1,
./eesupp/src/get_periodic_interval.F 111 GET_PERIODIC_INTERVAL
        wght1 = 1. _d 0 - wght2
./eesupp/src/get_periodic_interval.F 11 GET_PERIODIC_INTERVAL
     O               tRec0, tRec1, tRec2, wght1, wght2,
./eesupp/src/get_periodic_interval.F 131 GET_PERIODIC_INTERVAL
        wght1 = 1. _d 0 - wght2
./eesupp/src/get_periodic_interval.F 49 GET_PERIODIC_INTERVAL
      _RL      wght1, wght2
./eesupp/src/get_periodic_interval.F 71 GET_PERIODIC_INTERVAL
      wght1 = 0.