Symbol Description Uses
l 341


File Line number Procedure Code
./pkg/admtlm/admtlm_dsvd.F 206 ADMTLM_DSVD 
      integer l, ilinsysinfo, ii, jj
./pkg/admtlm/admtlm_dsvd.F 439 ADMTLM_DSVD 
            do l = 1, n
./pkg/admtlm/admtlm_dsvd.F 440 ADMTLM_DSVD 
               phtmpin(l) = workd(ipntr(1)+l)
./pkg/admtlm/admtlm_dsvd.F 464 ADMTLM_DSVD 
            do l = 1, n
./pkg/admtlm/admtlm_dsvd.F 465 ADMTLM_DSVD 
               workd(ipntr(2)+l) = phtmpout(l)
./pkg/admtlm/admtlm_dsvd.F 596 ADMTLM_DSVD 
               do l = 1, n
./pkg/admtlm/admtlm_dsvd.F 597 ADMTLM_DSVD 
                  tmpvec1(l) = v(l,j)
./pkg/admtlm/admtlm_dsvd.F 605 ADMTLM_DSVD 
               call DCOPY( m, tmpvec2, 1, u(l,j), 1 )
./pkg/admtlm/admtlm_dsvd.F 606 ADMTLM_DSVD 
               temp = one / dnrm2( m, u(l,j), 1 )
./pkg/admtlm/admtlm_dsvd.F 608 ADMTLM_DSVD 
               print *, 'ph-print ', j, dnrm2( m, u(l,j), 1 )
./pkg/admtlm/admtlm_dsvd.F 610 ADMTLM_DSVD 
               call DSCAL(m , temp, u(l,j), 1 )
./pkg/exf/exf_interp.F 178 EXF_INTERP 
           do l=0,1
./pkg/exf/exf_interp.F 179 EXF_INTERP 
            px_ind(l+1) = x_in(w_ind(i,j)+l)
./pkg/exf/exf_interp.F 180 EXF_INTERP 
            py_ind(l+1) = y_in(s_ind(i,j)+l)
./pkg/exf/exf_interp.F 199 EXF_INTERP 
           do l=-1,2
./pkg/exf/exf_interp.F 200 EXF_INTERP 
            px_ind(l+2) = x_in(w_ind(i,j)+l)
./pkg/exf/exf_interp.F 201 EXF_INTERP 
            py_ind(l+2) = y_in(s_ind(i,j)+l)
./pkg/exf/exf_interp.F 82 EXF_INTERP 
      integer  i, j, k, l, js, bi, bj, sp, interp_unit
./pkg/exf/exf_interp_read.F 64 EXF_INTERP_READ 
      integer  i, j, k, l, js, bi, bj, sp, interp_unit