test Program

Uses

  • program~~test~9~~UsesGraph program~test~9 test module~forclust forclust program~test~9->module~forclust

Contents

Source Code


Variables

Type Attributes Name Initial
type(cluster) :: my_pc

Source Code

program test

   use :: forclust

   implicit none

   type(cluster) :: my_pc

   call my_pc%select()
     call my_pc%node(1)%select()
     call my_pc%node(1)%set_debug('on')
     call my_pc%node(1)%get_turbo()

     call my_pc%node(1)%set_debug('off')
     call my_pc%node(1)%get_turbo()
   call my_pc%deselect()

end program test