subroutine OI_CAVEGI |
( |
REAL, dimension(24), intent(out) |
VGAT1, |
|
|
REAL, dimension(24), intent(out) |
VGAT2, |
|
|
REAL, dimension(24), intent(out) |
VGAT3, |
|
|
REAL, dimension(24), intent(out) |
VGBT1, |
|
|
REAL, dimension(24), intent(out) |
VGBT2, |
|
|
REAL, dimension(24), intent(out) |
VGBT3, |
|
|
REAL, dimension(24), intent(out) |
VGCT1, |
|
|
REAL, dimension(24), intent(out) |
VGCT2, |
|
|
REAL, dimension(24), intent(out) |
VGAH1, |
|
|
REAL, dimension(24), intent(out) |
VGAH2, |
|
|
REAL, dimension(24), intent(out) |
VGAH3, |
|
|
REAL, dimension(24), intent(out) |
VGBH1, |
|
|
REAL, dimension(24), intent(out) |
VGBH2, |
|
|
REAL, dimension(24), intent(out) |
VGBH3, |
|
|
REAL, dimension(24), intent(out) |
VGCH1, |
|
|
REAL, dimension(24), intent(out) |
VGCH2, |
|
|
REAL, dimension(24), intent(out) |
SIGT2MP, |
|
|
REAL, dimension(24), intent(out) |
SIGHP2, |
|
|
LOGICAL |
LSGOBS |
|
) |
| |