Go to the source code of this file.
|
subroutine | trecur (NCPFC, RI, ZI, PC, NTYPE, NECON, WECON, HORS, VERS, NPRI, NTER) |
|
subroutine | divpar (RC, ZC, WC, HC, AWC, AHC, CURC, NDIV, NDIVRE, NDIVW, NDIVH, RS, ZS, PS, VERS, HORS) |
|
subroutine divpar |
( |
|
RC, |
|
|
|
ZC, |
|
|
|
WC, |
|
|
|
HC, |
|
|
|
AWC, |
|
|
|
AHC, |
|
|
|
CURC, |
|
|
|
NDIV, |
|
|
|
NDIVRE, |
|
|
|
NDIVW, |
|
|
|
NDIVH, |
|
|
dimension(1) |
RS, |
|
|
dimension(1) |
ZS, |
|
|
|
PS, |
|
|
|
VERS, |
|
|
|
HORS |
|
) |
| |
subroutine trecur |
( |
|
NCPFC, |
|
|
dimension(*) |
RI, |
|
|
dimension(*) |
ZI, |
|
|
dimension(*) |
PC, |
|
|
integer, dimension(*) |
NTYPE, |
|
|
integer, dimension(*) |
NECON, |
|
|
dimension(*) |
WECON, |
|
|
dimension(*) |
HORS, |
|
|
dimension(*) |
VERS, |
|
|
|
NPRI, |
|
|
|
NTER |
|
) |
| |