File |
Line number |
Procedure |
Code |
./pkg/fizhi/getpwhere.F |
53 |
GETPWHERE |
integer ntry,ntry10,ntry40 |
./pkg/fizhi/getpwhere.F |
54 |
GETPWHERE |
parameter (ntry40=15) |
./pkg/fizhi/getpwhere.F |
56 |
GETPWHERE |
_RL dptry(ntry40), dptry10(ntry10), dptry40(ntry40) |
./pkg/fizhi/getpwhere.F |
57 |
GETPWHERE |
_RL dptry_pedge(ntry40+1) |
./pkg/fizhi/getpwhere.F |
77 |
GETPWHERE |
ntry = ntry40 |
./pkg/gridalt/make_phys_grid.F |
59 |
MAKE_PHYS_GRID |
integer ntry,ntry10,ntry40 |
./pkg/gridalt/make_phys_grid.F |
61 |
MAKE_PHYS_GRID |
parameter (ntry40 = 12) |
./pkg/gridalt/make_phys_grid.F |
62 |
MAKE_PHYS_GRID |
_RL dptry(15),dptry10(ntry10),dptry40(ntry40) |
./pkg/gridalt/make_phys_grid.F |
82 |
MAKE_PHYS_GRID |
ntry = ntry40 |