LEVEL2/src/libclcalol2.C

//
//     Written by Emiliano Mocchiutti
//
#include "ccal2struct.h"
#define clcalol2 clcalol2_
extern "C" int clcalol2();
void cclosecalol2(char name[200]) {
  printf("\n Close rz file! \n\n");
  clcalol2();
  printf(" File saved in \n\n               %s \n\n",name);
};  
1	//
2	// Written by Emiliano Mocchiutti
3	//
4	#include "ccal2struct.h"
5	#define clcalol2 clcalol2_
6	extern "C" int clcalol2();
7	void cclosecalol2(char name[200]) {
8	printf("\n Close rz file! \n\n");
9	clcalol2();
10	printf(" File saved in \n\n %s \n\n",name);
11	};