Go to the source code of this file.
|
subroutine | oi_tsl (KDAT, KSSSSS, PLAT, PLON, PMU0, PMU0M, KH) |
|
subroutine | get_mu0 (PGEMU, PGELAM, PTIME, KSSSSS, PMU) |
|
real function | rds (PT) |
|
real function | ret (PT) |
|
real function | rtime (KA, KM, KD, KS) |
|
subroutine oi_tsl::get_mu0 |
( |
real, intent(in) |
PGEMU, |
|
|
real, intent(in) |
PGELAM, |
|
|
real, intent(in) |
PTIME, |
|
|
integer, intent(in) |
KSSSSS, |
|
|
real, intent(out) |
PMU |
|
) |
| |
subroutine oi_tsl |
( |
integer, intent(in) |
KDAT, |
|
|
integer, intent(in) |
KSSSSS, |
|
|
real, intent(in) |
PLAT, |
|
|
real, intent(in) |
PLON, |
|
|
real, intent(out) |
PMU0, |
|
|
real, intent(out) |
PMU0M, |
|
|
integer, intent(out) |
KH |
|
) |
| |
real function oi_tsl::rds |
( |
real, intent(in) |
PT | ) |
|
real function oi_tsl::ret |
( |
real, intent(in) |
PT | ) |
|
real function oi_tsl::rtime |
( |
integer, intent(in) |
KA, |
|
|
integer, intent(in) |
KM, |
|
|
integer, intent(in) |
KD, |
|
|
integer, intent(in) |
KS |
|
) |
| |