← Back to branch summary

~nickpapior/siesta/trunk-kpoint-dos

« back to all changes in this revision

Viewing changes to Src/Sys/general.f

  • Committer: Alberto Garcia
  • Date: 2004-11-25 18:49:43 UTC
  • Revision ID: Arch-1:siesta@uam.es--2004%siesta-devel--reference--0.11--patch-1
Siesta 0.11 -- imported from CVS
Import from cvs using date instead of siesta-0-11-release tag, since
the Pseudo structure was not properly integrated at that time and
did not get the tag.

Show diffs side-by-side

added added

removed removed

Lines of Context:
Src/Sys/general.f
1
 
      include '../cputim.f'
2
 
      include '../poison.f'
3
 
      include '../rdiag.f'
 
1
c $Id: general.f,v 1.8 1999/02/26 10:29:00 wdpgaara Exp $
 
2
 
 
3
      include 'cdiag_general.f'
 
4
      include 'eispack.f'
 
5
      include 'poison_general.f'
 
6
      include 'cft.f'
 
7
      include 'rdiag_general.f'
 
8
 
 
9
      SUBROUTINE CPUTIM (TIME)
 
10
      double precision time
 
11
c
 
12
c     Stub routine for systems without timing resources...
 
13
c
 
14
      TIME = 0.D0
 
15
 
 
16
      END
4
17