/dports/math/libmesh/libmesh-1.6.2/contrib/exodusii/5.22b/exodus/forbind/test/ |
H A D | testrd1.f | 12 integer iin, iout, ierr 154 write (iout, 166 write( iout, 201 write (iout, 213 write( iout, 249 write (iout, 261 write( iout, 299 write (iout, 357 write (iout, 369 write( iout, [all …]
|
H A D | testrdd.f | 12 integer iin, iout, ierr 44 data iin /5/, iout /6/ 89 write (iout, '("x coords = ")') 91 write (iout, '(f5.1)') x(i) 96 write (iout, '(f5.1)') y(i) 143 write (iout, 155 write( iout, 235 write (iout, 247 write( iout, 360 write (iout, [all …]
|
H A D | testrd.f | 12 integer iin, iout, ierr 46 data iin /5/, iout /6/ 104 write (iout, '(f5.1)') x(i) 109 write (iout, '(f5.1)') y(i) 163 write (iout, 175 write( iout, 213 write (iout, 271 write (iout, 283 write( iout, 412 write (iout, [all …]
|
H A D | testwt3.f | 11 integer iin, iout 38 data iin /5/, iout /6/ 52 write (iout,'("after excre, error = ", i3)') ierr 60 write (iout,'("after excre, error = ", i3)') ierr 78 write (iout, '("after expini, error = ", i3)' ) ierr 108 write (iout, '("after expcor, error = ", i3)' ) ierr 117 write (iout, '("after expcon, error = ", i3)' ) ierr 132 write (iout, '("after expmap, error = ", i3)' ) ierr 151 write (iout, '("after expelb, error = ", i3)' ) ierr 214 write (iout, '("after expnp, error = ", i3)' ) ierr [all …]
|
H A D | testwt2.f | 10 integer iin, iout 56 data iin /5/, iout /6/ 73 write (iout, '("after excre, error = ", i4)' ) ierr 97 write (iout, '("after expini, error = ", i4)' ) ierr 216 write (iout, '("after expcor, error = ", i4)' ) ierr 464 write (iout, '("after expp, error = ", i4)' ) ierr 466 write (iout, '("after expp, error = ", i4)' ) ierr 468 write (iout, '("after expp, error = ", i4)' ) ierr 470 write (iout, '("after expp, error = ", i4)' ) ierr 472 write (iout, '("after expp, error = ", i4)' ) ierr [all …]
|
H A D | testwtm.f | 10 integer iin, iout 57 data iin /5/, iout /6/, nexofiles /5/ 71 write (iout, '("after excre, error = ", i4)' ) ierr 77 write (iout, 100 write (iout, '("after expini, error = ", i4)' ) ierr 142 write (iout, '("after expcor, error = ", i4)' ) ierr 249 write (iout, '("after exppn, error = ", i4)' ) ierr 252 write (iout, '("after expp, error = ", i4)' ) ierr 254 write (iout, '("after expp, error = ", i4)' ) ierr 379 write (iout, '("after expp, error = ", i4)' ) ierr [all …]
|
H A D | testrd_nsid.f | 12 integer iin, iout, ierr, ioff 29 data iin /5/, iout /6/ 78 write (iout, '("x coords = ")') 80 write (iout, '(f5.1)') x(i) 83 write (iout, '("y coords = ")') 85 write (iout, '(f5.1)') y(i) 89 write (iout, '("z coords = ")') 91 write (iout, '(f5.1)') z(i) 174 integer iout local 182 data iout /6/ [all …]
|
H A D | testwt1.f | 15 integer iin, iout 44 data iin /5/, iout /6/ 56 write (iout,'("after excre, error = ", i4)') ierr 74 write (iout, '("after expini, error = ", i4)' ) ierr 204 write (iout, '("after expmp, error = ", i4)' ) ierr 213 write (iout, '("after exppn, error = ", i4)' ) ierr 225 write (iout, '("after expem, error = ", i4)' ) ierr 228 write (iout, '("after expp, error = ", i4)' ) ierr 242 write (iout, '("after expp, error = ", i4)' ) ierr 265 write (iout, '("after expp, error = ", i4)' ) ierr [all …]
|
H A D | testwtd.f | 15 integer iin, iout 44 data iin /5/, iout /6/ 57 write (iout,'("after excre, error = ", i4)') ierr 73 write (iout, '("after expini, error = ", i4)' ) ierr 97 write (iout, '("after expcor, error = ", i4)' ) ierr 103 write (iout, '("after expcon, error = ", i4)' ) ierr 140 write (iout, '("after exppn, error = ", i4)' ) ierr 143 write (iout, '("after expp, error = ", i4)' ) ierr 145 write (iout, '("after expp, error = ", i4)' ) ierr 263 write (iout, '("after expp, error = ", i4)' ) ierr [all …]
|
H A D | testwt.f | 8 integer iin, iout 37 data iin /5/, iout /6/ 40 write (iout,'("after exopts, error = ", i4)') ierr 51 write (iout,'("after excre, error = ", i4)') ierr 66 write (iout, '("after expini, error = ", i4)' ) ierr 174 write (iout, '("after expcor, error = ", i4)' ) ierr 293 write (iout, '("after expp, error = ", i4)' ) ierr 299 write (iout, '("after expp, error = ", i4)' ) ierr 305 write (iout, '("after expp, error = ", i4)' ) ierr 311 write (iout, '("after expp, error = ", i4)' ) ierr [all …]
|
H A D | testcpln.f | 15 data iin /5/, iout /6/ 28 write (iout, '(/"after exopen, error = ",i3)') 31 write (iout, '("test.exo is an EXODUSII file; version ", 33 write (iout, '(" I/O word size: ",i4)') io_ws 35 write (iout, '(" Model Size",i2)') mod_sz 50 write (iout,'(" I/O word size: ",i4)') io_ws 53 write (iout, '(" Model Size",i2)') mod_sz 55 write (iout,'("after excre, error = ", i4)') ierr 58 write (iout, '(/"after excopy, error = ", i3)' ) ierr 61 write (iout, '(/"after exclos, error = ", i3)' ) ierr [all …]
|
H A D | testcpnl.f | 15 data iin /5/, iout /6/ 28 write (iout, '(/"after exopen, error = ",i3)') 31 write (iout, '("test.exo is an EXODUSII file; version ", 33 write (iout, '(" I/O word size: ",i4)') io_ws 35 write (iout, '(" Model Size",i2)') mod_sz 50 write (iout,'(" I/O word size: ",i4)') io_ws 53 write (iout, '(" Model Size",i2)') mod_sz 55 write (iout,'("after excre, error = ", i4)') ierr 58 write (iout, '(/"after excopy, error = ", i3)' ) ierr 61 write (iout, '(/"after exclos, error = ", i3)' ) ierr [all …]
|
/dports/net/iodine/iodine-0.7.0/src/ |
H A D | base128.c | 137 iout++; in base128_encode() 147 iout++; in base128_encode() 155 iout++; in base128_encode() 163 iout++; in base128_encode() 171 iout++; in base128_encode() 179 iout++; in base128_encode() 187 iout++; in base128_encode() 193 iout++; in base128_encode() 237 iout++; in base128_decode() 245 iout++; in base128_decode() [all …]
|
H A D | base32.c | 132 iout++; in base32_encode() 142 iout++; in base32_encode() 147 iout++; in base32_encode() 157 iout++; in base32_encode() 165 iout++; in base32_encode() 170 iout++; in base32_encode() 180 iout++; in base32_encode() 186 iout++; in base32_encode() 229 iout++; in base32_decode() 239 iout++; in base32_decode() [all …]
|
H A D | base64.c | 117 iout++; in base64_encode() 127 iout++; in base64_encode() 135 iout++; in base64_encode() 141 iout++; in base64_encode() 144 buf[iout] = '\0'; in base64_encode() 149 return iout; in base64_encode() 184 iout++; in base64_decode() 192 iout++; in base64_decode() 200 iout++; in base64_decode() 203 ubuf[iout] = '\0'; in base64_decode() [all …]
|
/dports/science/helfem/HelFEM-21461e9/src/legendre/ |
H A D | Matrix_Print.f90 | 66 write(iout,1) title 150 write(iout,1) title 232 write(iout,1) title 298 write(iout,1) title 357 write(iout,1) title 363 write (iout,3) 374 write (iout,3) 376 write (iout,5) a(:) 395 write(iout,1) title 401 write (iout,3) [all …]
|
/dports/mail/opendkim/opendkim-2.10.3/libopendkim/ |
H A D | base32.c | 58 int iout = 0; in dkim_base32_encode() local 70 iout++; in dkim_base32_encode() 82 iout++; in dkim_base32_encode() 87 iout++; in dkim_base32_encode() 98 iout++; in dkim_base32_encode() 106 iout++; in dkim_base32_encode() 111 iout++; in dkim_base32_encode() 122 iout++; in dkim_base32_encode() 128 iout++; in dkim_base32_encode() 151 buf[iout] = '\0'; in dkim_base32_encode() [all …]
|
/dports/science/xtb/xtb-6.4.1/src/ |
H A D | cqpath.f90 | 577 integer :: iout local 579 if (c == 'H') iout = 1 580 if (c == 'HE') iout = 2 581 if (c == 'LI') iout = 3 582 if (c == 'BE') iout = 4 583 if (c == 'B') iout = 5 584 if (c == 'C') iout = 6 585 if (c == 'N') iout = 7 586 if (c == 'O') iout = 8 587 if (c == 'F') iout = 9 [all …]
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/PHonon/PH/ |
H A D | write_eigenvectors.f90 | 33 write(iout,'(1x,74(''*''))') 54 write(iout,'(1x,74(''*''))') 88 write(iout,'(1x,74(''*''))') 104 write(iout,'(1x,74(''*''))') 137 iout=4 146 write(iout,'(''[FREQ]'')') 176 close(unit=iout) 205 iout=4 214 write(iout,'("CRYSTAL")') 216 write(iout,'("PRIMVEC")') [all …]
|
/dports/science/tinker/tinker/source/ |
H A D | intedit.f | 58 write (iout,30) 79 write (iout,60) 87 write (iout,70) 89 call prtint (iout) 118 write (iout,100) i 127 write (iout,140) 130 write (iout,150) 174 write (iout,220) 203 write (iout,280) 319 write (iout,10) [all …]
|
H A D | analyze.f | 61 write (iout,10) 73 write (iout,30) 135 write (iout,60) 374 write (iout,70) 425 write (iout,130) 580 write (iout,fstr) 807 write (iout,fstr) 809 write (iout,10) 818 write (iout,20) 827 write (iout,30) [all …]
|
H A D | mdstat.f | 89 write (iout,10) 93 write (iout,20) 105 flush (iout) 112 write (iout,50) iprint,istep 116 write (iout,60) pico 119 write (iout,70) pico 122 write (iout,80) pico 303 write (iout,300) deform 306 write (iout,310) deform 309 write (iout,320) deform [all …]
|
H A D | freefix.f | 151 write (iout,110) ri 153 write (iout,120) fi 156 write (iout,130) ro 158 write (iout,140) fo 254 write (iout,210) dg 256 write (iout,220) ds 258 write (iout,230) dh 338 write (iout,20) 344 write (iout,50) 350 write (iout,80) [all …]
|
/dports/science/siesta/siesta-4.1.5/Util/Bands/ |
H A D | gnubands.f90 | 53 integer :: iout, gnuout variable 69 iout = 6 100 iout = 123 207 if ( iout /= 6 ) then 209 open( iout, file = trim(outfile), & 223 write(iout,"(a)") '#' 235 write(iout,"(a)") '# Bands for all spins' 255 write(iout,"(a)") '#' 274 if ( add_new_line ) write(iout,'(/)') 287 if ( iout /= 6 ) then [all …]
|
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/contrib/iapbs/modules/NAMD/ |
H A D | GlobalMasterAPBS.C | 264 iout << "APBS: Linearized RPBE.\n"; in check_config() 266 iout << "APBS: Nonlinear RPBE.\n"; in check_config() 315 iout << "APBS: Grid values: \n"; in check_config() 342 iout << "APBS: Required memory: " << in check_config() 678 iout << "APBS: Required memory: " << in call_apbs() 686 iout << numAtoms << "\n" << endi; in call_apbs() 693 iout << grid[i] << " " in call_apbs() 703 iout << r_param[i] << " " << endi; in call_apbs() 705 iout << "\n" << endi; in call_apbs() 709 iout << "\n" << endi; in call_apbs() [all …]
|