save data into ROOT using cfortran.h