Initial revision

2000-02-09 19:27:02 +00:00
parent 778c3ab25c aa17d9ac9a
commit 5173d709e0
249 changed files with 27389 additions and 22577 deletions
@@ -0,0 +1,63 @@
+#include "Local.h"     /* standard header file */
+#include "Metar.h"
+ 
+#pragma subtitle(" ")
+#pragma page(1)
+#pragma subtitle("subtitle - description                       ")
+/********************************************************************/
+/*                                                                  */
+/*  Title:         fracPart                                         */
+/*  Organization:  W/OSO242 - GRAPHICS AND DISPLAY SECTION          */
+/*  Date:          13 Jun 1995                                      */
+/*  Programmer:    CARL MCCALLA                                     */
+/*  Language:      C/370                                            */
+/*                                                                  */
+/*  Abstract:      Convert a character string fraction into a       */
+/*                 decimal (floating point) number.                 */
+/*                                                                  */
+/*  External Functions Called:                                      */
+/*                 None.                                            */
+/*                                                                  */
+/*  Input:         string - a pointer to a character string frac-   */
+/*                          tion.                                   */
+/*  Output:        A decimal (floating point) number.               */
+/*                                                                  */
+/*  Modification History:                                           */
+/*                 None.                                            */
+/*                                                                  */
+/********************************************************************/
+#pragma page(1)
+ 
+float fracPart( char *string )
+{
+ 
+   /***************************/
+   /* DECLARE LOCAL VARIABLES */
+   /***************************/
+ 
+   char buf[ 6 ],
+        *slash;
+ 
+   float numerator,
+         denominator;
+ 
+   /*************************/
+   /* START BODY OF ROUTINE */
+   /*************************/
+ 
+   slash = strchr(string, '/');
+ 
+   memset(buf , '\0', 6);
+   strncpy( buf, string, slash-string);
+ 
+   numerator = (float) atoi(buf);
+ 
+   memset(buf , '\0', 6);
+   strcpy( buf, slash+1);
+ 
+   denominator = (float) atoi(buf);
+ 
+   return (numerator/denominator);
+ 
+}
+