#include "acusim.h"
#include "udf.h"

UDF_PROTOTYPE( pressinlet ) ; /* function prototype */

Void pressinlet ( UdfHd udfHd,       /* Opaque handle for accessing data */ 
Real* outVec,                        /* Output vector */ 
Integer nItems,                      /* Number of items in outVec */ 
Integer vecDim                       /* Vector dimension of outVec */
) 
{ 
Real period ;                              /* frequency */ 
Real time ;                                /* run time */
Real* usrVals ;                            /* user values */

float pi = 3.1415926535897932384626433832795;

udfCheckNumUsrVals( udfHd, 1 ) ;           /* check for error */ 
usrVals = udfGetUsrVals( udfHd ) ;         /* get the user vals */ 

time = udfGetTime( udfHd ) ;               /* get the run time */ 
period = usrVals[0] ;                      /* time period */ 
*outVec = sin(2.0*pi*time/period);         /* compute mult.func.*/
}