|
recursive logical function, public oracle |
( |
character(len=*), dimension(:), intent(in) |
mybin, |
|
|
character(len=*), dimension(:), intent(in) |
mybout, |
|
|
type(fndsv), intent(in) |
vfn, |
|
|
type(fndsv), intent(out) |
myvfn, |
|
|
logical, optional |
recurse |
|
) |
| |
This function like a oracle say you how to abtain what you want.
Starting from desciption of input and output and a vector of available functions provide to you the road to execute for make the output
- Parametri
-
[in] | vfn | vector function object available |
[in] | mybin | standard table B description of input |
[in] | mybout | standard table B description of output |
[out] | myvfn | vector function object that solve the problem |
| recurse | set to .true. when called in recurse |
Definizione alla linea 536 del file alchimia.F03.
|