| Symbol | Description | Uses |
| rF_pmid | 9 |
| File | Line number | Procedure | Code |
| ./pkg/fizhi/getpwhere.F | 134 | GETPWHERE |
rF_pmid(L) = (rF_edge(L) + rF_edge(L+1))/2. |
| ./pkg/fizhi/getpwhere.F | 139 | GETPWHERE |
if(rF_pmid(L).ge.pref(ntry)) dynlev = L |
| ./pkg/fizhi/getpwhere.F | 142 | GETPWHERE |
IF ( rF_pmid(dynlev).ge.pref(ntry)-25. ) THEN |
| ./pkg/fizhi/getpwhere.F | 149 | GETPWHERE |
WRITE(ioUnit,'(10F10.4)') rF_pmid |
| ./pkg/fizhi/getpwhere.F | 156 | GETPWHERE |
if(rF_pmid(dynlev).ge.pref(ntry)-25.) then |
| ./pkg/fizhi/getpwhere.F | 158 | GETPWHERE |
pref(L) = rF_pmid(dynlev+L-ntry) |
| ./pkg/fizhi/getpwhere.F | 161 | GETPWHERE |
pref(ntry) = rF_pmid(dynlev) |
| ./pkg/fizhi/getpwhere.F | 163 | GETPWHERE |
pref(L) = rF_pmid(dynlev+L-ntry+1) |
| ./pkg/fizhi/getpwhere.F | 61 | GETPWHERE |
_RL rF_pmid(Nr),rF_edge(Nr+1) |