Functions | |
| c c LLC c Jan c LLC c Jan c fluxsum c ***********************************************************************implicit none c integer &iface double precision & | flux (ilo0-flxgc0:ihi0+1+flxgc0) |
Variables | |
| c c | File |
| c c LLC c | Revision |
| c c LLC c Jan c | Description |
| c c LLC c Jan c LLC c | Revision |
| c c LLC c Jan c LLC c Jan c | Description |
| c c LLC c Jan c LLC c Jan c | ihi0 |
| c c LLC c Jan c LLC c Jan c & | flxgc0 |
| c c LLC c Jan c LLC c Jan c & | iface |
| c c LLC c Jan c LLC c Jan c & | flux |
| c c LLC c Jan c LLC c Jan c fluxsum c ***********************************************************************implicit none c integer & | ilo0 |
| c c LLC c Jan c LLC c Jan c fluxsum c ***********************************************************************implicit none c integer | ihi0 |
| c c LLC c Jan c LLC c Jan c fluxsum c ***********************************************************************implicit none c integer & | flxgc0 |
| c c LLC c Jan c LLC c Jan c fluxsum c*********************************************************************** implicit none c integer & iface double precision& flux | ( | ilo0-flxgc0:ihi0+1+ | flxgc0 | ) |
| c c LLC c Jan c Description |
| c c LLC c Jan c LLC c Jan c fluxsum c ***********************************************************************implicit none c integer &iface double precision ic2 c c ***********************************************************************c ihi2 do ihi1 &iface double precision ic0 c c ***********************************************************************c ihi0 do ihi2 &iface double precision ic1 c c ***********************************************************************c ihi1 do ihi0 &iside double precision & flux |
| c c LLC c Jan c LLC c Jan c fluxsum c*********************************************************************** implicit none c integer& ilo0 |
| c c LLC c Jan c LLC c Jan c fluxsum c*********************************************************************** implicit none c integer ihi0 |
| c c LLC c Jan c LLC c Jan c fluxsum c*********************************************************************** implicit none c integer & flxgc0 |
1.5.1