Variable and Array Descriptions
PARAMETERS
Type Parameter Value Description
INTEGER MXPRSN = 5000 Maximum # of persons (individuals) per sample
INTEGER MAXALL = 12 Maximum # of alleles at a given locus
INTEGER MAXGEN = 78 Maximum # of genotypes at a locus
INTEGER MAXLOC = 20 Maximum # of single loci
INTEGER MAXPGT = 3 Maximum # of polygenotype components
INTEGER MAXGSE = 3 Maximum # of trait specific environment components
INTEGER MAXCSE = 3 Maximum # of common sibship environment components
INTEGER MAXCOV = 3 Maximum # of covariates
INTEGER MAXCPN = 32 Maximum # of components
INTEGER MAXTRT = 5 Maximum # of traits
CHARACTER*5 VRSION = 3.31 Version number
(Note: in big version, MAXLOC = 400, MAXCPN = 412, VRSION = 3.31B.)
EXTERNAL MODULES (use IMSL or PRNG)
RNOPT Set random number generator option
RNISD Skip 100,000 random numbers to reset generator seed
RNSET Set random number generator seed
RNGET Get random number generator seed
DRNUN Uniform random number generator
RNNBN Negative binomial random number generator
DRNNOR Normal random number generator
UMACH Set I/O unit
GLOBAL VARIABLES AND ARRAYS
Type Variable/Array Description
INTEGER INPUT Logical unit for input
INTEGER OUTPT1 Logical unit for G.A.S.P. summary output
INTEGER NALLEL(1:MAXLOC) Number of alleles for each locus (input)
INTEGER NGTYPE(1:MAXLOC) Number of genotypes for each locus
DOUBLE PRECISION THETA(1:MAXLOC) Recombination fractions (input)
DOUBLE PRECISION AFREQ(1:MAXALL,1:MAXLOC) Allele frequencies (input)
DOUBLE PRECISION GFREQ(1:MAXGEN,1:MAXLOC) Genotypic frequencies (derived)
DOUBLE PRECISION GMEAN(1:MAXGEN,1:MAXLOC) Genotypic means (input)
DOUBLE PRECISION GVAR(1:MAXGEN,1:MAXLOC) Genotypic variances (input)
DOUBLE PRECISION CUMGFQ(1:MAXGEN,1:MAXLOC) Cumulative genotypic frequencies (derived)
DOUBLE PRECISION CPNPOV(1:MAXCPN,1:MAXTRT) Proportion of variance for each component (input)
DOUBLE PRECISION KI(1:MAXLOC,1:MAXTRT) Weight for each single locus
DOUBLE PRECISION MEAN(1:MAXTRT) Overall means for single locus components
DOUBLE PRECISION KE(1:MAXTRT) Overall weights for single locus components
CHARACTER*10 LOCNAM(1:MAXLOC) Locus names (input)
CHARACTER*1 ALLELE(1:MAXALL,1:MAXLOC) Allele names (input)
CHARACTER*2 GTYPE(1:MAXGEN,1:MAXLOC) Genotype "names" (derived from alleles)
CHARACTER*10 CPNLST(1:MAXCPN) Component names
CHARACTER*10 PGTNAM(1:MAXPGT) Polygenotype names (input)
CHARACTER*10 GSENAM(1:MAXGSE) Trait specific environment names (input)
CHARACTER*10 CSENAM(1:MAXCSE) Common sibship environment component names (input)
CHARACTER*10 COVNAM(1:MAXCOV) Covariate names (input)
CHARACTER*10 TRTNAM(1:MAXTRT) Trait names (input)
CHARACTER*10 CPNNAM(1:MAXCPN,1:MAXTRT) Component names for each trait
DOUBLE PRECISION LOCPOV(1:MAXLOC,1:MAXTRT) Proportions of variance - single locus
DOUBLE PRECISION PGTPOV(1:MAXPGT,1:MAXTRT) Proportions of variance - polygene
DOUBLE PRECISION GSEPOV(1:MAXGSE,1:MAXTRT) Proportions of variance - trait specific environment
DOUBLE PRECISION CSEPOV(1:MAXCSE,1:MAXTRT) Proportions of variance - common sibship environment
DOUBLE PRECISION COVPOV(1:MAXCOV,1:MAXTRT) Proportions of variance - covariate
DOUBLE PRECISION QVAL(1:MAXLOC,1:MXPRSN)
DOUBLE PRECISION QNTTYP(1:MAXLOC,1:MXPRSN) Quantitative phenotype for each invidivual's genoytpe
DOUBLE PRECISION PGTTYP(1:MAXPGT,1:MXPRSN) Polygenotype values
DOUBLE PRECISION CSETYP(1:MAXCSE,1:MXPRSN) Common sibship environment values
DOUBLE PRECISION COVTYP(1:MAXCOV,1:MXPRSN) Covariate values
DOUBLE PRECISION CUMQNT(1:MAXTRT,1:MXPRSN) Cumulative quantitative phenotypes
DOUBLE PRECISION CUMPGT(1:MAXTRT,1:MXPRSN) Cumulative polygenotype values
DOUBLE PRECISION CUMCSE(1:MAXTRT,1:MXPRSN) Cumulative common sibship environment values
DOUBLE PRECISION CUMCOV(1:MAXTRT,1:MXPRSN) Cumulative covariate values
DOUBLE PRECISION TRAIT(1:MAXTRT,1:MXPRSN) Trait values
DOUBLE PRECISION RNDEV(1:MAXTRT,1:MXPRSN) Trait specific random deviates
INTEGER FNUM(1:MXPRSN) Family numbers
INTEGER ID(1:MXPRSN) Individual IDs
INTEGER FATHR(1:MXPRSN) Father IDs
INTEGER MOTHR(1:MXPRSN) Mother IDs
INTEGER PREL(1:MXPRSN) Rel numbers
INTEGER PMATE(1:MXPRSN) Mate pointers
INTEGER PMR(1:MXPRSN) Multiple record pointers
INTEGER POFF(1:MXPRSN) Offspring pointers
INTEGER PSIB(1:MXPRSN) Sib pointers
INTEGER PFATH(1:MXPRSN) Father pointers
INTEGER PMOTH(1:MXPRSN) Mother pointers
INTEGER AGE(1:MXPRSN) Reserved for future use
LOGICAL INCLUD(1:MXPRSN) Inclusion status
CHARACTER*4 STDCDE(1:MXPRSN) Study codes
CHARACTER*4 AFNUM(1:MXPRSN) Family numbers (character version)
CHARACTER*4 AID(1:MXPRSN) Individual IDs (character version)
CHARACTER*4 AFATHR(1:MXPRSN) Father IDs (character version)
CHARACTER*4 AMOTHR(1:MXPRSN) Mother IDs (character version)
CHARACTER*1 SEX(1:MXPRSN) Sex (male = M, female = F)
CHARACTER*2 LOCUS(1:MAXLOC,1:MXPRSN) Genetic components - locus line
CHARACTER*2 GENTYP(1:MAXLOC,1:MXPRSN) Switched qualitative phenotypes for the locus line
INTEGER IOPT Option for random number generator
INTEGER AGSEED Reserved for future use
INTEGER SXSEED Sex seed
INTEGER OFSEED Offspring size seed
INTEGER GTSEED(0:MAXLOC) Genotype seeds
INTEGER GSESD Trait specific environment seed
INTEGER CHSEED Chromatid seed
INTEGER XOSEED Crossover seed
INTEGER PHSEED Phase seed
INTEGER PGSEED Polygenotype seeds
INTEGER CSESD Common sibship environment seed
INTEGER COVSD Covariate seed
CHARACTER*6 ERRSUB Subroutine where error occurs
CHARACTER*10 ERRLEV Error level
CHARACTER*100 ERRMSG Error message
INTEGER P Index for number of persons in sample
INTEGER CPNTOT Number of components in component list
INTEGER NUMLOC Number of loci
INTEGER NUMPGT Total # of polygenotypes
INTEGER NUMGSE Total # of trait specific environments
INTEGER NUMCSE Total # of common sibship environments
INTEGER NUMCOV Total # of covariates
INTEGER NUMTRT Total # of traits
INTEGER NUMCPN(1:MAXTRT) Total # of components in each trait
INTEGER TRTLOC(1:MAXTRT) # of single locus components in each trait
INTEGER TRTPGT(1:MAXTRT) # of polygenotype components in each trait
INTEGER TRTGSE(1:MAXTRT) # of trait specific environment components in each trait
INTEGER TRTCSE(1:MAXTRT) # of common sibship environment components in each trait
INTEGER TRTCOV(1:MAXTRT) # of covariate components in each trait
INTEGER LSTLOC(1:MAXLOC,1:MAXTRT) Locus names for each trait
INTEGER LSTPGT(1:MAXPGT,1:MAXTRT) Polygenotype names for each trait
INTEGER LSTGSE(1:MAXTRT) Trait specific environment names for each trait
INTEGER LSTCSE(1:MAXCSE,1:MAXTRT) Common sibship environment names for each trait
INTEGER LSTCOV(1:MAXCOV,1:MAXTRT) Covariate names for each trait
INTEGER SAMPLE Number of samples
INTEGER NFAM Number of families
INTEGER FAMSIZ Size of family
LOGICAL LSTNUM Reserved for internal use
DOUBLE PRECISION NBP1 Negative binomial parameter 1
DOUBLE PRECISION NBP2 Negative binomial parameter 2
INTEGER HSIB Reserved for internal use
INTEGER POINTR Reserved for internal use
INTEGER FAMILY Reserved for internal use
INTEGER IDPTR Reserved for internal use
INTEGER FXTYPE Reserved for internal use
INTEGER PSTACK(1:MXPRSN) Reserved for internal use
INTEGER MATE1 Reserved for internal use
INTEGER MATE2 Reserved for internal use
INTEGER M Reserved for internal use
INTEGER N Reserved for internal use
INTEGER PERSON Reserved for internal use
INTEGER NOFFSP Reserved for internal use
INTEGER PLUSHS Reserved for internal use
CHARACTER*4 STUDY Study code
CHARACTER*2 FXLOC(1:MAXLOC,1:2) Reserved for internal use
CHARACTER*10 FAMTYP Family type
CHARACTER*10 OFFTYP Offspring type
|
Online Research Resources
