Symbol Description Uses
scal WENO weights. 75


File Line number Procedure Code
./pkg/fizhi/fizhi_swrad.F 789 SORAD 
      _RL  dp(m,n,np),wh(m,n,np),oh(m,n,np),scal(m,n,np)
./pkg/fizhi/fizhi_swrad.F 819 SORAD 
          scal(i,j,k)=dp(i,j,k)*(.5*(pl(i,j,k)+pl(i,j,k+1))/300.)**.8
./pkg/fizhi/fizhi_swrad.F 823 SORAD 
          wh(i,j,k)=1.02*wa(i,j,k)*scal(i,j,k)*
./pkg/fizhi/fizhi_swrad.F 873 SORAD 
          so2(i,j,k+1)=so2(i,j,k)+165.22*scal(i,j,k)
./pkg/fizhi/fizhi_swrad.F 896 SORAD 
         so2(i,j,k+1)=so2(i,j,k)+co2*789.*scal(i,j,k)
./pkg/generic_advdiff/gad_osc_mul_r.F 20 GAD_OSC_MUL_R 
          _RL scal(1:2)
./pkg/generic_advdiff/gad_osc_mul_r.F 61 GAD_OSC_MUL_R 
              scal(1) = 1. _d 5
./pkg/generic_advdiff/gad_osc_mul_r.F 63 GAD_OSC_MUL_R 
              scal(2) = 1. _d 0
./pkg/generic_advdiff/gad_osc_mul_r.F 66 GAD_OSC_MUL_R 
              osum = scal(1) + scal(2)
./pkg/generic_advdiff/gad_osc_mul_r.F 67 GAD_OSC_MUL_R 
              scal(1) = scal(1) / osum
./pkg/generic_advdiff/gad_osc_mul_r.F 68 GAD_OSC_MUL_R 
              scal(2) = scal(2) / osum
./pkg/generic_advdiff/gad_osc_mul_r.F 6 GAD_OSC_MUL_R 
      SUBROUTINE GAD_OSC_MUL_R(ir,hh,mask,ohat,scal)
./pkg/generic_advdiff/gad_osc_mul_r.F 73 GAD_OSC_MUL_R 
              scal(1) = 0. _d 0
./pkg/generic_advdiff/gad_osc_mul_r.F 74 GAD_OSC_MUL_R 
              scal(2) = 1. _d 0
./pkg/generic_advdiff/gad_osc_mul_x.F 20 GAD_OSC_MUL_X 
          _RL scal(1:2)
./pkg/generic_advdiff/gad_osc_mul_x.F 61 GAD_OSC_MUL_X 
              scal(1) = 1. _d 5
./pkg/generic_advdiff/gad_osc_mul_x.F 63 GAD_OSC_MUL_X 
              scal(2) = 1. _d 0
./pkg/generic_advdiff/gad_osc_mul_x.F 66 GAD_OSC_MUL_X 
              osum = scal(1) + scal(2)
./pkg/generic_advdiff/gad_osc_mul_x.F 67 GAD_OSC_MUL_X 
              scal(1) = scal(1) / osum
./pkg/generic_advdiff/gad_osc_mul_x.F 68 GAD_OSC_MUL_X 
              scal(2) = scal(2) / osum
./pkg/generic_advdiff/gad_osc_mul_x.F 6 GAD_OSC_MUL_X 
      SUBROUTINE GAD_OSC_MUL_X(ix,hh,mask,ohat,scal)
./pkg/generic_advdiff/gad_osc_mul_x.F 73 GAD_OSC_MUL_X 
              scal(1) = 0. _d 0
./pkg/generic_advdiff/gad_osc_mul_x.F 74 GAD_OSC_MUL_X 
              scal(2) = 1. _d 0
./pkg/generic_advdiff/gad_osc_mul_y.F 20 GAD_OSC_MUL_Y 
          _RL scal(1:2)
./pkg/generic_advdiff/gad_osc_mul_y.F 61 GAD_OSC_MUL_Y 
              scal(1) = 1. _d 5
./pkg/generic_advdiff/gad_osc_mul_y.F 63 GAD_OSC_MUL_Y 
              scal(2) = 1. _d 0
./pkg/generic_advdiff/gad_osc_mul_y.F 66 GAD_OSC_MUL_Y 
              osum = scal(1) + scal(2)
./pkg/generic_advdiff/gad_osc_mul_y.F 67 GAD_OSC_MUL_Y 
              scal(1) = scal(1) / osum
./pkg/generic_advdiff/gad_osc_mul_y.F 68 GAD_OSC_MUL_Y 
              scal(2) = scal(2) / osum
./pkg/generic_advdiff/gad_osc_mul_y.F 6 GAD_OSC_MUL_Y 
      SUBROUTINE GAD_OSC_MUL_Y(iy,hh,mask,ohat,scal)
./pkg/generic_advdiff/gad_osc_mul_y.F 73 GAD_OSC_MUL_Y 
              scal(1) = 0. _d 0
./pkg/generic_advdiff/gad_osc_mul_y.F 74 GAD_OSC_MUL_Y 
              scal(2) = 1. _d 0
./pkg/generic_advdiff/gad_plm_fun.F 108 GAD_PLM_FUN_V 
              scal = min(abs(dfds(-1)),
./pkg/generic_advdiff/gad_plm_fun.F 112 GAD_PLM_FUN_V 
              scal = min(scal, 1.0 _d 0)
./pkg/generic_advdiff/gad_plm_fun.F 114 GAD_PLM_FUN_V 
              dfds(+0) = scal * dfds(+0)
./pkg/generic_advdiff/gad_plm_fun.F 28 GAD_PLM_FUN_U 
          _RL fell,ferr,scal
./pkg/generic_advdiff/gad_plm_fun.F 46 GAD_PLM_FUN_U 
              scal = min(abs(dfds(-1)),
./pkg/generic_advdiff/gad_plm_fun.F 50 GAD_PLM_FUN_U 
              scal = min(scal, 1.0 _d 0)
./pkg/generic_advdiff/gad_plm_fun.F 52 GAD_PLM_FUN_U 
              dfds(+0) = scal * dfds(+0)
./pkg/generic_advdiff/gad_plm_fun.F 88 GAD_PLM_FUN_V 
          _RL fell,ferr,scal
./pkg/generic_advdiff/gad_ppm_hat_r.F 114 GAD_PPM_HAT_R 
     &                 ohat,scal)
./pkg/generic_advdiff/gad_ppm_hat_r.F 118 GAD_PPM_HAT_R 
                  lhat(ii) = scal(1) * uhat(ii)
./pkg/generic_advdiff/gad_ppm_hat_r.F 119 GAD_PPM_HAT_R 
     &                     + scal(2) * lhat(ii)
./pkg/generic_advdiff/gad_ppm_hat_r.F 62 GAD_PPM_HAT_R 
          _RL scal(+1:+2)
./pkg/generic_advdiff/gad_ppm_hat_x.F 115 GAD_PPM_HAT_X 
     &                 ohat,scal)
./pkg/generic_advdiff/gad_ppm_hat_x.F 119 GAD_PPM_HAT_X 
                  lhat(ii) = scal(1) * uhat(ii)
./pkg/generic_advdiff/gad_ppm_hat_x.F 120 GAD_PPM_HAT_X 
     &                     + scal(2) * lhat(ii)
./pkg/generic_advdiff/gad_ppm_hat_x.F 63 GAD_PPM_HAT_X 
          _RL scal(+1:+2)
./pkg/generic_advdiff/gad_ppm_hat_y.F 116 GAD_PPM_HAT_Y 
     &                 ohat,scal)
./pkg/generic_advdiff/gad_ppm_hat_y.F 120 GAD_PPM_HAT_Y 
                  lhat(ii) = scal(1) * uhat(ii)
./pkg/generic_advdiff/gad_ppm_hat_y.F 121 GAD_PPM_HAT_Y 
     &                     + scal(2) * lhat(ii)
./pkg/generic_advdiff/gad_ppm_hat_y.F 63 GAD_PPM_HAT_Y 
          _RL scal(+1:+2)
./pkg/generic_advdiff/gad_pqm_hat_r.F 134 GAD_PQM_HAT_R 
     &                 ohat,scal)
./pkg/generic_advdiff/gad_pqm_hat_r.F 138 GAD_PQM_HAT_R 
                  lhat(ii) = scal(1) * uhat(ii)
./pkg/generic_advdiff/gad_pqm_hat_r.F 139 GAD_PQM_HAT_R 
     &                     + scal(2) * lhat(ii)
./pkg/generic_advdiff/gad_pqm_hat_r.F 71 GAD_PQM_HAT_R 
          _RL scal(+1:+2)
./pkg/generic_advdiff/gad_pqm_hat_x.F 136 GAD_PQM_HAT_X 
     &                 ohat,scal)
./pkg/generic_advdiff/gad_pqm_hat_x.F 140 GAD_PQM_HAT_X 
                  lhat(ii) = scal(1) * uhat(ii)
./pkg/generic_advdiff/gad_pqm_hat_x.F 141 GAD_PQM_HAT_X 
     &                     + scal(2) * lhat(ii)
./pkg/generic_advdiff/gad_pqm_hat_x.F 71 GAD_PQM_HAT_X 
          _RL scal(+1:+2)
./pkg/generic_advdiff/gad_pqm_hat_y.F 137 GAD_PQM_HAT_Y 
     &                 ohat,scal)
./pkg/generic_advdiff/gad_pqm_hat_y.F 141 GAD_PQM_HAT_Y 
                  lhat(ii) = scal(1) * uhat(ii)
./pkg/generic_advdiff/gad_pqm_hat_y.F 142 GAD_PQM_HAT_Y 
     &                     + scal(2) * lhat(ii)
./pkg/generic_advdiff/gad_pqm_hat_y.F 71 GAD_PQM_HAT_Y 
          _RL scal(+1:+2)