For edenite + 4 quartz = tremolite + albite (A) and edenite + albite = richterite + anorthite (B) equilibrium. Based on Al in Amp.
| Article | Tim Holland, Jon Blundy Non-ideal interactions in calcic amphiboles and their bearing on amphibole-plagioclase thermometry, 1994 [ref] |
|---|---|
| Collibration | |
| Precision | ± 50 °C |
| Ranges | 1 < P < 16 kbar, 400 °C < T < 1100 °C |
| Renew sensors | Blundy and Holland (1990), Kohn and Spear (1989, 1990). |
source('recalc_amp_holland_blundy.r');
sensors.p.amp_pl_holland_blundy <- function(Amp, Temp, usePFU = FALSE, ...){
if(!usePFU) Amp <- recalc.amp_holland_blundy(Amp);
P <- 4.76*Amp$Al_pfu-3.01-((Temp-675)/85)*(0.53*Amp$Al_pfu+0.005294*(Temp-675))
return (data.frame(Name=Amp$Name, T_seq=Temp, P_calc_Holland_Blundy=P));
}
sensors.p.amp_pl_holland_blundy.args <- function() {
ars <- list();
ars$minerals = c('Amp');
ars$ranges = c('Temp');
return(ars);
}