Skip to content

Display method issue #43#198

Merged
vickysharma0812 merged 1 commit intomasterfrom
dev
Jun 12, 2023
Merged

Display method issue #43#198
vickysharma0812 merged 1 commit intomasterfrom
dev

Conversation

@vickysharma0812
Copy link
Copy Markdown
Member

This method is related to the ISSUE #43

Display method has been improved.

program main
  use easifemBase
  implicit none
  REAL( DFP ), allocatable :: amat(:, :)
  call TIMESTAMP()

  call reallocate(amat, 5, 5)
  call random_number(amat)
  call display( val=amat, msg="5x5 matrix (always full): ", full=.TRUE. )
  call display( val=amat, msg="5x5 matrix (always full): ", full=.FALSE. )

  call reallocate(amat, 10, 10)
  call random_number(amat)
  call display( val=amat, msg="10x10 (full): ", full=.TRUE. )
  call display( val=amat, msg="10x10 (short): ", full=.FALSE. )

end program main
program main
  use easifemBase
  implicit none
  REAL( DFP ), allocatable :: avec(:)
  call TIMESTAMP()

  call reallocate(avec, 5)
  call random_number(avec)
  call display( val=avec, msg="A vector of length 5 (always full): ", full=.TRUE. )
  call display( val=avec, msg="A vector of length 5 (always full): ", full=.TRUE., orient="ROW" )

  call display( val=avec, msg="A vector of length 5 (always full): ", full=.FALSE. )
  call display( val=avec, msg="A vector of length 5 (always full): ", full=.FALSE., orient="ROW" )

  call reallocate(avec, 10)
  call random_number(avec)
  call display( val=avec, msg="A vector of length 10 (full): ", full=.TRUE. )
  call display( val=avec, msg="A vector of length 10 (short): ", full=.FALSE. )
  call display( val=avec, msg="A vector of length 10 (short): ", full=.FALSE., orient="ROW" )

end program main

Changes to be committed:
modified: cmake/targetCompileDefs.cmake
modified: install.py
modified: src/modules/Display/src/Display_Mat2.inc
modified: src/modules/Display/src/Display_Mat3.inc
modified: src/modules/Display/src/Display_Mat4.inc
modified: src/modules/Display/src/Display_Method.F90
modified: src/modules/Display/src/Display_Scalar.inc
modified: src/modules/Display/src/Display_Vector.inc
modified: src/modules/Polynomial/src/QuadrangleInterpolationUtility.F90
modified: src/modules/Polynomial/src/TriangleInterpolationUtility.F90

This method is related to the ISSUE #43.

Display method has been improved.

```fortran
program main
  use easifemBase
  implicit none
  REAL( DFP ), allocatable :: amat(:, :)
  call TIMESTAMP()

  call reallocate(amat, 5, 5)
  call random_number(amat)
  call display( val=amat, msg="5x5 matrix (always full): ", full=.TRUE. )
  call display( val=amat, msg="5x5 matrix (always full): ", full=.FALSE. )

  call reallocate(amat, 10, 10)
  call random_number(amat)
  call display( val=amat, msg="10x10 (full): ", full=.TRUE. )
  call display( val=amat, msg="10x10 (short): ", full=.FALSE. )

end program main
```

```fortran
program main
  use easifemBase
  implicit none
  REAL( DFP ), allocatable :: avec(:)
  call TIMESTAMP()

  call reallocate(avec, 5)
  call random_number(avec)
  call display( val=avec, msg="A vector of length 5 (always full): ", full=.TRUE. )
  call display( val=avec, msg="A vector of length 5 (always full): ", full=.TRUE., orient="ROW" )

  call display( val=avec, msg="A vector of length 5 (always full): ", full=.FALSE. )
  call display( val=avec, msg="A vector of length 5 (always full): ", full=.FALSE., orient="ROW" )

  call reallocate(avec, 10)
  call random_number(avec)
  call display( val=avec, msg="A vector of length 10 (full): ", full=.TRUE. )
  call display( val=avec, msg="A vector of length 10 (short): ", full=.FALSE. )
  call display( val=avec, msg="A vector of length 10 (short): ", full=.FALSE., orient="ROW" )

end program main
```

Changes to be committed:
modified:   cmake/targetCompileDefs.cmake
modified:   install.py
modified:   src/modules/Display/src/Display_Mat2.inc
modified:   src/modules/Display/src/Display_Mat3.inc
modified:   src/modules/Display/src/Display_Mat4.inc
modified:   src/modules/Display/src/Display_Method.F90
modified:   src/modules/Display/src/Display_Scalar.inc
modified:   src/modules/Display/src/Display_Vector.inc
modified:   src/modules/Polynomial/src/QuadrangleInterpolationUtility.F90
modified:   src/modules/Polynomial/src/TriangleInterpolationUtility.F90
@vickysharma0812 vickysharma0812 merged commit fd921e3 into master Jun 12, 2023
@vickysharma0812 vickysharma0812 mentioned this pull request Jun 12, 2023
5 tasks
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment

Labels

None yet

Projects

None yet

Development

Successfully merging this pull request may close these issues.

1 participant