progale_c.c File Reference

#include "hardware.inc"
#include <stdio.h>

Go to the source code of this file.

Macros
#define	_FCALL

Functions
void	progale_c (int *icur, int *imax, int *ityp)
void _FCALL	PROGALE_C (int *icur, int *imax, int *ityp)
void	progale_c_ (int *icur, int *imax, int *ityp)
void	progale_c__ (int *icur, int *imax, int *ityp)

Macro Definition Documentation

_FCALL

#define _FCALL

Definition at line 24 of file progale_c.c.

Function Documentation

PROGALE_C()

void _FCALL PROGALE_C	(	int *	icur,
		int *	imax,
		int *	ityp )

Definition at line 58 of file progale_c.c.

{
    progale_c(icur, imax, ityp) ;
}

progale_c()

void progale_c	(	int *	icur,
		int *	imax,
		int *	ityp )

Definition at line 29 of file progale_c.c.

{
    char outline[80] ;
    double percent ;
 
    percent=(double)(*icur) / *imax * 100 ;
    if (*ityp == 1) {
       sprintf(outline,"%s%5.1f%s","        BUILDING POLYGONS: ",percent,"%") ;
       fprintf(stdout,"\r%s",outline) ;
       if (*icur == *imax) {fprintf(stdout,"\r%s\n","        BUILDING POLYGONS - COMPLETE          ") ;}
                    }
    else if (*ityp == 2) {
       sprintf(outline,"%s%5.1f%s","        BUILDING POLYHEDRA: ",percent,"%") ;
       fprintf(stdout,"\r%s",outline) ;
       if (*icur == *imax) {fprintf(stdout,"\r%s\n","        BUILDING POLYHEDRA - COMPLETE          ") ;}
                        }
    else if (*ityp == 3) {
       sprintf(outline,"%s%5.1f%s","        MERGING COINCIDENT NODES FOR ANIM: ",percent,"%") ;
       fprintf(stdout,"\r%s",outline) ;
       if (*icur == *imax) {fprintf(stdout,"\r%s\n","        MERGING COINCIDENT NODES FOR ANIM - COMPLETE          ") ;}
                        }
    else if (*ityp == 4) {
       sprintf(outline,"%s%5.1f%s","        BUILDING ELEMENT CONNECTIVITY: ",percent,"%") ;
       fprintf(stdout,"\r%s",outline) ;
       if (*icur == *imax) {fprintf(stdout,"\r%s\n","        BUILDING ELEMENT CONNECTIVITY - COMPLETE          ") ;}
                        }
    fflush(stdout) ;
}

progale_c_()

void progale_c_	(	int *	icur,
		int *	imax,
		int *	ityp )

Definition at line 62 of file progale_c.c.

{
    progale_c(icur, imax, ityp) ;
}

progale_c__()

void progale_c__	(	int *	icur,
		int *	imax,
		int *	ityp )

Definition at line 66 of file progale_c.c.

{
    progale_c(icur, imax, ityp) ;
}