/*

    dmsdec - Numerator program for converting decimal degrees into 
             DMS (degree-minute-second).

*/

new
"Decimal degrees? "
get decdegrees
degrees = int (decdegrees)
totminutes = frac (decdegrees) * 60
minutes = int (totminutes)
seconds = (totminutes - minutes) * 60
"DMS degrees: "
degrees:
" "
minutes:
"' "
seconds:
"\"\n"

