/dports/science/quantum-espresso/q-e-qe-6.7.0/Modules/ |
H A D | read_cards.f90 | 133 IF( input_line == ' ' .OR. input_line(1:1) == '#' .OR. & 136 READ (input_line, *) card 138 DO i = 1, len_trim( input_line ) 139 input_line( i : i ) = capital( input_line( i : i ) ) 203 CALL card_ksout( input_line ) 271 CHARACTER(len=256) :: input_line local 286 CALL read_line( input_line ) 354 CHARACTER(len=256) :: input_line local 581 CALL read_line( input_line ) 1313 CALL read_line( input_line ) [all …]
|
H A D | autopilot.f90 | 331 CHARACTER(LEN=256) :: input_line local 395 linelen = LEN_TRIM( input_line ) 398 input_line( i : i ) = capital( input_line( i : i ) ) 407 CALL ADD_RULE(input_line) 427 SUBROUTINE add_rule( input_line ) argument 432 CHARACTER(LEN=256) :: input_line local 453 linelen=LEN_TRIM( input_line ) 821 CHARACTER(LEN=256) :: input_line local 832 DO i = 1, LEN_TRIM( input_line ) 833 input_line( i : i ) = capital( input_line( i : i ) ) [all …]
|
/dports/biology/babel/babel-1.6/ |
H A D | rdsybyl.c | 51 while (fgets(input_line,sizeof(input_line),file1)) in read_sybyl() 53 if ((input_line[0] == '@') && strstr(input_line,MOL)) in read_sybyl() 66 fgets(input_line,sizeof(input_line),file1); in read_sybyl() 74 fgets(input_line,sizeof(input_line),file1); in read_sybyl() 82 while (fgets(input_line, sizeof(input_line), file1)) in read_sybyl() 89 if ((input_line[0] == '@') && strstr(input_line,ATO)) in read_sybyl() 119 fgets(input_line,sizeof(input_line),file1); in read_sybyl() 131 while (fgets(input_line, sizeof(input_line), file1)) in read_sybyl() 133 if ((input_line[0] == '@') && strstr(input_line,BON)) in read_sybyl() 151 fgets(input_line,sizeof(input_line),file1); in read_sybyl() [all …]
|
H A D | rdm3d.c | 20 char input_line[BUFF_SIZE]; in read_m3d() local 26 fgets (input_line, sizeof (input_line), file1); /* Header */ in read_m3d() 27 fgets (input_line, sizeof (input_line), file1); /* Molecule definition */ in read_m3d() 28 sscanf (input_line, "%d %d", in read_m3d() 38 fgets (input_line, sizeof (input_line), file1); /* Atom definition */ in read_m3d() 39 sscanf (input_line, "%*d %s %c %lf %lf %lf", in read_m3d() 50 fgets (input_line, sizeof (input_line), file1); /* Bond definition */ in read_m3d() 51 sscanf (input_line, "%*d %d %d %s", in read_m3d()
|
H A D | rdalch.c | 24 char input_line[BUFF_SIZE]; in read_alchemy() local 29 fgets(input_line,sizeof(input_line),file1); in read_alchemy() 30 sscanf(input_line,"%d %*s %d", in read_alchemy() 41 fgets(input_line,sizeof(input_line),file1); in read_alchemy() 42 sscanf(input_line,"%*d %s %lf %lf %lf", in read_alchemy() 51 fgets(input_line,sizeof(input_line),file1); in read_alchemy() 52 sscanf(input_line,"%*d%d%d%s",&Start(i),&End(i),bo_string); in read_alchemy()
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/tools/ |
H A D | distances.f90 | 32 character(LEN=MAX_LENGTH) :: input_line variable 71 if (input_line(1:2) .eq. '-t' & 75 elseif (input_line(1:2) .eq. '-b' & 83 call get_command_argument(1,input_line) 84 if (input_line(1:2) .eq. '-t' & 88 elseif (input_line(1:2) .eq. '-b' & 95 if (input_line(1:2) .eq. '-t' & 99 elseif (input_line(1:2) .eq. '-b' & 110 read(luinp,'(a)') input_line 118 read(luinp,'(a)') input_line [all …]
|
/dports/misc/logsurfer/logsurfer-1.8/src/ |
H A D | readcf.c | 127 if ( input_line == NULL ) { 133 (void) strcpy(input_line, buffer); 138 if ( (input_line[0] == '\0' || input_line[0] == '#' 143 if ( input_line[0] == '\0' || input_line[0] == '#' ) { 144 (void) free(input_line); 147 if ( isspace(input_line[0]) ) { 148 trim(input_line); 156 (void) strcat(cfline, input_line); 157 (void) free(input_line); 173 (void) strcpy(cfline, input_line); [all …]
|
/dports/math/reduce/Reduce-svn5758-src/csl/embedded/ |
H A D | termed.c | 1579 (isalnum(input_line[n]) || input_line[n] == '_')); 1580 while (input_line[n] != 0 && isspace(input_line[n])) n++; 1591 (isalnum(input_line[n]) || input_line[n] == '_')); 1637 { input_line[i] = input_line[i+1]; 1651 { input_line[i] = input_line[i+1]; 1666 { input_line[i] = input_line[i+n]; 1682 { input_line[i] = input_line[i+n]; 2009 (isalnum(input_line[n]) || input_line[n]=='_')) n--; 2022 (isalnum(input_line[n]) || input_line[n]=='_')) n++; 2031 if (a < b) input_line[a] = toupper(input_line[a]); [all …]
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/NEB/src/ |
H A D | path_read_cards_module.f90 | 51 CHARACTER(len=256) :: input_line local 60 100 CALL read_line( input_line, end_of_file=tend ) 63 IF( input_line == ' ' .or. input_line(1:1) == '#' ) GOTO 100 65 READ (input_line, *) card 67 DO i = 1, len_trim( input_line ) 68 input_line( i : i ) = capital( input_line( i : i ) ) 73 CALL card_climbing_images( input_line ) 78 'card '//trim(input_line)//' ignored' ) 117 SUBROUTINE card_climbing_images( input_line ) argument 121 CHARACTER(len=256) :: input_line local [all …]
|
/dports/science/cp2k-data/cp2k-7.1.0/src/input/ |
H A D | cp_parser_inpp_methods.F | 76 indi = INDEX(input_line, "@") 77 pos1 = INDEX(input_line, "!") 78 pos2 = INDEX(input_line, "#") 89 mytag = input_line(indi:indf-1) 324 pos1 = INDEX(input_line, "==") 325 pos2 = INDEX(input_line, "/=") 334 cond2 = input_line(pos1+2:) 344 cond2 = input_line(pos2+2:) 566 input_line = newline 571 pos1 = INDEX(input_line, '$') [all …]
|
/dports/mail/ecartis/ecartis-1.0.0/src/ |
H A D | parse.c | 155 buffer_printf(input_line, sizeof(input_line) - 1, "%s", input_line_base); in parse_line() 158 if (input_line[0] == '>') input_line[0] = ' '; in parse_line() 160 if (input_line[strlen(input_line) - 1] == '\n') { in parse_line() 161 input_line[strlen(input_line) - 1] = '\0'; in parse_line() 164 if (input_line[0] == '#') in parse_line() 167 if ((input_line[0] == '/') && (input_line[1] == '/')) in parse_line() 170 while(input_line[strlen(input_line) - 1] == '\\') { in parse_line() 173 input_line[strlen(input_line) - 1] = ' '; in parse_line() 177 if (input_line[strlen(input_line) - 1] == '\n') { in parse_line() 178 input_line[strlen(input_line) - 1] = '\0'; in parse_line() [all …]
|
/dports/math/reduce/Reduce-svn5758-src/csl/fox/src/ |
H A D | termed.cpp | 2529 { input_line[i] = input_line[i+1]; in term_delete_forwards() 2543 { input_line[i] = input_line[i+1]; in term_delete_backwards() 2563 { input_line[i] = input_line[i+n]; in term_delete_word_forwards() 2579 { input_line[i] = input_line[i+n]; in term_delete_word_backwards() 2897 input_line[a] = std::towupper(input_line[a]); in term_capitalize_word() 2900 input_line[i] = std::towlower(input_line[i]); in term_capitalize_word() 2911 input_line[i] = std::towlower(input_line[i]); in term_lowercase_word() 2922 input_line[i] = std::towupper(input_line[i]); in term_uppercase_word() 5347 { input_line[i] = input_line[i+n-m]; in term_replace_chars_backwards() 5357 { input_line[i+m-n] = input_line[i]; in term_replace_chars_backwards() [all …]
|
/dports/math/reduce/Reduce-svn5758-src/csl/cslbase/ |
H A D | termed.cpp | 2529 { input_line[i] = input_line[i+1]; in term_delete_forwards() 2543 { input_line[i] = input_line[i+1]; in term_delete_backwards() 2563 { input_line[i] = input_line[i+n]; in term_delete_word_forwards() 2579 { input_line[i] = input_line[i+n]; in term_delete_word_backwards() 2897 input_line[a] = std::towupper(input_line[a]); in term_capitalize_word() 2900 input_line[i] = std::towlower(input_line[i]); in term_capitalize_word() 2911 input_line[i] = std::towlower(input_line[i]); in term_lowercase_word() 2922 input_line[i] = std::towupper(input_line[i]); in term_uppercase_word() 5347 { input_line[i] = input_line[i+n-m]; in term_replace_chars_backwards() 5357 { input_line[i+m-n] = input_line[i]; in term_replace_chars_backwards() [all …]
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/input/ |
H A D | cp_parser_inpp_methods.F | 102 indi = INDEX(input_line, "@") 103 pos1 = INDEX(input_line, "!") 104 pos2 = INDEX(input_line, "#") 115 mytag = input_line(indi:indf - 1) 358 pos1 = INDEX(input_line, "==") 359 pos2 = INDEX(input_line, "/=") 612 newline = input_line(1:pos1 - 3)//var_value//input_line(pos2 + 2:) 613 input_line = newline 618 pos1 = INDEX(input_line, '$') 643 newline = input_line(1:pos1 - 2)//TRIM(inpp%variable_value(idx))//input_line(pos2 + 1:) [all …]
|
/dports/databases/db5/db-5.3.28/examples/c/csv/ |
H A D | load.c | 38 char *input_line; in input_load() local 77 input_line = NULL; in input_load() 161 char *input_line, *p, *endp; in input_getline() local 163 input_line = *input_linep; in input_getline() 166 p = input_line; in input_getline() 191 if (input_line == endp) { in input_getline() 194 if ((input_line = in input_getline() 201 p = input_line; in input_getline() 215 *input_linep = input_line; in input_getline() 305 for (p = input_line, endp = input_line + len;; ++p) { in input_set_offset() [all …]
|
/dports/databases/db18/db-18.1.40/examples/c/csv/ |
H A D | load.c | 38 char *input_line; in input_load() local 77 input_line = NULL; in input_load() 161 char *input_line, *p, *endp; in input_getline() local 163 input_line = *input_linep; in input_getline() 166 p = input_line; in input_getline() 191 if (input_line == endp) { in input_getline() 194 if ((input_line = in input_getline() 201 p = input_line; in input_getline() 215 *input_linep = input_line; in input_getline() 305 for (p = input_line, endp = input_line + len;; ++p) { in input_set_offset() [all …]
|
/dports/devel/gdb/gdb-11.1/gdb/testsuite/lib/ |
H A D | completion-support.exp | 109 set test "tab complete \"$input_line\"" 110 send_gdb "$input_line\t" 146 set test "tab complete \"$input_line\"" 147 send_gdb "$input_line\t" 187 set cmd "complete $input_line" 189 set test "cmd complete \"$input_line\"" 225 proc test_gdb_complete_none { input_line } { argument 227 test_gdb_complete_tab_none $input_line 229 test_gdb_complete_cmd_none $input_line 260 set input_line [string trimleft $input_line] [all …]
|
/dports/hebrew/he2/he2-0.61/he2/ |
H A D | HebrewEditor.cxx | 376 input_line->refresh() ; in appMain() 379 input_line->processAction(act=input_line->getNextAction()) ; in appMain() 390 delete input_line ; in appMain() 405 input_line->processAction(act=input_line->getNextAction()) ; in appMain() 426 delete input_line ; in appMain() 442 input_line->processAction(act=input_line->getNextAction()) ; in appMain() 448 delete input_line ; in appMain() 473 input_line->processAction(act=input_line->getNextAction()) ; in appMain() 484 delete input_line ; in appMain() 516 input_line->processAction(act=input_line->getNextAction()) ; in appMain() [all …]
|
/dports/net/mpich2/mpich2-1.5/src/pm/mpd/ |
H A D | mpdroot.c | 20 char input_line[NAME_LEN+1], secretword[NAME_LEN+1]; in main() local 59 while (fgets(input_line,NAME_LEN,conf_file) != NULL) in main() 61 input_line[strlen(input_line)-1] = '\0'; /* eliminate \n */ in main() 62 if (input_line[0] == '#' || input_line[0] == '\0') in main() 64 if (strncmp(input_line,"secretword",10) == 0 && input_line[10] == '=') in main() 66 strncpy(secretword,&input_line[11],NAME_LEN); in main() 69 else if (strncmp(input_line,"MPD_SECRETWORD",14) == 0 && input_line[14] == '=') in main() 71 strncpy(secretword,&input_line[15],NAME_LEN); in main()
|
/dports/devel/p5-Perl-Tidy/Perl-Tidy-20211029/examples/ |
H A D | perlcomment.pl | 116 $self->print($input_line); 127 $self->print($input_line); 136 $self->print($input_line); 148 $self->print($input_line); 153 $self->append_comment($input_line); 159 my ( $self, $input_line ) = @_; 161 print $input_line; 165 my ( $self, $input_line ) = @_; 168 $$rcomment_block .= $input_line; 169 if (length($input_line) > $maximum_comment_length) { [all …]
|
/dports/devel/p5-Java/Java-4.7/examples/ |
H A D | server.pl | 24 my $input_line = $buffered_reader->readLine; 25 last if (!$input_line); 26 $input_line = $input_line->get_value; 27 chomp $input_line; 28 print "Received: $input_line\n"; 29 $print_writer->println("You typed - $input_line"); 34 $cont = 0 if ($input_line =~ /^bye/i);
|
/dports/graphics/pecl-imagick/imagick-3.5.1/util/ |
H A D | fixup_arginfo.php | 19 foreach ($input_lines as $input_line) { 20 if (strpos($input_line, $fixup_note) !== false) { 137 foreach ($input_lines as $input_line) { 138 $input_line = rtrim($input_line); variable 139 $input_line = preg_replace($search, $replace, $input_line); variable 141 $output_lines[] = $input_line;
|
/dports/graphics/pecl-imagick-im7/imagick-3.5.1/util/ |
H A D | fixup_arginfo.php | 19 foreach ($input_lines as $input_line) { 20 if (strpos($input_line, $fixup_note) !== false) { 137 foreach ($input_lines as $input_line) { 138 $input_line = rtrim($input_line); variable 139 $input_line = preg_replace($search, $replace, $input_line); variable 141 $output_lines[] = $input_line;
|
/dports/print/trueprint/trueprint-5.4/src/ |
H A D | output.c | 46 static int line_end(char *input_line, int last_char_printed); 165 add_char(cursor,' ',status,input_line,input_status); in getnextline() 209 input_line[line_position] = 0; in getnextline() 223 line_end(char *input_line, int last_char_printed) in line_end() argument 231 input_line_length = (int)strlen(input_line); in line_end() 269 if (input_line[output_line_end] == BREAKS[break_index]) in line_end() 301 static char input_line[MAXLINELENGTH]; in printnextline() local 340 if (getdelline(line_number+1,input_line,input_status)){ in printnextline() 378 input_line_length = (int)strlen(input_line); in printnextline() 513 switch(input_line[output_char_idx]) in printnextline() [all …]
|
/dports/devel/tinygo/tinygo-0.14.1/llvm-project/mlir/utils/ |
H A D | generate-test-checks.py | 136 for input_line in input_lines: 137 if not input_line: 139 lstripped_input_line = input_line.lstrip() 145 input_line = input_line.rsplit('//', 1)[0].rstrip() 148 is_toplevel_op = (not is_block and input_line.startswith(' ') and 149 input_line[2] != ' ' and input_line[2] != '}') 156 if input_line[-1] == '{': 161 input_line = preprocess_line(input_line) 164 ssa_split = input_line.split('%')
|