/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/argos/ |
H A D | argos_prep_solvat.F | 1 logical function argos_prep_solvat(islv,lfnout,boxs,xslv,vslv, 11 integer islv,mwms,mwa,nwms,nwa,mwm,nwm,msa,nsa,lfnout 23 if(islv.eq.0.or.nwms.le.0) goto 9999 54 if(islv.eq.1.or.islv.eq.3) then 56 elseif(islv.eq.2) then 83 if(islv.eq.3) then 108 if(islv.eq.1) write(lfnout,1000) box 110 if(islv.eq.2) write(lfnout,1001) 0.5d0*box(1) 112 if(islv.eq.3) write(lfnout,1002) box
|
H A D | argos_prepare_solvat.F | 1 logical function argos_prepare_solvat(islv,lfnout,boxs,xslv,vslv, 11 integer islv,mwms,mwa,nwms,nwa,mwm,nwm,msa,nsa,lfnout 23 if(islv.eq.0.or.nwms.le.0) goto 9999 54 if(islv.eq.1.or.islv.eq.3) then 56 elseif(islv.eq.2) then 83 if(islv.eq.3) then 108 if(islv.eq.1) write(lfnout,1000) box 110 if(islv.eq.2) write(lfnout,1001) 0.5d0*box(1) 112 if(islv.eq.3) write(lfnout,1002) box
|
H A D | argos_prepare_slvnum.F | 1 logical function argos_prepare_slvnum(islv,boxs,nwms,box,nwm) 7 integer islv,nwms,nwm 11 if(islv.eq.1) then 14 elseif(islv.eq.2) then 17 elseif(islv.eq.3) then
|
H A D | argos_prep_slvnum.F | 1 logical function argos_prep_slvnum(islv,boxs,nwms,box,nwm) 7 integer islv,nwms,nwm 11 if(islv.eq.1) then 14 elseif(islv.eq.2) then 17 elseif(islv.eq.3) then
|
H A D | argos_prepare_mkrst.F | 75 integer length,len,islv,idum1,idum2,idum3,idum4,iwater,irenum 1166 islv=0 1180 islv=1 1192 islv=1 1206 islv=2 1220 islv=3 1223 if(islv.eq.0) call md_abort('Illegal solvation type',9999) 1225 write(lfnout,1013) islv,box 1246 if(.not.argos_prepare_slvnum(islv,boxs,nwms,box,mwm)) 1268 if(.not.argos_prepare_solvat(islv,lfnout,boxs,dbl_mb(i_xslv),
|
H A D | argos_prep_mkrst.F | 74 integer length,len,islv,idum1,idum2,idum3,idum4,iwater,irenum 1157 islv=0 1171 islv=1 1183 islv=1 1197 islv=2 1211 islv=3 1214 if(islv.eq.0) call md_abort('Illegal solvation type',9999) 1216 write(lfnout,1013) islv,box 1237 if(.not.argos_prep_slvnum(islv,boxs,nwms,box,mwm)) 1259 if(.not.argos_prep_solvat(islv,lfnout,boxs,dbl_mb(i_xslv),
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/prepar/ |
H A D | pre_solvat.F | 1 logical function pre_solvat(islv,lfnout,boxs,xslv,vslv, 11 integer islv,mwms,mwa,nwms,nwa,mwm,nwm,msa,nsa,lfnout 23 if(islv.eq.0.or.nwms.le.0) goto 9999 54 if(islv.eq.1.or.islv.eq.3) then 56 elseif(islv.eq.2) then 83 if(islv.eq.3) then 107 if(islv.eq.1) write(lfnout,1000) box 109 if(islv.eq.2) write(lfnout,1001) 0.5d0*box(1) 111 if(islv.eq.3) write(lfnout,1002) box
|
H A D | pre_slvnum.F | 1 logical function pre_slvnum(islv,boxs,nwms,box,nwm) 7 integer islv,nwms,nwm local 11 if(islv.eq.1) then 14 elseif(islv.eq.2) then 17 elseif(islv.eq.3) then
|
H A D | pre_mkrst.F | 62 integer length,len,islv,idum1,idum2,idum3,idum4,iwater,irenum 1133 islv=0 1147 islv=1 1159 islv=1 1173 islv=2 1187 islv=3 1190 if(islv.eq.0) call md_abort('Illegal solvation type',9999) 1192 write(lfnout,1013) islv,box 1213 if(.not.pre_slvnum(islv,boxs,nwms,box,mwm)) 1235 if(.not.pre_solvat(islv,lfnout,boxs,dbl_mb(i_xslv),dbl_mb(i_vslv),
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/prepar/ |
H A D | pre_solvat.F | 1 logical function pre_solvat(islv,lfnout,boxs,xslv,vslv, 11 integer islv,mwms,mwa,nwms,nwa,mwm,nwm,msa,nsa,lfnout 23 if(islv.eq.0.or.nwms.le.0) goto 9999 54 if(islv.eq.1.or.islv.eq.3) then 56 elseif(islv.eq.2) then 83 if(islv.eq.3) then 107 if(islv.eq.1) write(lfnout,1000) box 109 if(islv.eq.2) write(lfnout,1001) 0.5d0*box(1) 111 if(islv.eq.3) write(lfnout,1002) box
|
H A D | pre_slvnum.F | 1 logical function pre_slvnum(islv,boxs,nwms,box,nwm) 7 integer islv,nwms,nwm 11 if(islv.eq.1) then 14 elseif(islv.eq.2) then 17 elseif(islv.eq.3) then
|
H A D | pre_mkrst.F | 62 integer length,len,islv,idum1,idum2,idum3,idum4,iwater,irenum 1133 islv=0 1147 islv=1 1159 islv=1 1173 islv=2 1187 islv=3 1190 if(islv.eq.0) call md_abort('Illegal solvation type',9999) 1192 write(lfnout,1013) islv,box 1213 if(.not.pre_slvnum(islv,boxs,nwms,box,mwm)) 1235 if(.not.pre_solvat(islv,lfnout,boxs,dbl_mb(i_xslv),dbl_mb(i_vslv),
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/argos/ |
H A D | argos_prepare_solvat.F | 1 logical function argos_prepare_solvat(islv,lfnout,boxs,xslv,vslv, 11 integer islv,mwms,mwa,nwms,nwa,mwm,nwm,msa,nsa,lfnout 23 if(islv.eq.0.or.nwms.le.0) goto 9999 54 if(islv.eq.1.or.islv.eq.3) then 56 elseif(islv.eq.2) then 83 if(islv.eq.3) then 108 if(islv.eq.1) write(lfnout,1000) box 110 if(islv.eq.2) write(lfnout,1001) 0.5d0*box(1) 112 if(islv.eq.3) write(lfnout,1002) box
|
H A D | argos_prep_solvat.F | 1 logical function argos_prep_solvat(islv,lfnout,boxs,xslv,vslv, 11 integer islv,mwms,mwa,nwms,nwa,mwm,nwm,msa,nsa,lfnout 23 if(islv.eq.0.or.nwms.le.0) goto 9999 54 if(islv.eq.1.or.islv.eq.3) then 56 elseif(islv.eq.2) then 83 if(islv.eq.3) then 108 if(islv.eq.1) write(lfnout,1000) box 110 if(islv.eq.2) write(lfnout,1001) 0.5d0*box(1) 112 if(islv.eq.3) write(lfnout,1002) box
|
H A D | argos_prep_slvnum.F | 1 logical function argos_prep_slvnum(islv,boxs,nwms,box,nwm) 7 integer islv,nwms,nwm 11 if(islv.eq.1) then 14 elseif(islv.eq.2) then 17 elseif(islv.eq.3) then
|
H A D | argos_prepare_slvnum.F | 1 logical function argos_prepare_slvnum(islv,boxs,nwms,box,nwm) 7 integer islv,nwms,nwm 11 if(islv.eq.1) then 14 elseif(islv.eq.2) then 17 elseif(islv.eq.3) then
|
H A D | argos_prep_mkrst.F | 74 integer length,len,islv,idum1,idum2,idum3,idum4,iwater,irenum 1157 islv=0 1171 islv=1 1183 islv=1 1197 islv=2 1211 islv=3 1214 if(islv.eq.0) call md_abort('Illegal solvation type',9999) 1216 write(lfnout,1013) islv,box 1237 if(.not.argos_prep_slvnum(islv,boxs,nwms,box,mwm)) 1259 if(.not.argos_prep_solvat(islv,lfnout,boxs,dbl_mb(i_xslv),
|
H A D | argos_prepare_mkrst.F | 75 integer length,len,islv,idum1,idum2,idum3,idum4,iwater,irenum 1166 islv=0 1180 islv=1 1192 islv=1 1206 islv=2 1220 islv=3 1223 if(islv.eq.0) call md_abort('Illegal solvation type',9999) 1225 write(lfnout,1013) islv,box 1246 if(.not.argos_prepare_slvnum(islv,boxs,nwms,box,mwm)) 1268 if(.not.argos_prepare_solvat(islv,lfnout,boxs,dbl_mb(i_xslv),
|
/dports/lang/perl5.30/perl-5.30.3/ |
H A D | sv.c | 5288 const bool islv = SvTYPE(sv) == SVt_PVLV; in Perl_sv_force_normal_flags() local 5290 islv ? SVt_NULL : SvMAGIC(sv) || SvSTASH(sv) ? SVt_PVMG : SVt_PV; in Perl_sv_force_normal_flags() 5300 if (!islv) in Perl_sv_force_normal_flags() 5305 if (islv) { in Perl_sv_force_normal_flags() 5320 assert(!SvLEN(islv ? sv : temp)); in Perl_sv_force_normal_flags() 5325 SvLEN_set(islv ? sv : temp, SvCUR(sv)+1); in Perl_sv_force_normal_flags() 5332 if (!islv) { in Perl_sv_force_normal_flags()
|
H A D | regcomp.c | 20832 const bool islv = dsv && SvTYPE(dsv) == SVt_PVLV; in Perl_reg_temp_copy() local 20856 if (islv) { in Perl_reg_temp_copy() 20884 if (!islv) in Perl_reg_temp_copy()
|
/dports/lang/perl5.32/perl-5.32.1/ |
H A D | sv.c | 5326 const bool islv = SvTYPE(sv) == SVt_PVLV; in Perl_sv_force_normal_flags() local 5328 islv ? SVt_NULL : SvMAGIC(sv) || SvSTASH(sv) ? SVt_PVMG : SVt_PV; in Perl_sv_force_normal_flags() 5338 if (!islv) in Perl_sv_force_normal_flags() 5343 if (islv) { in Perl_sv_force_normal_flags() 5358 assert(!SvLEN(islv ? sv : temp)); in Perl_sv_force_normal_flags() 5363 SvLEN_set(islv ? sv : temp, SvCUR(sv)+1); in Perl_sv_force_normal_flags() 5370 if (!islv) { in Perl_sv_force_normal_flags()
|
/dports/lang/perl5.34/perl-5.34.0/ |
H A D | sv.c | 5271 const bool islv = SvTYPE(sv) == SVt_PVLV; in Perl_sv_force_normal_flags() local 5273 islv ? SVt_NULL : SvMAGIC(sv) || SvSTASH(sv) ? SVt_PVMG : SVt_PV; in Perl_sv_force_normal_flags() 5283 if (!islv) in Perl_sv_force_normal_flags() 5288 if (islv) { in Perl_sv_force_normal_flags() 5303 assert(!SvLEN(islv ? sv : temp)); in Perl_sv_force_normal_flags() 5308 SvLEN_set(islv ? sv : temp, SvCUR(sv)+1); in Perl_sv_force_normal_flags() 5315 if (!islv) { in Perl_sv_force_normal_flags()
|
H A D | regcomp.c | 21799 const bool islv = dsv && SvTYPE(dsv) == SVt_PVLV; in Perl_reg_temp_copy() local 21823 if (islv) { in Perl_reg_temp_copy() 21851 if (!islv) in Perl_reg_temp_copy()
|
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/ |
H A D | sv.c | 5403 const bool islv = SvTYPE(sv) == SVt_PVLV; in Perl_sv_force_normal_flags() local 5405 islv ? SVt_NULL : SvMAGIC(sv) || SvSTASH(sv) ? SVt_PVMG : SVt_PV; in Perl_sv_force_normal_flags() 5415 if (!islv) in Perl_sv_force_normal_flags() 5420 if (islv) { in Perl_sv_force_normal_flags() 5435 assert(!SvLEN(islv ? sv : temp)); in Perl_sv_force_normal_flags() 5440 SvLEN_set(islv ? sv : temp, SvCUR(sv)+1); in Perl_sv_force_normal_flags() 5447 if (!islv) { in Perl_sv_force_normal_flags()
|
H A D | regcomp.c | 21897 const bool islv = dsv && SvTYPE(dsv) == SVt_PVLV; in Perl_reg_temp_copy() local 21921 if (islv) { in Perl_reg_temp_copy() 21959 if (!islv) in Perl_reg_temp_copy()
|