• Main Page
  • Namespaces
  • Classes
  • Files
  • File List
  • File Members

sfstubs.h

Go to the documentation of this file.
00001 !      $Id: sfstubs.h 11680 2011-03-27 17:57:51Z airwin $
00002 !      common blocks required for routines in sfstubs.f
00003 !
00004 !      Copyright (C) 2004  Alan W. Irwin
00005 !
00006 !      This file is part of PLplot.
00007 !
00008 !      PLplot is free software; you can redistribute it and/or modify
00009 !      it under the terms of the GNU Library General Public License as
00010 !      published by the Free Software Foundation; either version 2 of the
00011 !      License, or (at your option) any later version.
00012 !
00013 !      PLplot is distributed in the hope that it will be useful,
00014 !      but WITHOUT ANY WARRANTY; without even the implied warranty of
00015 !      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
00016 !      GNU Library General Public License for more details.
00017 !
00018 !      You should have received a copy of the GNU Library General Public
00019 !      License along with PLplot; if not, write to the Free Software
00020 !      Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
00021 
00022       integer maxlen
00023       parameter (maxlen = 320)
00024       character*(maxlen) string1, string2, string3
00025       character*(maxlen) string4, string5, string6
00026       character*(maxlen) string7, string8, string9
00027       integer s1(80), s2(80), s3(80), s4(80), s5(80), s6(80), s7(80), s8(80), s9(80)
00028 !     equivalence ( s1, string1 ), ( s2, string2 )
00029 !     equivalence ( s3, string3 ), ( s4, string4 )
00030 !     equivalence ( s5, string5 ), ( s6, string6 )
00031 !     equivalence ( s7, string7 ), ( s8, string8 )
00032 !     equivalence ( s9, string9 )
00033 !     common /zzplstr1/ string1
00034 !     common /zzplstr2/ string2
00035 !     common /zzplstr3/ string3
00036 !     common /zzplstr4/ string4
00037 !     common /zzplstr5/ string5
00038 !     common /zzplstr6/ string6
00039 !     common /zzplstr7/ string7
00040 !     common /zzplstr8/ string8
00041 !     common /zzplstr9/ string9

Generated on Wed Oct 12 2011 20:42:23 for PLplot by  doxygen 1.7.1