Lines Matching refs:ngauss
14 & shp(nshl,ngauss), shpfun(npro,nshl),
15 & shgl(nsd,nshl,ngauss), shg(npro,nshl,nsd),
16 & shglo(nsd,nshl,ngauss), shpo(nshl,ngauss),
37 & xmudmi(npro,ngauss), xmudmif(npro,ngauss),
517 & strl(numel,ngauss),
575 ngauss = nint(lcsyst)
683 ngauss = nint(lcsyst)
823 ngauss = nint(lcsyst)
884 & shgl(nsd,nshl,ngauss), shp(nshl,ngauss),
905 & shgl(nsd,nshl,ngauss), shp(nshl,ngauss),
906 & shglf(nsd,nshl,ngauss), shpf(nshl,ngauss),
927 & shgl(nsd,nshl,ngauss), shp(nshl,ngauss),
928 & shglf(nsd,nshl,ngauss), shpf(nshl,ngauss),
964 & strl(numel,ngauss),
1000 ngauss = nint(lcsyst)
1058 ngauss = nint(lcsyst)
1109 ngauss = nint(lcsyst)
1306 & dmodc(nfath), strl(numel,ngauss),
1371 ngauss = nint(lcsyst)
1386 ngauss = nint(lcsyst)
1414 ngauss = nint(lcsyst)
1451 ngauss = nint(lcsyst)
1644 & xdeno(nfath), strl(numel,ngauss),
1685 ngauss = nint(lcsyst)
1840 ngauss = nint(lcsyst)
1842 allocate ( fakexmu(npro,ngauss) )
1883 ngauss = nint(lcsyst)
1886 allocate ( fakexmu(npro,ngauss) )
2083 ngauss = nint(lcsyst)
2099 ngauss = nint(lcsyst)
2133 & strl(numel,ngauss), xa(nfath,3),
2172 ngauss = nint(lcsyst)
2492 & strl(numel,ngauss),
2560 ngauss = nint(lcsyst)
2569 if (ngaussf .ne. ngauss) then
2579 ngauss = nint(lcsyst)
3049 ngauss = nint(lcsyst)
3173 & strl(numel,ngauss),
3244 ngauss = nint(lcsyst)
3305 ngauss = nint(lcsyst)
3356 ngauss = nint(lcsyst)
3806 ngauss = nint(lcsyst)