ncinfo Subroutine

public subroutine ncinfo(out, in1, in2, in3, in4)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(out), dimension(4) :: out
character(len=*), intent(in) :: in1
character(len=*), intent(in) :: in2
character(len=*), intent(in) :: in3
character(len=*), intent(in) :: in4

Called by

proc~~ncinfo~~CalledByGraph proc~ncinfo ncinfo proc~initeb initEB proc~initeb->proc~ncinfo proc~initfielddump initfielddump proc~initfielddump->proc~ncinfo proc~initibm initibm proc~initibm->proc~ncinfo proc~initstatsdump initstatsdump proc~initstatsdump->proc~ncinfo program~dalesurban DALESURBAN program~dalesurban->proc~initeb program~dalesurban->proc~initfielddump program~dalesurban->proc~initibm program~dalesurban->proc~initstatsdump

Source Code

  subroutine ncinfo(out,in1,in2,in3,in4)

    implicit none
    character(*), dimension(4),intent(out) ::out
    character(*), intent(in) ::in1,in2,in3,in4
    out(1) = in1
    out(2) = in2
    out(3) = in3
    out(4) = in4
  end subroutine ncinfo