!===============================================================================
!
! BQCD -- Berlin Quantum ChromoDynamics program
!
! Author: Hinnerk Stueben <stueben@zib.de>
!
! Copyright (C) 2003, Hinnerk Stueben, Zuse-Institut Berlin
!
!-------------------------------------------------------------------------------
!
! typedef_clover.F90
!
!-------------------------------------------------------------------------------
# include "defs.h"

!-------------------------------------------------------------------------------
module typedef_clover

  type type_clover_a
    sequence

    REAL i11
    REAL i22

    COMPLEX i12
    COMPLEX i13
    COMPLEX i14
    COMPLEX i15
    COMPLEX i16

    COMPLEX i23
    COMPLEX i24
    COMPLEX i25
    COMPLEX i26

    REAL i33
    REAL i44

    COMPLEX i34
    COMPLEX i35
    COMPLEX i36

    COMPLEX i45
    COMPLEX i46

    REAL i55
    REAL i66

    COMPLEX i56
  end type type_clover_a


  type type_clover_b
    sequence

    COMPLEX i21

    COMPLEX i31
    COMPLEX i32

    COMPLEX i41
    COMPLEX i42
    COMPLEX i43

    COMPLEX i51
    COMPLEX i52
    COMPLEX i53
    COMPLEX i54

    COMPLEX i61
    COMPLEX i62
    COMPLEX i63
    COMPLEX i64
    COMPLEX i65

    REAL i11
    REAL i22
    REAL i33
    REAL i44
    REAL i55
    REAL i66
  end type type_clover_b

end
!===============================================================================
