Sponsored Content
Top Forums Programming generating pair of numbers in special order Post 302545681 by vjramana on Tuesday 9th of August 2011 07:20:04 AM
Old 08-09-2011
generating pair of numbers in special order

I need some help in generating pair of numbers in orders using FORTRAN code.
The order is like following.
loop_1: 1,2 2,3 3,4 4,5 5,6 6,7 7,8 ..... until <= 2000
loop_2: 1,3 3,5, 5,7 7,9 9,11 11,13 ........until <= 2000
loop_3: 1,4, 4,7 7,10 10,13 13,17 ..... until <= 2000
loop_4: 1,5 5,9 9,13 13,17 17,21 .... until <= 2000
. . . . until loop_100:
I have tried with simple code such as
Code:
program loopJump
implicit none
 !
 integer :: i,j,k   
do k = 1, 6  
do i =  1, 5      
j=(i+k)     
print*, i,"   ",j   
enddo  
enddo   

stop  
end

But I can not get as I wanted.


Any help is appreciated.
Thanks in advance.

Last edited by pludi; 08-09-2011 at 08:52 AM..
 

9 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

generating random numbers with hamming distance 4

Hi I want to genrate 10 random 32 bit binary numbers with hamming distance 4 and 8. 11010110010101010101010101010101 11010110010101010100010101010010 if we look carefully at these two binary numbers they differ at 4 places hence hamming distance 4. Now I want to genrate these numbers... (2 Replies)
Discussion started by: hack_tom
2 Replies

2. Shell Programming and Scripting

generating line numbers

hello All Do anybody know how to generat number line that is puting the number of lines at the begining of a new line, with d bracket by the side say 1) 2) 3) any help would be nice (7 Replies)
Discussion started by: sam4now
7 Replies

3. Shell Programming and Scripting

Ascending & Descending order numbers

Dear All, I have below attached file in which i have many nos, i want the last ascending order nos. The brief description is given below. File 315 381 432 315 381 432 315 381 432 315 381 432 315 381 432 (6 Replies)
Discussion started by: pravani1
6 Replies

4. Shell Programming and Scripting

Generating random numbers

Hi, I am having trouble with generating random numbers. can this be done with awk? So I have a file that looks like this: 23 30 24 40 26 34 So column1 is start and column2 is end. I want to generate 3 random #'s between start and stop: So the output will look like this: ... (9 Replies)
Discussion started by: phil_heath
9 Replies

5. Shell Programming and Scripting

Generating Gaussian Distributed Random Numbers

I want to generate an awk function that generated a Gaussian distributed set of random numbers. I need to implement the thing below in awk. Rnd is just a uniform random number between 0 and 1 function rgaussian(r1, r2) { Do v1 = 2 * Rnd - 1 v2 = 2 * Rnd - 1 ... (0 Replies)
Discussion started by: kristinu
0 Replies

6. Shell Programming and Scripting

picking the numbers missing which is supposed to be a numercal/counting order

Hi, I have a tab delimited file with 2 columns. In the first column the numbers are sorted from smallest to largest. It is supposed to be in the numerical order but in between some numbers are missing. Is there a way I could easily get those numbers that are missing and output it a file using... (11 Replies)
Discussion started by: Lucky Ali
11 Replies

7. UNIX for Dummies Questions & Answers

Appending a column of numbers in ascending order to a text file

I have a text file where I want to append a column of numbers in ascending orders. Input: 57 abc 25 def 32 ghi 54 jkl Output:57 abc 57 abc 1 25 def 2 32 ghi 3 54 jkl 4 How do I go about doing that? Thanks! (11 Replies)
Discussion started by: evelibertine
11 Replies

8. Shell Programming and Scripting

How To Arrange Record In A Special Order?

Hi All, I have following data to be arranged based on columnd 6: 0098442947 0098222107 0098442134 0098200179 0098441067 0098442744 0098443106 0098442746 0098321411 0098443111 0098456611 0098444570 0098456600 0098385750 0098200288 (3 Replies)
Discussion started by: angshuman
3 Replies

9. Shell Programming and Scripting

Nawk special numbers

Just stumbled over a terrible feature in nawk derivates. I did not find it documented in man pages. HP-UX 11.31: echo info | awk '{print $1+0}' inf echo nano | awk '{print $1+0}' nan echo info | awk '{print $1-$1}' -nanSolaris 10: echo info | nawk '{print $1+0}' Inf echo nano | nawk... (5 Replies)
Discussion started by: MadeInGermany
5 Replies
COMPLEX(7)						     Linux Programmer's Manual							COMPLEX(7)

NAME
complex - basics of complex mathematics SYNOPSIS
#include <complex.h> DESCRIPTION
Complex numbers are numbers of the form z = a+b*i, where a and b are real numbers and i = sqrt(-1), so that i*i = -1. There are other ways to represent that number. The pair (a,b) of real numbers may be viewed as a point in the plane, given by X- and Y- coordinates. This same point may also be described by giving the pair of real numbers (r,phi), where r is the distance to the origin O, and phi the angle between the X-axis and the line Oz. Now z = r*exp(i*phi) = r*(cos(phi)+i*sin(phi)). The basic operations are defined on z = a+b*i and w = c+d*i as: addition: z+w = (a+c) + (b+d)*i multiplication: z*w = (a*c - b*d) + (a*d + b*c)*i division: z/w = ((a*c + b*d)/(c*c + d*d)) + ((b*c - a*d)/(c*c + d*d))*i Nearly all math function have a complex counterpart but there are some complex-only functions. EXAMPLE
Your C-compiler can work with complex numbers if it supports the C99 standard. Link with -lm. The imaginary unit is represented by I. /* check that exp(i * pi) == -1 */ #include <math.h> /* for atan */ #include <stdio.h> #include <complex.h> int main(void) { double pi = 4 * atan(1.0); double complex z = cexp(I * pi); printf("%f + %f * i ", creal(z), cimag(z)); } SEE ALSO
cabs(3), cacos(3), cacosh(3), carg(3), casin(3), casinh(3), catan(3), catanh(3), ccos(3), ccosh(3), cerf(3), cexp(3), cexp2(3), cimag(3), clog(3), clog10(3), clog2(3), conj(3), cpow(3), cproj(3), creal(3), csin(3), csinh(3), csqrt(3), ctan(3), ctanh(3) COLOPHON
This page is part of release 3.53 of the Linux man-pages project. A description of the project, and information about reporting bugs, can be found at http://www.kernel.org/doc/man-pages/. 2011-09-16 COMPLEX(7)
All times are GMT -4. The time now is 10:39 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy