R: Normal Fault Cartoon

normal.fault {RFOC} | R Documentation

## Normal Fault Cartoon

### Description

Illustrate a normal fault using animation

### Usage

    normal.fault(ANG = (45), anim = seq(from = 0, to = 1, by = 0.1),
                KAPPA = 4, Light = c(45, 45))

### Arguments

`ANG` | Angle of dip
`anim` | animation vector
`KAPPA` | Phong parameter for lighting
`Light` | lighting point

### Details

Program will animate a normal fault for educational purposes. Animation must be stopped by halting execution.

### Value

Graphical Side effects

### Author(s)

Jonathan M. Lees<jonathan.lees@unc.edu>

### See Also

strikeslip.fault, thrust.fault

### Examples

    normal.fault(45, anim=0, KAPPA=4, Light=c(-20, 80))

    ## Not run:
    #### execute a stop command to stop this animation
    anim= seq(from=0, to=1, by=.1)

     normal.fault(45, anim=anim, KAPPA=4, Light=c(-20, 80))

    ## End(Not run)

[Package RFOC version 3.4-3 Index]