~nickpapior/siesta/trunk-buds-format0.92

« back to all changes in this revision

Viewing changes to Src/buds/src/mpi/Dist1D_SM_Array_type_.inc

  • Committer: Nick Papior
  • Date: 2017-04-07 12:42:28 UTC
  • Revision ID: nickpapior@gmail.com-20170407124228-u5t08yr2p4fhzfeo
Initial commit of buds merged into siesta

Currently I have only enabled buds compilation.

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
 
 
2
#define BUD_TYPE_MP_COMM BUD_CC2(BUD_TYPE,MP_Comm)
 
3
 
 
4
#if BUD_DIM > 1
 
5
  !> Integer corresponding to the sparse index (`1<=sm_idx<=BUD_DIM`)
 
6
  !! The default sparse dimension is the last dimension.
 
7
  integer :: sm_idx = BUD_DIM
 
8
#endif
 
9
 
 
10
 
 
11
  ! project-buds -- local file settings
 
12
  !     Anything below this line may be overwritten by scripts
 
13
  !     Below are non-editable settings
 
14
 
 
15
  ! Local Variables:
 
16
  !  mode: f90
 
17
  !  f90-if-indent: 2
 
18
  !  f90-type-indent: 2
 
19
  !  f90-associate-indent: 2
 
20
  !  f90-continuation-indent: 2
 
21
  !  f90-structure-indent: 2
 
22
  !  f90-critical-indent: 2
 
23
  !  f90-program-indent: 2
 
24
  !  f90-do-indent: 2
 
25
  ! End:
 
26