Lines Matching refs:lhsa
288 lhsabinit(lhsa, lhsb, isize);
393 lhsa(1,1,i) = - tmp2 * fjac(1,1,i-1)
396 lhsa(1,2,i) = - tmp2 * fjac(1,2,i-1)
398 lhsa(1,3,i) = - tmp2 * fjac(1,3,i-1)
400 lhsa(1,4,i) = - tmp2 * fjac(1,4,i-1)
402 lhsa(1,5,i) = - tmp2 * fjac(1,5,i-1)
405 lhsa(2,1,i) = - tmp2 * fjac(2,1,i-1)
407 lhsa(2,2,i) = - tmp2 * fjac(2,2,i-1)
410 lhsa(2,3,i) = - tmp2 * fjac(2,3,i-1)
412 lhsa(2,4,i) = - tmp2 * fjac(2,4,i-1)
414 lhsa(2,5,i) = - tmp2 * fjac(2,5,i-1)
417 lhsa(3,1,i) = - tmp2 * fjac(3,1,i-1)
419 lhsa(3,2,i) = - tmp2 * fjac(3,2,i-1)
421 lhsa(3,3,i) = - tmp2 * fjac(3,3,i-1)
424 lhsa(3,4,i) = - tmp2 * fjac(3,4,i-1)
426 lhsa(3,5,i) = - tmp2 * fjac(3,5,i-1)
429 lhsa(4,1,i) = - tmp2 * fjac(4,1,i-1)
431 lhsa(4,2,i) = - tmp2 * fjac(4,2,i-1)
433 lhsa(4,3,i) = - tmp2 * fjac(4,3,i-1)
435 lhsa(4,4,i) = - tmp2 * fjac(4,4,i-1)
438 lhsa(4,5,i) = - tmp2 * fjac(4,5,i-1)
441 lhsa(5,1,i) = - tmp2 * fjac(5,1,i-1)
443 lhsa(5,2,i) = - tmp2 * fjac(5,2,i-1)
445 lhsa(5,3,i) = - tmp2 * fjac(5,3,i-1)
447 lhsa(5,4,i) = - tmp2 * fjac(5,4,i-1)
449 lhsa(5,5,i) = - tmp2 * fjac(5,5,i-1)
580 matvec_sub(&lhsa(1,1,i),
586 matmul_sub(&lhsa(1,1,i),
609 matvec_sub(&lhsa(1,1,isize),
615 matmul_sub(&lhsa(1,1,isize),