Fixed index

lambdaI
Cirdans-Home 4 years ago
parent cb62263f4d
commit be38c25c04

@ -263,7 +263,7 @@ contains
end if
i = i1
end do
kryl%k = i + 1
kryl%k = i
call psb_erractionrestore(err_act)
return

@ -263,7 +263,7 @@ contains
end if
i = i1
end do
kryl%k = i + 1
kryl%k = i
call psb_erractionrestore(err_act)
return

@ -263,7 +263,7 @@ contains
end if
i = i1
end do
kryl%k = i + 1
kryl%k = i
call psb_erractionrestore(err_act)
return

@ -263,7 +263,7 @@ contains
end if
i = i1
end do
kryl%k = i + 1
kryl%k = i
call psb_erractionrestore(err_act)
return

Loading…
Cancel
Save