My Project
|
Go to the source code of this file.
Functions/Subroutines | |
subroutine | iniacademic (vcov, ucov, teta, q, masse, ps, phis, time_0) |
subroutine iniacademic | ( | real, dimension(ip1jm,llm) | vcov, |
real, dimension(ip1jmp1,llm) | ucov, | ||
real, dimension(ip1jmp1,llm) | teta, | ||
real, dimension(ip1jmp1,llm,nqtot) | q, | ||
real, dimension(ip1jmp1,llm) | masse, | ||
real, dimension(ip1jmp1) | ps, | ||
real, dimension(ip1jmp1) | phis, | ||
real | time_0 | ||
) |
Definition at line 4 of file iniacademic.F90.