Lines Matching refs:Q

340      &            u(npro),      eb1(npro),      Q(npro,5,5),
374 & dxidx, u, Q)
383 & Q, eigmax)
412 & Q(:,2,i) * ( compK(:, 1) * Q(:,2,i) + compK(:, 2) * Q(:,3,i)
413 & + compK(:, 4) * Q(:,4,i) + compK(:, 7) * Q(:,5,i) )
414 & + Q(:,3,i) * ( compK(:, 2) * Q(:,2,i) + compK(:, 3) * Q(:,3,i)
415 & + compK(:, 5) * Q(:,4,i) + compK(:, 8) * Q(:,5,i) )
416 & + Q(:,4,i) * ( compK(:, 4) * Q(:,2,i) + compK(:, 5) * Q(:,3,i)
417 & + compK(:, 6) * Q(:,4,i) + compK(:, 9) * Q(:,5,i) )
418 & + Q(:,5,i) * ( compK(:, 7) * Q(:,2,i) + compK(:, 8) * Q(:,3,i)
419 & + compK(:, 9) * Q(:,4,i) + compK(:,10) * Q(:,5,i) )
490 STau(:, 1) = rlam(:,1) * Q(:,1,1) * Q(:,1,1) +
491 & rlam(:,2) * Q(:,1,2) * Q(:,1,2) +
492 & rlam(:,3) * Q(:,1,3) * Q(:,1,3) +
493 & rlam(:,4) * Q(:,1,4) * Q(:,1,4) +
494 & rlam(:,5) * Q(:,1,5) * Q(:,1,5)
496 STau(:, 2) = rlam(:,1) * Q(:,1,1) * Q(:,2,1) +
497 & rlam(:,2) * Q(:,1,2) * Q(:,2,2) +
498 & rlam(:,3) * Q(:,1,3) * Q(:,2,3) +
499 & rlam(:,4) * Q(:,1,4) * Q(:,2,4) +
500 & rlam(:,5) * Q(:,1,5) * Q(:,2,5)
502 STau(:, 3) = rlam(:,1) * Q(:,2,1) * Q(:,2,1) +
503 & rlam(:,2) * Q(:,2,2) * Q(:,2,2) +
504 & rlam(:,3) * Q(:,2,3) * Q(:,2,3) +
505 & rlam(:,4) * Q(:,2,4) * Q(:,2,4) +
506 & rlam(:,5) * Q(:,2,5) * Q(:,2,5)
508 STau(:, 4) = rlam(:,1) * Q(:,1,1) * Q(:,3,1) +
509 & rlam(:,2) * Q(:,1,2) * Q(:,3,2) +
510 & rlam(:,3) * Q(:,1,3) * Q(:,3,3) +
511 & rlam(:,4) * Q(:,1,4) * Q(:,3,4) +
512 & rlam(:,5) * Q(:,1,5) * Q(:,3,5)
514 STau(:, 5) = rlam(:,1) * Q(:,2,1) * Q(:,3,1) +
515 & rlam(:,2) * Q(:,2,2) * Q(:,3,2) +
516 & rlam(:,3) * Q(:,2,3) * Q(:,3,3) +
517 & rlam(:,4) * Q(:,2,4) * Q(:,3,4) +
518 & rlam(:,5) * Q(:,2,5) * Q(:,3,5)
520 STau(:, 6) = rlam(:,1) * Q(:,3,1) * Q(:,3,1) +
521 & rlam(:,2) * Q(:,3,2) * Q(:,3,2) +
522 & rlam(:,3) * Q(:,3,3) * Q(:,3,3) +
523 & rlam(:,4) * Q(:,3,4) * Q(:,3,4) +
524 & rlam(:,5) * Q(:,3,5) * Q(:,3,5)
526 STau(:, 7) = rlam(:,1) * Q(:,1,1) * Q(:,4,1) +
527 & rlam(:,2) * Q(:,1,2) * Q(:,4,2) +
528 & rlam(:,3) * Q(:,1,3) * Q(:,4,3) +
529 & rlam(:,4) * Q(:,1,4) * Q(:,4,4) +
530 & rlam(:,5) * Q(:,1,5) * Q(:,4,5)
532 STau(:, 8) = rlam(:,1) * Q(:,2,1) * Q(:,4,1) +
533 & rlam(:,2) * Q(:,2,2) * Q(:,4,2) +
534 & rlam(:,3) * Q(:,2,3) * Q(:,4,3) +
535 & rlam(:,4) * Q(:,2,4) * Q(:,4,4) +
536 & rlam(:,5) * Q(:,2,5) * Q(:,4,5)
538 STau(:, 9) = rlam(:,1) * Q(:,3,1) * Q(:,4,1) +
539 & rlam(:,2) * Q(:,3,2) * Q(:,4,2) +
540 & rlam(:,3) * Q(:,3,3) * Q(:,4,3) +
541 & rlam(:,4) * Q(:,3,4) * Q(:,4,4) +
542 & rlam(:,5) * Q(:,3,5) * Q(:,4,5)
544 STau(:,10) = rlam(:,1) * Q(:,4,1) * Q(:,4,1) +
545 & rlam(:,2) * Q(:,4,2) * Q(:,4,2) +
546 & rlam(:,3) * Q(:,4,3) * Q(:,4,3) +
547 & rlam(:,4) * Q(:,4,4) * Q(:,4,4) +
548 & rlam(:,5) * Q(:,4,5) * Q(:,4,5)
550 STau(:,11) = rlam(:,1) * Q(:,1,1) * Q(:,5,1) +
551 & rlam(:,2) * Q(:,1,2) * Q(:,5,2) +
552 & rlam(:,3) * Q(:,1,3) * Q(:,5,3) +
553 & rlam(:,4) * Q(:,1,4) * Q(:,5,4) +
554 & rlam(:,5) * Q(:,1,5) * Q(:,5,5)
556 STau(:,12) = rlam(:,1) * Q(:,2,1) * Q(:,5,1) +
557 & rlam(:,2) * Q(:,2,2) * Q(:,5,2) +
558 & rlam(:,3) * Q(:,2,3) * Q(:,5,3) +
559 & rlam(:,4) * Q(:,2,4) * Q(:,5,4) +
560 & rlam(:,5) * Q(:,2,5) * Q(:,5,5)
562 STau(:,13) = rlam(:,1) * Q(:,3,1) * Q(:,5,1) +
563 & rlam(:,2) * Q(:,3,2) * Q(:,5,2) +
564 & rlam(:,3) * Q(:,3,3) * Q(:,5,3) +
565 & rlam(:,4) * Q(:,3,4) * Q(:,5,4) +
566 & rlam(:,5) * Q(:,3,5) * Q(:,5,5)
568 STau(:,14) = rlam(:,1) * Q(:,4,1) * Q(:,5,1) +
569 & rlam(:,2) * Q(:,4,2) * Q(:,5,2) +
570 & rlam(:,3) * Q(:,4,3) * Q(:,5,3) +
571 & rlam(:,4) * Q(:,4,4) * Q(:,5,4) +
572 & rlam(:,5) * Q(:,4,5) * Q(:,5,5)
574 STau(:,15) = rlam(:,1) * Q(:,5,1) * Q(:,5,1) +
575 & rlam(:,2) * Q(:,5,2) * Q(:,5,2) +
576 & rlam(:,3) * Q(:,5,3) * Q(:,5,3) +
577 & rlam(:,4) * Q(:,5,4) * Q(:,5,4) +
578 & rlam(:,5) * Q(:,5,5) * Q(:,5,5)
802 & u(npro), eb1(npro), Q(npro,5,5),
836 & dxidx, u, Q)
845 & Q, eigmax)
878 & Q(:,2,i) * ( compK(:, 1) * Q(:,2,i) + compK(:, 2) * Q(:,3,i)
879 & + compK(:, 4) * Q(:,4,i) + compK(:, 7) * Q(:,5,i) )
880 & + Q(:,3,i) * ( compK(:, 2) * Q(:,2,i) + compK(:, 3) * Q(:,3,i)
881 & + compK(:, 5) * Q(:,4,i) + compK(:, 8) * Q(:,5,i) )
882 & + Q(:,4,i) * ( compK(:, 4) * Q(:,2,i) + compK(:, 5) * Q(:,3,i)
883 & + compK(:, 6) * Q(:,4,i) + compK(:, 9) * Q(:,5,i) )
884 & + Q(:,5,i) * ( compK(:, 7) * Q(:,2,i) + compK(:, 8) * Q(:,3,i)
885 & + compK(:, 9) * Q(:,4,i) + compK(:,10) * Q(:,5,i) )
949 STau(:, 1, i) = rlamtmp(:,1,i) * Q(:,1,1) * Q(:,1,1) +
950 & rlamtmp(:,2,i) * Q(:,1,2) * Q(:,1,2) +
951 & rlamtmp(:,3,i) * Q(:,1,3) * Q(:,1,3) +
952 & rlamtmp(:,4,i) * Q(:,1,4) * Q(:,1,4) +
953 & rlamtmp(:,5,i) * Q(:,1,5) * Q(:,1,5)
955 STau(:, 2, i) = rlamtmp(:,1,i) * Q(:,1,1) * Q(:,2,1) +
956 & rlamtmp(:,2,i) * Q(:,1,2) * Q(:,2,2) +
957 & rlamtmp(:,3,i) * Q(:,1,3) * Q(:,2,3) +
958 & rlamtmp(:,4,i) * Q(:,1,4) * Q(:,2,4) +
959 & rlamtmp(:,5,i) * Q(:,1,5) * Q(:,2,5)
961 STau(:, 3, i) = rlamtmp(:,1,i) * Q(:,2,1) * Q(:,2,1) +
962 & rlamtmp(:,2,i) * Q(:,2,2) * Q(:,2,2) +
963 & rlamtmp(:,3,i) * Q(:,2,3) * Q(:,2,3) +
964 & rlamtmp(:,4,i) * Q(:,2,4) * Q(:,2,4) +
965 & rlamtmp(:,5,i) * Q(:,2,5) * Q(:,2,5)
967 STau(:, 4, i) = rlamtmp(:,1,i) * Q(:,1,1) * Q(:,3,1) +
968 & rlamtmp(:,2,i) * Q(:,1,2) * Q(:,3,2) +
969 & rlamtmp(:,3,i) * Q(:,1,3) * Q(:,3,3) +
970 & rlamtmp(:,4,i) * Q(:,1,4) * Q(:,3,4) +
971 & rlamtmp(:,5,i) * Q(:,1,5) * Q(:,3,5)
973 STau(:, 5, i) = rlamtmp(:,1,i) * Q(:,2,1) * Q(:,3,1) +
974 & rlamtmp(:,2,i) * Q(:,2,2) * Q(:,3,2) +
975 & rlamtmp(:,3,i) * Q(:,2,3) * Q(:,3,3) +
976 & rlamtmp(:,4,i) * Q(:,2,4) * Q(:,3,4) +
977 & rlamtmp(:,5,i) * Q(:,2,5) * Q(:,3,5)
979 STau(:, 6, i) = rlamtmp(:,1,i) * Q(:,3,1) * Q(:,3,1) +
980 & rlamtmp(:,2,i) * Q(:,3,2) * Q(:,3,2) +
981 & rlamtmp(:,3,i) * Q(:,3,3) * Q(:,3,3) +
982 & rlamtmp(:,4,i) * Q(:,3,4) * Q(:,3,4) +
983 & rlamtmp(:,5,i) * Q(:,3,5) * Q(:,3,5)
985 STau(:, 7, i) = rlamtmp(:,1,i) * Q(:,1,1) * Q(:,4,1) +
986 & rlamtmp(:,2,i) * Q(:,1,2) * Q(:,4,2) +
987 & rlamtmp(:,3,i) * Q(:,1,3) * Q(:,4,3) +
988 & rlamtmp(:,4,i) * Q(:,1,4) * Q(:,4,4) +
989 & rlamtmp(:,5,i) * Q(:,1,5) * Q(:,4,5)
991 STau(:, 8, i) = rlamtmp(:,1,i) * Q(:,2,1) * Q(:,4,1) +
992 & rlamtmp(:,2,i) * Q(:,2,2) * Q(:,4,2) +
993 & rlamtmp(:,3,i) * Q(:,2,3) * Q(:,4,3) +
994 & rlamtmp(:,4,i) * Q(:,2,4) * Q(:,4,4) +
995 & rlamtmp(:,5,i) * Q(:,2,5) * Q(:,4,5)
997 STau(:, 9, i) = rlamtmp(:,1,i) * Q(:,3,1) * Q(:,4,1) +
998 & rlamtmp(:,2,i) * Q(:,3,2) * Q(:,4,2) +
999 & rlamtmp(:,3,i) * Q(:,3,3) * Q(:,4,3) +
1000 & rlamtmp(:,4,i) * Q(:,3,4) * Q(:,4,4) +
1001 & rlamtmp(:,5,i) * Q(:,3,5) * Q(:,4,5)
1003 STau(:,10, i) = rlamtmp(:,1,i) * Q(:,4,1) * Q(:,4,1) +
1004 & rlamtmp(:,2,i) * Q(:,4,2) * Q(:,4,2) +
1005 & rlamtmp(:,3,i) * Q(:,4,3) * Q(:,4,3) +
1006 & rlamtmp(:,4,i) * Q(:,4,4) * Q(:,4,4) +
1007 & rlamtmp(:,5,i) * Q(:,4,5) * Q(:,4,5)
1009 STau(:,11, i) = rlamtmp(:,1,i) * Q(:,1,1) * Q(:,5,1) +
1010 & rlamtmp(:,2,i) * Q(:,1,2) * Q(:,5,2) +
1011 & rlamtmp(:,3,i) * Q(:,1,3) * Q(:,5,3) +
1012 & rlamtmp(:,4,i) * Q(:,1,4) * Q(:,5,4) +
1013 & rlamtmp(:,5,i) * Q(:,1,5) * Q(:,5,5)
1015 STau(:,12, i) = rlamtmp(:,1,i) * Q(:,2,1) * Q(:,5,1) +
1016 & rlamtmp(:,2,i) * Q(:,2,2) * Q(:,5,2) +
1017 & rlamtmp(:,3,i) * Q(:,2,3) * Q(:,5,3) +
1018 & rlamtmp(:,4,i) * Q(:,2,4) * Q(:,5,4) +
1019 & rlamtmp(:,5,i) * Q(:,2,5) * Q(:,5,5)
1021 STau(:,13, i) = rlamtmp(:,1,i) * Q(:,3,1) * Q(:,5,1) +
1022 & rlamtmp(:,2,i) * Q(:,3,2) * Q(:,5,2) +
1023 & rlamtmp(:,3,i) * Q(:,3,3) * Q(:,5,3) +
1024 & rlamtmp(:,4,i) * Q(:,3,4) * Q(:,5,4) +
1025 & rlamtmp(:,5,i) * Q(:,3,5) * Q(:,5,5)
1027 STau(:,14, i) = rlamtmp(:,1,i) * Q(:,4,1) * Q(:,5,1) +
1028 & rlamtmp(:,2,i) * Q(:,4,2) * Q(:,5,2) +
1029 & rlamtmp(:,3,i) * Q(:,4,3) * Q(:,5,3) +
1030 & rlamtmp(:,4,i) * Q(:,4,4) * Q(:,5,4) +
1031 & rlamtmp(:,5,i) * Q(:,4,5) * Q(:,5,5)
1033 STau(:,15, i) = rlamtmp(:,1,i) * Q(:,5,1) * Q(:,5,1) +
1034 & rlamtmp(:,2,i) * Q(:,5,2) * Q(:,5,2) +
1035 & rlamtmp(:,3,i) * Q(:,5,3) * Q(:,5,3) +
1036 & rlamtmp(:,4,i) * Q(:,5,4) * Q(:,5,4) +
1037 & rlamtmp(:,5,i) * Q(:,5,5) * Q(:,5,5)