FORTRAN -Returning index fir which values fall in a region
I have an 10 element array containing numbers, I want the start and end index in the array for which the values lie between DIST1 and DIST2. It is not working quite right. I also might want a value of 0 if I cannot find an index.
I have an application on Informix 4GL, and I am invoking the shell script from the program, but I need to know if the shell script work fine or not, in order to continue the process.
I know that we can use $? to get the final status but this is on unix command. How can I return a value from the... (3 Replies)
I need to send the status from child shell failure to parent shell. I would like to know how could we accomplish this.
My parent.sh is as below:
#!/bin/ksh
set -x
echo "I am in parent shell now..."
child.sh
ret_stat=$?
echo "rest_stat=$ret_stat"
echo "I am below parent shell end..."
... (4 Replies)
Hi
Running a specific nawk statement over a 17m lines files returns the following:
/bin/nawk: not enough args in .....
input record number 1,25955e+06, file test.1
source line number 1
I'd like to report the line number (in bold above) in decimal not floating so that i can spot it out.
... (1 Reply)
For kicks I wrote up a Password generator after lunch. Let me start with the code:
unsigned int x,y,z,c;
unsigned int KISS();
unsigned int devrand();
int main( int argc, char** argv )
{
int i, j = 1;
char pwd = "abcdefghijklmnopqrstuvwxyz"
... (5 Replies)
hi
how can I return multiple values from a C function. I tried the following:
#include <stdio.h>
void foo(int id, char *first_name, char *last_name)
{
/*
this is just an example to illustrate my problem... real code makes
use of the "id" parameter.
*/
first_name = (char... (8 Replies)
I have this code and I want to get the first two consecutive distances (obtained by calling GET_TH(IT, 'DIST', DIST) at index IT, the result stored in DIST) for which (ITFLG(IT) .NE. 1). L_FIRST get the first DIST for which ITFLG(IT) .NE. 1. Getting a bit confused on how to achieve this.
... (0 Replies)
I have an array XOFFS of size N. I have VDISTMIN and VDISTMAX.
I want to find the beginning and and index in XOFFS such that values are within
Example
Let XOFFS = (10 20 30 40 50)
If VDISTMIN = -20 and VDISTMAX = 20
Then ISTR = 1 and IEND = 2 as XOFFS through XOFFS fall within the... (2 Replies)
Hi All,
Thanks all of you for the help you provide to me. Well, I have one more problem, where I am trying to pull file system information in the loop and display the filesystem percentege. I am using following code to achive this, nut it's giving the weired output.
My file system is
... (1 Reply)
I've been trying to write a command-line function to grab a website's MX records and their ip addresses. The code below works with domains that only have one MX record:
function kmx { mx=`host -t MX $1 | awk '{ print $7 }'`;
ip=`host $mx | sed '/IPv6/d;/handled/d' | awk '{ print $4 }'`; ... (8 Replies)
Hi
I have a code as the following
#!/usr/bin/ksh
set -x
row()
{
a=$1
b=$2
c=$(($a + $b))
d=$(($a * $b))
echo $a $b
}
e=`row 2 3`
set $e
echo "The value of c is $c"
echo "The value of d is $d"
My requirement is I need to pass two arguments to a function and return two values... (5 Replies)
Discussion started by: Priya Amaresh
5 Replies
LEARN ABOUT DEBIAN
linsert
linsert(3tcl) Tcl Built-In Commands linsert(3tcl)__________________________________________________________________________________________________________________________________________________NAME
linsert - Insert elements into a list
SYNOPSIS
linsert list index element ?element element ...?
_________________________________________________________________DESCRIPTION
This command produces a new list from list by inserting all of the element arguments just before the index'th element of list. Each ele-
ment argument will become a separate element of the new list. If index is less than or equal to zero, then the new elements are inserted
at the beginning of the list. The interpretation of the index value is the same as for the command string index, supporting simple index |
arithmetic and indices relative to the end of the list.
EXAMPLE
Putting some values into a list, first indexing from the start and then indexing from the end, and then chaining them together:
set oldList {the fox jumps over the dog}
set midList [linsert $oldList 1 quick]
set newList [linsert $midList end-1 lazy]
# The old lists still exist though...
set newerList [linsert [linsert $oldList end-1 quick] 1 lazy]
SEE ALSO list(3tcl), lappend(3tcl), lindex(3tcl), llength(3tcl), lsearch(3tcl), lset(3tcl), lsort(3tcl), lrange(3tcl), lreplace(3tcl), string(3tcl) |
KEYWORDS
element, insert, list
Tcl 8.2 linsert(3tcl)