/[PAMELA software]/gpamela/gcdes/gcdraw.inc
ViewVC logotype

Contents of /gpamela/gcdes/gcdraw.inc

Parent Directory Parent Directory | Revision Log Revision Log


Revision 3.1.1.1 - (show annotations) (download) (vendor branch)
Thu Jul 11 16:02:13 2002 UTC (22 years, 4 months ago) by cafagna
Branch: v3r0, MAIN
CVS Tags: v4r4, v4r5, v4r6, v4r7, v4r0, v4r1, v4r2, v4r3, v4r8, v4r9, firstrelease, v4r14, v4r12, v4r13, v4r10, v4r11, v3r3, v3r1, v3r2, HEAD
Changes since 3.1: +0 -0 lines
First GPAMELA release on CVS

1 *
2 * $Id$
3 *
4 * $Log$
5 *
6 *
7 * gcdraw.inc
8 *
9 COMMON/GCDRAW/NUMNOD,MAXNOD,NUMND1,LEVVER,LEVHOR,MAXV,IPICK,
10 + MLEVV,MLEVH,NWCUT,JNAM,JMOT,JXON,JBRO,JDUP,JSCA,JDVM,JPSM,
11 + JNAM1,JMOT1,JXON1,JBRO1,JDUP1,JSCA1,JULEV,JVLEV,
12 + LOOKTB(16),
13 + GRMAT0(10),GTRAN0(3),IDRNUM,GSIN(41),GCOS(41),SINPSI,COSPSI,
14 + GTHETA,GPHI,GPSI,GU0,GV0,GSCU,GSCV,NGVIEW,
15 + ICUTFL,ICUT,CTHETA,CPHI,DCUT,NSURF,ISURF,
16 + GZUA,GZVA,GZUB,GZVB,GZUC,GZVC,PLTRNX,PLTRNY,
17 + LINATT,LINATP,ITXATT,ITHRZ,IPRJ,DPERS,ITR3D,IPKHIT,IOBJ,LINBUF,
18 + MAXGU,MORGU,MAXGS,MORGS,MAXTU,MORTU,MAXTS,MORTS,
19 + IGU,IGS,ITU,ITS,NKVIEW,IDVIEW,
20 + NOPEN,IGMR,IPIONS,ITRKOP,IHIDEN,
21 + ZZFU,ZZFV,MYISEL,
22 + DDUMMY(15)
23 C
24 #if defined(GPAMELA_TYPE)
25 #include "gtdraw.inc"
26 #endif
27 *
28 * gcdraw.inc
29 *
30 #if defined(GPAMELA_INCLUDE)
31 *
32 #include "incbeg.inc"
33 + gcdraw
34 #include "incend.inc"
35 #endif

  ViewVC Help
Powered by ViewVC 1.1.23