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	mocchiut	1.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			};