From 68a0599ae72a372673a8932babe8858470683bb1 Mon Sep 17 00:00:00 2001 From: zhangc43 Date: Fri, 19 Feb 2016 17:13:44 -0500 Subject: [PATCH] adding the dummy file for HDF5 support development --- code/damask_hdf5.f90 | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) create mode 100644 code/damask_hdf5.f90 diff --git a/code/damask_hdf5.f90 b/code/damask_hdf5.f90 new file mode 100644 index 000000000..34479f9b3 --- /dev/null +++ b/code/damask_hdf5.f90 @@ -0,0 +1,16 @@ +module HDF5_io + use prec + use IO + use hdf5 + +contains + +subroutine HDF5_init(filename, total_inc, total_time) + integer(pInt), intent(in) :: total_inc + real(pReal), intent(in) :: total_time + + write(6,*) 'pretend to write something' + +end subroutine HDF5_init + +end module HDF5_io \ No newline at end of file