Home
last modified time | relevance | path

Searched refs:nprl (Results 1 – 5 of 5) sorted by relevance

/dports/science/quantum-espresso/q-e-qe-6.7.0/upflib/
H A Dhgh2qe.f90607 read(string,*) r_l(l),nprl
608 nproj(l)=nprl
609 if(nprl>0)then
610 read(string,*) r_l(l),nprl, &
612 j=2,nprl) !h_ij 1st line
613 do i=2,nprl
625 else if (nprl<0) then
627 nprl=-nprl
633 if(nprl==3) read(11,*) psppar(3,l,1)! third line
638 do i=1,nprl
[all …]
H A Dgth.f90525 nprl, os, ns, iv, jv local
624 read (iunps, *, err=400) rrl,nprl,(hij(ll,1,jj),jj=1,nprl)
625 upf%nbeta = upf%nbeta + nprl
627 do ii=2,nprl
628 read (iunps, *, err=400) (hij(ll,ii,jj),jj=ii,nprl)
630 nproj(ll+1)=nprl
637 do ii=1,nprl
638 read (iunps, *, err=400) (kij(ll,ii,jj),jj=ii,nprl)
664 nprl=nproj(ll+1)
665 iloop: do ii=1,nprl
[all …]
/dports/math/octave-forge-signal/signal-1.4.1/inst/
H A Dzp2sos.m122 nprl=npc+nprsec; # index of last real pole section
134 elseif i<=nprl # lay down a pair of real poles:
/dports/audio/din/din-52/src/
H A Dmenu.h754 note_poly_radius_listener nprl; member
H A Dmenu.cc2260 sp_mondrian_change_note_poly_radius.set ("Note polygon radius", 1, 0, MILLION, &nprl); in setup_items()