Continued fraction/Arithmetic/G(matrix ng, continued fraction n): Difference between revisions
Content added Content deleted
| Line 3,580: | Line 3,580: | ||
write (*, '("(2 + sqrt(2))/4 => ", A)') cf2string (cf_one_way) |
write (*, '("(2 + sqrt(2))/4 => ", A)') cf2string (cf_one_way) |
||
write (*, '("(1 + 1/sqrt(2))/2 => ", A)') cf2string (cf_another_way) |
write (*, '("(1 + 1/sqrt(2))/2 => ", A)') cf2string (cf_another_way) |
||
deallocate (cf_13_11) |
deallocate (cf_13_11) |
||