Skip to content

Instantly share code, notes, and snippets.

@nivrith

nivrith/AGC Snippet #3 - Simple Square Root.AGC

Created July 20, 2023 10:23
Show Gist options
  • Save nivrith/5ef3cfd97748ba9273f7fcad2547ce72 to your computer and use it in GitHub Desktop.
Save nivrith/5ef3cfd97748ba9273f7fcad2547ce72 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
AGC Snippet #3 - Simple Square Root.AGC
SQRT TC SQRTSUB # TAKE THE SQUARE ROOT OF MPAC.
CCS MPTEMP # RETURNED NORMALIZED SQUARE ROOT. SEE IF
TCF +2 # ANY UN-NORMALIZATION REQUIRED AND EXIT
TCF DANZIG # IF NOT.
AD NEG12 # A RIGHT SHIFT OF MORE THAN 13 COULD BE
EXTEND # REQUIRED IF INPUT WAS ZERO IN MPAC,+1.
BZMF SQRTSHFT # GOES HERE IN MOST CASES.
ZL # IF A LONG SHIFT IS REQUIRED, GO TO
LXCH ADDRWD # GENERAL RIGHT SHIFT ROUTINES.
TCF GENSCR +4 # ADDRWD WAS ZERO TO PREVENT ROUND.
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment