/********************************************************************/
/* Copyright (c) 2017 System fugen G.K. and Yuzi Mizuno          */
/* All rights reserved.                                             */
/********************************************************************/
// FUNCTION TO EVALUATE SCALOR TRIPLE PRODUCT OF VECTOR V1,V2,V3. 
//bvs3pd_=determinant(V1,V2,V3).
// ****INPUT**** 
//     V1(3),V2(3),V3(3).....THREE VECTORS OF SPACE DIMENSION 3. 
// ****OUTPUT*** 
//     BVS3PD.................TRIPLE PRODUCT(SCOLAR VALUE). 
double bvs3pd_(const double *v1,const double *v2,const double *v3);