! tdefp.f90
MODULE T_DEFP
  IMPLICIT NONE
  !
  TYPE T_OBJ
     DOUBLE PRECISION, POINTER, DIMENSION(:,:)::R
  END TYPE T_OBJ
END MODULE T_DEFP