ICEACE Model: Closed Economy  1.0.0
Design Documentation of ICEACE Model
 All Data Structures Files Functions Variables Typedefs Macros Pages
equityfund_functions_top.c
Go to the documentation of this file.
1 #include "header.h"
3 
4 
5 
6 /*
7  * \fn: int equityfund_init()
8  * \brief: completes runtime initializations.
9  */
11 {
13  char * filename;
14  FILE * file1;
15 
16  /* @\fn: eqyuityfund_compute_income_statement() */
17  filename = malloc(40*sizeof(char));
18  filename[0]=0;
19  strcpy(filename, "./outputs/data/EquityFund_snapshot.txt");
20  file1 = fopen(filename,"w");
21  fprintf(file1,"%s %s %s %s %s %s %s %s\n","IT_NO", "DIVIDENDS_RECIEVED", "DIVIDENDS_PAID", "SHARE_FIRMS", "SHARE_CONSTRUCTION_FIRMS", "SHARE_BANKS", "DIVIDENDS_RETAINED", "LIQUIDITY");
22  //fprintf(file1,"%d %f %f %f %f %f %f %f\n",IT_NO, DIVIDENDS_RECIEVED, DIVIDENDS_PAID, SHARE_FIRMS, SHARE_CONSTRUCTION_FIRMS, SHARE_BANKS, DIVIDENDS_RETAINED, LIQUIDITY_ACTUAL);
23  fclose(file1);
24  free(filename);
25  }
26 
28 
29  return 0; /* Returning zero means the agent is not removed */
30 }
31 
32 /*
33  * \fn: int equityfund_iterate()
34  * \brief:
35  */
37 {
38 
39  IT_NO++;
40 
41  return 0; /* Returning zero means the agent is not removed */
42 }
43