Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public, | parameter | :: | rwloc_cj | = | 1 |
|
integer, | public, | parameter | :: | rwloc_cjold | = | 2 |
|
integer, | public, | parameter | :: | rwloc_h | = | 3 |
|
integer, | public, | parameter | :: | rwloc_tn | = | 4 |
|
integer, | public, | parameter | :: | rwloc_hold | = | 7 |
|
integer, | public, | parameter | :: | iwloc_ml | = | 1 |
|
integer, | public, | parameter | :: | iwloc_mu | = | 2 |
|
integer, | public, | parameter | :: | iwloc_mtype | = | 4 |
|
integer, | public, | parameter | :: | iwloc_k | = | 7 |
|
integer, | public, | parameter | :: | iwloc_kold | = | 8 |
|
integer, | public, | parameter | :: | iwloc_nst | = | 11 |
|
integer, | public, | parameter | :: | iwloc_nre | = | 12 |
|
integer, | public, | parameter | :: | iwloc_nje | = | 13 |
|
integer, | public, | parameter | :: | iwloc_netf | = | 14 |
|
integer, | public, | parameter | :: | iwloc_ncfn | = | 15 |
|
integer, | public, | parameter | :: | iwloc_ncfl | = | 16 |
|
integer, | public, | parameter | :: | iwloc_leniw | = | 17 |
|
integer, | public, | parameter | :: | iwloc_lenrw | = | 18 |
|
integer, | public, | parameter | :: | iwloc_nni | = | 19 |
|
integer, | public, | parameter | :: | iwloc_nli | = | 20 |
|
integer, | public, | parameter | :: | iwloc_nps | = | 21 |
|
integer, | public, | parameter | :: | iwloc_npd | = | 22 |
|
integer, | public, | parameter | :: | iwloc_miter | = | 23 |
|
integer, | public, | parameter | :: | iwloc_maxl | = | 24 |
|
integer, | public, | parameter | :: | iwloc_kmp | = | 25 |
|
integer, | public, | parameter | :: | iwloc_nrmax | = | 26 |
|
integer, | public, | parameter | :: | iwloc_lrwp | = | 29 |
|
integer, | public, | parameter | :: | iwloc_liwp | = | 30 |
|
integer, | public, | parameter | :: | iwloc_kprint | = | 31 |
|
integer, | public, | parameter | :: | iwloc_mxnit | = | 32 |
|
integer, | public, | parameter | :: | iwloc_mxnj | = | 33 |
|
integer, | public, | parameter | :: | iwloc_lsoff | = | 35 |
|
integer, | public, | parameter | :: | iwloc_nrtfn | = | 36 |
|
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=rk), | intent(in) | :: | t | |||
real(kind=rk), | intent(in) | :: | y(*) | |||
real(kind=rk), | intent(in) | :: | ydot(*) | |||
real(kind=rk), | intent(in) | :: | cj | |||
real(kind=rk), | intent(out) | :: | delta(*) | |||
integer, | intent(inout) | :: | ires | |||
real(kind=rk), | intent(inout) | :: | rpar(*) | |||
integer, | intent(inout) | :: | ipar(*) |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=rk), | intent(in) | :: | t | |||
real(kind=rk), | intent(in) | :: | y(*) | |||
real(kind=rk), | intent(in) | :: | ydot(*) | |||
real(kind=rk), | intent(out) | :: | pd(*) | |||
real(kind=rk), | intent(in) | :: | cj | |||
real(kind=rk), | intent(inout) | :: | rpar(*) | |||
integer, | intent(inout) | :: | ipar(*) |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
procedure(res_t) | :: | res | ||||
integer, | intent(out) | :: | ires | |||
integer, | intent(in) | :: | neq | |||
real(kind=rk), | intent(in) | :: | t | |||
real(kind=rk), | intent(inout) | :: | y(*) | |||
real(kind=rk), | intent(inout) | :: | ydot(*) | |||
real(kind=rk), | intent(in) | :: | rewt(*) | |||
real(kind=rk), | intent(inout) | :: | savr(*) | |||
real(kind=rk), | intent(inout) | :: | wk(*) | |||
real(kind=rk), | intent(in) | :: | h | |||
real(kind=rk), | intent(in) | :: | cj | |||
real(kind=rk), | intent(inout) | :: | rwp(*) | |||
integer, | intent(inout) | :: | iwp(*) | |||
integer, | intent(inout) | :: | ierr | |||
real(kind=rk), | intent(inout) | :: | rpar(*) | |||
integer, | intent(inout) | :: | ipar(*) |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | neq | |||
real(kind=rk), | intent(in) | :: | t | |||
real(kind=rk), | intent(in) | :: | y(*) | |||
real(kind=rk), | intent(in) | :: | ydot(*) | |||
real(kind=rk), | intent(in) | :: | savr(*) | |||
real(kind=rk), | intent(inout) | :: | wk(*) | |||
real(kind=rk), | intent(in) | :: | cj | |||
real(kind=rk), | intent(in) | :: | wght(*) | |||
real(kind=rk), | intent(inout) | :: | rwp(*) | |||
integer, | intent(inout) | :: | iwp(*) | |||
real(kind=rk), | intent(inout) | :: | b(*) | |||
real(kind=rk), | intent(in) | :: | epslin | |||
integer, | intent(inout) | :: | ierr | |||
real(kind=rk), | intent(inout) | :: | rpar(*) | |||
integer, | intent(inout) | :: | ipar(*) |