Symbol Description Uses
rF_pmid 7



File Line number Procedure Code
./pkg/fizhi/getpwhere.F 101 GETPWHERE
         pref(L) = rF_pmid(dynlev+L-ntry+1)
./pkg/fizhi/getpwhere.F 48 GETPWHERE
       _RL rF_pmid(Nr),rF_edge(Nr+1)
./pkg/fizhi/getpwhere.F 87 GETPWHERE
        rF_pmid(L) = (rF_edge(L) + rF_edge(L+1))/2.
./pkg/fizhi/getpwhere.F 92 GETPWHERE
        if(rF_pmid(L).ge.pref(ntry)) dynlev = L
./pkg/fizhi/getpwhere.F 94 GETPWHERE
       if(rF_pmid(dynlev).ge.pref(ntry)-25.) then
./pkg/fizhi/getpwhere.F 96 GETPWHERE
         pref(L) = rF_pmid(dynlev+L-ntry)
./pkg/fizhi/getpwhere.F 99 GETPWHERE
        pref(ntry) = rF_pmid(dynlev)