Continued fraction/Arithmetic/G(matrix ng, continued fraction n1, continued fraction n2): Difference between revisions
Continued fraction/Arithmetic/G(matrix ng, continued fraction n1, continued fraction n2) (view source)
Revision as of 23:23, 15 March 2023
, 1 year ago→{{header|Fortran}}
Line 4,223:
block
!
! Let us start with a test of the long division routine, with some
! numbers known to trigger a bug in the first version I
! posted. That version had a buggy "add_back" routine.
!
! (How I found such numbers is easy: I used random search.)
!
type(big_integer), allocatable :: a, b, q, r
| |||