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 modstat_nc::ncinfo proc~initeb modEB::initEB proc~initeb->proc~ncinfo proc~initfielddump modfielddump::initfielddump proc~initfielddump->proc~ncinfo proc~initstatsdump modstatsdump::initstatsdump proc~initstatsdump->proc~ncinfo program~dalesurban DALESURBAN program~dalesurban->proc~initeb program~dalesurban->proc~initfielddump program~dalesurban->proc~initstatsdump

Contents

Source Code


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