Skip to content

Instantly share code, notes, and snippets.

@Ansarina

Ansarina/signWithIF.f90 Secret

Created October 24, 2015 15:04
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save Ansarina/20da0578f6e6f9818c3d to your computer and use it in GitHub Desktop.
Save Ansarina/20da0578f6e6f9818c3d to your computer and use it in GitHub Desktop.
Download ZIP
Raw
signWithIF.f90
IF (number .LT. 0) THEN
sign=-1
ELSE IF (number .GT. 0) THEN
sign=1
ELSE
sign=0
END IF
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment