Skip to content

Commit 57ba6b1

Browse files
removing _lfortran_caimag and _lfortran_zaimag functions
1 parent 8773842 commit 57ba6b1

1 file changed

Lines changed: 4 additions & 13 deletions

File tree

src/runtime/lpython_builtin.py

Lines changed: 4 additions & 13 deletions
Original file line numberDiff line numberDiff line change
@@ -64,15 +64,15 @@ def abs(c: c32) -> f32:
6464
a: f32
6565
b: f32
6666
a = c.real
67-
b = _lfortran_caimag(c)
67+
b = c.imag
6868
return f32((a**f32(2) + b**f32(2))**f32(1/2))
6969

7070
@overload
7171
def abs(c: c64) -> f64:
7272
a: f64
7373
b: f64
7474
a = c.real
75-
b = _lfortran_zaimag(c)
75+
b = c.imag
7676
return (a**2.0 + b**2.0)**(1/2)
7777

7878
@interface
@@ -434,22 +434,13 @@ def lbound(x: i32[:], dim: i32) -> i32:
434434
def ubound(x: i32[:], dim: i32) -> i32:
435435
pass
436436

437-
438-
@ccall
439-
def _lfortran_caimag(x: c32) -> f32:
440-
pass
441-
442-
@ccall
443-
def _lfortran_zaimag(x: c64) -> f64:
444-
pass
445-
446437
@overload
447438
def _lpython_imag(x: c64) -> f64:
448-
return _lfortran_zaimag(x)
439+
return x.imag
449440

450441
@overload
451442
def _lpython_imag(x: c32) -> f32:
452-
return _lfortran_caimag(x)
443+
return x.imag
453444

454445

455446
@overload

0 commit comments

Comments
 (0)