← Back to branch summary

~jose-soler/siesta/unfolding

« back to all changes in this revision

Viewing changes to Pseudo/atom/set2.h

  • Committer: Alberto Garcia
  • Date: 2016-01-25 16:00:16 UTC
  • mto: (483.3.1 rel-4.0)
  • mto: This revision was merged to the branch mainline in revision 485.
  • Revision ID: albertog@icmab.es-20160125160016-c1qivg1zw06kgyfd
Prepare GPL release

* Include proper headers

* Add Docs/Contributors.txt and NOTICE.txt files.

* Update READMEs and LICENSE files in several directories.

* Remove Pseudo/atom, Util/test-xml

* Remove DOM files from Src/xmlparser

Show diffs side-by-side

added added

removed removed

Lines of Context:
Pseudo/atom/set2.h
1
 
c---
2
 
c    Set2.h - Implementation of a set of pairs
3
 
c
4
 
      integer nmax
5
 
      parameter (nmax=50)
6
 
c
7
 
      integer nels
8
 
      character*30 el_name(nmax)
9
 
      double precision el_val(nmax)
10
 
c
11
 
      common /set_num/ el_val, nels
12
 
      common /set_chr/ el_name
13
 
c
14
 
      save /set_num/, /set_chr/
15
 
c---