代码搜索：complex
找到约 10,000 项符合「complex」的源代码
代码结果 10,000
www.eeworm.com/read/162614/5526279
f90 complex_write.f90
! { dg-do run }
! pr 19071
! test case provided by
! Thomas.Koenig@online.de
program cio
complex a
real r1,r2
a = cmplx(1.0, 2.0)
open(unit
www.eeworm.com/read/162614/5526449
f90 inquire-complex.f90
! { dg-do run }
! PR 23428: Inquire(iolength) used to give the wrong result.
program main
implicit none
integer s4, s8
complex(kind=8) c8
complex(kind=4) c4
inquire (iolength=s4) c4
www.eeworm.com/read/162614/5526476
f90 reshape-complex.f90
! { dg-do run }
! PR 21127: Reshape of complex didn't work.
! PR 21480: Reshape of packed complex arrays didn't work either.
program main
complex, dimension(8) :: b
complex, dimension(2,2) :: a
www.eeworm.com/read/162614/5526829
c complex-1-lib.c
extern int inside_main;
extern void abort (void);
#ifdef __OPTIMIZE__
#define ABORT_INSIDE_MAIN do { if (inside_main) abort (); } while (0)
#else
#define ABORT_INSIDE_MAIN do { } while (0)
#endif
sta
www.eeworm.com/read/162614/5529703
h struct-complex-1.h
#include
struct st
{
int s1;
float complex x;
int s2;
};
typedef struct { float r, i; } _complex;
struct stc
{
int s1;
_complex x;
int s2;
};
www.eeworm.com/read/340665/3278652
c builtin-complex-1.c
/* Test for builtin conj, creal, cimag. */
/* Origin: Joseph Myers */
extern float _Complex conjf (float _Complex);
extern double _Complex conj (double _Complex);
extern long doubl
www.eeworm.com/read/340665/3284064
cc complex_inserters_extractors.cc
// 2000-02-10
// Petter Urkedal
// Copyright (C) 2000 Free Software Foundation
//
// This file is part of the GNU ISO C++ Library. This library is free
// software; you can re