R/CNOT2_01.R

CNOT2_01 <- function(a){
    cnot= matrix(c(1,0,0,0,0,1,0,0,0,0,0,1,0,0,1,0),nrow=4,ncol=4)
    result <-cnot%*%a
    result

}
tvganesh/QCSim documentation built on June 1, 2019, 2:57 a.m.