# This file generated by f77tof90 #typenamef90 1 #typename3f90 1 mpiversion=3.0 #typesnamef90 1 #typecntsf90 1 #typem2f90 1 #typesubf90 1 #packef90 1 gaddressf90 1 #allctypesf90 1 #hindex1f90 1 #hindexed_blockf90 1 mpiversion=1.0 #structf 2 indtype 2 #createf90 1 #sizeof 1 kinds 2 mpiversion=1.0 #trf90 1 #get_elem_d 2 #get_elem_u 2