Function to calculate the square root of a number #34
+120
−0
Conversation
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This module provides a function to calculate the square root of a number using Fortran's intrinsic SQRT function. It includes error handling for negative input.
This program provides test cases to validate the square root function in the square_root_module, including tests for zero, one, perfect squares, non-perfect squares, large numbers, and negative input.
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment
1 participant
Add this suggestion to a batch that can be applied as a single commit.
This suggestion is invalid because no changes were made to the code.
Suggestions cannot be applied while the pull request is closed.
Suggestions cannot be applied while viewing a subset of changes.
Only one suggestion per line can be applied in a batch.
Add this suggestion to a batch that can be applied as a single commit.
Applying suggestions on deleted lines is not supported.
You must change the existing code in this line in order to create a valid suggestion.
Outdated suggestions cannot be applied.
This suggestion has been applied or marked resolved.
Suggestions cannot be applied from pending reviews.
Suggestions cannot be applied on multi-line comments.
Suggestions cannot be applied while the pull request is queued to merge.
Suggestion cannot be applied right now. Please check back later.
This pull request introduces a new Fortran module for calculating square roots and a dedicated test program to validate its functionality. The changes provide a reusable function for square root calculation, including error handling for negative inputs, and comprehensive test coverage with multiple scenarios.
New square root functionality:
square_root_modulecontaining thecalculate_sqrtfunction, which computes the square root of a non-negative number using Fortran's intrinsicSQRTfunction and returns-1.0for negative inputs.Test coverage:
tests_square_root.f90program with six test cases covering zero, one, perfect squares, non-perfect squares, large numbers, and negative input scenarios for the square root function.assert_testsubroutine for floating-point comparison with tolerance, providing clear pass/fail output and stopping execution on test failure.