geophys (version 1.4-1)

DO.DYKE: Heat for Dyke Intrusion

Description

Solve heat equation for dyke intrusion.

Usage

DO.DYKE(a = a, x = x, t = t, k = k, T0 = T0, NDIM = TRUE)

Arguments

a

Thickness of dyke (meters)

x

vector of distances across dyke (m)

t

time in seconds

k

diffusion constant

T0

Temperature at infinity

NDIM

logical, TRUE=use nondimensional temperature for text labels

Value

graphical side effects

See Also

get.heat2, DO.HALFSPACE

Examples

# NOT RUN {
 a = 10;
k=10^6


  DO.DYKE(NDIM=TRUE)

####  dimensional variable plot
   DO.DYKE(NDIM=FALSE)


# }