Lines Matching refs:idid
2 & atol, idid, rwork, lrw, iwork, liw) argument
746 integer neq, ldd, info(16), idid, lrw, iwork(*), liw local
1000 idid = -11
1004 if (i .eq. iord) idid = -13
1016 idid = -12
1023 idid = -15
1062 idid = -27
1067 idid = -25
1086 idid = -14
1094 idid = -26
1102 idid = -20
1113 idid = 1
1138 idid = -11
1146 idat(1) = idid
1147 idid = -31
1167 & rwork, iwork, idid, atol, rtol)
1177 idid = -16
1181 idid = -17
1186 idid = -18
1211 idid = 1
1219 idid = -5
1231 idid = -23
1240 idid = -21
1244 idid = -22
1264 idid = -24
1269 idid = -19
1291 & rwork(iwork(lwt)), idid, rwork(iwork(lphi)), rwork(ldelta),
1304 if (idid .lt. 0) go to 510
1337 idid = -26
1341 idid = -21
1350 idid = 3
1358 idid = 1
1365 idid = 3
1371 idid = -24
1375 idid = -19
1382 idid = 3
1387 idid = -24
1391 idid = -19
1399 idid = 1
1406 idid = 3
1415 idid = 2
1440 idid = -3
1449 idid = -5
1467 idid = -2
1482 & rwork(iwork(lwt)), idid, rwork(iwork(lphi)), rwork(ldelta),
1493 390 if (idid .lt. 0) go to 510
1505 idid = 3
1510 idid = 1
1522 idid = 2
1529 idid = 1
1540 & info, rwork, iwork, idid, atol, rtol)
1548 idid = 4
1567 idat(14) = idid
1585 mact(2) = maperr(-idid)
1586 mact(3) = -idid
1587 mact(4) = mloc(1 - idid)