#include "dimensions.h"
#include "paramet.h"
#include "comgeom.h"
#include "logic.h"
Go to the source code of this file.
|
subroutine | tourpot_p (vcov, ucov, massebxy, vorpot) |
|
subroutine tourpot_p |
( |
real, dimension( ip1jm,llm ) |
vcov, |
|
|
real, dimension( ip1jmp1,llm ) |
ucov, |
|
|
real, dimension( ip1jm,llm ) |
massebxy, |
|
|
real, dimension( ip1jm,llm ) |
vorpot |
|
) |
| |